Çevrimdışı

Selam ağalar aşağıdaki kodda sorun var bir türlü çalıştıramadım ekleme yapıyor bot ama kod çalışmıyor gzline atmıyor sunucudan neresinde sorun var acaba yardımcı olurmusunuz rica etsem kolay gelsin hayırlı akşamlar herkese.


on *:start:{
hmake yasakn
hload yasakn yasakn.mercy
}
on *:text:!yasaknick *:%operkanali: {
if $2 == list {
var %i = 1, %t = $hget(yasakn,0).data
if (!%t) && (!$hget(yasakn)) {
hmake yasakn 100
hload yasakn yasakn.mercy
}
if (%t == 0) { msg $chan Listede kayit bulunmamaktadir. | halt }
msg $chan  Yasak nick listesi
while (%i <= %t) {
var %d = $hget(yasakn,%i).data
if (%d != $null) {
msg $chan %i - %d
}
inc %i
}
msg $chan Yasak nick listesi sonu.
unset %d
}
elseif $2 == add {
var %! = $left($calc($ctime * $rand(1000,9999)),7)
if (!$3-) { msg $chan Eklenecek nicki girmediniz. | halt }
elseif ($hfind(yasakn,$3-,0,W).data) { msg $chan Bu nick daha onceden eklenmis. | halt }
else { hadd -m yasakn %! $3- | hsave -o yasakn yasakn.mercy | msg $chan  $3-  Yasak nick listesine eklendi. }
}
elseif $2 == del {
if (!$3-) { msg $chan Silinecek nicki girmediniz. | halt }
elseif (!$hfind(yasakn,$3-,0,W).data) { msg $chan Bu nick yasak listesinde ekli degil. | halt }
else { hdel -m yasakn $hfind(yasakn,$3-,1,W).data | hsave -o yasakn yasakn.mercy | msg $chan  $3- Yasak nick listesinden silindi. }
}
}

on *:snotice:*: {
if (connecting isin $1-) {
if ($hfind(yasakn,$9,1,W).data) {
gzline $9 Network'a saldiri nick/flood girisimleri yasaktir $+([,%botnick,])
}
}
}