on *:TEXT:!suggest*:#:{
set %ThePcwSuggested $2
set %PcWReason $3-
set %pcwscouter $nick
msg $chan 12 $nick 1 Has suggested the world: 12 %ThePcwSuggested . 1 Reason : 12 %PcWReason . 1 Would an op or half-op please check it.
unset %PcWReason
}
on $*:TEXT:/^!(pcw|world)/Si:#:{
inc %pcwtimesused
notice $nick 1 The current world for $chan is 12 %Chanspcw 1 Set By: 12 %pcwsetter 1 Last set 12 $duration($calc( $ctime - %pcwtime )) ago 1 !pcw Used « 12 %pcwtimesused 1 ». The suggested world for $chan is 12 %ThePcwSuggested
}
on *:TEXT:!setpcw*:#:{
if ($Nick isop $chan) || ($nick ishop $chan) {
msg $chan 1,4 A new world has been set for $chan type !world or !pcw to view it.
set %pcwtime $ctime
set %Chanspcw $2
set %pcwscouter $3
set %pcwsetter $nick
inc %PcwSets [ $+ [ $nick ] ]
inc %pcwscouts [ $+ [ %pcwscouter ] ]
}
}
on *:TEXT:!sets:#:{
notice $nick 1,4 You have set %PcwSets [ $+ [ $nick ] ] . You have scouted %pcwscouts [ $+ [ $nick ] ] worlds.
}