on $*:TEXT:/^[.,~^!](change|Setpcw)/si:#Thepc,#thepc.staff:{
if ($nick isop $chan) || ($nick ishop $chan) || ($address($nick,2) == $address($me,2)) {
if ($2- isnum 26-144) {
set %pcw.last %pcw.current
timer 1 1 set %pcw.current $$2
Notice $nick 10 The World Has Been Set To $2-
set %pcw.time $ctime
set %pcw.setter $nick
if (%pcwonoff == off) { HALT }
msg #Thepc 4-¤§¤- 14 The Current Pcw Has Changed! 12 By: $nick 4-¤§¤-
msg #Thepc.staff 4-¤§¤- 14The World Has Been Changed To $2- By $nick $+ . 4-¤§¤-
}
}
Else{
if ($2- isnum 1-25) {
notice $nick 4Please 12 Do Not Abuse World Change!
}
}