on 1:JOIN:#:{ /set %toto = aaa,bbb,ccc,ddd,eee,ffff,gggggg,hhhh,.... /set %i $gettok(%toto,0,44) while (%i > 0) { if ( $gettok(%toto,%i,44) isin $nick ) { goto tata } %i = %i - 1 } /msg $nick,text :tata }
alias nlist { if ($1 == load) { if ($exists(nicklist.hsh)) { if ($hget(nicklist)) { hfree -s nicklist | hmake nicklist 1000 | hload -s nicklist nicklist.hsh } else { hmake nicklist 1000 | hload -s nicklist nicklist.hsh } } else { echo -a nicklist.hsh is not on file. } } elseif ($1 == add) { if ($hget(nicklist)) { hadd -s nicklist $2 } else { echo -a Hash table is not loaded } } elseif ($1 == save) { if ($hget(nicklist)) { if ($exists(nicklist.hsh)) { .remove nicklist.hsh | hsave -s nicklist nicklist.hsh } else { hsave -s nicklist nicklist.hsh } } else { echo -a Hash table is not loaded } } } on 1:JOIN:#:{ if ($hget(nicklist)) && ($hfind(nicklist,$nick)) { .msg $nick text } }
if $reality > $fiction { set %sanity Sane } Else { echo -a *voices* }