rem Citizen Swift 24 pin Printer Driver (uses IBM char set)

cc '@'=27,"~5",0,27,"@",27,"R",0,27,"t",1,27,"x",0,27,"k",2
cc 'b'=27,"E",27,"G"      ; 27,"F",27,"H" ;; bold (and double strike)
cc 'c'=15                 ; 18            ;; condensed
cc 'e'=27,"M"             ; 27,"P"        ;; elite
cc 'i'=27,"4"             ; 27,"5"        ;; italics
cc 'l'=27,"W",1           ; 27,"W",0      ;; enlarged (double width)
cc 'n'=27,"P"                             ;; normal, pica
cc 'p'=27,"p",1           ; 27,"p",0      ;; proportional
cc 'q'=27,"x",1           ; 27,"x",0      ;; nlq
cc 's'=27,"S",1           ; 27,"T"        ;; subscript
cc 't'=27,"S",0           ; 27,"T"        ;; superscript
cc 'u'=27,"-",1           ; 27,"-",0      ;; underline

cc 'f'=27,"g"   ; 27,"P"            ;; fifteen pitch
cc 'o'=27,"q",1 ; 27,"q",0          ;; outline
cc 'd'=27,"w",1 ; 27,"w",0			;; double height
cc 'a'=27,"k",3 ; 27,"k",2 ;; prestige
cc 'k'=27,"k",2 ; 27,"k",2 ;; courier
cc 'h'=27,"k",1 ; 27,"k",2 ;; sanserif (helvetica)
cc 'r'=27,"k",0 ; 27,"k",2 ;; times roman
cc 'v'=27,"~2",1 ; 27,"~2",0 ;; Reverse
cc 'z'=27,"~1",6 ; 27,"~1",0 ;; Super Enlarge

rem colours - use ctrlcode twice to return to black
cc 'y'= 27,"r",4 ; 27,"r",0	;; rem yellow
cc 'g'= 27,"r",6 ; 27,"r",0	;; rem green
cc 'j'= 27,"r",5 ; 27,"r",0	;; rem orange
cc 'w'= 27,"r",1 ; 27,"r",0	;; rem red	
cc 'm'= 27,"r",3 ; 27,"r",0	;; rem violet
cc 'x'= 27,"r",2 ; 27,"r",0	;; rem blue


rc ''=27,"~5",1,27,"^",01,27,"~5",0
rc ''=27,"~5",1,27,"^",02,27,"~5",0
rc ''=27,"~5",1,27,"^",03,27,"~5",0
rc ''=27,"~5",1,27,"^",04,27,"~5",0
rc ''=27,"~5",1,27,"^",05,27,"~5",0
rc ''=27,"~5",1,27,"^",06,27,"~5",0
rc ''=27,"~5",1,27,"^",11,27,"~5",0
rc ''=27,"~5",1,27,"^",14,27,"~5",0
rc ''=27,"~5",1,27,"^",15,27,"~5",0
rc ''=27,"~5",1,27,"^",16,27,"~5",0
rc ''=27,"~5",1,27,"^",17,27,"~5",0
rc ''=27,"~5",1,27,"^",18,27,"~5",0
rc ''=27,"~5",1,27,"^",19,27,"~5",0
rc ''=27,"~5",1,27,"^",20,27,"~5",0
rc ''=27,"~5",1,27,"^",21,27,"~5",0
rc ''=27,"~5",1,27,"^",22,27,"~5",0
rc ''=27,"~5",1,27,"^",23,27,"~5",0
rc ''=27,"~5",1,27,"^",24,27,"~5",0
rc ''=27,"~5",1,27,"^",25,27,"~5",0
rc ''=27,"~5",1,27,"^",26,27,"~5",0
rc ''=27,"~5",1,27,"^",27,27,"~5",0
rc ''=27,"~5",1,27,"^",28,27,"~5",0
rc ''=27,"~5",1,27,"^",29,27,"~5",0
rc ''=27,"~5",1,27,"^",30,27,"~5",0
rc ''=27,"~5",1,27,"^",31,27,"~5",0

