on *:TEXT:!Setpcw*:*:{ set %nick $nick | set %chan $3 | set %pcw $2 
     if (%nick !isvoice %chan) || (%nick !isreg %chan) {
writeini Pcw.ini %chan %nick %pcw
}
      set %minute $time(n) | set %secs $time(ss) |
msg %chan There is a new world. To view it type !pcw
    }
  }
}

on *:TEXT:!pcw*:#:{ if ($chan == %chan) && ($nick !isreg $chan) {
    notice $nick The current Pest cotroll world is %world set $calc($time(n)-%minute) Minutes and $calc($time(ss)-%secs) Seconds ago by %nick1
  }
}