[Recherche] Script Autovoice

[Prototype]

Nickel ! ça marche parfaitement

Une dernière question et ça ira pour moi : J'ai un petit script pour sécuriser le chan, qui me permet de, avec une simple commande, pouvoir le mettre en +MD/-MD, ou alors en +avs/-avs. Or, je suis le seul à pouvoir le faire, c'est à dire que je suis le seul que le bot écoute. J'aimerai savoir si il y a pas une solution pour changer ça, en mettant des "if isop" quelque part.

Je vous met le code ici. Merci encore

tclcopier

catch {bind pub m !autovoice channel:avs}
catch {bind join - * chan:vsjoin}
setudef flag avs
 
proc channel:avs {nick uhost hand chan arg} {
	switch -exact -- $arg {
		"on" {
			channel set $chan +avs
			putserv "PRIVMSG $chan :L'auto Voice a été activé, &nick."
		}
		"off" {
			channel set $chan -avs
			putserv "PRIVMSG $chan :L'auto Voice a été désactivé, &nick."
		}
	}
}
 
proc chan:vsjoin {nick uhost hand chan} {
	if {[channel get $chan avs]} {
              putquick "MODE $chan +v $nick"
	}
}
 
 
 
 
catch {bind pub m !p channel:pro}
setudef flag pro
 
proc channel:pro {nick uhost hand chan arg} {
	switch -exact -- $arg {
		"on" {
			channel set $chan +pro
			channel set $chan -avs
			putserv "PRIVMSG $chan :Le chan est dorénavant protégé, &nick."
		 	putserv "MODE $chan +mD"
		}
		"off" {
			channel set $chan -pro
			putserv "PRIVMSG $chan :Le chan n'est dorénavant plus protégé, &nick."
			putserv "MODE $chan -mD"
		}
	}
}