on $*:TEXT:/^[!@.](setpc(w|word)?)/Si:#99: {
  if ($chan == #bots) { HALT }
  if ($nick isop $chan) || ($nick ishop $chan) && ($2 isnum 2-140) { mode $chan +i | set %pcworld [ $+ [ $chan ] ] $2 | set %pctime [ $+ [ $chan ] ] $fulldate | set %pcnick [ $+ [ $chan ] ] $nick | set %pcuse [ $+ [ $chan ] ] on | msg $chan 4[0:00] 10The Pest Control world has been updated. Please type 4!pcw 10or 4!world 10to view it. | .timer 1 5 msg $chan 4[0:05] 10The Pest Control world has been updated. Please type 4!pcw 10or 4!world 10to view it.
    timer 1 6 mode $chan -i 
  }
  else { notice $nick 10You cannot use this command.
  }
}
on *:TEXT:!pcw:#99:{
  if (%pcuse [ $+ [ $chan ] ] == on) {
    if (pc isin $nick) && ($nick isvoice $chan) {
    inc %pccount | notice $nick 10Current world 4[ $+ %pcworld [ $+ [ $chan ] ] $+ ] 10.Set by 4 $+ %pcnick [ $+ [ $chan ] ] $+ 10. Last Updated: 4 $+ %pctime  [ $+ [ $chan ] ] $+ 10. Used4 %pccount 10times. }
    else {
      if ($nick isop $chan) || ($nick ishop $chan) {
      inc %pccount | notice $nick 10Current world 4[ $+ %pcworld [ $+ [ $chan ] ] $+ ] 10.Set by 4 $+ %pcnick [ $+ [ $chan ] ] $+ 10. Last Updated: 4 $+ %pctime  [ $+ [ $chan ] ] $+ 10. Used4 %pccount 10times. }
      else { notice $nick 10You dont got PC| in your nick. Type /nick PC|YOURNICK 10.
      }
    }
  }
}
on *:TEXT:!world:#99:{
  if (%pcuse [ $+ [ $chan ] ] == on) {
    if (pc isin $nick) && ($nick isvoice $chan) {
    inc %pccount | notice $nick 10Current world 4[ $+ %pcworld [ $+ [ $chan ] ] $+ ] 10.Set by 4 $+ %pcnick [ $+ [ $chan ] ] $+ 10. Last Updated: 4 $+ %pctime  [ $+ [ $chan ] ] $+ 10. Used4 %pccount 10times. }
    else {
      if ($nick isop $chan) || ($nick ishop $chan) {
      inc %pccount | notice $nick 10Current world 4[ $+ %pcworld [ $+ [ $chan ] ] $+ ] 10.Set by 4 $+ %pcnick [ $+ [ $chan ] ] $+ 10. Last Updated: 4 $+ %pctime  [ $+ [ $chan ] ] $+ 10. Used4 %pccount 10times. }
      else { notice $nick 10There is no world set for 4 $+ $chan $+ 10.
      }
    }
  }
}