on $*:TEXT:/^[!.]setcw../Si:#rscw:{
  if (($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan)) {
    set %world $+($2,$chr(160),$nick,$chr(160),$ctime)
    msg $chan 14[4 $+ $nick $+ 14] has changed changed the world, type 4!CW
  }

on $*:TEXT:/^[!.]cw/Si:#rscw: {
notice $nick 14[4 $+ $nick $+ 14] the current world is:4 $gettok(%world,1,160) 14set by [4 $+ $gettok(%world,2,160) $+ 14] }