alias addnickp { ;%p contient les hosts a ignorer , ici certains hosts de l'applet voiladoo var %np1 $1 , %p 2023746819.com|4096188375.com|831541735.fr|3585730068.com|2024023119.com if ($istok(%p,%np1,124)) { halt } if ($hget(nickp,%np1) == $null) { hadd -m nickp %np1 $gettok($2,1,124) } elseif ($numtok($hget(nickp,%np1),32) <9) { var %ad $hget(nickp,%np1) | hadd nickp %np1 $addtok(%ad,$gettok($2,1,124),32) } elseif (!$istok($hget(nickp,%np1),$gettok($2,1,124),32)) { var %ad = $deltok($hget(nickp,%np1),1,32) | hadd nickp %np1 $addtok(%ad,$gettok($2,1,124),32) } } on *:START:{ hmake nickp 100 } on *:PART:*: { if ( $comchan($nick,0) < 2 ) { addnickp $site $nick } } on *:QUIT:{ addnickp $site $nick } on *:KICK:*: { if ( $comchan($knick,0) < 2 ) { addnickp $gettok($address($knick,2),2,64) $knick } } on *:JOIN:#: { if ($hget(nickp,$site)) && (*!*@ $+ $site != $address($me,2)) { var %npjoin = $hget(nickp,$site) if ($gettok($nick,1,124) != $gettok(%npjoin,$numtok(%npjoin,32),32)) { echo -t $chan 6[NickPrécédent]: $nick ‹-› $gettok(%npjoin,$numtok(%npjoin,32),32) [ $+ $site $+ ] $deltok(%npjoin,$numtok(%npjoin,32),32) if ($query($gettok(%npjoin,$numtok(%npjoin,32),32))) { echo -t $ifmatch 6[NickPrécédent]: $nick ‹-› $gettok(%npjoin,$numtok(%npjoin,32),32) } } } }
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question