NEXT TCL..

[iamdeath]

Hi I need to ask onething if it's possible, I want to bing pub ( FLAGS ) for those who are oped in #BackChannel.

I have this code:

Code: Select all

# commands
set temp(list) [list next voice helped "" noidle "" skip "" put "" list ""]
foreach "temp(1) temp(2)" $temp(list) {
	if {$temp(2) == ""} {set temp(2) $temp(1)}
	foreach temp(bind) [binds next:$temp(2)] {
		unbind pub [lindex $temp(bind) 1] [lindex $temp(bind) 2] next:$temp(2)
	}
	bind pub - .$temp(1) next:$temp(2)
}

Can I do something to make it..
set flags [if {[isop $nick $backchannel]}]
bind pub $flags .$temp(1) next:$temp(2)
.. Like users who are oped in the back channel will be able to use the commands.. is that possible?

[Sir_Fz]

No that's not possible, you'll either have to give the ops some flag and bind to it or add the [isop] check into your procs.

[iamdeath]

ey thanks for the reply but I don't wanna give flags or add them in Bots userlist I was wondering if it was possible to make it this way that ops in the backchannel can use the script.. could'nt you modify the part i've pasted above to make it possibe? or something i am kinda new into it..
thanks

[iamdeath]

ey see if this is going to work or wrong..

Code: Select all

# commands
set temp(list) [list next voice helped "" noidle "" skip "" put "" list ""]
global backchannel
if {![isop $nick $backchannel]} {return}
foreach "temp(1) temp(2)" $temp(list) {
	if {$temp(2) == ""} {set temp(2) $temp(1)}
	foreach temp(bind) [binds next:$temp(2)] {
		unbind pub [lindex $temp(bind) 1] [lindex $temp(bind) 2] next:$temp(2)
	}
	bind pub - .$temp(1) next:$temp(2)
}

[Sir_Fz]

Try it yourself and see.

[iamdeath]

It's still not working using the code I just pasted.. it's listening to everyone.. not only ops in theback channel.

[Sir_Fz]

you have to add the [isop] checks inside the procs (i.e. next:$temp(2))

[iamdeath]

ey thanks I got fixed