'{$STAMP BS2}
DIST  VAR Word
datain  CON   0

'START
    SERIN datain,188,[WAIT(%10101010),DIST]
    DEBUG DEC dist, CR
    PAUSE 2

'GOTO START