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

Etiketlenen Kullanıcılar

9Beğeni(ler)
  • 7 Post By aLone
  • 2 Post By aLone

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 24 Mart 2015, 17:10   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Nick,Ident,Host Line işlemi




Can sıkıntısı boş zamanımda Oyle bi yazdım..
Nick, Ident, Host Ekleyip Yasaklayıp Sunucu Girişinde Line Uygulatabilirsiniz.
Belki birilerinin işine yarar yaramasada zaten can sıkıntısı yazdım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

Bi arkadaşım istemişti gecenlerde Diyalog halınde op sop voice ekleyip silecegim Bi addon olurmu demişti ona yazmıştım.. Onuda paylaşım

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 }

Op voice
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias mdc { return $dll(dll\mdc.dll,$1,$2-) } alias mdx { return $dll(dll\mdx.dll,$1,$2-) } alias access { $iif($status == connected,$null,Uyarı) if ($dialog(access)) { dialog -c access access } | else { dialog -m access access } } dialog access { title "~" size -1 -1 195 80 option dbu text "Nick Bölümü" ,3, 20 0 40 6 text "#KanaL Bölümü" ,6, 80 0 48 6 edit "Nick Yaz", 5, 8 10 62 13, center edit "#KanaL Yaz", 4, 72 10 63 13, center list 2, 8 58 179 13, size box "", 1, 5 4 185 70 } on *:dialog:access:init:0: { did -a access 2 HazırLanıyor.. .timerja 1 2 did -r access 2,4,5 .timerjax 1 2 did -a access 2 Access Menü KuLLanıma Hazır.. mdx MarkDialog $dname mdx SetDialog [ $dname ] bgcolor $rgb(28,134,238) mdx SetColor 4,5,2 background $rgb(0,0,0) mdx SetColor 4,5,2 textbg $rgb(0,0,0) mdx SetColor $dname 4,5 text $rgb(255,255,255) mdx SetColor $dname 2 text $rgb(255,0,0) mdx SetFont 5,4,2, -12 700 Tahoma mdx SetFont 3,6, -10 700 Tahoma mdx SetColor 3,6 background $rgb(28,134,238) mdx SetColor 3,6 textbg $rgb(28,134,238) mdc BitBtn Create access 6 15 50 60 25 > Vop Ekle mdc BitBtn Create access 7 15 80 60 25 > Vop SiL mdc BitBtn Create access 8 80 50 60 25 > Hop Ekle mdc BitBtn Create access 9 80 80 60 25 > Hop SiL mdc BitBtn Create access 10 145 50 60 25 > Aop EkLe mdc BitBtn Create access 11 145 80 60 25 > Aop SiL mdc BitBtn Create access 12 210 50 60 25 > Sop EkLe mdc BitBtn Create access 13 210 80 60 25 > Sop SiL mdc BitBtn Create access 14 275 20 100 85 > Kapat 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 9 $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 9 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 10 $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 10 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 11 $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 11 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 12 $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 12 $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(255,0,2) $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 Font 6 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 7 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 8 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 9 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 10 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 11 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 12 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 13 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 14 $rgb(255,252,252) 14 +b > Tahoma did -f $dname 5 } on *:signal:mdc: { if ($2 == access) && ($3 == sclick) && ($4 == 6) { .cs access $did(access,4) add $did(access,5) 30 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Voice Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 7) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Voice Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 8) { .cs access $did(access,4) add $did(access,5) 40 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Halfop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 9) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Halfop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 10) { .cs access $did(access,4) add $did(access,5) 50 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Aop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 11) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Aop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 12) { .cs access $did(access,4) add $did(access,5) 100 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Sop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 13) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Sop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 14) { .timer 1 0 dialog -x access } } alias Uyarı { echo -a 4 Servere Bağlı Değilsiniz, Bağlanmadan Bu İşlemi Gerçekleştiremessiniz... halt } menu * { Acces:/access }

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Not : Ana dizinde Dll klasörü ve içerisinde mdc.dll - mdx.dll olmalıdır

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver
Alt 25 Mart 2015, 01:27   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




Bende diyorum nerelerde bu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
The Ghost of Christmas Past...

i'm here sometimes
 
Alıntı ile Cevapla

Alt 25 Mart 2015, 01:43   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




Para lazım Feragat ustat deli gibi çalışıyom ya
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
))

 
Alıntı ile Cevapla

Alt 06 Mayıs 2017, 02:01   #4
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




alone kardesim senden bi ricam olacak

 
Alıntı ile Cevapla

Alt 07 Mayıs 2017, 07:48   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




ozturks Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
alone kardesim senden bi ricam olacak

Buyur kardes

 
Alıntı ile Cevapla

Alt 27 Eylül 2022, 19:39   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




