on *:text:!change*:#: {
if (($nick isop $chan || $nick ishop $chan) && ($2 isnum 2-138)) {
set %world [ $+ [ $chan ] ] $2
set %pcnick $nick
msg $chan The World is %world [ $+ [ $chan ] ] Set By [ $nick ]
}
else {
msg $chan Please [ $nick ] Make It A Real World [ $2- ] is not a real world
}
}
on *:text:!world*:#: {
notice $nick The World Is %world [ $+ [ $chan ] ] Set By [ %pcnick ]
}
}
on *:text:!pcw*:#: {
notice $nick The World Is %world [ $+ [ $chan ] ] Set By [ %pcnick ]
}
}
on *:text:!pc*:#: {
notice $nick The World Is %world [ $+ [ $chan ] ] Set By [ %pcnick ]
}
on *:text:!setworld *:#: {
msg $chan Please [ $nick ] use !change <world> to change the world
}