on $*:text:/^[!@.](set world off|set pcw off)/Si:#:{ 
  if ($chan == #allies) || ($chan == #epc) {
    if ($chancheck($1) == True && $readini(Pcw.ini,Pestcontrol,Status) == off) {
      writeini Pcw.ini Pestcontrol Status off
      notice $chan the pcw script is now off
    }
  }
}
on $*:text:/^[!@.](set world on|set pcw on)/Si:#:{ 
  if ($chan == #allies) || ($chan == #epc) || ($chan == #epc_leaders) {
    if ($chancheck($1) == True && $!readini(Pcw.ini,Pestcontrol,Status)) {
      remini Pcw.ini Pestcontrol Status 
      notice $chan the pcw script is now on
    }
  }
}
on $*:text:/^[!@.](world|pcw|w)/Si:#:{ 
  if ($chan == #allies || $chan == #epc_leaders || $chan == #epc) {
    inc %times 
    if (!%world) { halt }
    if ($readini(Pcw.ini,Pestcontrol,Status) == off) { notice $nick 4ERROR:the pcw script is OFF | halt }
    if (^* iswm $nick || $nick isop $chan || $nick ishop $chan) { 
      notice $nick 12,1*~* EPC *~*  4,1 The Current World is 11,1 %world 10,1 The !World command Has Been Used 4,1 %times Times, 10Last updated > > $duration($calc($ctime - %lastworldupdate)) ago 12,1*~* EPC *~* 
    } 
    if ($nick isop $chan || $nick ishop $chan) { halt }
    if ($nick !isop #epc) || ($nick !ishop #epc) || (^* !iswm $nick ) { notice $nick 9,1 Please put ^ infront of your name, then type !world for the current pc world ( Type /nick $+(,^,$nick,) ~~..::Thanks::..~~  
    }
  } 
}
 
On $*:TEXT:/^[!@.]set( ?world| ?pcw)/Si:#:{
  if ($chan == #allies) || ($chan == #epc_leaders)  { 
    if ($readini(Pcw.ini,Pestcontrol,Status) == off) { notice $nick 4ERROR:the pcw script is OFF | halt }
    if ($nick isop $chan) || ($nick ishop $chan) { 
      if (($2 >= 1) && ($2 <= 148)) || ($2- isalpha a-z) {
        set %world $2- 
        set %worldnick $nick 
        set %lastworlddateset $date
        set %lastworldupdate $ctime 
        msg #allies 9,1The current pest control world has been updated, thanks $nick 
  msg #epc 10..::~~The current pest control world has been updated 11 Please type !world for the world 10( You must have ^ infront of your name 2 to access 11my worlds ~thanks~)~~::.. 
      msg #epc_leaders 4,8The Pest Control World has been changed
      }
    } 
  } 
}
alias chancheck {
  if ($1 isop #allies || $1 ishop #allies || $1 isop #epc || $1 ishop #epc || $1 isop #epc_leaders || $1 ishop #epc_leaders) {
    return True
  }
}