Cevap: Ban Sayaç
on * Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. AN:#Zurna:{
if $nick == $bnick || $nick == chanserv { halt }
if !$readini(hbc.ini,$date,$nick) { writeini -n hbc.ini $date $1 1 }
else { writeini -n hbc.ini $date $nick $calc($readini(hbc.ini,$date,$nick) + 1) }
}
on *:text:*:#ircmaster:{
if $1 == !lists && $2 != $null {
var %dtot = $ini(hbc.ini,$2,0)
if %dtot { msg #ircmaster $2 tarihi için Ban'lar listeleniyor.. }
while %dtot { msg #ircmaster 2Nick1: $ini(hbc.ini,$2,%dtot) --- 4Ban Sayisi1: $readini(hbc.ini,$2,$ini(hbc.ini,$2,%dtot)) | dec %dtot }
}
if $1 == !tarih { var %dtt = $ini(hbc.ini,0) | msg #ircmaster 4 $+ Kayda alınan tarih listeleri. | while %dtt { msg #ircmaster $ini(hbc.ini,%dtt) | dec %dtt } }
}
alias vclear { $iif(!$1, msg #ircmaster Tarih belirtmediniz.,remini hbc.ini $$1) }
on *:kick:#Zurna: {
if $nick == chanserv || $nick == $3 {
if !$readini(hbc.ini,$date,$3) { writeini -n hbc.ini $date $1 }
else { writeini -n hbc.ini $date $3 $calc($readini(hbc.ini,$date,$3) + 1) }
}
}
-
Kod en son bu hale geldi. Fakat hbc.ini ne nickleri eklemedikce banları saymiyor. eklemeyince de * /writeini: insufficient parameters (line 18, script12.ini) böyle bir hata veriyor. Ne yapmam Gerekiyor..? |