Something

on $*:text:/^[!@.]defineworld */Si:#pestops: {
  if ($nick isop #) || ($nick ishop #) {
    set %pc $2-
    set %pcc $ctime
    msg #pest 7PC-World 14changed! Typ 7!world 14or 7!pcw14!
} }

on *:Text:!pcw*:#:{ 
  inc %pcwcount
  notice $nick 1- 14Current PC-World:7 %pc 1- 14Last update:7 $duration($calc($ctime - %pcc))
}
else {
  notice $nick 12You are NOT on 4#pest! 
}
on *:Text:!world*:#:{ 
  inc %pcwcount 
  notice $nick 1- 14Current PC-World:7 %pc 1- 14Last update:7 $duration($calc($ctime - %pcc))}
  else {
    notice $nick 12You are NOT on 4#pest! 
  }