Ce petit script en hash et variable, vous permettra de rechercher un nick sur tous les salons ou vous êtes.
(C'est mon premier script que j'ai fais pour m'initier au hashtable)
Source / Exemple :
alias research {
var %i $?="Nick to search ?"
if (!%i) { echo -a 1=======[13 Research cancelled 1]======= | halt }
echo -a
echo -a 1=======[13 Research for :14 %i 1]=======
var %a = $chan(0), %b = 1, %h = 0, %result, %e = $nick($chan(%b),0), %f = 1, %nij
while (%b <= %a) {
while (%f <= %e) {
if (* $+ %i $+ * iswm $nick($chan(%b),%f)) && ($nick($chan(%b),%f) != $me) {
/hadd -m $nick($chan(%b),%f) $chan(%b)
if ($nick($chan(%b),%f) !isin %nij) { var %nij %nij $nick($chan(%b),%f) | inc %h }
}
inc %f
}
inc %b
var %f 1, %e = $nick($chan(%b),0)
}
echo -a 1[13Results1: %h $+ ]
echo -a
var %l 1, %gettok = $numtok(%nij,32)
while (%l <= %gettok) {
var %nb = 1, %final
while (%nb <= $hget($gettok(%nij,%l,32),0).item) {
var %final = $addtok(%final,14 $+ $hget($gettok(%nij,%l,32),%nb).item 1|,32)
inc %nb 1
}
echo -a 7[1 $gettok(%nij,%l,32) 7]14,0 %final
hfree $gettok(%nij,%l,32)
inc %l
}
}
Conclusion :
Vous avez juste à taper /research .
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.