[comp.sources.atari.st] v02i030: 1stjethv -- 1st-Word config file for Helvetica on DeskJet

koreth@ssyx.ucsc.edu (Steven Grimm) (03/19/89)

Submitted-by: sdsu.sdsu.edu!ucselx!coffey (Pat Coffey)
Posting-number: Volume 2, Issue 30
Archive-name: 1stjethv

From Genie and modified to use the Helvitica font cartridge.
You should edit off the mail info, and rename the file djhelvit.hex, and
run install.prg to get the 1st_print.dot file you want.

----------------------------cut here---------------------------------
*************************************************************** 
*
*    Hewlett-Packard DeskJet Printer Driver Configuration Table
*    For use with First Word Plus
*    This file contains tables defining the code sequences
*    to be sent to the printer to perform various functions
*    and to access the characters from codes in the Atari
*    character set.
*    Author: Frederic MORA 
*            Pat Coffey       
*    Modification history
*          PaC 1988     Download Fredric Mora's version from GENIE
*          PaC 9/25/88  Change italic from double underline to compressed    
*                       add lq & draft codes
*          PaC 12/25/88 add helvitica fonts
*
****************************************************************

*
* Name of printer
* ===============
*
HP DeskJet with Helvitica 22706Q cartridge


*    Configuration variables
*    =======================
*
*    These six variables define certain printer
*    configuration details required by 1st Word Plus:
*
*    (1)  1 for microspacing daisywheel, else 0
*    (2)  Character width in printer units (daisy)
*    (3)  Linefeed height in printer units
*    (4)  Mid-carriage (daisy) pixels/inch (matrix) (96H for 150 dpi)
*    (5)  Bold offset in printer units (daisy)
*    (6)  1 to pause printing between pages, else 0


0, 0, C, 96, 0, 0


