probleme avec mon script

[Nostromo1st]

alors j'ai mis cette ligne

TCLcopier

set args [string map [list "*" "%" " " "%"] $arg];

pour palier a mon problème de recherche:

quand je tapai --> !search boulon m10
le résultat était --> aucun résultats.
alors que si je tapai --> !search %boulon%m10%
le résultat est qu'il me trouvait toute ma liste de boulon M10

pour moi (et c'est peut etre la que j'ai pas compris tout a fait les binds)

TCLcopier

bind bot - ::search bot:search

signifie :
bind bot : qui doit réagir et a quelle commande
::search : la commande !search que j'ai décrite dans mon code
bot:search : le nom de ma procédure

la variable "bots" sert à donner les nom des bots qui sont sur le botnet, donc bind bot : le bot qui recois la commande ::search lance la proc bot:search

dans ce cas pour moi la commande qui demande d'envoyé la commande ::search au autre bots du botnet est :

TCLcopier

proc bot:search { from_bot cmd text }

ou from_bot devrait être le bot qui envoie la commande.

pour ce qui est de:

TCLcopier

foreach { chan } [split $chan2 " "]

en fait je souhaiterai que tout ce qui est tapé comme commande !search soit envoyer sur $chan2

voila ce que j'ai compris en lisant mon code et a mon avis c'est la que je dois pas bien comprendre la portée et c'est pour cela que ca ne fonctionne pas :S

---

Re a tous,

Après une réflexion, je me dis que peut être je cherche à compliquer et que je pourrai certainement l'ecrire comme ca:

TCLcopier

	# CONFIGURATION pour le botnet:
 bind bot - ::search bot:search
 proc bot:search { bot cmd text } {
	global search  bot chan1 chan2
	set args [split $text " "]
	set reference [lindex $args 0]
	set articles [lindex $args 1]
	putquick "PRIVMSG $chan2 :${reference} ${article}"
}

enfin un quelque chose du genre....

Nos...