Çevrimdışı

aLone selam yönlendirdiğin link'i inceledim mirc'e nasıl yüklerim yönlendirirsen çok sevinirim

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 19:46 -->-> Daha önceki mesaj 19:41 --

Çok teşekkür ederim inceliyorum

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 20:22 -->-> Daha önceki mesaj 19:46 --

butonlar çalışmıyor çalışırsa güzel olmuş tam aradağım özellik

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 20:25 -->-> Daha önceki mesaj 20:22 --

Alıntı:

alias mdc { return $dll(dll\mdc.dll,$1,$2-) } alias mdx { return $dll(dll\mdx.dll,$1,$2-) } alias a.b { dialog -m zlnat zlnat } dialog zlnat { title "~" size 40 170 510 320 option pixels radio "Acık",13,420 225 55 24,group radio "KapaLı",14,420 250 55 24 box "", 11, 5 8 500 295 edit "Nick Yazınız..!", 9, 175 20 160 30, center edit "Ident Yazınız..!", 1, 175 55 160 30, center edit "Host Yazınız..!", 2, 175 90 160 30, center edit "", 19, 93 132 80 30, center edit "", 20, 93 182 80 30, center edit "", 21, 93 232 80 30, center edit " Girişte Oto Nick ident host Gzline Paneli ", 33, 10 276 490 23, center list 22, 175 132 160 130, size } on *:dialog:zlnat:sclick:*:{ if ($did = 13) { set %NickZ Acık | set %identZ Acık | set %HostZ Acık | dialog -t zlnat Yasak Giriş Koruması AcıLdı. | did -e zlnat 9,1,2,19,20,21,33,22 } if ($did = 14) { set %NickZ Kapalı | set %identZ Kapalı | set %HostZ Kapalı | dialog -t zlnat Yasak Giriş Koruması KapatıLdı. | did -b zlnat 9,1,2,19,20,21,33,22 } } on *:dialog:zlnat:init:0: { if (%NickZ == Acık) { did -c zlnat 13 } if (%NickZ == Kapalı) { did -c zlnat 14 } .timerxa 1 2 did -r zlnat 9,1,2 mdx MarkDialog $dname mdx SetDialog [ $dname ] bgcolor $rgb(28,134,238) mdx SetColor 9,1,2,19,20,21,22,33 background $rgb(0,0,0) mdx SetColor 9,1,2,19,20,21,22,33 textbg $rgb(0,0,0) mdx SetColor $dname 9,1,2,19,20,21,22,33 text $rgb(255,0,0) mdx SetFont 13,14,9,1,2,19,20,21,22,33 -11 700 Tahoma mdx SetFont 33 -14 700 Tahoma mdx SetColor 13,14 background $rgb(28,134,238) mdx SetColor 13,14 textbg $rgb(28,134,238) mdx SetColor $dname 13,14 text $rgb(255,0,0) mdc BitBtn Create zlnat 2 10 20 162 31 > Nick Zline Ekle mdc BitBtn Create zlnat 3 10 55 162 31 > Ident Zline Ekle mdc BitBtn Create zlnat 4 10 90 162 31 > Host Zline Ekle mdc BitBtn Create zlnat 5 337 20 162 31 > Nick Zline SiL mdc BitBtn Create zlnat 6 337 55 162 31 > Ident Zline SiL mdc BitBtn Create zlnat 7 337 90 162 31 > Host Zline SiL mdc BitBtn Create zlnat 13 10 125 80 21 > Muaf N Ekle mdc BitBtn Create zlnat 14 10 175 80 21 > Muaf i Ekle mdc BitBtn Create zlnat 15 10 225 80 21 > Muaf H Ekle mdc BitBtn Create zlnat 16 10 150 80 21 > Muaf N Sil mdc BitBtn Create zlnat 17 10 200 80 21 > Muaf i Sil mdc BitBtn Create zlnat 18 10 250 80 21 > Muaf H Sil mdc BitBtn Create zlnat 26 337 125 80 21 > Muaf N list mdc BitBtn Create zlnat 27 337 175 80 21 > Muaf i list mdc BitBtn Create zlnat 28 337 225 80 21 > Muaf H list mdc BitBtn Create zlnat 29 337 150 80 21 > Yasak N list mdc BitBtn Create zlnat 30 337 200 80 21 > Yasak i list mdc BitBtn Create zlnat 31 337 250 80 21 > Yasak H list mdc BitBtn Create zlnat 8 420 125 79 97 > Kapat mdc BitBtn Color 2 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 2 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 3 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 3 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 4 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 4 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 5 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 5 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 6 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 6 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 7 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 7 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 8 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 8 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 13 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 13 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 14 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 14 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 15 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 15 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 16 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 16 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 17 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 17 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 18 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 18 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 26 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 26 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 27 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 27 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 28 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 28 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 29 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 29 $rgb(25,2,22) $rgb(6,135,5) $rgb(130,25,255) $rgb(2,5,255) $rgb(2,10,220) mdc BitBtn Color 30 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 30 $rgb(25,2,22) $rgb(6,135,5) $rgb(130,25,255) $rgb(2,5,255) $rgb(2,10,220) mdc BitBtn Color 31 $rgb(25,2,244) $rgb(20,180,255) $rgb(10,251,255) $rgb(0,0,0) $rgb(20,180,255) $rgb(122,233,20) mdc BitBtn downcolor 31 $rgb(25,2,22) $rgb(6,135,5) $rgb(130,25,255) $rgb(2,5,255) $rgb(2,10,220) mdc BitBtn Font 2 $rgb(240,240,240) 9 +b > Tahoma mdc BitBtn Font 3 $rgb(240,240,240) 9 +b > Tahoma mdc BitBtn Font 4 $rgb(240,240,240) 9 +b > Tahoma mdc BitBtn Font 5 $rgb(240,240,240) 9 +b > Tahoma mdc BitBtn Font 6 $rgb(240,240,240) 9 +b > Tahoma mdc BitBtn Font 7 $rgb(240,240,240) 9 +b > Tahoma mdc BitBtn Font 8 $rgb(240,240,240) 14 +b > Tahoma mdc BitBtn Font 13 $rgb(240,240,240) 7 +b > Tahoma mdc BitBtn Font 14 $rgb(240,240,240) 7 +b > Tahoma mdc BitBtn Font 15 $rgb(240,240,240) 7 +b > Tahoma mdc BitBtn Font 16 $rgb(240,240,240) 7 +b > Tahoma mdc BitBtn Font 17 $rgb(240,240,240) 7 +b > Tahoma mdc BitBtn Font 18 $rgb(240,240,240) 7 +b > Tahoma mdc BitBtn Font 26 $rgb(255,252,252) 7 +b > Tahoma mdc BitBtn Font 27 $rgb(255,252,252) 7 +b > Tahoma mdc BitBtn Font 28 $rgb(255,252,252) 7 +b > Tahoma mdc BitBtn Font 29 $rgb(255,252,252) 7 +b > Tahoma mdc BitBtn Font 30 $rgb(255,252,252) 7 +b > Tahoma mdc BitBtn Font 31 $rgb(255,252,252) 7 +b > Tahoma did -f $dname 9 } on *:signal:mdc: { if ($2 == zlnat) && ($3 == sclick) && ($4 == 2) { .auser NickZ $did(zlnat,9) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,9) 4 Nick 0zLine liste Eklendi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 3) { .auser identZ $did(zlnat,1) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,1) 4 identi 0zLine liste Eklendi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 4) { .auser HostZ $did(zlnat,2) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,2) 4 Hostu 0zLine liste Eklendi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 5) { .ruser NickZ $did(zlnat,9) | echo -a 0,1 4 SiLme işLemi7 $did(zlnat,9) 11 Nick 0zLine listesinden SiLindi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 6) { .ruser identZ $did(zlnat,1) | echo -a 0,1 4 SiLme işLemi7 $did(zlnat,1) 11 ident 0zLine listesinden SiLindi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 7) { .ruser HostZ $did(zlnat,2) | echo -a 0,1 4 SiLme işLemi7 $did(zlnat,2) 11 Host 0zLine listesinden SiLindi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 8) { .timer 1 0 dialog -x zlnat } if ($2 == zlnat) && ($3 == sclick) && ($4 == 13) { .auser Muafnick $did(zlnat,19) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,19) 4 Nick 0Muaf liste Eklendi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 14) { .auser Muafident $did(zlnat,20) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,20) 4 ident 0Muaf liste Eklendi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 15) { .auser Muafhost $did(zlnat,21) | echo -a 0,1 4 Ekleme işLemi11 $did(zlnat,21) 4 Host 0Muaf liste Eklendi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 16) { .ruser Muafnick $did(zlnat,19) | echo -a 0,1 4 SiLme işLemi11 $did(zlnat,19) 4 Nick 0Muaf listesinden SiLindi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 17) { .ruser Muafident $did(zlnat,20) | echo -a 0,1 4 SiLme işLemi11 $did(zlnat,20) 4 ident 0Muaf listesinden SiLindi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 18) { .ruser Muafhost $did(zlnat,21) | echo -a 0,1 4 SiLme işLemi11 $did(zlnat,21) 4 Host 0Muaf listesinden SiLindi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 26) { .m.nick | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,19) 4 Nick 0Muaf listesi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 27) { .m.ident | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,20) 4 ident 0Muaf listesi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 28) { .m.host | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,21) 4 Host 0Muaf listesi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 29) { .y.nick | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,19) 4 Nick 0Yasak listesi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 30) { .y.ident | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,20) 4 ident 0Yasak listesi. } if ($2 == zlnat) && ($3 == sclick) && ($4 == 31) { .y.host | echo -a 0,1 4 Listeleme işLemi11 $did(zlnat,21) 4 Host 0Yasak listesi. } } on *:snotice:*connecting on*: { if ($level($9) == muafnick) { halt } if (connecting isin $1-) { if (%nickZ == Acık) { var %:ip $remove($gettok($10,2,64),$chr(41)) if $level($9) = NickZ { gzline $+(*@,%:ip) 1d YasakLı Nick | halt } } if (%identZ == Acık) { var %:idnt $remove($gettok($10,1,64),$chr(40)) if ($level(%:idnt) == muafident) { halt } if $level(%:idnt) = identZ { gzline $+(*@,%:ip) 1d YasakLı ident | halt } } if (%HostZ == Acık) { if ($level(%:ip) == muafhost) { halt } if $level(%:ip) = HostZ { gzline $+(*@,%:ip) 1d YasakLı Host | halt } } } } ;Yasak list alias y.nick { did -r zlnat 22 did -a zlnat 22 : Yasak Nick Listesi : var %x = 1 while (%x <= $ulist(*,nickz,0)) { did -a zlnat 22 ) $ulist(*,nickz,%x) inc %x } } alias y.ident { did -r zlnat 22 did -a zlnat 22 : Yasak Ident Listesi : var %xx = 1 while (%xx <= $ulist(*,identz,0)) { did -a zlnat 22 ) $ulist(*,identz,%xx) inc %xx } } alias y.host { did -r zlnat 22 did -a zlnat 22 : Yasak Host Listesi : var %xxx = 1 while (%xxx <= $ulist(*,hostz,0)) { did -a zlnat 22 ) $ulist(*,hostz,%xxx) inc %xxx } } ;Muaf list alias m.nick { did -r zlnat 22 did -a zlnat 22 : Muaf Nick Listesi : var %ax = 1 while (%ax <= $ulist(*,muafnick,0)) { did -a zlnat 22 ) $ulist(*,muafnick,%ax) inc %ax } } alias m.ident { did -r zlnat 22 did -a zlnat 22 : Muaf Ident Listesi : var %axx = 1 while (%axx <= $ulist(*,muafident,0)) { did -a zlnat 22 ) $ulist(*,muafident,%axx) inc %axx } } alias m.host { did -r zlnat 22 did -a zlnat 22 : Muaf Host Listesi : var %axxx = 1 while (%axxx <= $ulist(*,muafhost,0)) { did -a zlnat 22 ) $ulist(*,muafHost,%axxx) inc %axxx } } menu * { Gzline Paneli:/a.b }

bu kodu mirc üzerinde kalışır hale getirebilecek varmı ?