BASIC stamp manual v2.2

SEROUT – BASIC Stamp Command Reference
Page 430 • BASIC Stamp Syntax and Reference Manual 2.2 • www.parallax.com
' the sender waits for the receiver to catch up.
' {$STAMP BS2}
' {$PBASIC 2.5}
SI PIN 0 ' serial input
FC PIN 1 ' flow control pin
#SELECT $STAMP
#CASE BS2, BS2E, BS2PE
T1200 CON 813
T2400 CON 396
T9600 CON 84
T19K2 CON 32
T38K4 CON 6
#CASE BS2SX, BS2P
T1200 CON 2063
T2400 CON 1021
T9600 CON 240
T19K2 CON 110
T38K4 CON 45
#CASE BS2PX
T1200 CON 3313
T2400 CON 1646
T9600 CON 396
T19K2 CON 188
T38K4 CON 84
#ENDSELECT
Inverted CON $4000
Open CON $8000
Baud CON T38K4 + Inverted
letter VAR Byte
Main:
DO
SERIN SI\FC, Baud, [letter] ' recieve one byte
DEBUG letter ' display on screen
PAUSE 1000 ' wait one second
LOOP ' repeat forever
END