cs_ido
Messages postés30Date d'inscriptionjeudi 21 novembre 2002StatutMembreDernière intervention 9 juin 2004 2 oct. 2003 à 09:38
alias suivit {
; on converti la frasen en token
set %var1 $replace($2-,$chr(32),$chr(44))
var %scanpseudo = 1
:scan01
;on extrait mot a mot
set %pseudo $gettok(%var1,%scanpseudo,44)
if (%pseudo == $null) { goto end01 }
set %var2 NON
if (%pseudo ison $1) {
;si le mot corespond a un pseudo
set %var2 OUI
goto end01
}
inc %scanpseudo
goto scan01
:end01
unset %var1
unset %scanpseudo
;si on a trouvé un pseudo
;celui ci se trouve dans la variable %pseudo
;si yavais pas, %pseudo = null
if (%var2 == OUI) {
unset %var2
return %pseudo
unset %pseudo
}
else {
unset %var2
return null
unset %pseudo
}
}
Voila, avec ça, en gros, tu fait
%pseudodugars = $suivit($chan, $1-)
et
%pseudodugars prendra la valur du nick qui est di ds la frase
Par contre, si ya plus d'un nick ds la frase, les autre sont ignoré :/
iDo
Vous n’avez pas trouvé la réponse que vous recherchez ?
Alerion
Messages postés97Date d'inscriptionmercredi 10 septembre 2003StatutMembreDernière intervention 7 juillet 2004 2 oct. 2003 à 20:00
voui, j'ai planché un peu aussi à ton truc, voici un petit alias qui retourne les pseudos, et en prime, pour juju les "inverses" (au lieu de gras) dans la phrase.
alias pseudo-texte { ; $1 $chan et $2- la phrase: retourne $null ou les pseudos
; (et pour jujuquartre %texte la phrase avec les pseudo en reverse...) :o)
set %texte = $2-
var %i = 1
while (%i <= $nick($chan,0)) {
var %nick = $nick($chan,%i)
if ( %nick isin %texte ) {
set %texte $replace(%texte,%nick, $chr(22) $+ %nick $+ $chr(22))
var %pseudo-texte = %pseudo-texte %nick
}
inc %i
}
return %pseudo-texte
}
; ************************ ************** *********** ************ exemple d'utilisation
on 1:text:*:#:{
echo $chan $nick $+ : %texte :: $pseudo-texte($chan,$1-)
}