Helperler için Yeni(away) sistemi.

Merhaba arkadaşlar, kodumuz şu şekilde aktifleşiyor..
#Helpers kanalında Helper !awaysüre Yazdıgında ( !away5 ) 5 dk away konuma gecer ve deop eder 5 dk sonra Helpere away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz. Şeklinde cvp gelir !evet yazıldıgında tekrar opa cıkarır ve görevine devam eder..
umarım begenirsiniz güle güle kullanın ..

on *:text:*:#helpers:{
if (!evet isin $1) { .cs op #Helpers $nick | /msg # $nick hosgeldin basarilar dilerim. | .timer $+ $nick off }
if (!away1 isin $1) {
if !%helperaway [ $+ [ $address($nick,5) ] ] {
set -u900 %helperaway [ $+ [ $address($nick,5) ] ] $addtok(%helperaway [ $+ [ $address($nick,5) ] ],$nick,32)
/msg # $nick away sureniz baslamistir.
.cs deop #Helpers $nick
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 60 /msg # $nick away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz.
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 60 .helperaway # $nick
}
else {
/msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama 15 dakikadir.
}
}
if (!away2 isin $1) {
if !%helperaway [ $+ [ $address($nick,5) ] ] {
set -u900 %helperaway [ $+ [ $address($nick,5) ] ] $addtok(%helperaway [ $+ [ $address($nick,5) ] ],$nick,32)
/msg # $nick away sureniz baslamistir.
.cs deop #Helpers $nick
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 120 /msg # $nick away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz.
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 120 .helperaway # $nick
}
else {
/msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama 15 dakikadir.
}
}
if (!away3 isin $1) {
if !%helperaway [ $+ [ $address($nick,5) ] ] {
set -u900 %helperaway [ $+ [ $address($nick,5) ] ] $addtok(%helperaway [ $+ [ $address($nick,5) ] ],$nick,32)
/msg # $nick away sureniz baslamistir.
.cs deop #Helpers $nick
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 180 /msg # $nick away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz.
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 180 .helperaway # $nick
}
else {
/msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama 15 dakikadir.
}
}
if (!away4 isin $1) {
if !%helperaway [ $+ [ $address($nick,5) ] ] {
set -u900 %helperaway [ $+ [ $address($nick,5) ] ] $addtok(%helperaway [ $+ [ $address($nick,5) ] ],$nick,32)
/msg # $nick away sureniz baslamistir.
.cs deop #Helpers $nick
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 240 /msg # $nick away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz.
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 240 .helperaway # $nick
}
else {
/msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama 15 dakikadir.
}
}
if (!away5 isin $1) {
if !%helperaway [ $+ [ $address($nick,5) ] ] {
set -u900 %helperaway [ $+ [ $address($nick,5) ] ] $addtok(%helperaway [ $+ [ $address($nick,5) ] ],$nick,32)
/msg # $nick away sureniz baslamistir.
.cs deop #Helpers $nick
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 300 /msg # $nick away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz.
.timer $+ $+($r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z),$r(A,Z)) 1 300 .helperaway # $nick
}
else {
/msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama 15 dakikadir.
}
}
}
alias helperaway { .timer $+ $2 0 30 /msg $1 $2 away sureniz dolmustur. Burda misiniz ? Burdaysaniz !evet yaziniz. }
on *:PART:#helpers:{ unset %helperaway [ $+ [ $address($nick,5) ] ] | .timer $+ $nick off }
on *:QUIT:{ unset %helperaway [ $+ [ $address($nick,5) ] ] | .timer $+ $nick off