Help Girise Oto Yardim Edecek Helper Secme

- alias kontrol {
if ($1 isop #helpers) { halt }
if ($1 isop #help) { halt }
unset %operko
set %helperko ac
unset %helpsayi
unset %yardimuser
unset %helper
unset %yetkiyok
who #helpers
set %yardimuser $1
}
on *:join:#help: {
if ($nick !== $me) {
.timer 1 2 kontrol $nick
}
}
on *:rawmode:#help: {
if ($1 == +v) { .msg #helpers $+([,$nick,]) Yardim bekliyen user  $2  ile ilgileniyor.! | halt }
if ($1 == -v) { .msg #helpers $+([,$nick,]) Helper $2 voicesini aldi. | .ban -uk60 # $2 2 Voiceniz Alindi. Sorununuz Cözülmüş Olarak Bilinmektedir. Hoş Sohbetler. | halt }
}
raw *:*:{
if ($numeric == 317) && (%helperko == ac) {
.msg #helpers 0,4 » Yardim bekliyor: 0,1 %yardimuser 0,4 Gorevli: 0,1 %helpernick 
.msg #helpers 0,2 » %helpernick mIRC ile ilgilenmedigi sure: $int($calc($3 / 60)) dakika: $calc( $3 - $calc($int($calc($3 / 60)) * 60 )) saniye. 
.msg #helpers -
unset %helperko
}
if ($numeric == 352) && (%helperko == ac) {
if ($6 == $me) { halt }
inc %helpsayi
set %helper $addtok(%helper,$6,32)
halt
}
if ($numeric == 315) && (%helperko == ac) {
set %helpernick $token(%helper,$rand(0,%helpsayi),32)
whois %helpernick
}
haltdef
}