Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:JOIN:#opers: {
var %found 0, %i 1
while (%i <= $lines(cezalist.txt)) {
var %line = $read(cezalist.txt,nt,%i)
var %nick = $gettok(%line,1,124)
var %bitis = $gettok(%line,2,124)
if ($lower(%nick) == $lower($nick)) {
if (%bitis > $ctime) {
var %kalan $duration($calc(%bitis - $ctime))
msg #opers Cezalı Oper/Admin girişi yapıldı! Nick: $nick — Kalan ceza süresi: %kalan
.kill $nick Ceza süreniz devam ediyor. Lütfen %kalan bekleyin.
%found = 1
break
}
else {
; Ceza süresi bitmişse otomatik temizle
write -dl %i cezalist.txt
write -dl $readn cban.txt
}
}
inc %i
}
; Eğer cezalist.txt’de bulunamadıysa ama cban.txt’de varsa yine kill at
if (!%found) && ($read(cban.txt,w,$nick)) {
msg #opers Cezalı Oper/Admin girişi yapıldı! Nick: $nick
.kill $nick Ceza süreniz devam ediyor.
}
}
Bir de böyle dener misin test edemiyorum.