on *:text:*:#KANAL:{
  if (!evet isin $1) { .cs op #KANAL $nick | /msg # $nick hosgeldiniz basarilar dilerim. | .timer $+ $nick off }
  if (!away1 isin $1) {
    if !%schizo [ $+ [ $address($nick,5) ] ] {
      set -u900 %schizo [ $+ [ $address($nick,5) ] ] $addtok(%schizo [ $+ [ $address($nick,5) ] ],$nick,32)
      /msg # $nick away sureniz baslamistir.
      .cs deop #KANAL $nick
      /msg #KANAL $nick away oldugu icin tarafimdan deop edilmistir.
      .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 .schizo # $nick
    }
    else {
      /msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama  15  dakikadir.
    }
  }
  if (!away2 isin $1) {
    if !%schizo [ $+ [ $address($nick,5) ] ] {
      set -u900 %schizo [ $+ [ $address($nick,5) ] ] $addtok(%schizo [ $+ [ $address($nick,5) ] ],$nick,32)
      /msg # $nick away sureniz baslamistir.
      .cs deop #KANAL $nick
      /msg #KANAL $nick away oldugu icin tarafimdan deop edilmistir.
      .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 .schizo # $nick
    }
    else {
      /msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama  15  dakikadir.
    }
  }
  if (!away3 isin $1) {
    if !%schizo [ $+ [ $address($nick,5) ] ] {
      set -u900 %schizo [ $+ [ $address($nick,5) ] ] $addtok(%schizo [ $+ [ $address($nick,5) ] ],$nick,32)
      /msg # $nick away sureniz baslamistir.
      .cs deop #KANAL $nick
      /msg #KANAL $nick away oldugu icin tarafimdan deop edilmistir.
      .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 .schizo # $nick
    }
    else {
      /msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama  15  dakikadir.
    }
  }
  if (!away4 isin $1) {
    if !%schizo [ $+ [ $address($nick,5) ] ] {
      set -u900 %schizo [ $+ [ $address($nick,5) ] ] $addtok(%schizo [ $+ [ $address($nick,5) ] ],$nick,32)
      /msg # $nick away sureniz baslamistir.
      .cs deop #KANAL $nick
      /msg #KANAL $nick away oldugu icin tarafimdan deop edilmistir.
      .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 .schizo # $nick
    }
    else {
      /msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama  15  dakikadir.
    }
  }
  if (!away5 isin $1) {
    if !%schizo [ $+ [ $address($nick,5) ] ] {
      set -u900 %schizo [ $+ [ $address($nick,5) ] ] $addtok(%schizo [ $+ [ $address($nick,5) ] ],$nick,32)
      /msg # $nick away sureniz baslamistir.
      .cs deop #KANAL $nick
      /msg #KANAL $nick away oldugu icin tarafimdan deop edilmistir.
      .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 .schizo # $nick
    }
    else {
      /msg # $nick bu komutu tekrar kullanmaniz icin beklemeniz gereken sure ortalama  15  dakikadir.
    }
  }
}
alias schizo { .timer $+ $2 0 30 /msg $1 $2 away sureniz dolmustur. Burda misiniz ? Burdaysaniz  !evet  yaziniz. }
on *:PART:#KANAL:{ unset %schizo [ $+ [ $address($nick,5) ] ] | .timer $+ $nick off }
on *:QUIT:{ unset %schizo [ $+ [ $address($nick,5) ] ] | .timer $+ $nick off }