; ############################################################
; pcw
; ############################################################

/var %world


on 1:TEXT:!pcw*:#pcelites,#tribute:{
  /set %used $calc( ( %used ) + 1)
  if (%used == 100000) { /msg $chan 4 100,000 12!pcw/!world uses!! }
  if (($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan)) {
    /notice $nick 12The 4PC World 12is 4 %world 12 set by 4 %nic 12- 6Set $duration($calc( $ctime - %pcsettime. [ $+ [ $chan ] ] )) Ago.12 - Used4 %used 12Times. To change the World type !setpcw ***
  }
  else {
    /notice $nick 12The 4PC World 12is 4 %world 12 set by 4 %nic 12- 6Set $duration($calc( $ctime - %pcsettime. [ $+ [ $chan ] ] )) Ago.12 - Used4 %used 12Times.
  }
}

on 1:TEXT:!world*:#pcelites,#tribute:{
  /set %used $calc( ( %used ) + 1)
  if (%used == 100000) { /msg $chan 4 100,000 12!pcw/!world uses!! }
  if (($nick isop $chan) || ($nick ishop $chan) || ($nick isvoice $chan)) {
    /notice $nick 12The 4PC World 12is 4 %world 12 set by 4 %nic 12- 6Set $duration($calc( $ctime - %pcsettime. [ $+ [ $chan ] ] )) Ago.12 - Used4 %used 12Times. To change the World type !setpcw ***
  }
  else {
    /notice $nick 12The 4PC World 12is 4 %world 12 set by 4 %nic 12- 6Set $duration($calc( $ctime - %pcsettime. [ $+ [ $chan ] ] )) Ago.12 - Used4 %used 12Times.
  }
}