I
WhentheIBM-PCBASICinterpretersendshex codeOD(carnagereturn)
it adds an extra hex OA(line feed). Hex code 1A (end-of-fde)also gets
specialtreatment:the interpreterdoes not send it at all. This can cause
problemsthatgenerategraphicsor downloadcharacterdata,butthereis a
solution.Try changingline 20 in the precedingprogram and addingthe
codingshownbelow.
Codingfor IBM-PCwithmonochromedisplay:
20 GOSUB 100
100 O=INP (&H379 ) : IF 0<128 THEN 100
110 OUT &H378, I :OUT &H37A, 5
:OUT&H37A, 4
120 RETURN
Codingfor IBM-PCwithcoloradapter:
20 GOSUB 100
-100 O=INP (&H3BD)
: IF 0<128 THEN 100
110 OUT &H3BC, I :OUT &H3BE, 5
:OUT&H3BE, 4
120 RETURN
25