Çevrimdışı

on *:text:*:?:{
if ($1 == !unban) { var %~ = $chan( $+ 0 $+ ) | while %~ { if ($me isop $chan(%~)) { mode $chan(%~) -b $nick } | dec %~ } }

__________________
Davut Alper BALCI - pC`kOpAt

 

on 1:text:*:?: {
if $1 == !unban && $me isop #izmir {
var %k = 1
while %k <= 15 {
_queue mode #izmir -b $adress($nick,%k)
inc %k
}
}
}
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 -mo 1 $calc((4 - $gettok(3 2 1,$1,32)) * 60) _doqueue $calc($1 + 1)
$ifmatch
.hdel -s queue $1
}
else hfree queue
}

Bu da başka bir yöntem tabi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.