Oper Küfür Koruma Addonu

on 1:text:*:#: {

if ($nick isop #) && (%oplari == on) { return }

if ($nick isvoice #) && (%vlar == on) { return }

if (*baksen.net iswm $fulladdress) && (%operler == on) { return }

kufurculer $1-

}





alias kufurculer {

var %x $strip($1-) , %i $numtok(%kifirler,44)

while (%i) {

if ($gettok(%kifirler,%i,44) iswm %x) || ($gettok(%kifirler,%i,44) isin %x) {

if (%kiketi == on) { .kline $nick Sunucu üzerinde olumsuz davranıŞ ( Reklam – Küfür ) gösterdiniz. }

if (%baneti == on) { .shun $nick Sunucu üzerinde olumsuz davranıŞ ( Reklam – Küfür ) gösterdiniz. }

if (%killeti == on) { .kill $nick Sunucu üzerinde olumsuz davranıŞ ( Reklam – Küfür ) gösterdiniz. }

if (%banlt == on) { .samode $chan +b $wildsite }

if (%zileti == on) { .zline $nick Sunucu üzerinde olumsuz davranıŞ ( Reklam – Küfür ) gösterdiniz. }

return

}

dec %i

}

}



dialog kufurcu {

title "Küfür-Reklam Koruma"

size -1 -1 105 183

option dbu

box "Eklenecek Kelimeyi Girin", 1, 5 1 94 79

combo 2, 9 10 87 53, size

button "Ekle", 3, 13 66 31 10

button "Sil", 4, 60 65 31 10

box "", 5, 11 60 36 18

box "", 6, 58 60 36 18

check "K-Line ", 8, 62 100 28 10

check "Shun ", 9, 62 111 32 10

edit "", 10, 9936 30 23 12, disable

text "Saniye", 11, 562 32 21 8, disable

check "@plar", 13, 6 98 33 10

check "@perler", 17, 6 87 31 10

check "voice", 14, 6 109 30 10

box "Ayır", 7, 1 80 41 44

check "Ban", 12, 62 122 25 10

check "Kill", 15, 62 133 32 10

check "Z-Line", 16, 62 90 29 8

button "Kapat", 19, 27 155 53 20, ok

box "Ceza-Tipi", 18, 55 82 46 67

}

alias bad { .dialog -m kufurcu kufurcu }



on *:dialog:kufurcu:init:*:{

if (%kifirler) didtok $dname 2 44 $ifmatch

if (%kiketi) { .did -c $dname 8 }

if (%baneti) { .did -c $dname 9 }

if (%banlt) { .did -c $dname 12 }

if (%oplari) { .did -c $dname 13 }

if (%vlar) { .did -c $dname 14 }

if (%killeti) { .did -c $dname 15 }

if (%zileti) { .did -c $dname 16 }

if (%operler) { .did -c $dname 17 }

did -a $dname 10 %banvaxti

}



on *:dialog:kufurcu:sclick:*:{

if ($did == 3) {

if ($did(2) != $null) { set -u %artir $did(2) | if (%artir) && (!$istok(%kifirler,%artir,44)) { .set %kifirler $addtok(%kifirler,%artir,44) | did -a $dname 2 %artir } }

}

if ($did == 4) { if ($did(2).sel > 0) { .set %kifirler $remtok(%kifirler,$did(2).seltext,1,44) | did -d $dname 2 $did(2).sel | did -c $dname 2 1 } }

if ($did == 8) { if ($did(8).state == 1) { .set %kiketi on } | else { .unset %kiketi } }

if ($did == 9) { if ($did(9).state == 1) { .set %baneti on | did -e $dname 10,11 } | else { .unset %baneti | did -b $dname 10,11 } }

if ($did == 12) { if ($did(12).state == 1) { .set %banlt on | did -e $dname 10,11 } | else { .unset %banlt | did -b $dname 10,11 } }

if ($did == 15) { if ($did(15).state == 1) { .set %killeti on | did -e $dname 10,11 } | else { .unset %killeti | did -b $dname 10,11 } }

if ($did == 16) { if ($did(16).state == 1) { .set %zileti on | did -e $dname 10,11 } | else { .unset %zileti | did -b $dname 10,11 } }

if ($did == 13) { if ($did(13).state == 1) { .set %oplari on } | else { .unset %oplari } }

if ($did == 14) { if ($did(14).state == 1) { .set %vlar on } | else { .unset %vlar } }

if ($did == 17) { if ($did(17).state == 1) { .set %operler on } | else { .unset %operler } }

}



on *:dialog:kufurcu:edit:*:{

%banvaxti = $did(10)

}

menu channel,status,menubar {

® Küfür-Reklam KoRuMa:.dialog -m kufurcu kufurcu

}Alt+r remoteye yapıŞtırınız Sorunsuz ÇaLıŞıyor