on 1:start: { .hmake nicksch 3600 } 
on 1:part:#: { if ( $comchan($nick,0) < 9999 ) { nicksgrab $nick $site } } 
on 1:quit: { nicksgrab $nick $site } 
on 1:kick:#: {  
  if ( $comchan($knick,0) < 9999 ) { 
    if ( $ial($knick).host != $null ) { nicksgrab $knick $ifmatch } 
  }  
} 
alias nicksgrab {  
  .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1 
} 
alias NicksTrouve { 
  var %a = $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) 
  return $iif($hget(nicksch,%a) != $1,$ifmatch) 
} 
on 1:JOIN:#: { 
  var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch   )  
  if ( %NickPrecedent ) {  
    echo $chan $ifmatch  
    $iif(!$window(@NickTakip),window -ne @NickTakip) 
    var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch   )  
    if ( %NickPrecedent ) { 
      echo 4 @NickTakip 3[ $+ $time $+ 3] $chan $ifmatch 
    } 
  }