on *:TEXT:!setcw*:#:{ 
if ($nick isop $chan) || ($nick ishop $chan) { 
set %cw [ $+ [ $chan ] ] $2 
set %team [ $+ [ $chan ] ] $3 
msg $chan The Castle Wars World has been Updated!Type !cw or !castlewars to see the new world! You may use @ also. 
} 
} 

on $*:TEXT:/[!@]cw|castlewars?/Si:#:{ 
if ($nick isvoice $chan) || ($nick ishop $chan) || ($nick isop $chan) { 
set %homer $iif($left($1,1) == @,msg $chan,notice $nick) 
inc %cwars | %homer The Current Castlewars World is: %cw [ $+ [ $chan ] ] $+ . Current Team is: %team [ $+ [ $chan ] ] $+ .The Castle Wars world has been viewed: %cwars Times. 
} 
} 
on *:TEXT:!suggestcw*:#:{ 
set %ThecwSuggested $2 
set %cWReason $3- 
set %cwscouter $nick 
msg $chan $nick Has suggested the world: %ThecwSuggested . Reason : %CWReason . Would an op or half-op please check it. 
unset %CWReason 
}