ON *:TEXT:!Setpcw*:*:{ 
  set %Nick $nick | Set %World $2 | Set %Chan $3
  If (%Nick Isop %Chan) || (%Nick Ishop %Chan) {
    write Pcw.Txt %Chan %World %Nick
    Unset %Nick %World %Chan
  }
  else {
    notice %Nick You are not op on %Chan | Unset %Nick %World %Chan
  }
}

ON *:TEXT:!pcw*:#:{