aLone Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Can sıkıntısı boş zamanımda Oyle bi yazdım..
Nick, Ident, Host Ekleyip Yasaklayıp Sunucu Girişinde Line Uygulatabilirsiniz.
Belki birilerinin işine yarar yaramasada zaten can sıkıntısı yazdım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

Bi arkadaşım istemişti gecenlerde Diyalog halınde op sop voice ekleyip silecegim Bi addon olurmu demişti ona yazmıştım.. Onuda paylaşım

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 }

Op voice
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias mdc { return $dll(dll\mdc.dll,$1,$2-) } alias mdx { return $dll(dll\mdx.dll,$1,$2-) } alias access { $iif($status == connected,$null,Uyarı) if ($dialog(access)) { dialog -c access access } | else { dialog -m access access } } dialog access { title "~" size -1 -1 195 80 option dbu text "Nick Bölümü" ,3, 20 0 40 6 text "#KanaL Bölümü" ,6, 80 0 48 6 edit "Nick Yaz", 5, 8 10 62 13, center edit "#KanaL Yaz", 4, 72 10 63 13, center list 2, 8 58 179 13, size box "", 1, 5 4 185 70 } on *:dialog:access:init:0: { did -a access 2 HazırLanıyor.. .timerja 1 2 did -r access 2,4,5 .timerjax 1 2 did -a access 2 Access Menü KuLLanıma Hazır.. mdx MarkDialog $dname mdx SetDialog [ $dname ] bgcolor $rgb(28,134,238) mdx SetColor 4,5,2 background $rgb(0,0,0) mdx SetColor 4,5,2 textbg $rgb(0,0,0) mdx SetColor $dname 4,5 text $rgb(255,255,255) mdx SetColor $dname 2 text $rgb(255,0,0) mdx SetFont 5,4,2, -12 700 Tahoma mdx SetFont 3,6, -10 700 Tahoma mdx SetColor 3,6 background $rgb(28,134,238) mdx SetColor 3,6 textbg $rgb(28,134,238) mdc BitBtn Create access 6 15 50 60 25 > Vop Ekle mdc BitBtn Create access 7 15 80 60 25 > Vop SiL mdc BitBtn Create access 8 80 50 60 25 > Hop Ekle mdc BitBtn Create access 9 80 80 60 25 > Hop SiL mdc BitBtn Create access 10 145 50 60 25 > Aop EkLe mdc BitBtn Create access 11 145 80 60 25 > Aop SiL mdc BitBtn Create access 12 210 50 60 25 > Sop EkLe mdc BitBtn Create access 13 210 80 60 25 > Sop SiL mdc BitBtn Create access 14 275 20 100 85 > Kapat 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 9 $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 9 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 10 $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 10 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 11 $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 11 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 12 $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 12 $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(255,0,2) $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 Font 6 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 7 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 8 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 9 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 10 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 11 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 12 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 13 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 14 $rgb(255,252,252) 14 +b > Tahoma did -f $dname 5 } on *:signal:mdc: { if ($2 == access) && ($3 == sclick) && ($4 == 6) { .cs access $did(access,4) add $did(access,5) 30 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Voice Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 7) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Voice Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 8) { .cs access $did(access,4) add $did(access,5) 40 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Halfop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 9) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Halfop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 10) { .cs access $did(access,4) add $did(access,5) 50 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Aop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 11) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Aop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 12) { .cs access $did(access,4) add $did(access,5) 100 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Sop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 13) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Sop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 14) { .timer 1 0 dialog -x access } } alias Uyarı { echo -a 4 Servere Bağlı Değilsiniz, Bağlanmadan Bu İşlemi Gerçekleştiremessiniz... halt } menu * { Acces:/access }

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Not : Ana dizinde Dll klasörü ve içerisinde mdc.dll - mdx.dll olmalıdır

Arkadaşlar bunu mirc'e nasıl eklerim

 
Alıntı ile Cevapla

Alt 28 Mart 2023, 13:56   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




[QUOTE=aLone;1041637450]Can sıkıntısı boş zamanımda Oyle bi yazdım..
Nick, Ident, Host Ekleyip Yasaklayıp Sunucu Girişinde Line Uygulatabilirsiniz.
Belki birilerinin işine yarar yaramasada zaten can sıkıntısı yazdım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

Bi arkadaşım istemişti gecenlerde Diyalog halınde op sop voice ekleyip silecegim Bi addon olurmu demişti ona yazmıştım.. Onuda paylaşım

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 }

