comment fais en tcl?

[zyrte]

hello, à quoi correspondrait le code en tcl lors que quelqu'un est deopé sur le salon, ca le reop aussitot

un autoreop sur un deop, sachant que tout le monde est op
dés qu'un user est deop , que ca le reop

merci[/quote]

[fedora]

bonjour,

peut etre quelque chose comme cela "code by Alias_Angelius"

tclcopier

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

[zyrte]

Non le deop ne marche pas
en on join, j'ai :

bind join - "*" opauto
proc opauto { nick uhost hand chan } {
if {[string tolower $chan] =="#le-bistrot" && [isop $botnick $chan]} {
putserv "mode $chan +o $nick"
}
}

mais lors d'un deop, rien ne marche

[djkenny]

tclcopier

bind mode - *-o*  AutoReOp
proc AutoReOp {nick host hand chan mode pseudo} {
    if {![string equal -nocase $pseudo $nick] && [string equal -nocase $chan "#ton_salon"] && [botisop $chan]} {
       putserv "mode $chan +o $pseudo"
    }
}

[CrazyCat]

Ou mieux que le putserv:

tclcopier

pushmode $chan +o $pseudo