;
;	... MACRO DEFINITIONS FOR DISK PARAMETER GENERATION ...
;
DPBGEN	MACRO	BSIZE,DSIZE	;PASS BLOCK SIZE (IN KBYTES) AND
	.XLIST			; DIRECTORY SIZE (IN DIRECTORY ENTRIES)

BTEMP	DEFL	(BSIZE*1024)/128   ;NUMBER OF 128 BYTE RECORDS/BLOCK
BSHFT	DEFL	0
BMASK	DEFL	0
	REPT	16
	IF	BTEMP EQ 1
	EXITM
	ENDIF
BSHFT	DEFL	BSHFT+1		     ;GENERATE BLOCK SHIFT CONSTANT
BMASK	DEFL	(BMASK SHL 1) OR 1   ;GENERATE BLOCK MASK
BTEMP	DEFL	BTEMP/2
	ENDM

DTEMP	DEFL	DSIZE
DIRMSK	DEFL	0
	REPT	16
	IF	DTEMP EQ 0
	EXITM
	ENDIF
DIRMSK	DEFL	(DIRMSK SHR 1) OR 8000H   ;GENERATE DIRECTORY MASK
	IF	DTEMP GT ((BSIZE*1024)/32)
DTEMP	DEFL	DTEMP-((BSIZE*1024)/32)
	ELSE
DTEMP	DEFL	0
	ENDIF
	ENDM

	.LIST
	ENDM
;