Version 86 11 27	{DZINSTAL.CFA}
Debug 0
{ Many of these definitions are deduced from doubtful sources}
{ PLEASE LET ME KNOW IF THE DEFINITION FOR YOUR MACHINE IS RIGHT OR WRONG}
{ John Washington, 33 Turnoak Ave, Woking, Surrey, England GU22 0AJ}

{NOV 86 --	MANY THANKS TO THE PEOPLE WHO SENT INFO
		ABOUT THEIR TERMINALS, more please.}

Id	ACT 5A
{CPMUGUK}
CurPos	14
RowFirst
Offset	0
ClearScreen	0C
EraseEOL	1B 49
EraseEOS	1B 4B
End

Id	ACT IV
See Microterm ACT IV
End

{Id	ACT Sirius; Fr DF, but diff from..
SeeAlso Sirius 9000;
CurPos	1B 59
RowFirst
Offset	20
Home	1B 48
ClearScreen	1B 45
DelLine	1B 6C
EnhOn	1B 28
EnhOff	1B 29
End}

Id	Adds Regent 20/25/200
{20/25 Fr TE, WS, DF	200 Fr DF}
CurPos	1B 59
RowFirst
Offset	20
{CurPos, same row	10 col+20}
{CurPos, same Col	0B row+20}
Home	01
ClearScreen 	0C
{No delete/insert}
EraseEOL 1B 4B
EraseEOS 1B 6B
{No fore/background}
{Bsp	08}
{Cursor back	15
Cursor down	0A
Cursor right	06
Cursor up	1A
Kbd lock	1B 35
Kbd unlock	1B 36
Store ctrl char (huh???) 1B 5A
Xparent print off 1B 34
ditto on	1B 33
Regent terminals with higher model numbers are compatible
with the 25, but have additional facilities
}
End

Id	Adds Regent 40/60
{WS VD (wrong)}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 4B
ClearScreen	0C
DelLine 1B 6C
InsLine 1B 4D
{No fore/background?}
End

Id	Adds Viewpoint
{WS, see also VD and TV914 doc}
Initial	1B 30 41	{half intensity normal video}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 4B
ClearScreen	0C
DelLine 1B 6C
InsLine 1B 4D
EnhOn	0E	{?? not compatible with 914 in Viewpoint mode ??}
EnhOff	0F	{?? ditto ??}
Remark	Are there two models, the Viewpoint and the
Remark	Viewpoint-1A, or are they the same?  Please tell me.
EraseEOS	1B 6B {MX}
End

Id	Adds Viewpoint-1A (is this same model?)
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 4B
ClearScreen	0C
{DelLine 1B 6C
InsLine 1B 4D}
EnhOn	0F
EnhOff	0E
End

Id	ADM-20 (Lear Siegler)
{VD}
Curpos	1B 3D
ColFirst
Offset	20
EraseEOL 1B 54
DelLine 1B 52
InsLine 1B 45
EnhOn	1B 29
EnhOff	1B 28
ClearScreen 1A {MX}
End

Id	ADM-31 (Lear Siegler)
{WS}
Initial	1B 27	{what does this do?}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54
DelLine 1B 52
InsLine 1B 45
EnhOn	1B 29
EnhOff	1B 28
ClearScreen 1B 3A {MX}
EraseEOS 1B 79 {MX}
{DelChar 1B 57 MX}
{InsChar 1B 51 MX}
End

Id	ADM-3A (Lear Siegler)
{WS}
Curpos	1B 3D
RowFirst
Offset	20
Remark	Set the AUTO NEWLINE switch off
Remark	(under the little cover next to the keyboard)
{additional fr DF
Home	1E
ClearScreen	1A
}
End

Id	ADM-42 (Lear Siegler)
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54
ClearScreen	1B 2B
End

Id	Alphatronic / Matmos / Triumph Adler
See Triumph Adler
End

Id	Ampex D80
{DF}
CurPos	1B 3D
ColFirst
Offset	20
Home	1E 22	{?? typo? perhaps 1B 22?}
ClearScreen	1B 2B {DF}
ClearScreen	1A {MX}
DelLine	1B 52
InsLine	1B 45
EraseEOL 1B 54
EraseEOS 1B 79
EnhOn	1B 29
EnhOff	1B 28
End

Id	Amstrad 464/664 (Vortex CP/M 3)
Initial	06 04 02
CurPos	1F
ColFirst
Offset	1
EraseEOL 12
DelLine	11 12
ClearScreen 0C
EnhOn	18
EnhOff	18
End

Id	Amstrad 664 + Dktronics 64k (CP/M 3)
See Amstrad 6128
End

