Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#Opers:{
if $regex($1,/^[!.-]yasak/Si) {
if !$2 { msg # Lütfen !yasak <ekle|sil|list> olarak belirtiniz. }
elseif $regex($2,/^ekle$/Si) {
if !$3 { msg # Lütfen !yasak <ekle> <Şehir> olarak belirtiniz. }
elseif $regex($3,/Bel[ıiİ]rs[ıiİ]z/Si) { msg # Böyle bir şehir yok :) }
elseif $hget(YasakS,$strip($3)) { msg # $strip($3) şehri yasak listesinde zaten ekli, neyin kafası. }
else { .hadd -ms YasakS $strip($3) $nick | .hsave -o YasakS yasaks.tprk | msg # $strip($3) şehri yasak listesine eklendi. }
}
elseif $regex($2,/^s[ıiİ]l$/Si) {
if !$3 { msg # Lütfen !yasak <sil> <Şehir> olarak belirtiniz. }
elseif !$hget(YasakS,$strip($3)) { msg # $strip($3) şehri yasak listesinde ekli değil. }
else { .hdel -ms YasakS $strip($3) | .hsave -o YasakS yasaks.tprk | msg # $strip($3) şehri yasak listesinden silindi. }
}
elseif $regex($2,/^l[ıiİ]st$/Si) {
if !$hget(YasakS,0).data { msg # Yasak şehir listesi boş. }
else {
msg # Yasak şehir listesi
msg # -
var %:t = 1 | while %:t <= $hget(YasakS,0).data {
msg # $+(%:t,.,$chr(41)) Şehir:4 $hget(YasakS,%:t).item Ekleyen:2 $hget(YasakS,%:t).data
inc %:t
}
msg # -
msg # Yasak şehir listesi sonu
}
}
}
elseif $regex($1,/^[!.-]shun/Si) {
if !$2 { msg # Lütfen !shun nick olarak belirtiniz. }
$iif($3,.shun $2 - $3-,.shun $2 - Lütfen Sunucu Kurallarına Uyunuz)
}
}