IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 29 Haziran 2007, 23:17   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Oto Join Addonu




Bunu Nasıl Becerdim BiLmiyorum bende yeniyim ama Oto İdetnt Olayına bakarak BöyLe birşey Yaptım Bazı yerlerden Şu Var %bilmemne Olaylarınada göz attım ve bu işi becerdim bence herkes coder olabilir... TÜRKÜN NESİ EKSİK..
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias ajoin { dialog -m ajoin ajoin } dialog ajoin { size -1 -1 150 105 title "oto Kanal Girme Addonu" option dbu list 1, 5 5 70 100, sort button "Ekle", 2, 80 5 30 10 button "Sil/KaLdır", 3, 115 5 30 10 text "KanaL", 6, 80 23 65 10 edit "", 4, 80 30 65 10 text "Şifre (uygularsan)", 7, 80 43 65 10 edit "", 5, 80 50 65 10 button "TAMAM", 10, 88 70 50 10, OK } on *:DIALOG:ajoin:init:0: { var %chan = 1, %key = 1 while (%chan <= $numtok(%auto.join,44)) { did -a ajoin 1 $gettok(%auto.join,%chan,44) | inc %chan } while (%key <= $numtok(%auto.key,44)) { did -a ajoin 1 $gettok(%auto.key,%key,44) | inc %key } } on *:DIALOG:ajoin:sclick:2: { newchan } on *:DIALOG:ajoin:sclick:3: { if ($did(1).sel == $null) return | var %line = $did(1).sel, %text = $did(1,%line) | did -d ajoin 1 $did(1).sel if ($numtok(%text,32) == 2) %auto.key = $remtok(%auto.key,%text,1,44) | else %auto.join = $remtok(%auto.join,%text,1,44) } on *:DIALOG:ajoin:sclick:10: { if (($dialog(ajoin).focus == 4) || ($dialog(ajoin).focus == 5)) { newchan | halt } } alias newchan { var %chan = $did(ajoin,4), %key | if (%chan == $null) return | if ($left(%chan,1) != $chr(35)) %chan = $chr(35) $+ %chan | if ($did(ajoin,5)) %key = %chan $did(ajoin,5) if (%key) %auto.key = $addtok(%auto.key,%key,44) | else %auto.join = $addtok(%auto.join,%chan,44) did -a ajoin 1 $iif(%key,%key,%chan) | did -r ajoin 4,5 | did -f ajoin 4 } on *:CONNECT: { .raw JOIN %auto.join | var %temp = 1 | while (%temp <= $numtok(%auto.key,44)) { .raw JOIN $gettok(%auto.key,%temp,44) | inc %temp } }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Cevapla

Etiketler
addonu, join, mirc, mirc download, mirc indir, oto


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
elinde baloncuk addonu ve baglantı menusu addonu olan varmı? Leo mIRC Scripting Sorunları 12 26 Şubat 2010 10:19
Join Hk. Kan mIRC Scripting Sorunları 3 04 Ekim 2007 18:06
Multi join | Mass Clone Join Kuruması.. CoCoRiCo mIRC Scripting Hazır Kodlar 4 12 Aralık 2005 08:29