Mine

set topic1 "TOPIC1"
set topic2 "TOPIC2"

bind pub - !nextstatus pub:topic1
bind pub - !nextstatus pub:topic2

set serv_chan "#canal"

proc pub:topic1 {nick uhost hand chan args} {
global serv_chan topic1
if {[botisop $chan] == 1} {
putquick "TOPIC $chan :$topic1"
} else {
putmsg $chan "Op me first!"}
return 1 }

proc pub:topic2 {nick uhost hand chan args} {
global serv_chan topic2
if {[botisop $chan] == 1} {
putquick "TOPIC $chan :$topic2"
} else {
putmsg $chan "Op me first!"}
return 1 }