[script]
on *:TEXT:!change*:#thepc,#thepc.staff: { 
  if ( $nick ison $chan ) || ( $nick isop $chan ) || ( $nick ishop $chan ) {
    set %oldpcw.best %setpcw
    set %setpcw.best $2-
    set %setnick.best $nick
    set %settime.best $ctime
    notice bladex newpcworld $2-
    inc %countpcw.best 1
    notice + #thepc 10»15]12[World:4 %setpcw.best $+ 12][9Last world: %oldpcw.best $+ 12][Updated:4 $+($duration($calc($ctime - %settime.best)),) 12][Set by4 %setnick.best $+ 12][12Use:4 %countpcw.best $+ ]15[10«
    msg #thepc |10»15]12 $+ $nick has updated #thepc's world.[10«|
  }
}
on *:text:!pcw:#thepc: { 
  if ( %pcstatus.best == off ) { HALT }
  elseif ( $nick isvo $chan ) || ( $nick ishop $chan ) || ( $nick isop $chan ) || ( $nick ison $chan ) {
    inc %countpcw.best 1
  notice $nick 10»15]12[World:4 %setpcw.best $+ 12][9Last world: $$2 $+ 12][Updated:4 $+($duration($calc($ctime - %settime.best)),) 12][Set by4 %setnick.best $+ 12][12Use:4 %countpcw.best $+ ]15[10« }
} 

on *:text:!world:#thepc: { 
  if ( %pcstatus.best == off ) { HALT }
  elseif ( $nick isvo # ) || ( $nick ishop # ) || ( $nick isop # ) || ( $nick ison # ) {
    inc %countpcw.best 1
  notice $nick 10»15]12[World:4 %setpcw.best $+ 12][9Last world: %oldpcw.best $+ 12][Updated:4 $+($duration($calc($ctime - %settime.best)),) 12][Set by4 %setnick.best $+ 12][12Use:4 %countpcw.best $+ ]15[10« }
}  

on *:text:!p:#thepc: { 
  if ( %pcstatus.best == off ) { HALT }
  elseif ( $nick isvo # ) || ( $nick ishop # ) || ( $nick isop # ) || ( $nick ison # ) {
    inc %countpcw.best 1
  notice $nick 10»15]12[World:4 %setpcw.best $+ 12][9Last world: %oldpcw.best $+ 12][Updated:4 $+($duration($calc($ctime - %settime.best)),) 12][Set by4 %setnick.best $+ 12][12Use:4 %countpcw.best $+ ]15[10« }
}   

on *:text:!w:#thepc: { 
  if ( %pcstatus.best == off ) { HALT }
  elseif ( $nick isvo # ) || ( $nick ishop # ) || ( $nick isop # ) || ( $nick ison # ) {
    inc %countpcw.best 1
  notice $nick 10»15]12[World:4 %setpcw.best $+ 12][9Last world: %oldpcw.best $+ 12][Updated:4 $+($duration($calc($ctime - %settime.best)),) 12][Set by4 %setnick.best $+ 12][12Use:4 %countpcw.best $+ ]15[10« }
} 

on *:TEXT:!bot on:#thepc: {
  if ( $nick isop # ) || ( $nick ishop # ) || ( $nick ison # ) {
    set %pcstatus.best on
    notice $nick You have turned me on. :)
  }
}
on *:TEXT:!bot off:#thepc: {
  if ( $nick isop # ) || ( $nick ishop # ) || ( $nick ison # ) {
    set %pcstatus.best off
    notice $nick You have turned me off. Please remember to turn on another bot!
  }
}