rc ''=27,"6",128
rc ''=27,"6",129
rc ''=27,"6",130
rc ''=27,"6",131
rc ''=27,"6",132
rc ''=27,"6",133
rc ''=27,"6",134
rc ''=27,"6",135
rc ''=27,"6",136
rc ''=27,"6",137
rc ''=27,"6",138
rc ''=27,"6",139
rc ''=27,"6",140
rc ''=27,"6",141
rc ''=27,"6",142
rc ''=27,"6",143
rc ''=27,"6",144
rc ''=27,"6",145
rc ''=27,"6",146
rc ''=27,"6",147
rc ''=27,"6",148
rc ''=27,"6",149
rc ''=27,"6",150
rc ''=27,"6",151
rc ''=27,"6",152
rc ''=27,"6",153
rc ''=27,"6",154
rc ''=27,"R",4,"|",27,"R",0 ;; O slash
rc ''=27,"6",156
rc ''=27,"R",4,"\",27,"R",0 ;; O slash
rc ''=27,"6",159
rc ''=27,"R",2,"~",27,"R",0

IF PC
rc ''=27,"6",""
ENDIF
IF ST
rc 158=27,"R",2,"~",27,"R",0
ENDIF

rc ''=160
rc ''=161
rc ''=162
rc ''=163
rc ''=164
rc ''=165
rc ''=27,"t",1,175

IF ANSI
rc ''=218
rc ''=191
rc ''=192
rc ''=217
rc ''=196
rc ''=179
rc ''=194
rc ''=193
rc ''=197
rc ''=195
rc ''=180
rc ''=166
rc ''=167
rc ''=168
rc ''=170
rc ''=171
rc ''=172
rc ''=173
rc ''=174
rc ''=230
rc ''=241
rc ''=246
rc ''=248
rc ''=250
ENDIF

IF VER5
rem characters are 1 or 2 pixels lower here than on star lc24

rc ''="D",27,"\",238,255, 27,"*",39,18,0, 0,0,0,0,96,0,0,96,0,0,96,0,0,96,0,0,96,0,0,96,0,0,96,0,0,96,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
rc ''=27,"*",39,18,0, 0,0,0,0,0,0,0,0,0,0,31,128,66,63,192,102,112,224,118,96,96,60,96,96,28,96,96,62,96,96,103,96,96,99,224,96,65,240,224,0,255,192,0,127,128,0,0,0,0,0,0,0,0,0
rc ''="L",27,"\",238,255, 27,"*",39,18,0, 0,0,0,0,8,0,0,24,0,0,24,0,0,48,0,0,96,0,0,224,0,0,192,0,1,128,0,3,0,0,3,0,0,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
rc ''="l",27,"\",238,255, 27,"*",39,18,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,8,0,0,24,0,0,24,0,0,48,0,0,96,0,0,96,0,0,192,0,1,128,0,1,128,0,1,0,0,0,0,0,0,0,0,0,0,0
rc ''="L",27,"\",238,255, 27,"*",39,18,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,224,0,0,224,0,0,224,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
rc ''="l",27,"\",238,255, 27,"*",39,18,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,112,0,0,112,0,0,112,0,0,0,0,0,0,0,0,0,0
rc ''=27,"*",39,18,0, 0,0,0,0,0,0,0,0,0,0,0,0,3,0,48,3,0,48,3,0,48,3,255,240,3,255,240,0,0,48,0,0,48,0,0,48,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
rc ''=27,"*",39,18,0, 0,0,0,0,0,0,48,0,96,48,0,96,63,255,224,63,255,224,6,6,96,6,6,96,6,6,0,6,6,0,6,6,0,6,6,0,7,14,0,3,252,0,1,248,0,0,0,0,0,0,0,0,0,0
rc ''=27,"*",39,18,0, 0,0,0,0,0,0,192,0,3,192,0,3,255,255,255,255,255,255,3,3,3,6,1,131,6,1,128,6,1,128,6,1,128,6,1,128,7,3,128,3,255,0,1,254,0,0,0,0,0,0,0,0,0,0
ENDIF

IF VER5
ascend 27,"j",5 ; 27,"J",5

