96. Printer pound/hash sign fix
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~
On all Epson-compatible printers, there is a discrepancy between the keyboard
Pound currency sign, and the printer Pound sign. Character 96 on the keyboard
is a Pound sign, but the printer prints a sort of "'" sign  - like a
lefthanded apostrophe. The Pound sign on the printer is shared with character
35, the "#" (Hash or Sharp symbol), depending on whether you are using the
American or English character set. However, those of you with an Epson FX80
and some other printers can use a more elegant solution. It is possible to
redefine the printer character set, and thus turn character 96 from a "'" to
a proper Pound sign, (dipswitch 2-3 on the NLQ's and 1-4 on the FX80 must be
"off").

This little program must be run with the printer "ON LINE", and could
conveniently be CHAINed as part of a disc !BOOT file. Those of you who are
more cunning can spool the bytes off directly onto disc, and can then *EXEC
them instead of CHAINing. As it stands, this program has no effect in the
NLQ mode of a Canon/Kaga printer, as a PCG RAM expansion is needed. The DATA
list has only been split for clarity, and to allow me to insert REM
statements, so you can type it all in on one line if you like.

NB: Many newer Epson printers only allow a limited range of characters to be
    redefined, so this may not work.

 100 VDU2:REPEAT:REM Send data to printer only.
 110 READ data%:IF data%>=0 THEN VDU1,data%
 120 UNTIL data%= -1:VDU3:END
 130 DATA 27,82,0:REM Esc "R" - Select American characters.
 140 DATA 27,58,0,0,0:REM Esc ":" - Download from ROM to RAM.
 150 DATA 27,38,0,96,96:REM Esc "&" - Specify character 96.
 160 DATA 139,18,0,126,128,18,128,2,128,66,0,0:REM Data for  sign.
 170 DATA 27,38,0,224,224:REM Esc "&" - Repeat for Italic version.
 180 DATA 139,18,0,30,96,18,128,18,128,64,0,0:REM Data for Italic.
 190 DATA 27,37,1,0:REM Esc "%" - Select RAM for printing.
 200 DATA -1:REM Terminator for data.