on *:TEXT:!setworld *:#:{ if ($nick isop $chan || $nick ishop $chan) {
    set %pcworld. [ $+ [ $chan ] ] $2 
    set %pcwd. [ $+ [ $chan ] ] $ctime
    set %pcwnick. [ $+ [ $chan ] ] $nick
    notice $nick 7World changed to4 %pcworld. [ $+ [ $chan ] ]
    msg $chan 7Pest Control 4World7 Has 4Changed7 - Type 4!world
  }
}


on *:TEXT:!setworld *:?: { if ($nick isop $3 || $nick ishop $3) {
    set %pcworld. [ $+ [ $3 ] ] $2
    set %pcwd. [ $+ [ $3 ] ] $ctime
    set %pcwnick. [ $+ [ $3 ] ] $nick
    notice $nick 7World changed to4 %pcworld. [ $+ [ $3 ] ]
  msg $3 7Pest Control 4World7 Has 4Changed7 - Type 4!world  }
}
}



on *:TEXT:!world:#: { if (%pcchan. [ $+ [ $chan ] ] 
if (%pcworld. [ $+ [ $chan ] ] 
{ 
  notice $nick 6The Pest Control World is:4 %pcworld. [ $+ [ $chan ] ] 6Duration:4 $duration($calc($ctime - %pcwd. [ $+ [ $chan ] ] )) 6Set by:4 %pcwnick. [ $+ [ $chan ] ]
}
}