Home » Archimedes archive » Zipped Apps » 1st Word Plus » WP/hex/LX800_IBM
WP/hex/LX800_IBM
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Archimedes archive » Zipped Apps » 1st Word Plus |
Filename: | WP/hex/LX800_IBM |
Read OK: | ✔ |
File size: | 14A8 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
* EPSON LX800 PRINTER CONFIGURATION * ================================= * (IBM CODE SET) * This 1st Word Plus file defines an LX-800 printing IBM code * set excepting A0-A9 and FF, which are used for special * characters. * To use the IBM code set with another printer, replace the * "Translation Table" section in that printer's driver with * the one given here, and insert the appropriate codes to * make the printer use IBM as its normal character table in * the driver's "Horizontal Initialisation". * See also the comments in the "Printer characteristics" and * "Translation Table" sections. * Printer name * ============ Epson LX-800 (IBM Font) * Configuration variables * ======================= 0, 0, C, 48, 0, 0 * Printer characteristics * ======================= * On lines 20 and 21, change "46" to "40" if you are using * 11 inch paper rather than true A4. * 0 * Character width 1, D, A * Carriage return and line feed * 2 * Forward print * 3 * Reverse print 4, 1B, 42, 80, 0, B * Vertical tab to line * 5 * Absolute horizontal tab 6, 1B, 47 * Draft bold on 7, 1B, 48 * Draft bold off 8, 1B, 45 * NLQ bold on 9, 1B, 46 * NLQ bold off A, 1B, 34 * Draft italic on B, 1B, 35 * Draft italic off C, 1B, 34 * NLQ italic on D, 1B, 35 * NLQ italic off * E * Draft light on * F * Draft light off 10, 1B, 6B, 1 * NLQ light on 11, 1B, 6B, 0 * NLQ light off 12, 1B, 53, 0 * Draft superscript on 13, 1B, 54 * Draft superscript off 14, 1B, 53, 0 * NLQ superscript on 15, 1B, 54 * NLQ superscript off 16, 1B, 53, 1 * Draft subscript on 17, 1B, 54 * Draft subscript off 18, 1B, 53, 1 * NLQ subscript on 19, 1B, 54 * NLQ subscript off 1A, 1B, 2D, 1 * Draft underline on 1B, 1B, 2D, 0 * Draft underline off 1C, 1B, 2D, 1 * NLQ underline on 1D, 1B, 2D, 0 * NLQ underline off 1E, C * Formfeed 1F, 1B, 40, 1B, 74, 1 * Horizontal initialization 20, 1B, 43, 46, 1B, 4F, 7 * Vertical initialization 21, 1B, 40, 1B, 43, 46, 1B, 4F *Termination: printer reset 22, 8 * Backspace 23, D * Carriage return 24, 1B, 43, 80, 1B, 4F * Form length in lines 25, 1B, 41, 80 * Set line feed to N units 26, 1B, 2A, 5 * Start graphics (mode 5) * 27 * Reserved 28, 1B, 78, 0, 1B, 21, 0 * Draft Pica (10 cpi) 29, 1B, 78, 1, 1B, 21, 0 * NLQ Pica (10 cpi) 2A, 1B, 78, 0, 1B, 21, 1 * Draft Elite (12 cpi) 2B, 1B, 78, 1, 1B, 21, 1 * NLQ Elite (12 cpi) 2C, 1B, 78, 0, 1B, 21, 4 * Draft Condensed (17 cpi) 2D, 1B, 78, 0, 1B, 21, 4 * NLQ Condensed (17 cpi) 2E, 1B, 78, 0, 1B, 21, 20 * Draft Expanded ( 5 cpi) 2F, 1B, 78, 1, 1B, 21, 20 * NLQ Expanded ( 5 cpi) * 30 * Black ink * 31 * Magenta ink * 32 * Cyan ink * 33 * Yellow ink 0 * NULL termination byte * Translation Table * ================= * In order that the correct font is displayed by the Arc, the * 1st Word Plus boot file must include the following statement * before loading 1wp: * *print IBM_Font * The IBM_Font file should be placed in your library. * Note that � (A1) can be used to switch uni-directional * printing on. * This is recommended prior to using the "box" characters to * make sure that they line up. * The code is printed as a space but is displayed as � so * that you can see it on the monitor. * Similarly, � (FF) can be used to switch bi-directional * printing on again. A0, 20 * non break space A1, 1B, 73, 1, 1B, 55, 1, 20 * � Turn uni-directional on A2 9B * � A3, 9C * � A4, 1B,74,0,1B,6D,4,96,1B,74,1 * � Telephone A5, 91 * � A6, 92 * � A7, 1B, 52, 2, 40, 1B, 74, 1 * � *A8 � *A9 � *AA � *AB � *AC � *AD � *AE � *AF � *B0 � *B1 � *B2 � *B3 � *B4 � *B5 � *B6 � *B7 � *B8 � *B9 � *BA � *BB � *BC � *BD � *BE � *BF � *C0 � *C1 � *C2 � *C3 � *C4 � *C5 � *C6 � *C7 � *C8 � *C9 � *CA � *CB � *CC � *CD � *CE � *CF � *D0 � *D1 � *D2 � *D3 � *D4 � *D5 � *D6 � *D7 � *D8 � *D9 � *DA � *DB � *DC � *DD � *DE � *DF � *E0 � *E1 � *E2 � *E3 � *E4 � *E5 � *E6 � *E7 � *E8 � *E9 � *EA � *EB � *EC � *ED � *EE � *EF � *F0 � *F1 � *F2 � *F3 � *F4 � *F5 � *F6 � *F7 � *F8 � *F9 � *FA � *FB � *FC � *FD � *FE � FF, 20, 1B, 55, 0, 1B, 73, 0 * � Turn uni-directional off 0 * NULL terminator
00000000 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.* | 00000010 20 20 20 20 45 50 53 4f 4e 20 4c 58 38 30 30 20 | EPSON LX800 | 00000020 50 52 49 4e 54 45 52 20 43 4f 4e 46 49 47 55 52 |PRINTER CONFIGUR| 00000030 41 54 49 4f 4e 0a 2a 20 20 20 20 20 20 20 20 20 |ATION.* | 00000040 20 20 20 20 20 20 20 20 20 3d 3d 3d 3d 3d 3d 3d | =======| 00000050 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d |================| 00000060 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 2a 20 20 20 |==========..* | 00000070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000080 20 20 20 20 20 20 20 20 28 49 42 4d 20 43 4f 44 | (IBM COD| 00000090 45 20 53 45 54 29 0a 0a 2a 20 20 20 20 54 68 69 |E SET)..* Thi| 000000a0 73 20 31 73 74 20 57 6f 72 64 20 50 6c 75 73 20 |s 1st Word Plus | 000000b0 66 69 6c 65 20 64 65 66 69 6e 65 73 20 61 6e 20 |file defines an | 000000c0 4c 58 2d 38 30 30 20 70 72 69 6e 74 69 6e 67 20 |LX-800 printing | 000000d0 49 42 4d 20 63 6f 64 65 0a 2a 20 20 20 20 73 65 |IBM code.* se| 000000e0 74 20 65 78 63 65 70 74 69 6e 67 20 41 30 2d 41 |t excepting A0-A| 000000f0 39 20 61 6e 64 20 46 46 2c 20 77 68 69 63 68 20 |9 and FF, which | 00000100 61 72 65 20 75 73 65 64 20 66 6f 72 20 73 70 65 |are used for spe| 00000110 63 69 61 6c 0a 2a 20 20 20 20 63 68 61 72 61 63 |cial.* charac| 00000120 74 65 72 73 2e 0a 0a 2a 20 20 20 20 54 6f 20 75 |ters...* To u| 00000130 73 65 20 74 68 65 20 49 42 4d 20 63 6f 64 65 20 |se the IBM code | 00000140 73 65 74 20 77 69 74 68 20 61 6e 6f 74 68 65 72 |set with another| 00000150 20 70 72 69 6e 74 65 72 2c 20 72 65 70 6c 61 63 | printer, replac| 00000160 65 20 74 68 65 0a 2a 20 20 20 20 22 54 72 61 6e |e the.* "Tran| 00000170 73 6c 61 74 69 6f 6e 20 54 61 62 6c 65 22 20 73 |slation Table" s| 00000180 65 63 74 69 6f 6e 20 69 6e 20 74 68 61 74 20 70 |ection in that p| 00000190 72 69 6e 74 65 72 27 73 20 64 72 69 76 65 72 20 |rinter's driver | 000001a0 77 69 74 68 0a 2a 20 20 20 20 74 68 65 20 6f 6e |with.* the on| 000001b0 65 20 67 69 76 65 6e 20 68 65 72 65 2c 20 61 6e |e given here, an| 000001c0 64 20 69 6e 73 65 72 74 20 74 68 65 20 61 70 70 |d insert the app| 000001d0 72 6f 70 72 69 61 74 65 20 63 6f 64 65 73 20 74 |ropriate codes t| 000001e0 6f 0a 2a 20 20 20 20 6d 61 6b 65 20 74 68 65 20 |o.* make the | 000001f0 70 72 69 6e 74 65 72 20 75 73 65 20 49 42 4d 20 |printer use IBM | 00000200 61 73 20 69 74 73 20 6e 6f 72 6d 61 6c 20 63 68 |as its normal ch| 00000210 61 72 61 63 74 65 72 20 74 61 62 6c 65 20 69 6e |aracter table in| 00000220 0a 2a 20 20 20 20 74 68 65 20 64 72 69 76 65 72 |.* the driver| 00000230 27 73 20 22 48 6f 72 69 7a 6f 6e 74 61 6c 20 49 |'s "Horizontal I| 00000240 6e 69 74 69 61 6c 69 73 61 74 69 6f 6e 22 2e 0a |nitialisation"..| 00000250 0a 2a 20 20 20 20 53 65 65 20 61 6c 73 6f 20 74 |.* See also t| 00000260 68 65 20 63 6f 6d 6d 65 6e 74 73 20 69 6e 20 74 |he comments in t| 00000270 68 65 20 22 50 72 69 6e 74 65 72 20 63 68 61 72 |he "Printer char| 00000280 61 63 74 65 72 69 73 74 69 63 73 22 20 61 6e 64 |acteristics" and| 00000290 0a 2a 20 20 20 20 22 54 72 61 6e 73 6c 61 74 69 |.* "Translati| 000002a0 6f 6e 20 54 61 62 6c 65 22 20 73 65 63 74 69 6f |on Table" sectio| 000002b0 6e 73 2e 0a 0a 0a 2a 20 20 20 20 50 72 69 6e 74 |ns....* Print| 000002c0 65 72 20 6e 61 6d 65 0a 2a 20 20 20 20 3d 3d 3d |er name.* ===| 000002d0 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 45 70 73 6f 6e |=========..Epson| 000002e0 20 4c 58 2d 38 30 30 20 28 49 42 4d 20 46 6f 6e | LX-800 (IBM Fon| 000002f0 74 29 0a 0a 0a 2a 20 20 20 20 43 6f 6e 66 69 67 |t)...* Config| 00000300 75 72 61 74 69 6f 6e 20 76 61 72 69 61 62 6c 65 |uration variable| 00000310 73 0a 2a 20 20 20 20 3d 3d 3d 3d 3d 3d 3d 3d 3d |s.* =========| 00000320 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a |==============..| 00000330 30 2c 20 30 2c 20 43 2c 20 34 38 2c 20 30 2c 20 |0, 0, C, 48, 0, | 00000340 30 0a 0a 0a 2a 20 20 20 20 50 72 69 6e 74 65 72 |0...* Printer| 00000350 20 63 68 61 72 61 63 74 65 72 69 73 74 69 63 73 | characteristics| 00000360 0a 2a 20 20 20 20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d |.* ==========| 00000370 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a 2a |=============..*| 00000380 20 20 20 20 4f 6e 20 6c 69 6e 65 73 20 32 30 20 | On lines 20 | 00000390 61 6e 64 20 32 31 2c 20 63 68 61 6e 67 65 20 22 |and 21, change "| 000003a0 34 36 22 20 74 6f 20 22 34 30 22 20 69 66 20 79 |46" to "40" if y| 000003b0 6f 75 20 61 72 65 20 75 73 69 6e 67 0a 2a 20 20 |ou are using.* | 000003c0 20 20 31 31 20 69 6e 63 68 20 70 61 70 65 72 20 | 11 inch paper | 000003d0 72 61 74 68 65 72 20 74 68 61 6e 20 74 72 75 65 |rather than true| 000003e0 20 41 34 2e 0a 0a 2a 20 30 20 20 20 20 20 20 20 | A4...* 0 | 000003f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000400 20 20 20 20 2a 20 43 68 61 72 61 63 74 65 72 20 | * Character | 00000410 77 69 64 74 68 0a 31 2c 20 20 20 44 2c 20 20 41 |width.1, D, A| 00000420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000430 20 20 20 20 2a 20 43 61 72 72 69 61 67 65 20 72 | * Carriage r| 00000440 65 74 75 72 6e 20 61 6e 64 20 6c 69 6e 65 20 66 |eturn and line f| 00000450 65 65 64 0a 2a 20 32 20 20 20 20 20 20 20 20 20 |eed.* 2 | 00000460 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000470 20 20 2a 20 46 6f 72 77 61 72 64 20 70 72 69 6e | * Forward prin| 00000480 74 0a 2a 20 33 20 20 20 20 20 20 20 20 20 20 20 |t.* 3 | 00000490 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000004a0 2a 20 52 65 76 65 72 73 65 20 70 72 69 6e 74 0a |* Reverse print.| 000004b0 34 2c 20 20 31 42 2c 20 34 32 2c 20 38 30 2c 20 |4, 1B, 42, 80, | 000004c0 20 30 2c 20 20 42 20 20 20 20 20 20 20 20 2a 20 | 0, B * | 000004d0 56 65 72 74 69 63 61 6c 20 74 61 62 20 74 6f 20 |Vertical tab to | 000004e0 6c 69 6e 65 0a 2a 20 35 20 20 20 20 20 20 20 20 |line.* 5 | 000004f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000500 20 20 20 2a 20 41 62 73 6f 6c 75 74 65 20 68 6f | * Absolute ho| 00000510 72 69 7a 6f 6e 74 61 6c 20 74 61 62 0a 36 2c 20 |rizontal tab.6, | 00000520 20 31 42 2c 20 34 37 20 20 20 20 20 20 20 20 20 | 1B, 47 | 00000530 20 20 20 20 20 20 20 20 20 20 20 2a 20 44 72 61 | * Dra| 00000540 66 74 20 62 6f 6c 64 20 6f 6e 0a 37 2c 20 20 31 |ft bold on.7, 1| 00000550 42 2c 20 34 38 20 20 20 20 20 20 20 20 20 20 20 |B, 48 | 00000560 20 20 20 20 20 20 20 20 20 2a 20 44 72 61 66 74 | * Draft| 00000570 20 62 6f 6c 64 20 6f 66 66 0a 38 2c 20 20 31 42 | bold off.8, 1B| 00000580 2c 20 34 35 20 20 20 20 20 20 20 20 20 20 20 20 |, 45 | 00000590 20 20 20 20 20 20 20 20 2a 20 4e 4c 51 20 62 6f | * NLQ bo| 000005a0 6c 64 20 6f 6e 0a 39 2c 20 20 31 42 2c 20 34 36 |ld on.9, 1B, 46| 000005b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000005c0 20 20 20 20 2a 20 4e 4c 51 20 62 6f 6c 64 20 6f | * NLQ bold o| 000005d0 66 66 0a 41 2c 20 20 31 42 2c 20 33 34 20 20 20 |ff.A, 1B, 34 | 000005e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000005f0 20 2a 20 44 72 61 66 74 20 69 74 61 6c 69 63 20 | * Draft italic | 00000600 6f 6e 0a 42 2c 20 20 31 42 2c 20 33 35 20 20 20 |on.B, 1B, 35 | 00000610 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000620 20 2a 20 44 72 61 66 74 20 69 74 61 6c 69 63 20 | * Draft italic | 00000630 6f 66 66 0a 43 2c 20 20 31 42 2c 20 33 34 20 20 |off.C, 1B, 34 | 00000640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000650 20 20 2a 20 4e 4c 51 20 69 74 61 6c 69 63 20 6f | * NLQ italic o| 00000660 6e 0a 44 2c 20 20 31 42 2c 20 33 35 20 20 20 20 |n.D, 1B, 35 | 00000670 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000680 2a 20 4e 4c 51 20 69 74 61 6c 69 63 20 6f 66 66 |* NLQ italic off| 00000690 0a 2a 20 45 20 20 20 20 20 20 20 20 20 20 20 20 |.* E | 000006a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a | *| 000006b0 20 44 72 61 66 74 20 6c 69 67 68 74 20 6f 6e 0a | Draft light on.| 000006c0 2a 20 46 20 20 20 20 20 20 20 20 20 20 20 20 20 |* F | 000006d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 | * | 000006e0 44 72 61 66 74 20 6c 69 67 68 74 20 6f 66 66 0a |Draft light off.| 000006f0 31 30 2c 20 31 42 2c 20 36 42 2c 20 20 31 20 20 |10, 1B, 6B, 1 | 00000700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 | * | 00000710 4e 4c 51 20 6c 69 67 68 74 20 6f 6e 0a 31 31 2c |NLQ light on.11,| 00000720 20 31 42 2c 20 36 42 2c 20 20 30 20 20 20 20 20 | 1B, 6B, 0 | 00000730 20 20 20 20 20 20 20 20 20 20 20 2a 20 4e 4c 51 | * NLQ| 00000740 20 6c 69 67 68 74 20 6f 66 66 0a 31 32 2c 20 31 | light off.12, 1| 00000750 42 2c 20 35 33 2c 20 20 30 20 20 20 20 20 20 20 |B, 53, 0 | 00000760 20 20 20 20 20 20 20 20 20 2a 20 44 72 61 66 74 | * Draft| 00000770 20 73 75 70 65 72 73 63 72 69 70 74 20 6f 6e 0a | superscript on.| 00000780 31 33 2c 20 31 42 2c 20 35 34 20 20 20 20 20 20 |13, 1B, 54 | 00000790 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 | * | 000007a0 44 72 61 66 74 20 73 75 70 65 72 73 63 72 69 70 |Draft superscrip| 000007b0 74 20 6f 66 66 0a 31 34 2c 20 31 42 2c 20 35 33 |t off.14, 1B, 53| 000007c0 2c 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 |, 0 | 000007d0 20 20 20 20 2a 20 4e 4c 51 20 73 75 70 65 72 73 | * NLQ supers| 000007e0 63 72 69 70 74 20 6f 6e 0a 31 35 2c 20 31 42 2c |cript on.15, 1B,| 000007f0 20 35 34 20 20 20 20 20 20 20 20 20 20 20 20 20 | 54 | 00000800 20 20 20 20 20 20 20 2a 20 4e 4c 51 20 73 75 70 | * NLQ sup| 00000810 65 72 73 63 72 69 70 74 20 6f 66 66 0a 31 36 2c |erscript off.16,| 00000820 20 31 42 2c 20 35 33 2c 20 20 31 20 20 20 20 20 | 1B, 53, 1 | 00000830 20 20 20 20 20 20 20 20 20 20 20 2a 20 44 72 61 | * Dra| 00000840 66 74 20 73 75 62 73 63 72 69 70 74 20 6f 6e 0a |ft subscript on.| 00000850 31 37 2c 20 31 42 2c 20 35 34 20 20 20 20 20 20 |17, 1B, 54 | 00000860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 | * | 00000870 44 72 61 66 74 20 73 75 62 73 63 72 69 70 74 20 |Draft subscript | 00000880 6f 66 66 0a 31 38 2c 20 31 42 2c 20 35 33 2c 20 |off.18, 1B, 53, | 00000890 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 1 | 000008a0 20 20 2a 20 4e 4c 51 20 73 75 62 73 63 72 69 70 | * NLQ subscrip| 000008b0 74 20 6f 6e 0a 31 39 2c 20 31 42 2c 20 35 34 20 |t on.19, 1B, 54 | 000008c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000008d0 20 20 20 2a 20 4e 4c 51 20 73 75 62 73 63 72 69 | * NLQ subscri| 000008e0 70 74 20 6f 66 66 0a 31 41 2c 20 31 42 2c 20 32 |pt off.1A, 1B, 2| 000008f0 44 2c 20 20 31 20 20 20 20 20 20 20 20 20 20 20 |D, 1 | 00000900 20 20 20 20 20 2a 20 44 72 61 66 74 20 75 6e 64 | * Draft und| 00000910 65 72 6c 69 6e 65 20 6f 6e 0a 31 42 2c 20 31 42 |erline on.1B, 1B| 00000920 2c 20 32 44 2c 20 20 30 20 20 20 20 20 20 20 20 |, 2D, 0 | 00000930 20 20 20 20 20 20 20 20 2a 20 44 72 61 66 74 20 | * Draft | 00000940 75 6e 64 65 72 6c 69 6e 65 20 6f 66 66 0a 31 43 |underline off.1C| 00000950 2c 20 31 42 2c 20 32 44 2c 20 20 31 20 20 20 20 |, 1B, 2D, 1 | 00000960 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 4e 4c | * NL| 00000970 51 20 75 6e 64 65 72 6c 69 6e 65 20 6f 6e 0a 31 |Q underline on.1| 00000980 44 2c 20 31 42 2c 20 32 44 2c 20 20 30 20 20 20 |D, 1B, 2D, 0 | 00000990 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 4e | * N| 000009a0 4c 51 20 75 6e 64 65 72 6c 69 6e 65 20 6f 66 66 |LQ underline off| 000009b0 0a 31 45 2c 20 20 43 20 20 20 20 20 20 20 20 20 |.1E, C | 000009c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a | *| 000009d0 20 46 6f 72 6d 66 65 65 64 0a 31 46 2c 20 31 42 | Formfeed.1F, 1B| 000009e0 2c 20 34 30 2c 20 31 42 2c 20 37 34 2c 20 20 31 |, 40, 1B, 74, 1| 000009f0 20 20 20 20 20 20 20 20 2a 20 48 6f 72 69 7a 6f | * Horizo| 00000a00 6e 74 61 6c 20 69 6e 69 74 69 61 6c 69 7a 61 74 |ntal initializat| 00000a10 69 6f 6e 0a 32 30 2c 20 31 42 2c 20 34 33 2c 20 |ion.20, 1B, 43, | 00000a20 34 36 2c 20 31 42 2c 20 34 46 2c 20 37 20 20 20 |46, 1B, 4F, 7 | 00000a30 20 20 2a 20 56 65 72 74 69 63 61 6c 20 69 6e 69 | * Vertical ini| 00000a40 74 69 61 6c 69 7a 61 74 69 6f 6e 0a 32 31 2c 20 |tialization.21, | 00000a50 31 42 2c 20 34 30 2c 20 31 42 2c 20 34 33 2c 20 |1B, 40, 1B, 43, | 00000a60 34 36 2c 20 31 42 2c 20 34 46 20 2a 54 65 72 6d |46, 1B, 4F *Term| 00000a70 69 6e 61 74 69 6f 6e 3a 20 70 72 69 6e 74 65 72 |ination: printer| 00000a80 20 72 65 73 65 74 0a 32 32 2c 20 20 38 20 20 20 | reset.22, 8 | 00000a90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000aa0 20 20 20 20 20 2a 20 42 61 63 6b 73 70 61 63 65 | * Backspace| 00000ab0 0a 32 33 2c 20 20 44 20 20 20 20 20 20 20 20 20 |.23, D | 00000ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a | *| 00000ad0 20 43 61 72 72 69 61 67 65 20 72 65 74 75 72 6e | Carriage return| 00000ae0 0a 32 34 2c 20 31 42 2c 20 34 33 2c 20 38 30 2c |.24, 1B, 43, 80,| 00000af0 20 31 42 2c 20 34 46 20 20 20 20 20 20 20 20 2a | 1B, 4F *| 00000b00 20 46 6f 72 6d 20 6c 65 6e 67 74 68 20 69 6e 20 | Form length in | 00000b10 6c 69 6e 65 73 0a 32 35 2c 20 31 42 2c 20 34 31 |lines.25, 1B, 41| 00000b20 2c 20 38 30 20 20 20 20 20 20 20 20 20 20 20 20 |, 80 | 00000b30 20 20 20 20 2a 20 53 65 74 20 6c 69 6e 65 20 66 | * Set line f| 00000b40 65 65 64 20 74 6f 20 4e 20 75 6e 69 74 73 0a 32 |eed to N units.2| 00000b50 36 2c 20 31 42 2c 20 32 41 2c 20 20 35 20 20 20 |6, 1B, 2A, 5 | 00000b60 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 53 | * S| 00000b70 74 61 72 74 20 67 72 61 70 68 69 63 73 20 28 6d |tart graphics (m| 00000b80 6f 64 65 20 35 29 0a 2a 20 32 37 20 20 20 20 20 |ode 5).* 27 | 00000b90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000ba0 20 20 20 20 20 2a 20 52 65 73 65 72 76 65 64 0a | * Reserved.| 00000bb0 32 38 2c 20 31 42 2c 20 37 38 2c 20 20 30 2c 20 |28, 1B, 78, 0, | 00000bc0 31 42 2c 20 32 31 2c 20 20 30 20 20 20 20 2a 20 |1B, 21, 0 * | 00000bd0 44 72 61 66 74 20 50 69 63 61 20 20 20 20 20 20 |Draft Pica | 00000be0 28 31 30 20 63 70 69 29 0a 32 39 2c 20 31 42 2c |(10 cpi).29, 1B,| 00000bf0 20 37 38 2c 20 20 31 2c 20 31 42 2c 20 32 31 2c | 78, 1, 1B, 21,| 00000c00 20 20 30 20 20 20 20 2a 20 4e 4c 51 20 20 20 50 | 0 * NLQ P| 00000c10 69 63 61 20 20 20 20 20 20 28 31 30 20 63 70 69 |ica (10 cpi| 00000c20 29 0a 32 41 2c 20 31 42 2c 20 37 38 2c 20 20 30 |).2A, 1B, 78, 0| 00000c30 2c 20 31 42 2c 20 32 31 2c 20 20 31 20 20 20 20 |, 1B, 21, 1 | 00000c40 2a 20 44 72 61 66 74 20 45 6c 69 74 65 20 20 20 |* Draft Elite | 00000c50 20 20 28 31 32 20 63 70 69 29 0a 32 42 2c 20 31 | (12 cpi).2B, 1| 00000c60 42 2c 20 37 38 2c 20 20 31 2c 20 31 42 2c 20 32 |B, 78, 1, 1B, 2| 00000c70 31 2c 20 20 31 20 20 20 20 2a 20 4e 4c 51 20 20 |1, 1 * NLQ | 00000c80 20 45 6c 69 74 65 20 20 20 20 20 28 31 32 20 63 | Elite (12 c| 00000c90 70 69 29 0a 32 43 2c 20 31 42 2c 20 37 38 2c 20 |pi).2C, 1B, 78, | 00000ca0 20 30 2c 20 31 42 2c 20 32 31 2c 20 20 34 20 20 | 0, 1B, 21, 4 | 00000cb0 20 20 2a 20 44 72 61 66 74 20 43 6f 6e 64 65 6e | * Draft Conden| 00000cc0 73 65 64 20 28 31 37 20 63 70 69 29 0a 32 44 2c |sed (17 cpi).2D,| 00000cd0 20 31 42 2c 20 37 38 2c 20 20 30 2c 20 31 42 2c | 1B, 78, 0, 1B,| 00000ce0 20 32 31 2c 20 20 34 20 20 20 20 2a 20 4e 4c 51 | 21, 4 * NLQ| 00000cf0 20 20 20 43 6f 6e 64 65 6e 73 65 64 20 28 31 37 | Condensed (17| 00000d00 20 63 70 69 29 0a 32 45 2c 20 31 42 2c 20 37 38 | cpi).2E, 1B, 78| 00000d10 2c 20 20 30 2c 20 31 42 2c 20 32 31 2c 20 32 30 |, 0, 1B, 21, 20| 00000d20 20 20 20 20 2a 20 44 72 61 66 74 20 45 78 70 61 | * Draft Expa| 00000d30 6e 64 65 64 20 20 28 20 35 20 63 70 69 29 0a 32 |nded ( 5 cpi).2| 00000d40 46 2c 20 31 42 2c 20 37 38 2c 20 20 31 2c 20 31 |F, 1B, 78, 1, 1| 00000d50 42 2c 20 32 31 2c 20 32 30 20 20 20 20 2a 20 4e |B, 21, 20 * N| 00000d60 4c 51 20 20 20 45 78 70 61 6e 64 65 64 20 20 28 |LQ Expanded (| 00000d70 20 35 20 63 70 69 29 0a 2a 20 33 30 20 20 20 20 | 5 cpi).* 30 | 00000d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000d90 20 20 20 20 20 20 2a 20 42 6c 61 63 6b 20 20 20 | * Black | 00000da0 69 6e 6b 0a 2a 20 33 31 20 20 20 20 20 20 20 20 |ink.* 31 | 00000db0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000dc0 20 20 2a 20 4d 61 67 65 6e 74 61 20 69 6e 6b 0a | * Magenta ink.| 00000dd0 2a 20 33 32 20 20 20 20 20 20 20 20 20 20 20 20 |* 32 | 00000de0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 | * | 00000df0 43 79 61 6e 20 20 20 20 69 6e 6b 0a 2a 20 33 33 |Cyan ink.* 33| 00000e00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000e10 20 20 20 20 20 20 20 20 20 20 2a 20 59 65 6c 6c | * Yell| 00000e20 6f 77 20 20 69 6e 6b 0a 0a 30 20 20 20 20 20 20 |ow ink..0 | 00000e30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000e40 20 20 20 20 20 20 20 2a 20 4e 55 4c 4c 20 74 65 | * NULL te| 00000e50 72 6d 69 6e 61 74 69 6f 6e 20 62 79 74 65 0a 0a |rmination byte..| 00000e60 0a 2a 20 20 20 20 54 72 61 6e 73 6c 61 74 69 6f |.* Translatio| 00000e70 6e 20 54 61 62 6c 65 0a 2a 20 20 20 20 3d 3d 3d |n Table.* ===| 00000e80 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 0a 0a |==============..| 00000e90 2a 20 20 20 20 49 6e 20 6f 72 64 65 72 20 74 68 |* In order th| 00000ea0 61 74 20 74 68 65 20 63 6f 72 72 65 63 74 20 66 |at the correct f| 00000eb0 6f 6e 74 20 69 73 20 64 69 73 70 6c 61 79 65 64 |ont is displayed| 00000ec0 20 62 79 20 74 68 65 20 41 72 63 2c 20 74 68 65 | by the Arc, the| 00000ed0 0a 2a 20 20 20 20 31 73 74 20 57 6f 72 64 20 50 |.* 1st Word P| 00000ee0 6c 75 73 20 62 6f 6f 74 20 66 69 6c 65 20 6d 75 |lus boot file mu| 00000ef0 73 74 20 69 6e 63 6c 75 64 65 20 74 68 65 20 66 |st include the f| 00000f00 6f 6c 6c 6f 77 69 6e 67 20 73 74 61 74 65 6d 65 |ollowing stateme| 00000f10 6e 74 0a 2a 20 20 20 20 62 65 66 6f 72 65 20 6c |nt.* before l| 00000f20 6f 61 64 69 6e 67 20 31 77 70 3a 0a 0a 2a 20 20 |oading 1wp:..* | 00000f30 20 20 2a 70 72 69 6e 74 20 49 42 4d 5f 46 6f 6e | *print IBM_Fon| 00000f40 74 0a 0a 2a 20 20 20 20 54 68 65 20 49 42 4d 5f |t..* The IBM_| 00000f50 46 6f 6e 74 20 66 69 6c 65 20 73 68 6f 75 6c 64 |Font file should| 00000f60 20 62 65 20 70 6c 61 63 65 64 20 69 6e 20 79 6f | be placed in yo| 00000f70 75 72 20 6c 69 62 72 61 72 79 2e 0a 0a 2a 20 20 |ur library...* | 00000f80 20 20 4e 6f 74 65 20 74 68 61 74 20 a1 20 28 41 | Note that . (A| 00000f90 31 29 20 63 61 6e 20 62 65 20 75 73 65 64 20 74 |1) can be used t| 00000fa0 6f 20 73 77 69 74 63 68 20 75 6e 69 2d 64 69 72 |o switch uni-dir| 00000fb0 65 63 74 69 6f 6e 61 6c 0a 2a 20 20 20 20 70 72 |ectional.* pr| 00000fc0 69 6e 74 69 6e 67 20 6f 6e 2e 0a 2a 20 20 20 20 |inting on..* | 00000fd0 54 68 69 73 20 69 73 20 72 65 63 6f 6d 6d 65 6e |This is recommen| 00000fe0 64 65 64 20 70 72 69 6f 72 20 74 6f 20 75 73 69 |ded prior to usi| 00000ff0 6e 67 20 74 68 65 20 22 62 6f 78 22 20 63 68 61 |ng the "box" cha| 00001000 72 61 63 74 65 72 73 20 74 6f 0a 2a 20 20 20 20 |racters to.* | 00001010 6d 61 6b 65 20 73 75 72 65 20 74 68 61 74 20 74 |make sure that t| 00001020 68 65 79 20 6c 69 6e 65 20 75 70 2e 0a 2a 20 20 |hey line up..* | 00001030 20 20 54 68 65 20 63 6f 64 65 20 69 73 20 70 72 | The code is pr| 00001040 69 6e 74 65 64 20 61 73 20 61 20 73 70 61 63 65 |inted as a space| 00001050 20 62 75 74 20 69 73 20 64 69 73 70 6c 61 79 65 | but is displaye| 00001060 64 20 61 73 20 a1 20 73 6f 0a 2a 20 20 20 20 74 |d as . so.* t| 00001070 68 61 74 20 79 6f 75 20 63 61 6e 20 73 65 65 20 |hat you can see | 00001080 69 74 20 6f 6e 20 74 68 65 20 6d 6f 6e 69 74 6f |it on the monito| 00001090 72 2e 0a 2a 20 20 20 20 53 69 6d 69 6c 61 72 6c |r..* Similarl| 000010a0 79 2c 20 ff 20 28 46 46 29 20 63 61 6e 20 62 65 |y, . (FF) can be| 000010b0 20 75 73 65 64 20 74 6f 20 73 77 69 74 63 68 20 | used to switch | 000010c0 62 69 2d 64 69 72 65 63 74 69 6f 6e 61 6c 0a 2a |bi-directional.*| 000010d0 20 20 20 20 70 72 69 6e 74 69 6e 67 20 6f 6e 20 | printing on | 000010e0 61 67 61 69 6e 2e 0a 0a 41 30 2c 20 32 30 20 20 |again...A0, 20 | 000010f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001100 20 20 20 20 20 20 20 2a 20 6e 6f 6e 20 62 72 65 | * non bre| 00001110 61 6b 20 73 70 61 63 65 0a 41 31 2c 20 31 42 2c |ak space.A1, 1B,| 00001120 20 37 33 2c 20 20 31 2c 20 31 42 2c 20 35 35 2c | 73, 1, 1B, 55,| 00001130 20 20 31 2c 20 32 30 20 2a 20 a1 20 54 75 72 6e | 1, 20 * . Turn| 00001140 20 75 6e 69 2d 64 69 72 65 63 74 69 6f 6e 61 6c | uni-directional| 00001150 20 6f 6e 0a 41 32 20 20 39 42 20 20 20 20 20 20 | on.A2 9B | 00001160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001170 20 20 20 2a 20 a2 0a 41 33 2c 20 39 43 20 20 20 | * ..A3, 9C | 00001180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001190 20 20 20 20 20 20 2a 20 a3 0a 41 34 2c 20 31 42 | * ..A4, 1B| 000011a0 2c 37 34 2c 30 2c 31 42 2c 36 44 2c 34 2c 39 36 |,74,0,1B,6D,4,96| 000011b0 2c 31 42 2c 37 34 2c 31 20 2a 20 a4 20 54 65 6c |,1B,74,1 * . Tel| 000011c0 65 70 68 6f 6e 65 0a 41 35 2c 20 39 31 20 20 20 |ephone.A5, 91 | 000011d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000011e0 20 20 20 20 20 20 2a 20 a5 0a 41 36 2c 20 39 32 | * ..A6, 92| 000011f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001200 20 20 20 20 20 20 20 20 20 2a 20 a6 0a 41 37 2c | * ..A7,| 00001210 20 31 42 2c 20 35 32 2c 20 32 2c 20 34 30 2c 20 | 1B, 52, 2, 40, | 00001220 31 42 2c 20 37 34 2c 20 31 20 20 20 2a 20 a7 0a |1B, 74, 1 * ..| 00001230 2a 41 38 20 a8 0a 2a 41 39 20 a9 0a 2a 41 41 20 |*A8 ..*A9 ..*AA | 00001240 aa 0a 2a 41 42 20 ab 0a 2a 41 43 20 ac 0a 2a 41 |..*AB ..*AC ..*A| 00001250 44 20 ad 0a 2a 41 45 20 ae 0a 2a 41 46 20 af 0a |D ..*AE ..*AF ..| 00001260 2a 42 30 20 b0 0a 2a 42 31 20 b1 0a 2a 42 32 20 |*B0 ..*B1 ..*B2 | 00001270 b2 0a 2a 42 33 20 b3 0a 2a 42 34 20 b4 0a 2a 42 |..*B3 ..*B4 ..*B| 00001280 35 20 b5 0a 2a 42 36 20 b6 0a 2a 42 37 20 b7 0a |5 ..*B6 ..*B7 ..| 00001290 2a 42 38 20 b8 0a 2a 42 39 20 b9 0a 2a 42 41 20 |*B8 ..*B9 ..*BA | 000012a0 ba 0a 2a 42 42 20 bb 0a 2a 42 43 20 bc 0a 2a 42 |..*BB ..*BC ..*B| 000012b0 44 20 bd 0a 2a 42 45 20 be 0a 2a 42 46 20 bf 0a |D ..*BE ..*BF ..| 000012c0 2a 43 30 20 c0 0a 2a 43 31 20 c1 0a 2a 43 32 20 |*C0 ..*C1 ..*C2 | 000012d0 c2 0a 2a 43 33 20 c3 0a 2a 43 34 20 c4 0a 2a 43 |..*C3 ..*C4 ..*C| 000012e0 35 20 c5 0a 2a 43 36 20 c6 0a 2a 43 37 20 c7 0a |5 ..*C6 ..*C7 ..| 000012f0 2a 43 38 20 c8 0a 2a 43 39 20 c9 0a 2a 43 41 20 |*C8 ..*C9 ..*CA | 00001300 ca 0a 2a 43 42 20 cb 0a 2a 43 43 20 cc 0a 2a 43 |..*CB ..*CC ..*C| 00001310 44 20 cd 0a 2a 43 45 20 ce 0a 2a 43 46 20 cf 0a |D ..*CE ..*CF ..| 00001320 2a 44 30 20 d0 0a 2a 44 31 20 d1 0a 2a 44 32 20 |*D0 ..*D1 ..*D2 | 00001330 d2 0a 2a 44 33 20 d3 0a 2a 44 34 20 d4 0a 2a 44 |..*D3 ..*D4 ..*D| 00001340 35 20 d5 0a 2a 44 36 20 d6 0a 2a 44 37 20 d7 0a |5 ..*D6 ..*D7 ..| 00001350 2a 44 38 20 d8 0a 2a 44 39 20 d9 0a 2a 44 41 20 |*D8 ..*D9 ..*DA | 00001360 da 0a 2a 44 42 20 db 0a 2a 44 43 20 dc 0a 2a 44 |..*DB ..*DC ..*D| 00001370 44 20 dd 0a 2a 44 45 20 de 0a 2a 44 46 20 df 0a |D ..*DE ..*DF ..| 00001380 2a 45 30 20 e0 0a 2a 45 31 20 e1 0a 2a 45 32 20 |*E0 ..*E1 ..*E2 | 00001390 e2 0a 2a 45 33 20 e3 0a 2a 45 34 20 e4 0a 2a 45 |..*E3 ..*E4 ..*E| 000013a0 35 20 e5 0a 2a 45 36 20 e6 0a 2a 45 37 20 e7 0a |5 ..*E6 ..*E7 ..| 000013b0 2a 45 38 20 e8 0a 2a 45 39 20 e9 0a 2a 45 41 20 |*E8 ..*E9 ..*EA | 000013c0 ea 0a 2a 45 42 20 eb 0a 2a 45 43 20 ec 0a 2a 45 |..*EB ..*EC ..*E| 000013d0 44 20 ed 0a 2a 45 45 20 ee 0a 2a 45 46 20 ef 0a |D ..*EE ..*EF ..| 000013e0 2a 46 30 20 f0 0a 2a 46 31 20 f1 0a 2a 46 32 20 |*F0 ..*F1 ..*F2 | 000013f0 f2 0a 2a 46 33 20 f3 0a 2a 46 34 20 f4 0a 2a 46 |..*F3 ..*F4 ..*F| 00001400 35 20 f5 0a 2a 46 36 20 f6 0a 2a 46 37 20 f7 0a |5 ..*F6 ..*F7 ..| 00001410 2a 46 38 20 f8 0a 2a 46 39 20 f9 0a 2a 46 41 20 |*F8 ..*F9 ..*FA | 00001420 fa 0a 2a 46 42 20 fb 0a 2a 46 43 20 fc 0a 2a 46 |..*FB ..*FC ..*F| 00001430 44 20 fd 0a 2a 46 45 20 fe 0a 46 46 2c 20 32 30 |D ..*FE ..FF, 20| 00001440 2c 20 31 42 2c 20 35 35 2c 20 20 30 2c 20 31 42 |, 1B, 55, 0, 1B| 00001450 2c 20 37 33 2c 20 20 30 20 2a 20 ff 20 54 75 72 |, 73, 0 * . Tur| 00001460 6e 20 75 6e 69 2d 64 69 72 65 63 74 69 6f 6e 61 |n uni-directiona| 00001470 6c 20 6f 66 66 0a 0a 30 20 20 20 20 20 20 20 20 |l off..0 | 00001480 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001490 20 20 20 20 20 20 2a 20 4e 55 4c 4c 20 74 65 72 | * NULL ter| 000014a0 6d 69 6e 61 74 6f 72 0a |minator.| 000014a8