on / off switch via console

[Elfriede]

Hi everyone

Hopefully someone can help me on that. Ive a small script, that needs an on/off switch for a specific command.

In the following example id like to have eg:

.chanset !this off

like this

Code: Select all

proc beta_recv    {from command text} {
	set type [lindex [split $text] 0]
	switch $type {
		"!this"   { sendmsg #chan "$text" }
		"!that"   { sendmsg #chan "$text" }
		"!somethg"   { sendmsg #chan "$text" }
	}
}

Would be awesome, if someone would write that for me

Thanks a lot

[Johannes13]

setudef flag !this

set it with .chanset +!this or .chanset -!this

check it in the script with [channel get $channel !this]