Simple Code to Run An IR Detector


'This is example code only. You should know how to program a Stamp 'before you attempt all this. ' TempLeft var byte TempRight var byte x var byte dirs=%11111110 ' set the first pin to input from IR rx, rest to output ' start: ' put your normal robot code here ' gosub irdetect ' ' check variables here for avoidance, homing, etc ' goto start irdetect: TempRight=0 TempLeft=0 for x=1 to 10 high 1 pause 1 TempRight=TempRight + in0 low 1 high 2 pause 1 TempLeft=TempLeft + in0 low 2 next ' ' remove debug statements on final code ' debug TempRight,cr debug TempLeft,cr pause 500 ' pause so you can see results return