on *:Text:!pcon:#: set %pcw on
on *:Text:!pcoff:#: set %pcw off
on *:TEXT:!pcw:#:{
if (%pcw == on) {
.notice $nick 12 The Current World Is 4 $+( ,%pc,) 12This world was set 3 $duration($calc($ctime - %pcc $ctime))) 12ago. [ Set by $+( ,%pcnick,) ] !Pcw command has been used $+( ,%pcwcount,) times so far!
/inc %pcwcount
}
}
on *:TEXT:!world:#:{
if (%pcw == on) {
.notice $nick 12 The Current World Is 4 $+( ,%pc,) 12This world was set 3 $duration($calc($ctime - %pcc $ctime))) 12ago. [ Set by $+( ,%pcnick,) ] !Pcw command has been used $+( ,%pcwcount,) times so far!
/inc %pcwcount
}
}
on *:TEXT:!setpcw *:#:{
if (%pcw == on) {
if ($nick isop $chan) || ($nick ishop $chan) {
/set -s %pc $2
/set -s %pcnick $nick
/unset %pcc $ctime
/set %pcc $ctime
/notice $nick The new world is $2
/msg $chan 4 The world has been changed!! Type !pcw to see the new world
}
else { /notice $nick You are not allowed to set a world, only operators are. }
}
}