on *:TEXT:!pcw*:#:{ if ($nick isvoice $chan) || ($nick ishelp $chan) || ($nick isop $chan) {
$iif(%world, notice $nick 2The current world for SLPC is 04 $+ %world - go now!, notice $nick 2Sorry there is 4no PC world currently set.)
}
}
on $*:TEXT:/^[!@]set(pc)?w/Si:#:{
if ($nick !ishelp $chan) && ($nick !isop $chan) { notice $nick Sorry, but you do not have permission to set the world. | halt }
elseif ($nick ishelp $chan) || ($nick isop $chan) { msg $chan $nick has set a new PC world! Type !pcw to find out! | set %world $2 | halt }
}