MostBASICS,however,arenotquitethatstraightfonvmd.Forexample,the
IBM-PCwillgiveyou aprintoutsimilartoFigtue 5-6.
(:1(:> (:)1. (:,;? (c’:! (:,4 ‘:!:, {:”6 1:,7
FigtwvS4LSamplehexadecimaldumpwithIBM-PC.
WhentheIBM-PCBASIC interpretersendshexcodeOD(carriagereturn)
itaddsanextrahexOA(linefeed).HexcodeIA(end-of-file)alsogetsspecial
matment:theinteqxeterdoesnotsendit atall.l’hiscancaus epmblemswith
gra@icsor dotioad characterdata.However,youcansolvethisproblem
bychangingline30 inthepnxxdingprogramand addingthecodingshown
below.
CodingforIBM-PCwith monochromedisplay:
30 G05UB 100
100 X=1 NP (& H3813) :IF X<128 THEN 100
110 OUT &H3BC , I :OUT &H3BE ,5 :OUT &H3BE ,4
120 RETURN
Cading forIBM-PCwith coloradapter
30 t30SUB 100
100 X=INP (& H379) :IF X<128 THEN 100
110 OUT &H378, I:OUT &H37A. 5:OUT &H37A ,4
120 RETURN