on *:text:!world*:#:{
  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.
    halt
  }
  elseif ($nick isvoice $chan) || ($nick ishop $chan) { 
    notice $nick Sorry you cannot set an event. 
  { if  ($3 == sara) set %team 11Saradomin {
   elseif ($3 == Zammy) set %team 4Zamarokk }
  }
}

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