;--------------------------------------------------------------------------
; Table #1 - Standard Functions Table (Do not Modify)
;--------------------------------------------------------------------------
Tbl1S: Word A00-.,A01-.,A02-.,A03-.,A04-.,A05-.,A06-.,A07-.,A08-.,A09-.
Word A10-.,A11-.,A12-.,A13-.,A14-.,A15-.,A16-.,A17-.,A18-.,A19-.
Word A20-.,A21-.,A22-.,A23-.,A24-.,A25-.,A26-.,A27-.,A28-.,A29-.
Word A30-.,A31-.,A32-.,A33-.,A34-.,A35-.,A36-.,A37-.,A38-.,A39-.
Word A40-.,A41-.,A42-.,A43-.,A44-.,A45-.,A46-.,A47-.,A48-.,A49-.
Word A50-.,A51-.,A52-.,A53-.,A54-.,A55-.,A56-.,A57-.,A58-.,A59-.
Word A60-.,A61-.,A62-.,A63-.,A64-.,A65-.,A66-.,A67-.,A68-.,A69-.
Word A70-.,A71-.,A72-.,A73-.,A74-.,A75-.,A76-.,A77-.,A78-.,A79-.
Word A80-.,A81-.,A82-.,A83-.,A84-.,A85-.,A86-.,A87-.,A88-.,A89-.
Word A90-.,A91-.,A92-.,A93-.
Tbl1E: Word 0
;---------------------------------------------------------------------------
; Command Structure 'Byte Length,Command-Sequence,Null'
; If Command Not Used 'Byte 0'
; Note: Do NOT include Terminating Null in Length
;---------------------------------------------------------------------------
;
; need to add codes for other char sets
;
A00: Byte 6,$Esc,'R,$Cma,'2,$Cma,'$,0 ;! Select Character Set #1 (Standard)
A01: Byte 0 ;" Select Cahracter Set #2 (Alternate)
A02: Byte 0 ;# Select Character Set #3 (USA)
A03: Byte 0 ;$ Select Character Set #4 (French)
A04: Byte 0 ;% Select Character Set #5 (German)
A05: Byte 0 ;& Select Character Set #6 (British)
A06: Byte 0 ;' Select Character Set #7 (Danish)
A07: Byte 0 ;( Select Character Set #8 (Swedish)
A08: Byte 0 ;) Select Character Set #9 (Italian)
A09: Byte 0 ;* Select Character Ser #10 (Spanish)
A10: Byte 0 ;+ Select Character Set #11 (Norwegian)
A11: Byte 0 ;, Select Character Ser #12 (Dutch)
A12: Byte 0 ;- Select Character Set #13 (French Canadian)
A13: Byte 0 ;. Select Character Set #14 (Graphics)
A14: Byte 0 ;/ Select Character Set #15 (IBM)
A15: Byte 0 ;0 /Select Italics Character Set
A16: Byte 0 ;1 \Cancel Italics Character Set (set standard)
A17: Byte 0 ;2 /Select NLQ Character Set
A18: Byte 0 ;3 \Cancel NLQ Character Set
A19: Byte 1,$Dle,0 ;4 /Select Porportional Pitch
A20: Byte 1,$Ack,0 ;5 \Cancel Porportional Pitch
A21: Byte 1,$Soh,0 ;6 /Select Expanded Print (Continous)
A22: Byte 1,$Stx,0 ;7 \Cancel Expanded print
A23: Byte 0 ;8 /Select Double Height Characters (Continous)
A24: Byte 0 ;9 \Cancel Double Height Characters
A25: Byte 0 ;: /Select Condensed Print Mode
A26: Byte 0 ;; \Cancel Condensed Print Mode
A27: Byte 0 ;< /Select Enhanced Print Mode
A28: Byte 0 ;= \Cancel Enhanced Print Mode
A29: Byte 2,$Esc,'b,0 ;> /Select Emphasized Print Mode (Shadow)
A30: Byte 2,$Esc,'c,0 ;? \Cancel Emphasized Print Mode (Shadow)
A31: Byte 2,$Esc,'d,0 ;@ /Select Double Strike Mode (Bold)
A32: Byte 2,$Esc,'e,0 ;A \Cancel Double Strike Mode (Bold)
A33: Byte 6,$Esc,'f,$Cma,'1,$Cma,'$,0 ;B /Select Underlined Print Mode
A34: Byte 6,$Esc,'f,$Cma,'0,$Cma,'$,0 ;C \Cancel Underlined Print Mode
A35: Byte 6,$Esc,'h,$Cma,'0,$Cma,'$,0 ;D /Select Superscripts
A36: Byte 2,$Esc,'i,0 ;E \Cancel Superscripts
A37: Byte 6,$Esc,'h,$Cma,'1,$Cma,'$,0 ;F /Select Subscripts
A38: Byte 2,$Esc,'i,0 ;G \Cancel Subscripts
A39: Byte 0 ;H /Select No Print Mode
A40: Byte 0 ;I \Cancel No Print Mode
A41: Byte 0 ;J /Select Backward Printing
A42: Byte 0 ;K \Cancel Backward Printing
A43: Byte 0 ;L Select Double Height Characters (One Line)
A44: Byte 0 ;M Select Expanded Print (One Line )
;
; need to add codes for correspondence, draft and letter quality
;
A45: Byte 7,$Gs,$Esc,'R,$Cma,'2,$Cma,'$,0 ;N Select 10 CPI (Pica) Draft
A46: Byte 7,$Rs,$Esc,'R,$Cma,'2,$Cma,'$,0 ;O Select 12 CPI (Elite) Draft
A47: Byte 7,$Us,$Esc,'R,$Cma,'2,$Cma,'$,0 ;P Select 17 CPI (Cond.) Draft
A48: Byte 7,$Gs,$Esc,'R,$Cma,'1,$Cma,'$,0 ;Q Select 10 CPI (Pica) Correspondence
A49: Byte 7,$Rs,$Esc,'R,$Cma,'1,$Cma,'$,0 ;R Select 12 CPI (Elite) Correspondence
A50: Byte 7,$Us,$Esc,'R,$Cma,'1,$Cma,'$,0 ;S Select 17 CPI (Cond.) Correspondence
A51: Byte 9.,$Gs,$Esc,'R,$Cma,'1,'0,'1,$Cma,'$,0 ;T Select 10 CPI (Pica) Letter Quality
A52: Byte 9.,$Rs,$Esc,'R,$Cma,'1,'0,'1,$Cma,'$,0 ;U Select 12 CPI (Elite) Letter Quality
A53: Byte 9.,$Us,$Esc,'R,$Cma,'1,'0,'1,$Cma,'$,0 ;V Select 17 CPI (Cond.) Letter Quality
A54: Byte 3,$Esc,'B,$Cma,'8,$Cma,0 ;W Select 6 Lines Per Inch Mode
A55: Byte 3,$Esc,'B,$Cma,'6,$Cma,0 ;X Select 8 Lines Per Inch Mode
A56: Byte 13.,$Esc,'B,$Cma,'8,$Cma,'$,$Esc,'M,$Cma,"66,$Cma,'$,0 ;Y Select 66 Lines Per Page Mode (6lpi x 11 in)
A57: Byte 13.,$Esc,'B,$Cma,'6,$Cma,'$,$Esc,'M,$Cma,"88,$Cma,'$,0 ;Z Select 88 Lines Per Page Mode (8lpi x 11 in)
A58: Byte 8.,$Esc,'L,$Cma,'5,'2,'8,$Cma,'$,0 ;[ Select 11 inch form length
A59: Byte 0 ;\ Select 1 inch form length (Labels)
A60: Byte 0 ;] /Enable Perf Skip (Tm=2,Bm=2)
A61: Byte 0 ;^ \Disable Perf Skip(Cancel Tm,Bm)
A62: Byte 0 ;_ /Enable Paper out Detect
A63: Byte 0 ;` \Disable Paper out Detect
A64: Byte 1,$Dc1,0 ;a /Enable Printer
A65: Byte 1,$Dc3,0 ;b \Disable Printer
A66: Byte 6,$Esc,'g,$Cma,'1,$Cma,'$,0 ;c Set Uni-Directional Print
A67: Byte 6,$Esc,'g,$Cma,'0,$Cma,'$,0 ;d Set Bi-Directional Print
A68: Byte 0 ;e Print Zero with Slash
A69: Byte 0 ;f Print Zero W/o Slash
A70: Byte 0 ;g Set Bit 8 to 1
A71: Byte 0 ;h Set Bit 8 to 0
A72: Byte 0 ;i Set bit 8 to passed value
A73: Byte 0 ;j Cancel Print Line
A74: Byte 0 ;k Reverse Line Feed
A75: Byte 0 ;l Reverse Form Feed
A76: Byte 1,$Bell,0 ;m Bell
A77: Byte 1,$Can,0 ;n Init/Reset Printer
A78: Byte 0 ;o Set Top Margin at Current Line
A79: Byte 0 ;p Set Bottom Margin at Current Line
A80: Byte 0 ;q Set Left Margin at current position
A81: Byte 0 ;r Set Right Margin at current position
A82: Byte 0 ;s Set Horizontal tab at curr pos
A83: Byte 0 ;t Set Vertical tab at curr pos
A84: Byte 0 ;u Clear Horizontal tab at curr pos
A85: Byte 0 ;v Clear Vertical tab at curr pos
A86: Byte 0 ;w Clear all Horizontal Tabs
A87: Byte 0 ;x Clear all Vertival Tabs
A88: Byte 0 ;y
A89: Byte 0 ;z
A90: Byte 0 ;{
A91: Byte 0 ;|
A92: Byte 0 ;}
A93: Byte 0 ;~
Even
