comment fais en tcl?
#2
bonjour,

peut etre quelque chose comme cela "code by Alias_Angelius"

tcl
set SalonOp "#TONSALON"
	bind join - * OpAuto
    proc OpAuto { nick host hand chan } {
    if {$chan == "$SalonOp"} {
      putserv "mode $chan +o $nick"
      return 0
       }
	}
 
    bind mode - *-o*  AutoReOp
    proc AutoReOp { nick host hand chan mode pseudo } {
      if { $pseudo == $nick } {
        putserv "mode $chan +o $nick"
      }
    }




je n'ai pas testé le code.


Cordialement DnS
[font=Times New Roman]La différence entre Linux et Windows ,c'est que Linux c'est comme une belle fille , il faut l'apprivoiser , la comprendre , la séduire tandis que Windows , c'est comme une prostitué , il faut payer et surtout bien se protéger.[/font]
Répondre Avertir


Messages dans ce sujet
comment fais en tcl? - par zyrte - 08/08/2011, 09:19
RE: comment fais en tcl? - par fedora - 08/08/2011, 09:27
RE: comment fais en tcl? - par zyrte - 08/08/2011, 09:38
RE: comment fais en tcl? - par djkenny - 08/08/2011, 10:17
RE: comment fais en tcl? - par CrazyCat - 08/08/2011, 10:53

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)
Tchat 100% gratuit -Discutez en toute liberté