;--------------------------------------
; 2 June 1989
; DISKPLUS.MAC
;
zdirbuf	equ	0FD00H	;directory buffer

fb	equ	4	;nb of logical sector/physical sector (128/512)

			;physical drive 0
nbtrk0	equ	40		;total tracks
sptt0	equ	10		;physical sector/track
spt0	equ	sptt0*fb	;logical sector/track
off0	equ	2		;system track or number of tracks
				;before directory
bsh0	equ	04		;block shift
blm0	equ	0fh		;block mask
				;dsm = maximum allocation block number -1
				;exm= extent mask (not used in xtaldos)
dsm0	equ	(nbtrk0-off0)*spt0/(blm0+1)-1
	if	(dsm0+1)	and	0ff00h
		exm0	equ	bsh0-3-1
	else
		exm0	equ	bsh0-3
	endif
				;drm = number of directories entries -1
drm0	equ	(blm0+1)*4-1
al00	equ	080H		;allocation blocks for the directory
al01	equ	00
cks0	equ	blm0+1		;size of buffer for directory checking
;===============================
				;physical drive 1 same as drive 0
nbtrk1	equ	nbtrk0
sptt1	equ	sptt0 
spt1	equ	spt0  
bsh1	equ	bsh0  
blm1	equ	blm0  
off1	equ	off0  
dsm1	equ	dsm0  
drm1	equ	drm0  
exm1	equ	exm0
al10	equ	al00  
al11	equ	al01  
cks1	equ	cks0  
;===============================
	            		;physical drive 2
nbtrk2	equ	80
sptt2	equ	20
spt2    equ	sptt2*fb
bsh2    equ	04
blm2     equ	0fh
off2	equ	1	;1 system track to keep compatibility with Xtaldos
dsm2	equ	(nbtrk2-off2)*spt2/(blm2+1)-1
	if	(dsm2+1)	and	0ff00h
		exm2	equ	bsh2-3-1
	else
		exm2	equ	bsh2-3
	endif
drm2     equ	2*(blm2+1)*4-1
al20     equ	0c0h
al21     equ	0
cks2     equ	2*(blm2+1)

;--------------------------------------