on *:TEXT:!setpcw *:#:{ 
  if ($chan != #rspc) halt
  if ($nick isop #) || ($nick ishop #) || ($nick isvoice #) && ($$2 isnum) { 
    set %pcw $2- 
    set %changer $nick
    msg $chan 2The PC world has been updated, Type 4!pcw2 or 4!world2.
    else { halt }  
  } 
} 

on *:TEXT:!pcw:#:{ .
  if ($chan != #rspc) notice $nick 4 $nick 2- Please join4 #RSPC 2for PC Worlds.
  if ($chan != #rspc) halt
  notice $nick 2The current Pest Control world is4 %pcw $+ 2, changed by4 %changer $+2. 
} 
on *:TEXT:!world:#:{ 
  if ($chan != #rspc) notice $nick 4 $nick 2- Please join4 #RSPC 2for PC Worlds.
  if ($chan != #rspc) halt
  notice $nick 2The current Pest Control world is4 %pcw $+ 2, changed by4 %changer $+2. 
} 
on *:TEXT:@world:#:{ 
  if ($chan != #rspc) msg $chan 4 $nick 2- Please join4 #RSPC 2for PC Worlds.
  if ($chan != #rspc) halt
  if $nick IsOp $Chan || $nick IsHop $Chan || $nick IsVoice $Chan {
    msg $chan 2The current Pest Control world is4 %pcw $+ 2, changed by4 %changer $+2.  
  }
} 
on *:TEXT:@pcw:#:{ 
  if ($chan != #rspc) msg $chan 4 $nick 2- Please join4 #RSPC 2for PC Worlds.
  if ($chan != #rspc) halt
  if $nick IsOp $Chan || $nick IsHop $Chan || $nick IsVoice $Chan { 
    msg $chan 2The current Pest Control world is4 %pcw $+ 2, changed by4 %changer $+2. 
  } 
}