on *:text:!del *:#:{
  if ($nick isop $chan) || ($nick ishop $chan) { delfrtopic $2- }
}
alias delfrtopic {
  var %topic = $chan(#).topic
  if ($1- isin %topic) {
    topic $chan $remove(%topic,$1- $+ $chr(32 $+ $chr(124)))
  }
  else { echo -ag %msg isnt in $chan $+ 's topic }
}