.Xlist

;System Constants Definiton File
;Morrow Designs, Inc.
;Namdar Bolour
;25-Jul-84

;---------------------------------------------------------------------------
;This file defines commonly-used addresses, constants, and data storage areas
;for use by other programs that INCLUDE this file.

;---------------------------------------------------------------------------
;Addresses:
;----------
;
Bdos	EQU	5	;Jump to Bdos.
Bios	EQU	0	;Jump to Bios warm boot entry.
BiosPt	EQU	Bios + 1 ;Bios start address.
TpaStr	EQU	100	;Starting address of TPA.

;---------------------------------------------------------------------------
;ASCII Character constants:
;--------------------------
;
Cr	EQU	0D	;Carriage return.
Lf	EQU	0A	;Line feed.
Blank	EQU	' '
Delete	EQU	0ff	;Delete character.
ContlZ	EQU	1a	;Control-Z.

;------------------------------------------------------------------------
;Bdos functions numbers:
;-----------------------
;
ConsIn	EQU	1	
ConOut	EQU	2
ConsIO	EQU	6
PrtStr	EQU	9
InpBuf	EQU	0a
GetVer	EQU	0c	;Get version number.
ClsFil	EQU	10	;Close file.
DelFil	EQU	13	;Delete file.
WriteS	EQU	15	;Write Sequential.
MakFil	EQU	16	;Make file.
CurDsk	EQU	19	;Get current disk.
StDma	EQU	1a	;Set DMA address.
GetAlv	EQU	1b	;Return address of Allocation Vector.
GetDpb	EQU	1f	;Get Dpb Address.
MulSec	EQU	2c	;Set Multi Sector Count.
ClBios	EQU	32	;Direct Bios Call function #50.
GetSer	EQU	6b	;Get CP/M serial number.	
PrtBlk	EQU	6f	;Print Block function #111.

;-------------------------------------------------------------------------
;BIOS function numbers:
;----------------------
;
Boot	EQU	0
WBoot	EQU	1
ConSt	EQU	2
ConIn	EQU	3
CnOut	EQU	4
List	EQU	5
AuxOut	EQU	6
AuxIn	EQU	7
Home	EQU	8
SelDsk	EQU	9
SetTrk	EQU	0a
SetSec	EQU	0b
SetDma	EQU	0c
Read	EQU	0d
Write	EQU	0e
ListSt	EQU	0f
SecTrn	EQU	10
ConOSt	EQU	11
AuxISt	EQU	12
AuxOSt	EQU	13

;-------------------------------------------------------------------------
;Data storage areas:
;-------------------
;
ConBuf	EQU	80	;Start of buffer for Bdos Read Console Buffer func-
			;tion # 10.
	MaxChr	EQU	ConBuf + 0
	NumChr	EQU	ConBuf + 1
	ChStrt	EQU	ConBuf + 2	

;Default file control block definitions:
;
DefFcb	EQU	5c
	DrvCod	Equ	DefFcb + 0	;Drive code
	FilNam	Equ	DefFcb + 1	;File name
	FilTyp	Equ	DefFcb + 9	;File type
	FlXtnt	Equ	DefFcb + 0c	;File extent
	ResS12	Equ	DefFcb + 0d	;Reserved CP/M S1 and S2 bytes
	RecCnt	Equ	DefFcb + 0f	;Record count
	File2	Equ	DefFcb + 10	;2nd file spec. (d0...dn)
	CurRec	Equ	DefFcb + 20	;Current record
	RanRec	Equ	DefFcb + 21	;Random record bytes R1, R2, R3

.List