<em>on *:start:$iif(!$hget(nicktablo),hmake nicktablo)
on *:join:#:$iif($hget(nicktablo),dogru $nick $duz($address($nick,2)),yalnis $nick $duz($address($nick,2)))
on *:nick:$iif($hget(nicktablo),dogru $newnick $duz($address($newnick,2)),yalnis $newnick $duz($address($newnick,2)))
alias dogru $iif($hfind(nicktablo,$duz($2),*,w).item,$iif($hfind(nicktablo,$1,*,w).data,goster $1 $duz($2),ekle $1 $duz($2)),yalnis $1 $duz($2))
alias yalnis hadd -mu<span style="color: red">3600</span> nicktablo $duz($2) $1
alias ekle var %nickler $hget(nicktablo,$hget(nicktablo,$2).item).data $+ $chr(32) $+ $1 | hadd -u<span style="color: red">3600</span> nicktablo $2 %nickler | echo -a IP: $2 , Kullanmış olduğu nickler : $hget(nicktablo,$hget(nicktablo,$2).item).data
alias goster echo -a IP: $2 , Kullanmış olduğu nickler : $hget(nicktablo,$hget(nicktablo,$2).item).data
alias duz return $remove($1,*!*@)</em>