on $*:text:/^[!@.>~](pcw|world) */Si:#RSPC: {
if (!%pcw) { /notice $nick There Is No Currently Set World }
else {
inc %world.time | $iif($left($1,1) == @ && ($nick !isreg $chan),msg $chan,.notice $nick) 1The 2Current 3#RSPC 4PC 5World 6is: %pcw $+ , 7The 8World 9Command 10Has 11been 12Used $bytes(%world.time,b) Times. }
}
on $*:text:/^[!@.>~]Setpcw */Si:#RSPC:{
*:TEXT:!setpcw*:#:{
if ( $nick isvoice # ) || ( $nick ishop # ) || ( $nick isop # ) {
if ($nick !isreg $chan) msg $chan 12PC 1world 2has 3been 4updated! 5Type 6!world 7or 13!pcw 9to see | set %pcw $2
/set %pcw $2 | notice $nick World Has Been Set to $2
}
else { notice $nick You do not have the access level required to use that command. }
}
}