on *:TEXT:!setpcw*:?:{
if (($nick isop #samoschat) || ($nick ishop #samoschat)) {
/set -s %var $2
/set -s %worldperson $nick
/unset %worldchange $ctime
/set %pccount %count
/set %worldchange $ctime
/notice $nick 12 The new world is- 4 $2
/msg #samoschat 12 The world has been changed!!- 4 Set by $+(,$nick,) 12 -Type 4 !pcw- 12 To see the new world
}
else { /notice $nick You are not allowed to set a world, only operators are }
}
on *:text:!*:#:{ if ($istok(!pcw !world,$1,32)) {
inc %pcw 1
.notice $nick 12 The Current Pc-World Is 4 $+( ,%Var,) 12- This world was set- 4 $duration($calc($ctime - %worldchange $ctime))) 12ago - World set by: 4 $+(,%worldperson,) 12 - The "!Pcw" command count: 4 %pcw }
}