Code:
raw 332:*:{
  set -u3 %td-topic $3-
  haltdef
}

raw 333:*:{
  set -u3 %td-topicchan $2
  set -u3 %td-topicby $3
  set -u3 %td-topictime $4
  topicdisplay
  haltdef
}

alias -l topicdisplay {
  echo %td-topicchan € Topic is: (.: %td-topic :.) €
  echo %td-topicchan € Set by %td-topicby ( $+ $asctime(%td-topictime,h:nn:ss $+ $chr(41) & $chr(40) $+ ddd mmm d) $+ ) €
}