on 1!:PART:#: { writeini nicks.log entradas $site $nick | rnickbuf }
on 1!:QUIT: { writeini nicks.log entradas $site $nick | rnickbuf }
on 1:KICK:#: { writeini nicks.log entradas $remove($address($knick,2),*!*@) $knick | rnickbuf }
alias RNICKBUF if ($lof(nicks.log) > 400000) { write -c nicks.log | echo 12 -se < clearing register entries > }
on ^1!:JOIN:#: { 
  if (%avon == on) { r1nick $site $nick } 
  echo $colour(join) $chan $timestamp * $nick ( $+ $strip($address) $+ ) has joined # $result | halt
}
alias r1nick {
  if $ipef2($$1) == falsa return
  set %anic $readini nicks.log entradas $$1 
  if ( %anic != $null ) && ( $$2 != %anic ) {
    if %anic !isin %tclon { 
      set %texto (daha önce %anic ile giriş yapti) | unset %anic | return %texto     
    }
  }
  unset %anic
}
menu menubar,status {
  -
  Nick Takip
  .On:/set %avon on | echo -a 5 ••• Takip Açık•••
  .Off:/set %avon off | echo -a 5 ••• Takip Kapalı•••
}

on ^1!:JOIN:#: { 
  if (%avon == on) { r1nick $site $nick } 
  echo $colour(join) $chan $timestamp * $nick ( $+ $strip($address) $+ ) has joined # $result | halt
}

on ^1!:JOIN:#: { 
  if (%avon == on) { r1nick $site $nick } 
  echo $colour(join) $chan $timestamp * $nick ( $+ $strip($address) $+ ) has joined # | echo $colour(join) $chan $result | halt
}