on $*:TEXT:/^[!@](setpcw|setworld|setpc|setw|set)/Si:#sdpc_:{
  if (($nick isop #) || ($nick ishop #)) { 
   if ($chan == #sdpc_staff)
    If ($2 isnum 1-144) {
      set %setby [ $+ [ $chan ] ] $nick 
      set %world [ $+ [ $chan ] ] $2
      set %scoutedby [ $+ [ $chan ] ] $3 
      msg #sdpc 10 the pc world has been changed, type 2!pcw 10to see it!
    } 
  }
}
on *:text:!suggest*:#sdpc: {
  If ($2 isnum 1-144) {
    set %suggest [ $+ [ $chan ] ] $2
    msg $chan 10 $nick has suggested world :2 $2 10reason: 2 $3-
  }
}
on $*:TEXT:/^[!@](world|pcw|pc|w)/Si:#sdpc:{ 
  /notice $nick 10 world: 2 %world [ $+ [ $chan ] ] 5|| 10 scouted by:2 %scoutedby [ $+ [ $chan ] ] 5|| 10 set by: 2 %setby  [ $+ [ $chan ] ] 5 || 10 suggested: 2 %suggest [ $+ [ $chan ] ]
} 

on *:TEXT:!scouts:#: {
  /notice $nick You have 12 $+ $calc($hget(PCW,$+($chan,$nick,Sug)) + 0) 1 $+ Scouts! and 12 $+ $calc($hget(PCW,$+($chan,$nick,Good)) + 0) 1 $+ of them were set by an op/hop!
}