on *:text:*:?:{
if $away {
var %ü = $+(%,au.,$nick) | inc -e $(%ü,1)
if $(%ü,2) == 1 { msg $nick Awayim, away sebebi: $awaymsg }
elseif $(%ü,2) == 2 { msg $nick Away olduğumu söylemiştim değil mi? }
elseif $(%ü,2) == 3 { msg $nick Away olduğumu anlaman için kaç kez daha söylemem gerekecek? | ignore -pu300 $nick | closemsg }
}
}

on *:text:*Sebepsiz*:#: {
msg $chan $nick 4Pc’de Yokum Özele Not Bırakabilirsiniz!!!
}

menu channel,query {
  Bildiri
  .Bildiri Aç:.enable #acık | echo -a Bildiri açıldı..
  .Bildiri Kapat:.disable #acık | echo -a Bildiri kapatıldı..
}
#acık off
on $*:text:$(m~\b $me \b~ixS):#:{ msg # $nick 4Pc’de Yokum Özele Not Bırakabilirsiniz!!! }
#acık end

#nickTakip on
on !*:join:#:if ($hmatch(#,$+($site,*),0) >= 2) && !$regex($token($address,2,64),/(helper|oper|admin|global|ircop|dj)/i) { kntrl # $site $nick } | hadd -m # $+($site,½,$nick) 1 
alias kntrl var %1 1,%2 | while %1 <= $hmatch($1,$+($2,*),0) { var %& = $gettok($hmatch($1,$+($2,*),%1),2,189) | if (%& != $3) { %2 = $addtok(%2,%&,32) } | inc %1 } | $iif($gettok(%2,2,32),echo $colour(part) -t $1 4-Bilgi-  4 $3 Daha Önce 4: %2 4Nicklerinden Giriş Yaptı. 4Host : $address($nick,2)) 
#nickTakip end
menu status {
  Takip
  .On:/enable #nickTakip
  .Off:/disable #nickTakip
}


on !*:join:#:{
  set %nick $nick
  set %mask $address($nick,2)
  set %nick2 $readini profil.ini %mask nick
  set %mask2 $readini profil.ini %mask mask
  if %mask == %mask2 && %nick != %nick2 {
    set %quand $readini profil.ini %mask quand | beep
    echo -a 4 - $- $+($time,-) $+($chr(40),#,$chr(41)) $nick nickinin,bundan önce aynı IP'den giriş yaptığı nick: %nick2 $+($chr(40),%quand,$chr(41))
  }
  if !$ini(profil.ini,mask) { hashtable }
}
alias hashtable { 
  if !$hget(profil) { .hmake profil 5 } 
  else { .hadd profil nick %nick | .hadd profil mask %mask | .hadd profil quand $+($time,-,$date) | .hsave -sai profil profil.ini $hget(profil,mask) | .hfree -s profil }
}

menu channel,query {
  Bildiri
  .Bildiri Aç:.enable #acık | echo -a Bildiri açıldı..
  .Bildiri Kapat:.disable #acık | echo -a Bildiri kapatıldı..
}
#acık off
on *:text:*:#: { 
  if $away { 
    if ($me isop $chan) {  
      if ($me isin $1- ) {  
        inc -u20 $+(%,PP.,#,$me)  
        var %' = $($+(%,PP.,#,$me),2) 
        if %' == 1 { //msg $chan 2 $nick , PC Başında değilim (12 $awaymsg 2)  } 
        if %' == 2 { //msg $chan 2 $nick , Şuan Meşgulüm veya PC başında değilim. Lütfen Online olmamı bekleyiniz ve nickimi kanalda yazmayınız.  } 
        if %' == 3 { //msg $chan 2 $nick , Yazma dedik, Niye böyle yapiyorsun..?  } 
        if %' == 4 { //msg $chan 2 $nick , Ban mı atalım illaki..?  }  
        if %' >= 5 { ban -u180 # $nick 2 | kick $chan $nick 2 3Dk. Cezalısın, Seni Defalarca Uyardım. ( 20 sn'de 5 tekrar )  | unset $+(%,PP.,#,$me) } 
      } 
    } 
    if ($me !isop $chan) {  
      if ($me isin $1- ) {  
        inc -u60 $+(%,RR.,#,$me)  
        var %' = $($+(%,RR.,#,$me),2) 
        if %' == 1 { //msg $chan 2 $nick , PC Başında değilim (12 $awaymsg 2)  } 
      } 
    } 
  }  
#acık end