Mine

on *:TEXT:!cwoff:#CastleWars: {
  if (%cwscript == off) { halt }
  elseif ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan) {
    set %cwscript off
    msg $chan 4,1<< 14Cwscript turned4 off.144>>
  }
}
on *:TEXT:!cwon:#CastleWars: {
  if (%cwscript == on) { halt }
  elseif ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan) {
    set %cwscript on
    msg $chan 4,1<< 14Cwscript turned4 on.144>>
  }
}

on $*:text:/^[!]change */Si:#CastleWars: {
  if (%cwscript == off) { halt }
  else {
    if ($nick isop $chan || $nick ishop $chan || $nick isvoice $chan) && ($2 isnum 2-144) {
      set %cw $2
      msg $chan 4,1<< 14The current Castle Wars world has changed to: [4 %cw 14] 4>>
    }
  }
}
on $*:text:/^[!](cw|world|cww|w)/Si:#CastleWars: {
  if (%cwscript == off) { halt }
  else {
    notice $nick 4,1<< 14The current Castle Wars world is:14 [4 %cw 14] 4>>
  }
}