|
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
|
| Benzer Konular
|
|