70016 Parallax Inc, 70016 Datasheet - Page 182

• Manufacturer Part Number: 70016
• Description: TEXT INFRARED REMOTE FOR BOE-BOT
• Manufacturer: Parallax Inc

Specifications of 70016

• Accessory Type: Manual
• Product: Microcontroller Accessories
• Lead Free Status / RoHS Status: Contains lead / RoHS non-compliant
• For Use With/related Products: Boe-Bot®
• For Use With: 29122 - KIT PARTS IR REMOTE FOR BOE-BOT
• Lead Free Status / RoHS Status: Lead free / RoHS Compliant, Contains lead / RoHS non-compliant

BASIC Stamp 2 Series Example - Multi-Digit Application
You can use the remote for keypad entry of values by replacing the
IrRemoteButtonDisplay.bs2's main routine with the one shown below. It works for
values from 0 to 65535; just type in the value on the digital keypad, then press the
remote's ENTER key.
#ENDSELECT
' Map digit keys to actual values.
IF (remoteCode < 10) THEN remoteCode = remoteCode + 1
IF (remoteCode = 10) THEN remoteCode = 0
RETURN
#CASE BS2SX, BS2P
#CASE #ELSE
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge THEN remoteCode.BIT0 = 1
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge
RCTIME IrDet, 0, irPulse
IF irPulse > ThresholdEdge
DO
LOOP UNTIL irPulse > ThresholdStart
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT0 = 1
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT1 = 1
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT2 = 1
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT3 = 1
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT4 = 1
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT5 = 1
PULSIN IrDet, 0, irPulse
IF irPulse > ThresholdPulse THEN remoteCode.BIT6 = 1
#ERROR "BASIC Stamp version not supported by this program."
PULSIN IrDet, 0, irPulse
THEN remoteCode.BIT1 = 1
THEN remoteCode.BIT2 = 1
THEN remoteCode.BIT3 = 1
THEN remoteCode.BIT4 = 1
THEN remoteCode.BIT5 = 1
THEN remoteCode.BIT6 = 1
' Wait for start pulse.
' Get data pulses.
DO…LOOP
in