;=============================
;SUPRBDOS Customization
;
;SUPRBDOS is a derivative of P2DOS by H.A.J. Ten Brugge of the Netherlands.
;It is subject to the same restriction as P2DOS, namely, that it is for
;non-commercial use only.
;
;See SUPRBDOS.DOC for more information on installation.
;
FALSE	EQU	0 
TRUE	EQU	0FFH
;
;Set these conditionals before assembly 
;Conditionals 
DOTIME	EQU	FALSE			; True if time-stamping is supported 
;Only one of these should be true:  
M80	EQU 	FALSE			; True if using M80 or compatible
Z80MR	EQU	TRUE		 	; True if using Z80MR 
;
	IF	M80
	CSEG
	ENDIF
;
;
;Some systems, like the Kaypro 4, only recognize changes between single 
;and double sided disks when the system is warm booted; bdos function 13 
;(reset disk) will not work.  By adding a "hook" to the bios of these 
;machines and setting RESDSK to TRUE, bdos functions 13 and 37 will 
;allowchanges between single and double sided disks.  Very handy for disk
;housekeeping utilities such as NSWP, NULU, and cataloging programs.  
;  
;The "hook" is added as follows: Obtain the source to your computer's BIOS.  
;Examine the code for WARM BOOT.  Somewhere, there should be a call to 
;a routine which initializes the disk system after a warm boot, or which 
;detects changes between single and double sided disks.  Call this routine
;DISKINT for purposes of discussion.  Modify your bios's cold boot routine to
;initialize 3 bytes at address SETDSK as "JP DISKINT".  The location of SETDSK
;is arbitrary, it may be in your bios, or in a reserved spot in CP/M's page 0.
;
RESDSK	EQU	FALSE
	IF	RESDSK
	;address of JP DISKINIT set by modified Kaypro bios
	;change to suit your system.
SETDSK	EQU	04BH			
	ENDIF
;
	IF	M80
	.Z80
;	$INCLUDE ORG.DAT
	$INCLUDE DOS1.MAC
	$INCLUDE DOS2.MAC
	ENDIF
;	
	IF	Z80MR
*INCLUDE	ORG.DAT
*INCLUDE	DOS1.MAC
*INCLUDE	DOS2.MAC
	ENDIF
;
	END
;