on ^*:JOIN:#: {
  if ($nick != $me) { echo $chan   $+ $colour(join text) $+ $timestamp [»] Giriş : $nick $+  $+ $colour(join text) [ $+ $colour(join text) $+ $address $+ ] [ $+ $colour(join text) $+ Kanala Girdi $+ ] | haltdef } 
  if (%clonededector == ON) {
    if $address($nick,2) != $null qcn $nick
    else {
      set %ial query
      .who $nick
    }
  }
}
alias qcn {
  unset %qcn*
  if $ial( $address($1,2) , 0 ) < 2 halt
  :başla
  inc %qcn
  if $ial( $address($1,2) , %qcn ).nick == $1 goto başla
  if $ial( $address($1,2) , %qcn ).nick == $null goto son
  set %qcn [ $+ [ $1 ] ] $left( %qcn [ $+ [ $1 ] ] , 100 ) , $ial( $address($1,2) , %qcn ).nick
  goto başla
  :son
  if %qcn [ $+ [ $1 ] ] == $null halt
  echo $chan 0,5 Clone: 12,0 [ $1  %qcn [ $+ [ $1 ] ] ] 4,0 [ $address($1,2) ] 
  unset %qcn*
}


on ^*:PART:#: {
  if ($nick != $me) { echo $chan   $+ $colour(part text) $+ $timestamp [«] Çıkış : $nick $+  $+ $colour(part text) [ $+ $colour(part text) $+ $address $+ ] [ $+ $colour(part text) $+ Kanaldan Çıktı $+ ] | haltdef }
}

on ^*:QUIT:{
  ;5[13:49] 4( 10Notice 4) -NickS
  if ($nick != $me) { 
    if ($comchan($nick,1)) { echo $comchan($nick,1)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]  }
    if ($comchan($nick,2)) { echo $comchan($nick,2)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]   }
    if ($comchan($nick,3)) { echo $comchan($nick,3)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]   }
    if ($comchan($nick,4)) { echo $comchan($nick,4)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]   }
    if ($comchan($nick,5)) { echo $comchan($nick,5)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]   }
    if ($comchan($nick,6)) { echo $comchan($nick,6)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]  }
    if ($comchan($nick,7)) { echo $comchan($nick,7)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]  }
    if ($comchan($nick,8)) { echo $comchan($nick,8)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]   }
    if ($comchan($nick,9)) { echo $comchan($nick,9)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]  }
  if ($comchan($nick,10)) { echo $comchan($nick,10)  $+ $colour(quit text) $+ $timestamp [x] Exit : $nick $+  $+ $colour(quit text) [ $+ $colour(quit text) $+ $address $+ ] [ $+ $colour(quit text) $+ Ayrıldı: $1- $+  $+ $colour(quit text) $+ ]   } }
  updatenl
  haltdef
}

on 1:INPUT:*: {
  if ($mid($1,1,1) == /) { goto doit }
  if ($active != Status Window) { goto doit }
  if ($active == Status Window) { /echo -a %ver  $+ 4,1 Status Penceresine Mesaj Yazamazsınız!   | halt }
  :doit
}