on *:TEXT:!setpcw*:#: { if ( $nick isop $chan || $nick ishop $chan || $nick isvoice $chan ) { 
    if ( %pest == off ) { halt } 
    else { set %world $2 
      set %ht $ctime 
      set %nick $nick 
  msg || NEW PEST CONTROL WORLD SET BY %nick || To view the current Pest Control World type !pcw or !world  } } 
else { halt } } } 

on *:TEXT:!setworld*:#: { if ( $nick isop $chan || $nick ishop $chan || $nick isvoice $chan ) { 
    if ( %pest == off ) { halt } 
    else { set %world $2 
      set %ht $ctime 
      set %nick $nick 

      on *:TEXT:!world:#: { if ( %pest == on ) { notice $nick The current Pest Control World is %world [ Set by %nick $duration($calc($ctime - %ht)) ago $+ ] } } 

      on *:TEXT:!pcw:#: { if ( %pest == on ) { notice $nick The current Pest Control World is %world [ Set by %nick $duration($calc($ctime - %ht)) ago $+ ] } }