Op voice
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias mdc { return $dll(dll\mdc.dll,$1,$2-) } alias mdx { return $dll(dll\mdx.dll,$1,$2-) } alias access { $iif($status == connected,$null,Uyarı) if ($dialog(access)) { dialog -c access access } | else { dialog -m access access } } dialog access { title "~" size -1 -1 195 80 option dbu text "Nick Bölümü" ,3, 20 0 40 6 text "#KanaL Bölümü" ,6, 80 0 48 6 edit "Nick Yaz", 5, 8 10 62 13, center edit "#KanaL Yaz", 4, 72 10 63 13, center list 2, 8 58 179 13, size box "", 1, 5 4 185 70 } on *:dialog:access:init:0: { did -a access 2 HazırLanıyor.. .timerja 1 2 did -r access 2,4,5 .timerjax 1 2 did -a access 2 Access Menü KuLLanıma Hazır.. mdx MarkDialog $dname mdx SetDialog [ $dname ] bgcolor $rgb(28,134,238) mdx SetColor 4,5,2 background $rgb(0,0,0) mdx SetColor 4,5,2 textbg $rgb(0,0,0) mdx SetColor $dname 4,5 text $rgb(255,255,255) mdx SetColor $dname 2 text $rgb(255,0,0) mdx SetFont 5,4,2, -12 700 Tahoma mdx SetFont 3,6, -10 700 Tahoma mdx SetColor 3,6 background $rgb(28,134,238) mdx SetColor 3,6 textbg $rgb(28,134,238) mdc BitBtn Create access 6 15 50 60 25 > Vop Ekle mdc BitBtn Create access 7 15 80 60 25 > Vop SiL mdc BitBtn Create access 8 80 50 60 25 > Hop Ekle mdc BitBtn Create access 9 80 80 60 25 > Hop SiL mdc BitBtn Create access 10 145 50 60 25 > Aop EkLe mdc BitBtn Create access 11 145 80 60 25 > Aop SiL mdc BitBtn Create access 12 210 50 60 25 > Sop EkLe mdc BitBtn Create access 13 210 80 60 25 > Sop SiL mdc BitBtn Create access 14 275 20 100 85 > Kapat 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 9 $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 9 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 10 $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 10 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 11 $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 11 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 12 $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 12 $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(255,0,2) $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 Font 6 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 7 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 8 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 9 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 10 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 11 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 12 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 13 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 14 $rgb(255,252,252) 14 +b > Tahoma did -f $dname 5 } on *:signal:mdc: { if ($2 == access) && ($3 == sclick) && ($4 == 6) { .cs access $did(access,4) add $did(access,5) 30 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Voice Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 7) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Voice Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 8) { .cs access $did(access,4) add $did(access,5) 40 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Halfop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 9) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Halfop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 10) { .cs access $did(access,4) add $did(access,5) 50 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Aop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 11) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Aop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 12) { .cs access $did(access,4) add $did(access,5) 100 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Sop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 13) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Sop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 14) { .timer 1 0 dialog -x access } } alias Uyarı { echo -a 4 Servere Bağlı Değilsiniz, Bağlanmadan Bu İşlemi Gerçekleştiremessiniz... halt } menu * { Acces:/access }

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

emegınıze saglık guzel paylasım ıcın. txt olarak nırce ekledım ama Not : Ana dizinde Dll klasörü ve içerisinde mdc.dll - mdx.dll olmalıdır bundan dolayı calısmadı mdc.dll-mdx.dll bunu nasıl bulabırım. ıyı forumlar

 
Alıntı ile Cevapla

Alt 07 Nisan 2023, 22:25   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




[QUOTE=Tunne;1042786278]
aLone Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Can sıkıntısı boş zamanımda Oyle bi yazdım..
Nick, Ident, Host Ekleyip Yasaklayıp Sunucu Girişinde Line Uygulatabilirsiniz.
Belki birilerinin işine yarar yaramasada zaten can sıkıntısı yazdım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

Bi arkadaşım istemişti gecenlerde Diyalog halınde op sop voice ekleyip silecegim Bi addon olurmu demişti ona yazmıştım.. Onuda paylaşım

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
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 }

