ON *:TEXT:!setworld *:#:{ if (%pestscript == OFF) { HALT }
  if ($3 == $null) { 
    if (%pestscript == ON) && ($2 isnum 1-138) && ($nick isop $chan) || ($nick ishop $chan) {
      if ($3 == $null) { 
        set %world [ $+ [ $chan ] ] $2
        set %scouted [ $+ [ $chan ] ] $nick
        set %pcw.time [ $+ [ $chan ] ] $ctime
        msg $chan 4 14,8C8,1A14,8U8,1T14,8I8,1O14,8N0,4 The World has changed type !world to view it! 14,8C8,1A14,8U8,1T14,8I8,1O14,8N 
        halt
      }
    }
  }
  else { 
    set %world [ $+ [ $chan ] ] $2
    set %scouted [ $+ [ $chan ] ] $3
    set %pcw.time [ $+ [ $chan ] ] $ctime 
    msg $chan 4 14,8C8,1A14,8U8,1T14,8I8,1O14,8N0,4 The World has changed type !world to view it! 14,8C8,1A14,8U8,1T14,8I8,1O14,8N 
    halt
  }
}