;--------------------------------------------------------------------------
; Standard Functions Table for Star SG-10 Printer (Star Mode)
;--------------------------------------------------------------------------
; 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
;---------------------------------------------------------------------------
A00: BYTE 2,$Esc,'5,0 ;! Select Character Set #1 (Standard)
A01: BYTE 2,$Esc,'6,0 ;" Select Character Set #2 (Alternate)
A02: BYTE 3,$Esc,'7,0,0 ;# Select Character Set #3 (USA)
A03: BYTE 3,$Esc,'7,1,0 ;$ Select Character Set #4 (French)
A04: BYTE 3,$Esc,'7,2,0 ;% Select Character Set #5 (German)
A05: BYTE 3,$Esc,'7,3,0 ;& Select Character Set #6 (British)
A06: BYTE 3,$Esc,'7,4,0 ;' Select Character Set #7 (Danish)
A07: BYTE 3,$Esc,'7,5,0 ;( Select Character Set #8 (Swedish)
A08: BYTE 3,$Esc,'7,6,0 ;) Select Character Set #9 (Italian)
A09: BYTE 3,$Esc,'7,7,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(Fr. Can.)
A13: BYTE 0 ;. Select Character Ser #14(Graphics)
A14: BYTE 0 ;/ Select Character Set #15(IBM)
A15: BYTE 2,$Esc,'4,0 ;0 /Select Italics Character Set
A16: BYTE 2,$Esc,'5,0 ;1 \Cancel Italics Character Set (set standard)
A17: BYTE 3,$Esc,'B,4,0 ;2 /Select NLQ Character Set
A18: BYTE 3,$Esc,'B,5,0 ;3 \Cancel NLQ Character Set
A19: BYTE 3,$Esc,'p,1,0 ;4 /Select Porportional Pitch
A20: BYTE 3,$Esc,'p,0,0 ;5 \Cancel Porportional Pitch
A21: BYTE 3,$Esc,'W,1,0 ;6 /Select Expanded Print (Continous)
A22: BYTE 3,$Esc,'W,0,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,'E,0 ;> /Select Emphasized Print Mode (Shadow)
A30: BYTE 2,$Esc,'F,0 ;? \Cancel Emphasized Print Mode (Shadow)
A31: BYTE 2,$Esc,'G,0 ;@ /Select Double Strike Mode (Bold)
A32: BYTE 2,$Esc,'H,0 ;A \Cancel Double Strike Mode (Bold)
A33: BYTE 3,$Esc,'-,1,0 ;B /Select Underlined Print Mode
A34: BYTE 3,$Esc,'-,0,0 ;C \Cancel Underlined Print Mode
A35: BYTE 3,$Esc,'S,0,0 ;D /Select Superscripts
A36: BYTE 3,$Esc,'T,0 ;E \Cancel Superscripts
A37: BYTE 3,$Esc,'S,1,0 ;F /Select Subscripts
A38: BYTE 2,$Esc,'T,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 2,$Esc,$So,0 ;M Select Expanded Print (One Line )
A45: BYTE 3,$Esc,'B,1,0 ;N Select 10 Cpi (Pica) Draft
A46: BYTE 3,$Esc,'B,2,0 ;O Select 12 Cpi (Elite)Draft
A47: BYTE 3,$Esc,'B,3,0 ;P Select 17 Cpi (Cond.)Draft
A48: Byte 3,$Esc,'B,1,0 ;Q Select 10 CPI (Pica) Correspondence
A49: Byte 3,$Esc,'B,2,0 ;R Select 12 CPI (Elite) Correspondence
A50: Byte 3,$Esc,'B,3,0 ;S Select 17 CPI (Cond.) Correspondence
A51: Byte 3,$Esc,'B,1,0 ;T Select 10 CPI (Pica) Letter Quality
A52: Byte 3,$Esc,'B,2,0 ;U Select 12 CPI (Elite) Letter Quality
A53: Byte 3,$Esc,'B,3,0 ;V Select 17 CPI (Cond.) Letter Quality
A54: BYTE 2,$Esc,'2,0 ;W Select 6 Lines Per Inch Mode
A55: BYTE 2,$Esc,'0,0 ;X Select 8 Lines Per Inch Mode
A56: BYTE 2,$Esc,'C,66.,0 ;Y Select 66 Lines Per Page Mode (6lpi x 11 in)
A57: BYTE 2,$Esc,'C,88.,0 ;Z Select 88 Lines Per Page Mode (8lpi x 11 in)
A58: BYTE 3,$Esc,'C,0,11.,0 ;[ Select 11 inch form length
A59: BYTE 3,$Esc,'C,0,1,0 ;\ Select 1 inch form length (Labels)
A60: Byte 6,$Esc,'R,2,$Esc,'N,2,0 ;] /Enable Perf Skip (Tm=2,Bm=2)
A61: Byte 2,$Esc,'O,0 ;^ \Disable Perf Skip(Cancel Tm,Bm)
A62: Byte 2,$Esc,'9,0 ;_ /Enable Paper out Detect
A63: Byte 2,$Esc,'8,0 ;` \Disable Paper out Detect
A64: Byte 1,$DC1,0 ;a /Enable Printer
A65: Byte 1,$DC3,0 ;b \Disable Printer
A66: Byte 3,$Esc,'U,1,0 ;c Set Uni-Directional Print
A67: Byte 3,$Esc,'U,0,0 ;d Set Bi-Directional Print
A68: Byte 3,$Esc,'\,1,0 ;e Print Zero with Slash
A69: Byte 3,$Esc,'\,0,0 ;f Print Zero W/o Slash
A70: Byte 2,$Esc,'>,0 ;g Set Bit 8 to 1
A71: Byte 2,$Esc,'=,0 ;h Set Bit 8 to 0
A72: Byte 2,$Esc,'#,0 ;i Set bit 8 to passed value
A73: Byte 1,$Can,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 2,$Esc,'@,0 ;n Init/Reset Printer
A78: ;o Set Top Margin at Current Line
A79: ;p Set Bottom Margin at Current Line
A80: ;q Set Left Margin at current position
A81: ;r Set Right Margin at current position
A82: ;s Set Horizontal tab at curr pos
A83: ;t Set Vertical tab at curr pos
A84: ;u Clear Horizontal tab at curr pos
A85: ;v Clear Vertical tab at curr pos
A86: ;w Clear all Horizontal Tabs
A87: ;x Clear all Vertival Tabs
A88: ;y
A89: ;z
A90: ;{
A91: ;|
A92: ;}
A93: Byte 0 ;~
Even