Star Micronics LC24-200 user manual 1180‘ Printoutprogram

The remainingfivebytes(ti throughm9) indicatethecompressionmask bits.Eachbitsshowsthedatathatwilltranslatethecompresseddotpattern data back to the originalcharacterpattern.

For example, the compressionmask bits of our telephone symbol are 0110000000000100111100100000000001100000Sothesebytesare96,. 4,242,0, and 96.

YoumustdefinetheindextabledataforallcharactersfromO to255. If you donotwantto definea particularcharacter,enterOintothatindextabledata.

Sample program

To demonstratehow todefineandtousethedownloadcharactersinIBM mode,let’susethe“telephone”characterandtheotheruser-definedcharac- ters to print a smallgraph.This programwill dojust that:

1000LPRINT WIDTH“LPT1: “ ,255

1010LPRINT CHR$(27) ; “=” ;CHR$( 164) ;CHR$(9) : “~” :

1020LPRINT CHR$(&HOF);CHR(&H80);cHR$ $(o); 1030‘ INDEXTABLE 1040LPRINTCHR$(1):

1050FOR1=0TO 59 1060LPRINTSTRING(9,O);$ 1070NEXTI

1080FORIT=lTO 9 :READMM :LPRINTCHR$(MM): :NEXTIT

1090FORIT=lTO 9 :READMM :LPRINTCHR$(MM): :NEXTIT 1100FOR1=62TO 255

1110LPRINTSTRING(9,O):$ 1120NEXTI

1130‘ DOTPATTERN 1140FORDP=lTO 159 1150READMM 1160LPRINTCHR$(MM); 1170NEXTDP

1180‘ PRINTOUTPROGRAM

1190LPRINTCHR$(27):“D”;CHR$(l1) ;CHR$(0) 1200LPRINTCHR$(27);“k”;CHR(4);$ 1210LPRINTCHR$(27):“h”;CHR(l):$ 1220LPRINT“ DIFFUSIONRANGESOF” 1230LPRINT“ CARS& TELEPHONES 1240LPRINTCHR$(27);“h” ;CHR(0);$ 1250LPRINTCHR$(27);“k” ;CHR(0)$ 1260LPRINT“USA’’;CHR$(9); 1270LPRINTCHR$(27);’’I’’;CHR$(6);

1280FOR 1=0TO 681STEP25 :LPRINTCHR$(60);:NEXTI 1290LPRINT

1300LPRINTCHR$(9);

1310FOR 1=0TO 781STEP25 :LPRINTCHR$(61);:NEXTI 1320LPRINTCHR$(27) ;’’I’’:CHR$(2)

1330LPRINT “GERMANY’’;CHR$(9);

1340LPRINT CHR$(27) ;’’I’’;CHR$(6);

1350FOR 1=0 TO 412 STEP 25 :LPRINT CHR$(60); :NEXT I

1360LPRINT

1370LPRINT CHR$(9);

1380FOR 1=0 TO 488 STEP 25 :LPRINT CHR$(61): :NEXTI 1390LPRINTCHR$(27);’’I’’;CHR$(2)

94