acute     ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 32,0,0, 96,0,0, 192,0,0, 128,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
breve     ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 192,0,0, 224,0,0, 32,0,0, 32,0,0, 32,0,0, 32,0,0, 224,0,0, 192,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
caron     ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 128,0,0, 192,0,0, 96,0,0, 32,0,0, 96,0,0, 192,0,0, 128,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
cedilla   ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 0,0,2, 0,0,3, 0,0,1, 0,0,25, 0,0,25, 0,0,9, 0,0,15, 0,0,6, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
circumflex; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 32,0,0, 96,0,0, 192,0,0, 128,0,0, 192,0,0, 96,0,0, 32,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
dacute    ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 32,0,0, 96,0,0, 192,0,0, 128,0,0, 0,0,0, 0,0,0, 0,0,0, 32,0,0, 96,0,0, 192,0,0, 128,0,0, 0,0,0, 0,0,0
dgrave    ; 27,"\",241,255, 27,"*",39,15,0,  128,0,0, 192,0,0, 96,0,0, 32,0,0, 0,0,0, 0,0,0, 0,0,0, 128,0,0, 192,0,0, 96,0,0, 32,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
diaeresis ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 224,0,0, 224,0,0, 224,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 224,0,0, 224,0,0, 224,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
grave     ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 0,0,0, 128,0,0, 192,0,0, 96,0,0, 32,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
macron    ; 27,"\",241,255, 27,"*",39,15,0,  192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 192,0,0, 0,0,0, 0,0,0
ogonek    ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,6, 0,0,15, 0,0,27, 0,0,19, 0,0,3, 0,0,2, 0,0,0, 0,0,0
overdot   ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 0,0,0, 0,0,0, 224,0,0, 224,0,0, 224,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
ring      ; 27,"\",241,255, 27,"*",39,15,0,  0,0,0, 0,0,0, 0,0,0, 96,0,0, 240,0,0, 144,0,0, 144,0,0, 240,0,0, 96,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0, 0,0,0
tilde     ; 27,"\",241,255, 27,"*",39,15,0,  32,0,0, 96,0,0, 192,0,0, 128,0,0, 128,0,0, 192,0,0, 64,0,0, 96,0,0, 32,0,0, 32,0,0, 96,0,0, 192,0,0, 0,0,0, 0,0,0, 0,0,0
ENDIF

hl 27,"J",15
pscode 27,"9"; 27,"8"

IF VER5
mm 4
mf 2
pp on
ms on
double L
regular bcilpqstuhakrdzovygjwmx
group enf
menu
"Helvetica:^XH" H
"courier:^XK" K
"prestige:^XA" A
"times Roman:^XR" R
"-"
"Fifteen pitch:^XF" F
"Outline:^XO" O
"inVerse:^XV" V
"Double height:^XD" D
"quad size:^XZ" Z
"-"
"Yellow:^XY" Y
"Green:^XG" G
"Orange:^XJ" J
"red:^XW" W
"violet:^XM" M
"blue:^XX" X
menuend
ELSE
mm 4
mf 2
cw 36
pw 30
ENDIF


rem all widths are in units of 1/360"

IF VER5
rules zqf=23,zf=18,zqce=22,zce=17,zqc=21,zc=16,zqe=20,ze=15,zq=19,z=14,+
      cps=13,cpt=13,cp=12,ps=10,pt=10,p=11,+
      qf=9,f=4,qce=8,ce=3,qc=7,c=2,qe=6,e=1,q=5,n=0

font 0 ;; draft pica, 10 cpi
mm 4
mf 3
cw 36

font 1 ;; draft elite, 12 cpi
mm 4
mf 3
cw 30

font 2 ;; draft condensed pica, 17.14 cpi
mm 4
mf 3
cw 21

font 3 ;; draft condensed elite, 20 cpi
mm 4
mf 3
cw 18

font 4 ;; draft semi-condensed, 15 cpi
mm 4
mf 3
cw 24

font 5 ;; LQ pica, 10 cpi
mm 4
mf 2
cw 36

font 6 ;; LQ elite, 12 cpi
mm 4
mf 2
cw 30

font 7 ;; LQ condensed pica, 17.14 cpi
mm 4
mf 2
cw 21

font 8 ;; LQ condensed elite, 20 cpi
mm 4
mf 2
cw 18

font 9 ;; LQ semi-condensed, 15 cpi
mm 4
mf 2
cw 24

font 10 ;; sub/superscript proportional
mm 4
mf 2
pw 20
widths
 20 !12 "20 #20 $20 %24 &24 '12 (16 )16 *20 +20 ,12 -20 .12 /20 
