Kod:
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 -mu3600 nicktablo $duz($2) $1 alias ekle var %nickler $hget(nicktablo,$hget(nicktablo,$2).item).data $+ $chr(32) $+ $1 | hadd -u3600 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,*!*@)