Op voice
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias mdc { return $dll(dll\mdc.dll,$1,$2-) } alias mdx { return $dll(dll\mdx.dll,$1,$2-) } alias access { $iif($status == connected,$null,Uyarı) if ($dialog(access)) { dialog -c access access } | else { dialog -m access access } } dialog access { title "~" size -1 -1 195 80 option dbu text "Nick Bölümü" ,3, 20 0 40 6 text "#KanaL Bölümü" ,6, 80 0 48 6 edit "Nick Yaz", 5, 8 10 62 13, center edit "#KanaL Yaz", 4, 72 10 63 13, center list 2, 8 58 179 13, size box "", 1, 5 4 185 70 } on *:dialog:access:init:0: { did -a access 2 HazırLanıyor.. .timerja 1 2 did -r access 2,4,5 .timerjax 1 2 did -a access 2 Access Menü KuLLanıma Hazır.. mdx MarkDialog $dname mdx SetDialog [ $dname ] bgcolor $rgb(28,134,238) mdx SetColor 4,5,2 background $rgb(0,0,0) mdx SetColor 4,5,2 textbg $rgb(0,0,0) mdx SetColor $dname 4,5 text $rgb(255,255,255) mdx SetColor $dname 2 text $rgb(255,0,0) mdx SetFont 5,4,2, -12 700 Tahoma mdx SetFont 3,6, -10 700 Tahoma mdx SetColor 3,6 background $rgb(28,134,238) mdx SetColor 3,6 textbg $rgb(28,134,238) mdc BitBtn Create access 6 15 50 60 25 > Vop Ekle mdc BitBtn Create access 7 15 80 60 25 > Vop SiL mdc BitBtn Create access 8 80 50 60 25 > Hop Ekle mdc BitBtn Create access 9 80 80 60 25 > Hop SiL mdc BitBtn Create access 10 145 50 60 25 > Aop EkLe mdc BitBtn Create access 11 145 80 60 25 > Aop SiL mdc BitBtn Create access 12 210 50 60 25 > Sop EkLe mdc BitBtn Create access 13 210 80 60 25 > Sop SiL mdc BitBtn Create access 14 275 20 100 85 > Kapat 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 9 $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 9 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 10 $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 10 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 11 $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 11 $rgb(25,2,2) $rgb(64,5,5) $rgb(0,25,255) $rgb(25,25,25) $rgb(2,0,0) mdc BitBtn Color 12 $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 12 $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(255,0,2) $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 Font 6 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 7 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 8 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 9 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 10 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 11 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 12 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 13 $rgb(255,252,252) 8 +b > Tahoma mdc BitBtn Font 14 $rgb(255,252,252) 14 +b > Tahoma did -f $dname 5 } on *:signal:mdc: { if ($2 == access) && ($3 == sclick) && ($4 == 6) { .cs access $did(access,4) add $did(access,5) 30 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Voice Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 7) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Voice Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 8) { .cs access $did(access,4) add $did(access,5) 40 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Halfop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 9) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Halfop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 10) { .cs access $did(access,4) add $did(access,5) 50 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Aop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 11) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Aop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 12) { .cs access $did(access,4) add $did(access,5) 100 | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Seviye Sop Eklendi } if ($2 == access) && ($3 == sclick) && ($4 == 13) { .cs access $did(access,4) del $did(access,5) | did -r access 2 | did -a access 2 KanaL $did(access,4) Nick $did(access,5) Sop Silindi } if ($2 == access) && ($3 == sclick) && ($4 == 14) { .timer 1 0 dialog -x access } } alias Uyarı { echo -a 4 Servere Bağlı Değilsiniz, Bağlanmadan Bu İşlemi Gerçekleştiremessiniz... halt } menu * { Acces:/access }

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

emegınıze saglık guzel paylasım ıcın. txt olarak nırce ekledım ama Not : Ana dizinde Dll klasörü ve içerisinde mdc.dll - mdx.dll olmalıdır bundan dolayı calısmadı mdc.dll-mdx.dll bunu nasıl bulabırım. ıyı forumlar

* $dll: 'C:\HelpOper\dll\mdc.dll' Açilamiyor (Satir 1, script65.mrc) hatayı verıyor bakabılecek arkadaslara tsk ederım

 
Alıntı ile Cevapla

Alt 08 Nisan 2023, 01:00   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




yazmiş aslinda Not : Ana dizinde Dll klasörü ve içerisinde mdc.dll - mdx.dll olmalıdır

__________________
YekTa Derki : Ölümden Sonra Bile Hayat Varken, Sen Kimsin ki Gittiğin için Hayat Dursun.
 
Alıntı ile Cevapla

Alt 08 Nisan 2023, 12:27   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick,Ident,Host Line işlemi




Kardeşim vermiş olduğum adresten indirebilirsin. Sonrasın da Rar içinden çıkar ve mIRC klosörü içine at bu dosyaları. Zaten gerekli açıklama yapılmış.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

 
Alıntı ile Cevapla

Cevapla

Etiketler
host, ident, işlemi, line, nick


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

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
nick ident uzunluguna line işlemi Dangerous123 mIRC Scripting Sorunları 12 31 Temmuz 2012 20:47
Nick Işlemi MoRtaL_ mIRC Scripting Sorunları 6 24 Aralık 2010 16:26
Host ve Ident salihbxl mIRC Scripting Hazır Kodlar 3 31 Ekim 2010 11:22
Statuste nick işlemi titan mIRC Scripting Sorunları 7 27 Eylül 2006 04:40