020 120 220 320 420 520 620 720 820 920 :12 ;12 <20 =20 >20 ?20 
@24 A24 B24 C24 D24 E24 F24 G24 H24 I16 J20 K24 L24 M28 N24 O24 
P24 Q24 R24 S24 T24 U28 V24 W28 X24 Y24 Z20 [16 \20 ]16 ^20 _20 
`12 a20 b24 c20 d24 e20 f16 g24 h24 i12 j16 k24 l12 m28 n24 o20 
p24 q24 r20 s20 t16 u24 v24 w28 x20 y24 z20 {16 |12 }16 ~20 
24 24 20 20 20 20 20 20 20 20 20 12 12 12 24 24 
24 28 28 20 20 20 24 24 24 24 28 20 20 24 28 20 
20 12 20 24 24 24 20 20 20 20 20 20 20 20 20 20 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
20 24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 
20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 
30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
36 36 

font 11 ;; ordinary proportional font (verified 2/91)
mm 4
mf 2
pw 30
widths
 30 !18 "30 #30 $30 %36 &36 '18 (24 )24 *30 +30 ,18 -30 .18 /30 
030 130 230 330 430 530 630 730 830 930 :18 ;18 <30 =30 >30 ?30 
@36 A36 B36 C36 D36 E36 F36 G36 H36 I24 J30 K36 L36 M42 N36 O36 
P36 Q36 R36 S36 T36 U42 V36 W42 X36 Y36 Z30 [24 \30 ]24 ^30 _30 
`18 a30 b36 c30 d36 e30 f24 g36 h36 i18 j24 k36 l18 m42 n36 o30 
p36 q36 r30 s30 t24 u36 v36 w42 x30 y36 z30 {24 |18 }24 ~30 
36 36 30 30 30 30 30 30 30 30 30 18 18 18 36 36 
36 42 42 30 30 30 36 36 36 36 42 30 30 36 42 30 
30 18 30 36 36 36 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 36 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
36 18 

font 12 ;; condensed proportional (verified 2/91)
mm 4
mf 2
pw 15
widths
 15 !9  "15 #15 $15 %18 &18 '9  (12 )12 *15 +15 ,9  -15 .9  /15 
015 115 215 315 415 515 615 715 815 915 :9  ;9  <15 =15 >15 ?15 
@18 A18 B18 C18 D18 E18 F18 G18 H18 I12 J15 K18 L18 M21 N18 O18 
P18 Q18 R18 S18 T18 U21 V18 W21 X18 Y18 Z15 [12 \15 ]12 ^15 _15 
`9  a15 b18 c15 d18 e15 f12 g18 h18 i9  j12 k18 l9  m21 n18 o15 
p18 q18 r15 s15 t12 u18 v18 w21 x15 y18 z15 {12 |9  }12 ~15 
18 18 15 15 15 15 15 15 15 15 15 9  9  9  18 18 
18 21 21 15 15 15 18 18 18 18 21 15 15 18 21 15 
15 9  15 18 18 18 15 15 15 15 15 15 15 15 15 15 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
15 18 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
18 9  

font 13 ;; condensed sub/superscript proportional
mm 4
mf 2
pw 10
widths
 10 !6  "10 #10 $10 %12 &12 '6  (8  )8  *10 +10 ,6  -10 .6  /10 
010 110 210 310 410 510 610 710 810 910 :6  ;6  <10 =10 >10 ?10 
@12 A12 B12 C12 D12 E12 F12 G12 H12 I8  J10 K12 L12 M14 N12 O12 
P12 Q12 R12 S12 T12 U14 V12 W14 X12 Y12 Z10 [8  \10 ]8  ^10 _10 
`6  a10 b12 c10 d12 e10 f8  g12 h12 i6  j8  k12 l6  m14 n12 o10 
p12 q12 r10 s10 t8  u12 v12 w14 x10 y12 z10 {8  |6  }8  ~10 
12 12 10 10 10 10 10 10 10 10 10 6  6  6  12 12 
12 14 14 10 10 10 12 12 12 12 14 10 10 12 14 10 
10 6  10 12 12 12 10 10 10 10 10 10 10 10 10 10 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 15 
10 12 10 10 10 10 10 10 10 10 10 10 10 10 10 10 
10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 
30 30 30 30 30 30 30 30 30 
30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 30 
36 36 

font 14 ;; draft pica, 10 cpi (quad size)
mm 4
mf 3
cw 144

font 15 ;; draft elite, 12 cpi (quad size)
mm 4
mf 3
cw 120

font 16 ;; draft condensed pica, 17.14 cpi (quad size)
mm 4
mf 3
cw 84

font 17 ;; draft condensed elite, 20 cpi (quad size)
mm 4
mf 3
cw 72

font 18 ;; draft semi-condensed, 15 cpi (quad size)
mm 4
mf 3
cw 96

font 19 ;; LQ pica, 10 cpi (quad size)
mm 4
mf 2
cw 144

font 20 ;; LQ elite, 12 cpi (quad size)
mm 4
mf 2
cw 120

font 21 ;; LQ condensed pica, 17.14 cpi (quad size)
mm 4
mf 2
cw 84

font 22 ;; LQ condensed elite, 20 cpi (quad size)
mm 4
mf 2
cw 72

font 23 ;; LQ semi-condensed, 15 cpi (quad size)
mm 4
mf 2
cw 96

ENDIF
