;; Saytopic { /saytopic [<channel>] [to channel/query] }
alias saytopic { tokenize 32 $iif($1,$1,$iif($active ischan,$active)) $2- | set %saytopic $+ $$1 $iif($2 ischan,$2,$1) | topic $1 }
raw 331:*:{ if (%saytopic [ $+ [ $2 ] ]) { msg %saytopic [ $+ [ $2 ] ] No Topic set. | unset %saytopic $+ $2 | haltdef } }
raw 332:*:{ if (%saytopic [ $+ [ $2 ] ]) { set %saytopic [ $+ [ $2 ] $+ ] topic $3- | haltdef } }
raw 333:*:{ if (%saytopic [ $+ [ $2 ] ]) { msg %saytopic [ $+ [ $2 ] ] ( $+ $2 $+ ) Topic $+(",%saytopic [ $+ [ $2 ] $+ ] topic,$chr(15),") was set by: $3 on $asctime($4) | unset %saytopic $+ $2 %saytopic $+ $2 $+ topic | haltdef } }