Mine

on *:text:.w*:#:{
  if ($nick isop $chan) {
    set %event [ $+ [ $chan ] ] $2-
    msg $chan 12A new castle wars world has been set by14 ~ $nick ~ 12type14 !castle 12to view it.
    if ($3 == s) { set %team [ $+ [ $chan ] ] 12Saradomin }
    if ($3 == z) { set %team [ $+ [ $chan ] ] 4Zamorak }
  }
  elseif ($nick isvoice $chan) || ($nick ishop $chan) { 
    notice $nick Sorry you cannot set an event. 
  }
}

on *:text:!castle:#:{
  if ($nick isreg $chan) {
    notice $nick 4Sorry you may not view it the event.
  }
  else {
    notice $nick 12The current Castle Wars World is:14 %event [ $+ [ $chan ] ]  Team: %team  [ $+ [ $chan ] ]   
  }
}