Miscellany

on *:TEXT:!setpcw*:#: { if ($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-138) { set %world $2- | set %worldsettime $ctime | set %worldsetnick $nick | msg $chan 12The 4PC12 world has been changed to7 [14 $2- 7] 12by7 $nick $+ . } } 
on *:TEXT:!setpcw*:#: { if ($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-138) { set %world $2- | set %worldsettime $ctime | set %worldsetnick $nick | msg $chan 12The 4PC12 world has been changed to7 [14 $2- 7] 12by7 $nick $+ . } } 
on *:TEXT:!update*:#: { if ($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-138) { set %world $2- | set %worldsettime $ctime | set %worldsetnick $nick | msg $chan 12The 4PC12 world has been changed to7 [14 $2- 7] 12by7 $nick $+ . } }    
on *:TEXT:!pcw:#: { notice $nick 12 The current 4PC12 world is7 [14 %world 7] 12set by7 [14 %worldsetnick 7] 7 $duration($calc($ctime - %worldsettime)) 12ago. } 
on *:TEXT:!world:#: { notice $nick 12 The current 4PC12 world is7 [14 %world 7] 12set by7 [14 %worldsetnick 7] 7 $duration($calc($ctime - %worldsettime)) 12ago. } 
on *:TEXT:@pcw:#: { msg $chan 12 The current 4PC12 world is7 [14 %world 7] 12set by7 [14 %worldsetnick 7] 7 $duration($calc($ctime - %worldsettime)) 12ago. } 
on *:TEXT:@world:#: { msg $chan 12 The current 4PC12 world is7 [14 %world 7] 12set by7 [14 %worldsetnick 7] 7 $duration($calc($ctime - %worldsettime)) 12ago. }