[> > > > > Kanal  #antalya  Şimdiki nick >>>  xx1  Önceki Nicki >>> xx2

on 1:start: { .hmake nicksch 900 }
on 1:part:#: { if ( $comchan($nick,0) < 2 ) { nicksgrab $nick $site } }
on 1:quit: { nicksgrab $nick $site }
on 1:kick:#: { 
  if ( $comchan($knick,0) < 2 ) {
    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 }
}
raw 311:*: {
var %NickPrecedent = $iif($NicksTrouve($2,$4), »»» Önceki Nicki : $ifmatch ) 
if ( %NickPrecedent ) { echo -a $ifmatch }
halt