Id	Amstrad 6128/8256 (CP/M 3)
{6128 Fr AM, 8256 Fr DF}
Initial	1B 32 30	{USA char set}
CurPos	1B 59
RowFirst
Offset	20
Home	1B 48
ClearScreen	1B 45	{Fr DF, for 8256, true also for 6128?}
DelLine 1B 4D
InsLine 1B 4C
EraseEOL 1B 4B
EraseEOS 1B 4A
EnhOn	1B 70	{Reverse video}
EnhOff	1B 71
Remark	If you wish to use the Amstrad cursor keys,
Remark	run SETKEYS KEYS.WP before running DZ.
Remark	To recover standard settings afterwards, run
Remark	SETKEYS KEYS.CCP or reboot.
End

Id	Andromeda Zita P3
{CPMUGUK}
CurPos	1B 3D
RowFirst
Offset	20
Home	1E
ClearScreen	1A
EraseEOL	18
EraseEOS	17
EnhOn	1B 49
EnhOff	1B 4E
End

Id	Ann Arbor Ambassador
{WS}
Height	3C
Width	3C
Remark	60x60 screen?  Please contact me if you try installing this
CurPos	1B 5B
Between	3B
Trail	48
RowFirst
Offset	1
Ascii	2
EraseEOL 1B 5B 4B
DelLine 1B 5B 4D
{No InsLine}
EnhOn	1B 5B 37 6D
EnhOff	1B 5B 30 6D
End

Id Ansi
{MX}
ClearScreen	1B 5B 32 4A
EraseEOS	1B 5B 4A
EraseEOL	1B 5B 4B
InsLine		1B 5B 31 4C
DelLine		1B 5B 31 4D
{DelChar	1B 5B 31 50
InsMode		1B 5B 34 68
NoInsMode	1B 5B 34 6C}
CurPos		1B 5B
Between		3B
Trail		48
Ascii		2
End

