join avec putfast

[Babytigrou16]

Bonjour on ma donner un TCL mais malheuresement sa ne fonctionne mais je c que la remote fonctionne la question est c'est quoi putfash et pk il veux pas marcher ):( svp aider moi merci


bind join - "*" join
proc join { nick uhost hand chan } {
global join
if {
[string match -nocase *@AnimPlus.zet-land.org $uhost] ||
[string match -nocase *@ChanAdmin.zet-land.org $uhost] ||
[string match -nocase *@CoChefZone.zet-land.org $uhost] ||
[string match -nocase *@OpZone.zet-land.org $uhost] ||
[string match -nocase *@AdminZone.zet-land.org $uhost] ||
[string match -nocase *@ChanOp.zet-land.org $uhost]
} {
putfast "SAJOIN $nick #Staff+"
putfast "SAJOIN $nick #Staff"
putfast "SAJOIN $nick #Aide-Staff"
} }

Sa ne veux pas joindre rapidement si je met putserv le bot il prend trop de temps tandi que putfast sa prend 20sec meme pas :D jai aussi sa mais bizzard jai ajouter mais le robot ne fait rien jai meme pas des message d erreur mais il sajoin pas ...

###############
## PUTFAST ##################################################
## Améliore la vitesse des commandes mais peut etre instable ##
###############################################################

proc putfast {arg} {
append arg "\n"
putdccraw 0 [string length $arg] $arg
}