on *:TEXT:*!apc*:#: { 
  { if ($nick isop $chan) { 
      set %pcw. $+ $chan on 
      msg $chan [ Pcw is now ON for $chan ] 
    } 
  } 
} 

on *:TEXT:*!dpc*:#: { 
  { if ($nick isop $chan) { 
      set %pcw. $+ $chan off 
      msg $chan [ Pcw is now OFF for $chan ] 
    } 
  } 
} 

off *:TEXT:!setw *:#:{
  { if (%pcw. [ $+ [ $chan ] ] == on) {
      set %pcw. $2-  } else {
      { if (%pcw. [ $+ [ $chan ] ] == off) HALT } 
    } 
  } 
} 



on *:text:!pcw#: { 
  { if (%pcw. [ $+ [ $chan ] ] == on) { 
      notice $nick %pcw. } else { 
      { if (%pcw. [ $+ [ $chan ] ] == off) HALT } 
    } 
  } 
}