Belirlenen nick ve identlerin atılmaması Yardım Lütfen. Arkadaşlar bu Code da belirli nicklerin atılamasını istemiyorum yada #oyun kanalında calışmasın örneğin Ahmet mehmet ve identi ****.com olanlar atılamaycak yani admin identliler.... şimdiden teşekkürler. alias gurkan { if !$istok(isimsiz ,$1,32) { return $false } goto $1 :isimsiz var %· = 1 | while $read($3,%·) { if $v1 iswm $2 { return $true } | inc %· } | return $false) } on *:join:#:{ if $gurkan(isimsiz,$nick,badnick.txt) { samode # +o $me | .samode $chan +b $nick | .kick $chan $nick BadNick! } } on *:text:*:#:if $gurkan(isimsiz,$1-,kufur.txt) { samode # +o $me | .samode $chan +b $nick | /akill $nick Kurallara uymayan davranış gösterdiniz. AKILL! | .samode $chan +b $wildsite | kick # $nick Yasak Kelime Kullanımı! } alias antipaty { dialog -m antipity antipity } dialog antipity { title "BadNick & Kufur Koruma Sistemi" size -1 -1 226 102 option dbu list 2, 38 22 70 58, size list 5, 118 22 70 58, size edit "", 10, 38 12 70 10 edit "", 11, 118 12 70 10 box "BAD NICK", 6, 5 3 107 81 box "KUFUR", 7, 114 3 107 81 button "T A M A M", 1, 38 87 148 12,ok button "EKLE", 3, 10 14 24 28 button "KALDIR", 4, 10 45 24 28 button "EKLE", 8, 192 14 24 28 button "KALDIR", 9, 192 45 24 28 } on *:dialog:antipity:INIT:*: { if ($isfile(badnick.txt) == $false) { write -c badnick.txt } | else { loadbuf -o $dname 2 badnick.txt } if ($isfile(kufur.txt) == $false) { write -c kufur.txt } | else { loadbuf -o $dname 5 kufur.txt } if (%badnick) .didtok $dname 2 32 $ifmatch if (%kufur) .didtok $dname 5 32 $ifmatch } on *:dialog:antipity:sclick:*:{ if ($did == 3) { write badnick.txt $did(10) | did -a $dname 2 $did(10) | did -r $dname 10 } if ($did == 8) { write kufur.txt $did(11) | did -a $dname 5 $did(11) | did -r $dname 11 } if ($did == 4) { write -dl $+ $did(2).sel badnick.txt | did -d $dname 2 $did(2).sel } if ($did == 9) { write -dl $+ $did(5).sel kufur.txt | did -d $dname 5 $did(5).sel } } on *:dialog:antipity:sclick:1:{ set %badnick $didtok($dname,2,44) set %kufur $didtok($dname,5,44) |
Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 08:32. |
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net