IrInterferenceSniffer

IrInterferenceSniffer - DEBUG "IR interference...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
' Robotics with the Boe-Bot  IrInterferenceSniffer.bs2  ' Test fluorescent lights, infrared remotes, and other sources  ' of 38.5 kHz IR interference.  ' {$STAMP BS2}                               ' Stamp directive.  ' {$PBASIC 2.5}                              ' PBASIC directive.  counter        VAR     Nib 
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: DEBUG "IR interference not detected, yet. ..", CR DO IF (IN0 = 0) OR (IN9 = 0) THEN DEBUG "IR Interference detected!!!", CR FOR counter = 1 TO 5 HIGH 1 HIGH 10 FREQOUT 4, 50, 4000 LOW 1 LOW 10 PAUSE 20 NEXT ENDIF LOOP...
View Full Document

Ask a homework question - tutors are online