on *:TEXT:!setpcw*:#:{
var %output = $iif($left($1,1) == !,.notice $nick,.msg $chan)
if (( $nick isreg $chan ) || ( $nick isvoice $chan )) { halt }
else {
set %event. $+ $chan $2-
set %pcchange. $+ $chan $ctime
msg $chan 14 The World has been Changed For4 $chan 14 please Type4 !pcw,14 or4 !world14 To View It! 12
}
}
on $*:TEXT:/^(`|!|@)world/i:#: {
var %output = $iif($left($1,1) == !,.notice $nick,.msg $chan)
if (%pcchange. [ $+ [ $chan ] ] == $null) { %output 14 A PCW Was never Set for4 $chan 14 Please type4 !setpcw14 to Set one | halt } else {
%output 14 The current pest control world is:4 %event. [ $+ [ $chan ] ] 14......Last Changed: $duration($calc($ctime - %pcchange. [ $+ [ $chan ] ] )).....TIMES USED :4 %pnum | inc %pnum 12] }
}
on $*:TEXT:/^(`|!|@)pcw/i:#: {
var %output = $iif($left($1,1) == !,.notice $nick,.msg $chan)
if (%pcchange. [ $+ [ $chan ] ] == $null) { %output14 A PCW Was never Set for4 $chan 14 Please type4 !setpcw14 to Set one | halt } else {
%output 14 The current pest control world is:4 %event. [ $+ [ $chan ] ] 14......Last Changed: $duration($calc($ctime - %pcchange. [ $+ [ $chan ] ] )).......TIMES USED :4 %pnum | inc %pnum 12] }
}