bind pub - !v vops
#PROC
proc vops {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +v $text"
} 
bind pub - !dv dvop
#PROC
proc dvop {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan -v $text"
} 
bind pub - !op top
#PROC
proc top {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +o $text"
} 
bind pub - !deop deop
#PROC
proc deop {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan -o $text"
} 
bind pub - !hop haop
#PROC
proc haop {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "mode $chan +h $text"
}