bob3 code I''m using

Archiver

'bob-III video overwrite code:
bobInput con 4 '<--goes to data input pin on the bob
boboutput con 3 '<--goes to data out pin on the bob
bobbaud con 16624
'bobbaud con 24816
'bobbaud con 240 '<--bs2sx 9600 true
xcoord con 5
ycoord con 5
leevar var byte(20)
'leevar = 0

clrscrn:
debug "printing now",cr
serout bobinput, bobbaud, [noparse][[/noparse]"{T0",$1B, "{A17"]
'clears screen and returns cursor to start position

serout bobinput, bobbaud, [noparse][[/noparse]"{C0505","{U1","{D0"]
'sets cursor position

'serout bobinput, bobbaud, [noparse][[/noparse]"{S"]
'serout bobinput, bobbaud, [noparse][[/noparse]"{R"]
serout bobinput, bobbaud, [noparse][[/noparse]"U0"]

serin boboutput, bobbaud, [noparse][[/noparse]wait("?")]

debug "got response",cr
pause 1000
serout bobinput, bobbaud, [noparse][[/noparse]"hi1"]
pause 500
serout bobinput, bobbaud, [noparse][[/noparse]"hi2"]
'pause 500
goto clrscrn