Id	Apple ][
See Soroc
End


Id	Apricot XI-10
{DF}
CurPos	1B 59
ColFirst
Offset 20
DelLine 1B 4D
InsLine	1B 4C
EraseEOL 1B 4B
EraseEOS 1B 4A
EnhOn	1B 28
EnhOff	1B 29
End


Id	Bantam
{DF}
See Perkin Elmer
End

Id	BBC Micro (most users)
Initial	16 03	{set mode 3 = 80x25}
CurPos	1F
ColFirst
Offset	0
Home	1E
ClearScreen	0C
EnhOn	11 87 11 00
EnhOff	11 80 11 07
End

Id	BBC Micro (another method)
{DF}
CurPos	1F
ColFirst
Offset	0
Home	1E
ClearScreen	0C
DelLine	15
EnhOn	0B 87 0B 00
EnhOff	0B 80 0B 07
End

Id	Beehive 150
CurPos	1B 46
RowFirst
Offset	20
ClearScreen 1B 45 0 0 0 0 0
EraseEOL	1B 4B
EraseEOS	1B 4A
End

Id	Cifer 2600 series
{CPMUGUK}
Curpos	1B 50
Offset	20
ColFirst
Home	1B 48
ClearScreen	1B 4A
DelLine	1B 5E 29
InsLine	1B 5E 2E
EraseEOL	1B 4B
EnhOn	1B 4E
EnhOff	1B 4F
End

Id	Cifer 2605/T205
{Julian Back CPMUG v2 n8 p34}
Curpos	1B 50
Offset	0
ColFirst
Home	1B 48
ClearScreen	1B 4A
EraseEOL	1B 4B
EraseEOS	1B 4A {! contradiction with ClearScreen}
EnhOn	1B 4E
EnhOff	1B 4F
End

Id	Cifer 2634/2834/2684/2880/T234/1880/3834
{Julian Back CPMUG v2 n8 p34}
Curpos	1B 50
Offset	20
ColFirst
Home	1B 48
ClearScreen	1B 4A
InsLine		1B 5E 2E
DelLine		1B 5E 29
EraseEOL	1B 4B
EraseEOS	1B 4A {! contradiction with ClearScreen}
EnhOn	1B 4E
EnhOff	1B 4F
End

Id	Cifer 2887
{C C-S}
Curpos	1B 50
Offset	20
ColFirst
Home	1B 48
ClearScreen	1B 4A
DelLine	1B 5E 29
InsLine	1B 5E 2E
EraseEOL	1B 5E 24
EnhOn	1B 58
EnhOff	1B 59
End

Id Cifer T2/T4/T5/3842/T2000/ANSI
{Julian Back CPMUG v2 n8 p34}
CurPos		1B 5B
Between		3B
Trail		48
Ascii		2
Offset		1
ClearScreen	1B 5B 32 4A
Home		1B 5B 48
EraseEOS	1B 5B 4A
EraseEOL	1B 5B 4B
InsLine		1B 5B 4C
DelLine		1B 5B 4D
EnhOn		1B 5B 37 6D
EnhOff		1B 5B 6D
End

Id	Coleco Adam
{GH}
CurPos	1B 59
RowFirst
Offset	20
HiBitInverseVideo
Initial	19
Final	0C 0C
End

Id	Commodore C-128
See ADM-31
End

Id	Cromemco 3100
CurPos	1B 46
RowFirst
Offset	20
End

Id	CT82
{DF}
CurPos	0B
ColFirst
Offset	0
EraseEOL 06
EraseEOS 16
End

Id	DataMedi (is this its real name?)
ClearScreen
EraseEOS	0B
EraseEOL	1D
CurPos		1E
ColFirst
End

Id	DataVue DisplayMaster 132C
{WS}
CurPos	1B 3D
Between 3B
Trail	0D
RowFirst
Offset	0
Ascii	3
EraseEOL 1B 54
DelLine 1B 52
InsLine 1B 45
{No fore/back}

Id	DEC Rainbow
{DF}
CurPos	1B 5B
Between	3B
Trail	48
RowFirst
Offset	1
Ascii	2
Home	1B 5B 66
ClearScreen	1B 5B 32 4A
InsLine	1B 5B 31 4C
DelLine	1B 5B 31 4D
EraseEOL 1B 5B 4B
EraseEOS 1B 5B 4A {MX}
{DelChar 1B 5B 31 50  MX}
EnhOn	1B 5B 31 6D
EnhOff	1B 5B 30 6D
{InsMode 1B 5B 34 68  MX}
{NoInsMode 1B 5B 34 6C  MX}
End

Id	DEC VT-100
{WS DF}
CurPos	1B 5B
Between	3B
Trail	48
RowFirst
Offset	1
Ascii	2
EraseEOL 1B 5B 4B
{No InsLine, DelLine}
EnhOn	1B 5B 37 6D
EnhOff	1B 5B 6D
Remark	Set VT-100 in 80 col mode.
Remark	Highlight works only for VT-100 Advanced Video Option
{
Home	1B 4A
ClearScreen 1B 48
EraseEOL 1B 4B
EraseEOS 1B 4A
}
End

Id	DEC VT-52
{VD DF MX}
CurPos	1B 3D	{what's right???}
CurPos	1B 59	{2 votes}
RowFirst
Offset	20
EraseEOL 1B 4B
EraseEOS 1B 4A
Home	1B 48
ClearScreen	1B 45
ClearScreen	1B 48  1B 4A
{No InsLine, DelLine}
EnhOn	1B 70
EnhOff	1B 71
End

Id	Epson PX-8
Curpos	1B 3D
RowFirst
Offset	20
{No HiBitInverseVideo}
{not MemoryMapped}
{No Insert/Delete Line}
{LCD screen, so no highlight}
Height	8
End

Id	Exidy Sorcerer 30x64
{OR DF}
Height	1E
Width	40
CurPos	1B 3D
RowFirst
Offset	20
ClearScreen	1B 2B
DelLine	1B 52	{DF only}
EraseEOL	1B 54
EraseEOS	1B 59
End

Id	Gemini/MAP80/Nascom 25x80 thru BIOS
{MA}
Curpos	1B 3D
RowFirst
Offset	20
Height	19
Home	1B 0C	{SVC}
ClearScreen	1A	{homes also}
DelLine	0B	{SVC}
InsLine	0E	{SVC}
EraseEOL	1B 2A
EraseEOS	1B 25
HiBitInverseVideo
End

Id	Gemini SVC 25x80 thru BIOS
{SVC manual}
Initial	1B 61 3A
	{set half intensity attribute + alternate set (i.e. reverse video)}
	{or try 1B 61 36 for half-intens + half-tone}
Curpos	1B 3D
RowFirst
Offset	20
Height	19
Home	1B 0C
ClearScreen	1A	{homes also}
DelLine	0B
InsLine	0E
EraseEOL	1B 2A
EraseEOS	1B 25
HiBitInverseVideo
End

Id	Gemini/MAP80/Nascom 25x80 thru MAP VFC at F800
{MA}
Curpos	1B 3D
RowFirst
Offset	20
MemoryMapped
videoaddress	0F800
Height	19
HiBitInverseVideo
EraseEOL	1B 2A
EraseEOS	1B 25
ClearScreen	1A
End

Id H89
{MX}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 4B
EraseEOS 1B 4A
DelLine 1B 4D
InsLine 1B 4C
ClearScreen 1B 45
{DelChar 1B 4E}
{InsMode 1B 40}
{NoInsMode 1B 4F}
End

Id	Hazeltine 1420
{WS}
Initial	7E 1F
Final	7E 19
CurPos	7E 11
ColFirst
Offset	0
EraseEOL 7E 0F
DelLine 7E 13
InsLine 7E 1A
EnhOn	7E 19
EnhOff	7E 1F
Remark	AUTO LF switch (under the little cover above the
Remark	keyboard) may need to be OFF
Remark	May need additional delays, not supported by DZ.
End

Id	Hazeltine 1500
{HZ WS VD DF}
Curpos	7E 11
ColFirst	
Offset	0
EraseEOL 7E 0F
EraseEOS 7E 18
ClearScreen 7E 1C
Home	7E 12
DelLine 7E 13
InsLine 7E 1A
EnhOn	7E 1F
EnhOff	7E 19
End


Id	Hazeltine Esprit
{VD DF}
Curpos	1B 11
RowFirst
Offset	20	{but DF shows 00, what's right?}
EraseEOL 1B 0F
ClearScreen 1B 1C
Home	1B 12
DelLine 1B 13
InsLine 1B 1A
EnhOn	1B 1F
EnhOff	1B 19
End

Id	Heath H19 / Zenith Z19
{WS VD DF}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 4B
EraseEOS 1B 4A
DelLine 1B 4D
InsLine 1B 4C
EnhOn	1B 70
EnhOff	1B 71
Home	01
ClearScreen	1B 45
End

Id	Hewlett-Packard 125A
{WC}
{HP125A Bios rev A.01.20 2/19/82}
{probably ok for others in HP100 family -- please let me know}
CurPos	1B 26 61
Between	63
Trail	52
ColFirst
Offset	0
Ascii	3
EraseEOL 1B 4B
EraseEOS	1B 4A	{doesn't move cursor}
Home	1B 48
DelLine	1B 4D
InsLine	1B 4C
EnhOn	1B 26 64 4A	{half-intensity inverse}
EnhOff	1B 26 64 40
{display codes for HP are 1B 26 64 xx, where xx = 40 + blinking +
 inverse*2 + underline*4 + halfintense*8}
End

Id	Hewlett-Packard 2621 A/P
{WS DF}
CurPos	1B 26 61
Between	79
Trail	43
RowFirst
Offset	0
Ascii	2
EraseEOL 1B 4B
EnhOn	1B 26 64 4A
EnhOff	1B 26 64 40
Home	1B 48
ClearScreen	1B 4A
InsLine	1B 4C {MX}
DelLine 1B 4D {MX}
End

Id	Hewlett-Packard 2645
{DF}
CurPos	1B 26 61
Between	63
Trail	59
ColFirst
Offset	0
Ascii	2
EraseEOL 1B 4B
Home	1B 48
ClearScreen	1B 4A
End

Id	HH Tiger
{DF}
CurPos	1B 1F
RowFirst
Offset	20
Home	1E
ClearScreen	0C
DelLine	1B 71
EraseEOL 1B 6D
EraseEOS 1B 6F
End

Id	iBEX 7150
{b/s 8, lf 0A, up 0B, right 0C, cr 0D}
ClearScreen {+home} 1A
{Scroll screen down 1C}
Home 1E
{Set reverse zone 1B 3A t b l r  t=0..23, b=t..23, l=0..79, r=l..79 (decimal)}
{Set cursor size 1B 3B m n  m=0..9, n=0..9, m<n}
{Set window  1B 3C t b l r}
CurPos 1B 3D
Offset 20 {also applies for t b l r}
RowFirst
{Move cursor right n cols  1B 3E n  (offset 20)}
{Set Protect Zone  1B 3F t b l r}
{Set 40 col screen  1B 41  80-col  1B 42  120-col/14-row  1B 43}
{Cursor blink fast 1B 44  slow 1B 45}
{Cursor erase 1B 46  normal 1B 47}
EnhOn 1B 48 {rev video}
EnhOff 1B 49
{Half intens 1B 4A  off 1B 4B}
{Blinking 1B 4C off 1B 4D}
{Scr dump to prtr 1B 4E}
{Date/time on scrn 1B 4F off 1B 50}
{Parity on 1B 51 off 1B 52}
{Clear non-window area 1B 53} {Clear/home in window area 1B 54}
EraseEOL 1B 5E 30
EraseEOS 1B 5E 32
{Keys: up arrow 05  dn 18  l 13  r 04}
End

Id	IBM 3101
{WS DF}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 49 {DF}
EraseEOS 1B 4A {DF}
ClearScreen 1B 4C
InsLine	1B 4E {MX}
DelLine 1B 4F {MX}
{DelChar 1B 51 MX}
{InsChar 1B 50 MX}
End

{
Id	IBM PC
Fr DF
CurPos	1B 59
RowFirst
Offset	20
ClearScreen 1b 45
DelLine	1B 4D
InsLine	1B 4C
EraseEOL 1B 4A
EraseEOS none
EnhOn	1B 72
EnhOff	1B 75
End
}

Id	ICL 6402 (KDS 7362)
{DF}
CurPos	1B 3D
RowFirst
Offset	20
Home	1E
ClearScreen 1A
DelLine	1B 52
InsLine	1B 45
EraseEOL 1B 54
EraseEOS 1B 59
EnhOn	1B 62
EnhOff	1B 64
End

Id	Imsai VIO
{WS}
CurPos	1B 3D
RowFirst
Offset	20
MemoryMapped
VideoAddress	F000
Remark	? Does this work ?
End

Id	Infoton I-100
{WS}
CurPos	1B 66
ColFirst
Offset	20
DelLine 1B 4C
InsLine 1B 4D
EnhOn	1B 34
EnhOff	1B 33
End

Id	Interak VDU2K video card thru bios
{TE}
Height	18
Width	40
CurPos	1B 3D
RowFirst
Offset	20
EnhOn	1B 33
EnhOff	1B 34
{Crsr left	08
Tab	09
Curs dn	0A
Curs up	0B
Curs rt 0C
Home	1E
Cr	0D
}
ClearScreen	1A
{Screen is memory mapped, no details rcvd}
End

Id	Kaypro
{VD}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 18
ClearScreen 1A
DelLine 1B 52
InsLine 1B 45
End

Id	Kaypro with hilite
{VD}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 18
ClearScreen 1A
DelLine 1B 52
InsLine 1B 45
EnhOn	1B 42 30 {inverse video}	1B 42 31 {half-intens on}
EnhOff	1B 43 31 {normal video}		1B 43 30 {half-intens off}
End

Id	Kaypro 4
{DF}		{Is a Kaypro 4 something different???}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 18
EraseEOS	17
Home	1E
ClearScreen 1A
DelLine 1B 52
InsLine 1B 45
EnhOn	1B 42 30
EnhOff	1B 43 30
End

Id	Lear Siegler ADM series
See	ADM
End

Id	Liberty
{VD}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54
DelLine 1B 52
InsLine 1B 45
EnhOn	1B 29
EnhOff	1B 28
End

Id	MAP-80 VFC
{Rory O'F}
CurPos	1B 3D
Offset	20
ClearScreen 1A {also homes cursor}
Initial	1B 49	{select inverse video}
DelLine	0B
InsLine	0E
Home	15
EraseEOL 1B 2A
EraseEOS 1B 25
{EnhOn	1B 41 ;	EnhOff	1B 4E }
HiBitInverseVideo
End

Id	Matmos
See Triumph Adler
End

Id	MicroTerm ACT-IV
{WS}
CurPos	14
RowFirst
Offset	0
EraseEOL 1E
EraseEOS 1F
ClearScreen	0C
Home	1D
EnhOn	0E
EnhOff	0E
End

Id	Morrow MDT-20
{VD MX}
CurPos	1B 3D
ColFirst
Offset	20
EraseEOL 1B 54
EnhOn	1B 29
EnhOff	1B 28
ClearScreen 1A {MX}
InsLine 1B 45 {MX}
DelLine 1B 12 {MX}
End

Id	Newbury Labs VDU (what model??)
Curpos	16
Offset	20
{No HiBitInverseVideo}
{not MemoryMapped}
ColFirst	
End

Id	North Star Advantage
{WS VD (discrep)}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54	{OR MAYBE 0E}
EnhOn	1B 29	{OR MAYBE 01}
EnhOff	1B 28	{OR MAYBE 02}	{more info please?}
Remark	Some of the info I have from different 
Remark	sources conflicts.  Are there several
Remark	models of the NS Advantage?  Please tell me.
End

Id	Osborne 1
{VD DF}
Curpos	1B 3D
RowFirst
Offset	20
{No HiBitInverseVideo}
EraseEOL	1B 54
ClearScreen {homes cursor}	1A
DelLine	1B 52
InsLine	1B 45
EnhOn	1B 28	{Half intensity video on}
EnhOff	1B 29	{Normal intensity}
Home	1E
End

Id	Osborne Executive
{VD DF}
Curpos	1B 3D
RowFirst
Offset	20
{No HiBitInverseVideo}
EraseEOL	1B 54
EraseEOS	1B 59
ClearScreen {and home cursor?}	1A	{Fr DF}
ClearScreen {and home cursor?}	1B 5A	{Fr VD}
DelLine	1B 52
InsLine	1B 45
{Fr DF..}
EnhOn	1B 6A
EnhOff	1B 6B
{Fr VD..}
EnhOn	1B 64  1B 28	{what do these escapes do individually?}
EnhOff	1B 62  1B 29
End

Id	Otrona Attache
{VD}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 4B
InsLine 1B 4C
DelLine 1B 4D
EnhOn	1B 55 22
EnhOff	1B 55 20
		{what do 1B 55 28 and 1B 55 20 do?}
End

Id	Perkin Elmer (Bantam) 550
{WS DF}
CurPos	1B 58	{move to row}
Between	1B 59	{move to col}
RowFirst
Offset	20
EraseEOL 1B 49
ClearScreen	1B 4B
End

Id	Philips 2000 Series
{OR DF}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL	1B 4B
EraseEOS	1B 6B
ClearScreen	0C

EnhOn	1B 30 10	{DF}
EnhOff	1B 30 00	{DF}

EnhOn	1B 30 50	{which is right???}
EnhOff	1B 30 28

Home	1A
DelLine	1B 6C
InsLine	1B 4C
End

Id	Pied Piper, ADM-3A
Curpos	1B 3D
RowFirst
Offset	20
HiBitInverseVideo {stripped off by standard PP bios, but my own bios uses}
End

Id	Pied Piper, Hazeltine 1500
Curpos	7E 11
{No HiBitInverseVideo}
{not MemoryMapped}
ColFirst	
Offset	0
EnhOn	7E 1F
EnhOff	7E 19
End

Id	Qume  QVT-102/102A in native mode
{QU}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54
EraseEOS 1B 59
ClearScreen {and home cursor} 1A	{or 1B 2B is identical}
InsLine 1B 45
DelLine 1B 52
EnhOn	1B 29	{half-intensity}
EnhOff	1B 28	{full-intensity (normal at power-on)}
End

Id	Sanyo MBC-1200/1250
{A J McLean}
Height	20
Width	50
Initial	1A
Final	1A
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54
ClearScreen 1A
DelLine	1B 42
InsLine	1B 49
EnhOn	1B 74 04
EnhOff	1B 74 00
End

Id	Sirius 9000
{WS}
Initial	1B 7B 1B 34 33 0E 00
CurPos	1B 59
RowFirst
Offset	20
EraseEOL 1B 4B
DelLine 1B 4D
InsLine 1B 4C
EnhOn	1B 70
EnhOff	1B 71
Remark	Does the Sirius have a Z80???  Please let me know
Remark	AUTO LF and AUTO CR modes must be disabled
End

Id	Soroc IQ-120/140  (also Apple CP/M)
{WS VD DF}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	1B 54
EraseEOS	1B 59	{Fr DF Soroc only}
ClearScreen	0C	{Fr DF Soroc}
ClearScreen	1B 2B
ClearScreen	1B 2A	{Fr DF Apple}
EnhOn	1B 29	{Fr DF Apple}
EnhOff	1B 28	{Fr DF Apple}
End

Id	Soroc new models (which ones?!!)
{VD}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	1B 54
ClearScreen	1A
DelLine	1B 52
InsLine	1B 45
EnhOn	1B 29
EnhOff	1B 28
End

Id	Superbrain
Curpos	1B 59
RowFirst
Offset	20
{No HiBitInverseVideo}
EraseEOL	1B 7E 4B
EraseEOS	1B 7E 6B
End

Id	Superbrain, with reverse video
Curpos	1B 59
RowFirst
Offset	20
{No HiBitInverseVideo}
{not MemoryMapped}
EraseEOL	1B 7E 4B
EraseEOS	1B 7E 6B
EnhOn	1B 7E 52	{reverse video}	{do some S/Brains not have this??}
EnhOff	1B 7E 72	{turn off rvrs vid}
End

Id	Tandberg
{DF}
CurPos	10
RowFirst
Offset	0
ClearScreen 19
DelLine	1B 5B 4D
InsLine	1B 4B 4C
EraseEOL 1B 5B 30 4B
EnhOn	1B 5B 30 6D
EnhOff	1B 5B 32 6D
End

Id	Telcon Zorba
{MZ}
CurPos	1B 59
RowFirst
Offset	20
Height	19
Home	1B 48
ClearScreen {homes cursor}	1B 45
{EraseLine (without moving up) 1B 6B}
{EraseBOL (beginning of line, thru cursor) 1B 6F
EraseEOL 1B 4B
EraseEOS 1B 4A
InsLine	1B 4C
DelLine	1B 4D
{Enter graphics mode	1B 46}
{Exit ditto		1B 4A}
End

Id	Televideo 910
{WS}
Initial	1B 27	{what does this do?}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	1B 54
EnhOn	1B 29
EnhOff	1B 28
Remark	Set switches for either 910 or ADM-3A mode
End

Id	Televideo 912/920
{WS VD (discrep)}
Initial	1B 71 1B 77 1B 43 1B 2C	{what do these do??}
CurPos	1B 3D
RowFirst
Offset	20
{ClearScreen 1A ?}
EnhOn	1B 29
EnhOff	1B 28
ClearScreen 1B 2B {MX}
EraseEOS 1B 59 {MX}
EraseEOL 1B 54 {MX}
InsLine 1B 45 {MX}
DelLine 1B 52 {MX}
{DelChar 1B 57 MX}
{InsChar 1B 51 MX}
End

Id	Televideo 914
{TV}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	1B 54
EraseEOS	1B 59
{ClearScreen 1A ?}
DelLine	1B 52
InsLine	1B 45
{EnhOn	1B 29
EnhOff	1B 28	Write protect mode off
}
EnhOn	1B 47 34	{Full intensity reverse b/grnd}
EnhOff	1B 47 30	{Full intensity normal video}
{other codes exist e.g. invisible, blinking, underline, half intensity,
and these can be combined}
End

Id	Televideo 924
CurPos	1B 3D
RowFirst
Offset	20
EnhOn	1B 29
EnhOff	1B 28
End

Id	Televideo 925/950
{WS}
Initial	1B 3E 1B 77 1B 43 1B 4E	{what do these do??}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	1B 54
{ClearScreen 1A ?}
DelLine	1B 52
InsLine	1B 45
EnhOn	1B 29
EnhOff	1B 28
	{Does this also work for TS800A and TV914?  If not, try}
{EnhOn	1B 47 34}	{reverse current background}
{EnhOff	1B 47 30}
End

Id	Televideo 955
{TV}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	1B 54
EraseEOS	1B 59
{ClearScreen 1A ?}
ClearScreen 1B 2A {Replace all chars with null, reset protect & wr-prot modes}
Home	1E
DelLine	1B 52
InsLine	1B 45	{cursor moves to first col of inserted line}
EnhOn	1B 29		{half-intensity}
EnhOff	1B 28
EnhOn	1B 47 34	{reverse video}
EnhOff	1B 47 30
End

Id	Transam Tuscan 64 x 16
{DF}
Height	10
Width	40
CurPos	04
ColFirst
Offset	0
EraseEOL 03
EraseEOS 15

Id	Transam Tuscan VB4
{DF}
Curpos	7E
ColFirst	
Offset	0
EraseEOL 7E 0F
EraseEOS 7E 18
ClearScreen 7E 1C
Home	7E 12
DelLine 7E 13
InsLine 7E 1A
EnhOn	7E 1E
EnhOff	7E 19
End

Id	Triumph Adler PC (Matmos/Alphatronic)
{OR DF}
Height 18	{or 19?}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL	1B 4B	{1B 19 is same}
EraseEOS	1B 4A
ClearScreen	1B 45 {homes}
Home	1B 48	{1B 11 is same}
ClearScreen	1B 48 1B 4A
DelLine	1B 46
EnhOn	1C	{inverse video}
EnhOff	12
{Init screen driver 1B 0C xx, where xx
	b0 = 0 scroll after writing last scrn pos
	   = 1 home after ditto
	b2 = 0 ctrl key returns 7F
	   = 1 ctrl key conventional
	b3 = 0 no function
	   = 1 ctrl returns 84 in conjunc with console i/p
	b6 = 1 same color available for fg & bg
	   = 0 inhibits same color
	b7 = 0 escape seq clears scrn
	   = 1		doesn't
default at start is 1B 0C 05

1B 09	replace key code table
1B 10 xx  o/p xx blanks
1B 1D xx yy  o/p yy repeated
1B 12	cursor off
1B 13	cursor on
1B 17	return cursor pos in DE (D=line,E=col)
1B 18	o/p char from E
1B 1A  or  1B 43	move cursor right
1B 1C	return in E char at cur pos, move cursor
1B 41	cur up
1B 42	cur down
1B 43	cur right
1B 44	cur left
1B 45	Clear screen & home
1B 31	Set graphic mode (20 to 5F blk grph chs)
1B 32	Exit graphics
1B 49 xx  Insrt blank at crsr pos & shift all chs right up to col xx
	(Last ch is deleted)
1B 47 xx  Del ch at crsr pos, shift rest of line up to col xx left
1B 53 30  Set 40 col width
1B 53 32  Set 80 col width
1B 54 ff bb  Clr scrn, set fgrnd & bkgrnd colors (30..37) (30=black, 37=white)
1B 55 ff bb  Similar, without clr scrn
1B 56 vv	Set scrn attribute 30=normal, 31=blink, 32=inverse, 33=both
}
End

Id	Triumph Adler (unknown model) 
{BB}
CurPos	1B 16
RowFirst
Offset	0
EraseEOL	1B 48
ClearScreen	0C
EnhOn	1C
EnhOff	12
{info fr BB (customer of Rod S) phoned 21 feb 86, further details in mail}
End

Id	TRS80 Model I
{DF}
CurPos	1B 59
{RowFirst or ColFirst???}
Offset	20
Home	1C
ClearScreen 0C
EraseEOL 01
EraseEOS 02
End

Id	TRS80 Model II
{DF}
CurPos	1B 59 1D	{is the 1D correct? compare Models I & 12}
RowFirst
Offset	20
Home	06
ClearScreen 0C
InsLine	04
EraseEOL 1E
EraseEOS 1F
EnhOn	0E
EnhOff	0F
End

Id	TRS80 Model 12 - Pickels & Trout CP/M 2.2
{Terry Pinto}
{also believed to work for TRS80 Models II & 16}
CurPos	1B 59
RowFirst
Offset	20
Home	06
ClearScreen 0C
InsLine	04
DelLine	0B
EraseEOL 01
EraseEOS 02
EnhOn	0E
EnhOff	0F
Initial	0C
Final	0C
Remark	If you would like to use the arrow keys, and you are running
Remark	CP/M 2.2m, you may redefine them to the WordStar equivalents
Remark	using the utility program KXEDIT.COM.
End

Id	TTX3000 ?
{MX}
CurPos 1B 3D
RowFirst
ClearScreen 1A
EraseEOL 1B 54
InsLine 1B 45
DelLine 1B 52
End

Id	VDB 8024
CurPos	1B 3D
RowFirst
Offset	20
ClearScreen 1A
DelLine	1B 52
InsLine	1B 45
EraseEOL 1B 54
EraseEOS 1B 59
EnhOn	1B 47 34
EnhOff	1B 47 30
End

Id	Visual 200
{WS VD DF}
CurPos	1B 59
RowFirst
Offset	20
EraseEOL	1B 78
ClearScreen	1B 76
DelLine	1B 4D
InsLine	1B 4C
EnhOn		1B 34
EnhOff		1B 33
End

Id	Volker Craig 4404
{DF}
CurPos	10
RowFirst
Offset	20
Home	19
ClearScreen	18
EraseEOL	16
EraseEOS	17
EnhOn	0F
EnhOff	0E
End

Id	Wren
{DF}
CurPos	1B 3D
RowFirst
Offset	20
Home	14
ClearScreen	1A
EraseEOL	1B 54
EnhOn	1B 47 34
EnhOff	1B 47 30
End

Id	Wyse WY-50/100/200/300
{VD DF}
Curpos	1B 3D
RowFirst
Offset	20
EraseEOL 1B 54
EraseEOS	1B 59
ClearScreen	1B 2A	{VD}
ClearScreen	1B 2B	{DF}
Home	1B 7B 1E
DelLine 1B 52
InsLine 1B 45
EnhOn	1B 29	{VD}
EnhOff	1B 28	{VD}
{EnhOn, EnhOff reversed	DF}
End

Id	Xerox 820
{OR MX}
CurPos	1B 3D
RowFirst
Offset	20
EraseEOL	18
EraseEOS	11
ClearScreen	1A
End

Id	Xerox 820 -- another way?
{DF}
CurPos	1B 3D
RowFirst
Offset	20
Home	1E
EraseEOL	18
EraseEOS	11
ClearScreen	1B 2A
DelLine	1B 52
InsLine	1B 45
EnhOn	1B 28
EnhOff	1B 29
End

Id	Xerox VDU
{DF}
CurPos	1B 3D
RowFirst
Offset	20
Home	1E
EraseEOL	18
EraseEOS	11
ClearScreen	1A
End

Id	Zenith Z19
See	Heath H19
End

Id	Zorba
See Telcon Zorba
End


{For a full list of the keywords and syntax, refer to the
Installation manual.  To obtain the manuals, read DZ--READ.ME}


{For a full