.;	EPSON SUPPORTED FEATURES:
.;	=========================
.;	Function		on	off   char?   lock?	notes
.;	--------		--	---   -----   -----	-----
.;	escape sequence		^_	\_	Y	N
.;	underline		^&	\&	Y	Y	not P-40
.;	bold			^*	\*	Y	Y
.;	double width		^=	\=	Y	Y
.;	italics			^/	\/	Y	Y	not P-40
.;	subscripts		^<	\<	Y	Y	not P-40
.;	superscripts		^>	\>	Y	Y	not P-40
.;	proportional		^`	\`	Y	Y	FX-85/105 only
.;	near letter quality	^|	\|	Y	Y	not P-40
.;	User-define characters	^%	\%	Y	Y	not P-40/80
.;	graphics mode		^!	\!	N	N	double density
.;	shift up 1 line		^(		N	N	FX-85 only
.;	shift down 1 line	^)		N	N
.;	font 0			^0	\0	N	Y	UK
.;	font 1			^1	\1	N	Y	Spanish II (LQ800)
.;	font 2			^2	\2	N	Y	Latin Am (LQ800)
.;	font 3			^3	\3	N	Y	French
.;	font 4			^4	\4	N	Y	German
.;	font 5			^5	\5	N	Y	Italian
.;	font 6			^6	\6	N	Y	Norwegian
.;	font 7			^7	\7	N	Y	Spanish I
.;	font 8			^8	\8	N	Y	Swedish
.;	font 9			^9	\9	N	Y	Japanese
.;
.; All other standard sequences are dummies.
.;
.; N.B.	The RT-11 LS handler "eats" nulls. If this is a problem, change
.;	things like 27,"-",0 to 27,"-0", which is documented as working on
.;	LQ800/1000's, and actually works on LX80s too, maybe others.
.reset escape
.define escape "^&" CHR LCK 27,"-",1
.define escape "\&" CHR LCK 27,"-",0
.define escape "^*" CHR LCK 27,"E"
.define escape "\*" CHR LCK 27,"F"
.define escape "^~"
.define escape "\~"
.define escape "^=" CHR LCK PSP HSP,2 14
.define escape "\=" CHR LCK PSP HSP,1 20
.define escape "^#"
.define escape "\#"
.define escape "^/" CHR LCK 27,"4"
.define escape "\/" CHR LCK 27,"5"
.define escape "^<" CHR LCK 27,"S",1
.define escape "\<" CHR LCK 27,"T"
.define escape "^>" CHR LCK 27,"S",0
.define escape "\>" CHR LCK 27,"T"
.define escape "^`" CHR LCK 27,"p",1
.define escape "\`" CHR LCK 27,"p",0
.define escape "^|" CHR LCK 27,"x",1
.define escape "\|" CHR LCK 27,"x",0
.define escape "^%" CHR LCK 27,"x",1
.define escape "\%" CHR LCK 27,"%",0
.define escape "^!" PSP HSP,0 27,"L"
.define escape "\!" PSP HSP,1
.define escape "^(" VSP,-2 27,"j",18,27,"j",18
.define escape "^)" VSP,2 27,"J",36
.define escape "^+" CHR LCK PSP HSP,2 14
.define escape "\+" CHR LCK PSP HSP,1 20
.define escape "^-" CHR LCK PSP HSP,2 14
.define escape "\-" CHR LCK PSP HSP,1 20
.define escape "^0" CHR LCK 27 "R",3
.define escape "\0" CHR LCK 27 "R",0
.define escape "^1" LCK 27 "R",11
.define escape "\1" LCK 27 "R",0
.define escape "^2" LCK 27 "R",12
.define escape "\2" LCK 27 "R",0
.define escape "^3" LCK 27 "R",1
.define escape "\3" LCK 27 "R",0
.define escape "^4" LCK 27 "R",2
.define escape "\4" LCK 27 "R",0
.define escape "^5" LCK 27 "R",6
.define escape "\5" LCK 27 "R",0
.define escape "^6" LCK 27 "R",9
.define escape "\6" LCK 27 "R",0
.define escape "^7" LCK 27 "R",7
.define escape "\7" LCK 27 "R",0
.define escape "^8" LCK 27 "R",5
.define escape "\8" LCK 27 "R",0
.define escape "^9" LCK 27 "R",8
.define escape "\9" LCK 27 "R",0
.define escape "^_" PSP HSP,0 27
.define escape "\_" PSP HSP,1
.define subscript 27,"J",18
.define superscript 27,"j",18
.reset variant 
.variant Epson