Çevrimdışı

raw 367:*: {
var %sure $ctime - $5
if %sure >= 750 {
inc %c.say
hadd c.temp $+(ip.,%c.say) $3
}
}
raw 368:*: {
if (%c.say >= 1) {
c.unban $2
}
}
alias c.unban {
var %bc $1
if (!$hget(c.temp,0).item) { halt }
if ($hget(c.temp,0).item >= 10) { var %s = 10 }
else { var %s = $hget(c.temp,0).item }
var %i = 1,%c
while (%i <= %s) {
%c = $addtok(%c,$hget(c.temp,$hget(c.temp,1).item),32)
hdel c.temp $hget(c.temp,1).item
inc %i
}
mode %bc - $+ $str(b,%s) %c
.timer -h 1 1 c.unban %bc
}
on *:start: ilk
alias ilk {
if (!$hget(c.temp)) { hmake c.temp 1000 }
else { hfree c.temp | hmake c.temp 1000 }
set %c.say 0
}
menu * {
Aktif Kanalda Süresi Dolan Banlari Ac! : mode $chan +b
}
on *:join:#: {
if $nick == $me {
write chan.txt $chan
}
}
on *: part:#: {
if $nick == $me {
write -ds $chan chan.txt
}
}
alias sureunban {
var %chansfile = chan.txt
var %line = 1, %total = $lines(%chansfile)
while (%line <= %total) {
var %data = $read -l $+ %line %chansfile
if (%data != $null) {
_queue mode %data +b
}
inc %line
inc %sur
}
%names.enddata = %data
}
alias _queue {
inc %queue.count
if ($timer(.queue) == $null) {
hadd -m queue count 1
hadd -m queue 1 $1-
_doqueue 1
}
else {
var %queue.count = $calc($hget(queue,count) + 1)
hadd -m queue %queue.count $1-
hadd -m queue count %queue.count
}
}
alias _doqueue {
if ($hget(queue,$1) != $null) {
.timer.queue -m 1 $calc((4 - $gettok(3 2 1,$1,32)) * 500) _doqueue $calc($1 + 1)
$ifmatch
.hdel -s queue $1
}
else hfree queue
}




arkadaslar kodda banlar yan yana açiyor xxx #kanalda mode değişti -bbbbb
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bu şekil ben ust uste açmak istiyorum bu şekil

[09:34:24] xxx #xxxx kanalında mod değiştirdi: -b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[09:34:24] xxx #xxx kanalında mod değiştirdi: -b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[09:34:24] xxx #xxx kanalında mod değiştirdi: -b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[09:34:24] xxx #xxx kanalında mod değiştirdi: -b
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[09:34:26] xxx#xxx kanalında mod değiştirdi: -b pNdwo!*@*
[09:34:26] xxx#xxx kanalında mod değiştirdi: -b mujdat_hoca!*@*
[09:34:26] xx#xxx kanalında mod değiştirdi: -b MetalsGirl!*@*
[09:34:26] xxx#mynet_xxxt kanalında mod değiştirdi: -b IuIe!*@*

bu şekil istiyorum ne yapmam lazim yardim ede bilirmisiniz