*
* Printer characteristics
* =======================
*
* This table specifies the printer command sequences.
* If the top bit of a code is set, then this indicates the position
* of a parameter passed to the printer. The code whose top bit is set
* in this table is added to the parameter passed before being sent to the
* printer. It is not used in all command sequences, only in those where 
* the printer requires  a variable value such as the length of a vertical 
* tab.
*
* 0            * Character width
1, D, A        * Linefeed WITH return
* 2            * Forward print
* 3            * Reverse print
* 4            * Vertical tab to line 
* 5            * Absolute horizontal tab 
*           6, * Draft bold on: Esc(0U Esc ( s  2 q 3 b 4 T
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  3  b  4  t  1  Q  
6,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,33,62,34,74,31,51             * No Up arrow INIT HELV. 12 PT.

* 7         * Draft bold off 
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  0  b  4  t  1  Q  
7,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,30,62,34,74,31,51             * No Up arrow INIT HELV. 12 PT.

* 8,        * Near Letter Quality bold on:
* Esc ( 0  U  Esc (  s  0  u  1  p   1  4  v  3  b  4  t  2  Q  
8,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,,33,62,34,74,32,51             * No Up arrow INIT HELV. 12 PT.

* 9,        * NLQ bold off:
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  0  b  4  t  2  Q  
9,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,30,62,34,74,32,51             * No Up arrow INIT HELV. 12 PT.
  
* A,        Draft italic
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  1  s  4  t  1  Q  
A,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,31,73,34,74,31,51             * No Up arrow INIT HELV. 12 PT.
* B,        * Draft italic off 
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  0  s  4  t  1  Q  
B,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,30,73,34,74,31,51             * No Up arrow INIT HELV. 12 PT.

* C         NLQ italic on    
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  1  s  4  t  2  Q  
C,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,31,73,34,74,32,51             * No Up arrow INIT HELV. 12 PT.


* D,         * NLQ italic off
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  0  s  0  b  4  t  2  Q  
D,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,30,73,30,62,34,74,32,51             * No Up arrow INIT HELV. 12 PT.

* E          * Draft light on (8 point font)
* Esc ( 0  U  Esc (  s  0  u  1  p  8  v  0  s  0  b  4  t  1  Q  
E,1B,28,30,55,1B,28,73,30,75,31,70,38,76,30,73,30,62,34,74,31,51             * No Up arrow INIT HELV. 12 PT.

* F,         * Draft light off
* Esc ( 0  U  Esc (  s  0  u  1  p  1  2  v  0  b  4  t  1  Q  
F,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,30,62,34,74,31,51             * No Up arrow INIT HELV. 12 PT.

* 10         * NLQ light on   (8 point font)
*  Esc ( 0  U  Esc (  s  0  u  1  p  8  v  0  b  4  t  2  Q  
10,1B,28,30,55,1B,28,73,30,75,31,70,38,76,30,62,34,74,32,51             * No Up arrow INIT HELV. 12 PT.

* 11         * NLQ light off   (BACK TO 12 POINT)
* Esc ( 0  U  Esc (  s  0  u  1  p  1  4  v  0  b  4  t  2  Q  
11,1B,28,30,55,1B,28,73,30,75,31,70,31,32,76,30,62,34,74,32,51             * No Up arrow INIT HELV. 12 PT.

* Draft superscript on with 8 point superscript: Esc ( s 8 V Esc ( s +1 U
12,1B,28,73,31,71,38,56,1B,28,73,2B,31,55
 * Draft superscript off (back to 12 point):     Esc ( s 0 U Esc ( s 12 V
13,1B,28,73,31,71,30,55,1B,28,73,31,32,56
* NLQ superscript on with 8 point superscript:   Esc ( s 8 V Esc ( s +1 U
14,1B,28,73,32,71,38,56,1B,28,73,2B,31,55
* NLQ superscript off (back to 12 point):        Esc ( s 0 U Esc ( s 12 V
15,1B,28,73,32,71,30,55,1B,28,73,31,32,56
* Draft subscript on with 8 point subscript:     Esc ( s -1 U Esc ( s 8 V
16,1B,28,73,31,71,2D,31,55,1B,28,73,38,56
* Draft subscript off (back to 12 point):        Esc ( s 0 U Esc ( s 12 V
17,1B,28,73,31,71,30,55,1B,28,73,31,32,56
* NLQ subscript on with 8 point subscript:       Esc ( s -1 U Esc ( s 8 V
18,1B,28,73,32,71,2D,31,55,1B,28,73,38,56
* NLQ subscript off (back to 12 point):          Esc ( s 0 U Esc ( s 12 V
19,1B,28,73,32,71,30,55,1B,28,73,31,32,56
* Draft underline (single fixed) on:             Esc & d 1 D
1A,1B,26,64,31,44
1B,1B,26,64,40  * Draft underline off:       Esc & d @
* NLQ underline (single fixed) on:               Esc & d 1 D
1C,1B,26,64,31,44
1D,1B,26,64,40  * NLQ underline off:         Esc & d @
1E,1B,26,6C,30,48   * Formfeed              Esc & l 0 H
*1F,12         * Horizontal initialisation
20, 1B,26,6B,25,57          * Vertical initialisation
21,1B,45      * Termination: printer reset     Esc E
22, 8                        * Backspace
23, D                        * Carriage return
*24,1B,43,80                * Form length in lines
*25,1B,41,80,1B,32        * Set line feed to N units
*26  * Start graphics  
* 27                          * Reserved

0              * NULL termination byte

*
* Translation Table
* =================
*
* This table provides translation from single Atari input bytes into
* multiple printer codes,and is useful for printing extraneous
* characters such as accented characters etc. All characters are 
* subjected to translation,but if there is no entry in the table for
* a particular code,then the original code is sent to the printer.
*
* The entries must be arranged in ascending order of Atari input
* code. The table is NULL terminated.
* 
* This table assumes that the HP DeskJet printer is set in 
* PC8 Character Set (Switches A1 to A4 down)

0                                 * NULL: print a space 
* the up arrow code will set the printer for 14 pt. Helvitica
* Esc ( 0  U  Esc (  s  1  p  1  4  v  4  T  
1,1B,28,30,55,1B,28,73,31,70,31,34,76,34,54             * No Up arrow INIT HELV. 14 PT.
* 2             * No Down arrow so fake helvitica 10 point
* Esc ( 0  U  Esc (  s  1  p  1  0  v  4  T  
2,1B,28,30,55,1B,28,73,31,70,31,30,76,34,54             * No Up arrow INIT HELV. 14 PT.
* 3             * No Right arrow Fake helvitica 7 point
* Esc ( 0  U  Esc (  s  1  p  7 v  4  T  
3,1B,28,30,55,1B,28,73,31,70,37,76,34,54             * No Up arrow INIT HELV. 14 PT.
* 4             * No Left arrow so fake 6 point
* Esc ( 0  U  Esc (  s  1  p  6  v  4  T  
4,1B,28,30,55,1B,28,73,31,70,36,76,34,54             * No Up arrow INIT HELV. 14 PT.
* 5             * No close box so fake 5 point
* Esc ( 0  U  Esc (  s  1  p  5  v  4  T  
5,1B,28,30,55,1B,28,73,31,70,35,76,34,54             * No Up arrow INIT HELV. 14 PT.
* 6             * No size box so fake 4 point
* Esc ( 0  U  Esc (  s  1  p  4  v  4  T  
6,1B,28,30,55,1B,28,73,31,70,34,76,34,54             * No Up arrow INIT HELV. 14 PT.

7             * No full box
8             * No tick
9             * No clock
A             * No bell
B,0D                              * musical note
E             * No LH Atari symbol     
F             * No RH Atari symbol
10,30        * LCD 0
11,31        * LCD 1
12,32        * LCD 2    
13,33        * LCD 3
14,34        * LCD 4
15,35        * LCD 5
16,36        * LCD 6
17,37        * LCD 7     
18,38        * LCD 8
19,39        * LCD 9     
7F                       * No triangle
9E,E1                   * Esszet
B0         * No Lower case a tilde
B1         * No Lower case o tilde
B2         * No Capital crossed O 
B3         * No Lower case crossed o
B4         * No lower case oe dipthong
B5                       * No capital OE dipthong
B6,41                   * No capital A grave: print A
B7,41                   * No capital A tilde: print A
B8,4F                   * No capital O tilde: print O
B9         * No Umlaut
BA,27                   * Acute: print '
BB,C5                   * Dagger
BC,15                   * Paragraph symbol
BD                       * No copyright symbol
BE                       * No Registered symbol
BF                       * No Trademark symbol
C0        * No ij ligature
C1        * No IJ ligature
C2        * No Hebrew...
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,14       * Section mark 
DE,5E       * Dropped circumflex
DF,EC       *  infinity
FE           * No superior 3
FF        * No macron     
0