mIRC Scripting Founder.TCL

[Che]

set ops_chan "#opers"
bind pub - !founder founder
#PROC
proc founder {nick uhand host chan text} {
global ops_chan
if {![onchan $nick $ops_chan]} {return 0}
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +q $nick"
}