MZ is back!

2024-04-25 22:32:27 +00:00
parent 8ee9712c74
commit 2d04cacc53
1339 changed files with 527719 additions and 3 deletions
@@ -0,0 +1,76 @@
+%OUT MSEQU.INC...
+;==============================================================================
+
+FTOOBIG 	EQU	80H
+FBIG		EQU	40H
+ROMSTATUS	EQU	1
+ROMREAD 	EQU	2
+ROMWRITE	EQU	3
+ROMVERIFY	EQU	4
+ROMFORMAT	EQU	5
+VID_SIZE	EQU 12
+
+INCLUDE MSBDS.INC    ; VARIOUS EQUATES FOR BDS
+
+;AN000; Extended BPB structure.
+BPB_TYPE STRUC
+SECSIZE DW	?
+SECALL	DB	?
+RESNUM	DW	?
+FATNUM	DB	?
+DIRNUM	DW	?
+SECNUM	DW	?
+FATID	DB	?
+FATSIZE DW	?
+SLIM	DW	?
+HLIM	DW	?
+HIDDEN_L  DW	  ?
+HIDDEN_H  dw	  0			;J.K.
+SECNUM_L  dw	  0			;J.K.
+SECNUM_H  dw	  0			;J.K.
+BPB_TYPE ENDS
+
+;;;;;;;;;;;
+BOOT_SERIAL_SIZE	equ	4	;J.K.
+BOOT_VOLUME_LABEL_SIZE	equ	11	;J.K.
+BOOT_SYSTEM_ID_SIZE	equ	8	;J.K.
+EXT_BOOT_SIGNATURE	equ	41	;J.K.
+RSINIT=0A3H		      ;RS232 INITIALIZATION
+			      ;9600 BAUD:NO PARITY:1 STOP:8 BIT WORD
+LF=10			      ;LINE FEED
+CR=13			      ;CARRIAGE RETURN
+BACKSP=8		      ;BACKSPACE
+BRKADR=1BH * 4		      ;006C  1BH BREAK VECTOR ADDRESS
+TIMADR=1CH * 4		      ;0070  1CH TIMER INTERRUPT
+DSKADR=1EH * 4		      ;ADDRESS OF PTR TO DISK PARAMETERS
+SEC9=522H		      ;ADDRESS OF DISK PARAMETERS
+HEADSETTLE=SEC9+9	      ; ARR 2.20 ADDRESS OF HEAD SETTLE TIME
+NORMSETTLE=15		      ; ARR 2.20 NORMAL HEAD SETTLE
+SPEEDSETTLE=0		      ; ARR 2.20 SPEED UP SETTLE TIME
+INITSPOT=534H		      ; ARR IBM WANTS 4 ZEROS HERE
+AKPORT=20H
+EOI=20H
+CMDLEN	=	    0			    ;LENGTH OF THIS COMMAND
+UNIT	=	    1			    ;SUB UNIT SPECIFIER
+CMD	=	    2			    ;COMMAND CODE
+STATUS	=	    3			    ;STATUS
+MEDIA	=	    13			    ;MEDIA DESCRIPTOR
+TRANS	=	    14			    ;TRANSFER ADDRESS
+COUNT	=	    18			    ;COUNT OF BLOCKS OR CHARACTERS
+START	=	    20			    ;FIRST BLOCK TO TRANSFER
+EXTRA	=	    22			    ;USUALLY A POINTER TO VOL ID FOR ERROR 15
+CHROUT	=	    29H
+MAXERR	=	     5
+LSTDRV	=	     504H
+
+BOOTBIAS	=      200H
+NOTBUSYSTATUS	=	10000000B	    ; NOT BUSY
+ACKSTATUS	=	01000000B	    ; ACKNOWLEDGE (FOR WHAT?)
+NOPAPERSTATUS	=	00100000B	    ; NO MORE PAPER
+SELECTEDSTATUS	=	00010000B	    ; THE PRINTER SAID IT WAS SELECTED
+IOERRSTATUS	=	00001000B	    ; SOME KINDA ERROR
+RESERVED	=	00000110B	    ; NOPS
+TIMEOUTSTATUS	=	00000001B	    ; TIME OUT.
+ERROR_UNKNOWN_MEDIA   = 7		    ; FOR USE IN BUILD BPB CALL
+
+PATHGEN 	=	1