Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:join:#kanal:$+(.timer,kntrl,$nick) 1 2 kntrol $nick $chan $wildsite
alias kntrol {
if $1 isop $2 { halt }
$iif(%sıra == $null,set %sıra 1,inc %sıra)
if (@opers.services !isin $3) || (@IRC.Admin !isin $3) || (@Master.Admin !isin $3) {
msg #kanalop $2 Kanalina $1 nicki girdi,Şuan sıra $+(%sıra,.) op olan $xops(#kanalop,%sıra).@ nickli görevlide.
$+(.timer,vc,$1,$2) 0 15 voicekntrol $1 $2
}
if $xops(#kanalop,0).@ == %sıra { unset %sıra }
}
alias xops {
var %n = 1
while $nick($1,%n,@&%~).pnick { if $left($v1,1) == $prop { var %z = $addtok(%z,$nick($1,%n,@&%~),32) } | inc %n }
if $2 == 0 { return $numtok(%z,32) } | else { return $gettok(%z,$2,32) }
}
alias voicekntrol {
if $1 !isvo $2 {
inc %sıra | msg #kanalop $2 Kanalina $1 nicki hala beklemekte,Şuan sıra $+(%sıra,.) op olan $xops(#kanalop,%sıra).@ nickli görevliye geçti.
}
else { $+(.timer,vc,$1,$2) off }
}
kodun son hali bu sekilde. gozden birsey kacmadiysa dedigin gibi 15 sn icinde sira ilerliyor voice verilmedigi taktirde oper hostlarini da || ile ekliyoruz && ile degil || yada demek && ve demek mantiksal olarak ayni anda hem oper hem admin yazmayacagi icin yada kullandik