hdromtbl

;
;
;*****ROM***** <HD>
;
;   COMMAND SEARCH TABLE
CMDTBL	.BYT 'IVMPCRS'
; 0 = INITIALIZE
; 1 = VALIDATE
; 2 = MEMORY
; 3 = POINT (RECORD)
; 4 = COPY
; 5 = RENAME
; 6 = SCRATCH
; 7 = NEW (NON-RESIDENT)
; 8 = LOAD (PSUEDO CMD)
VAL	= 01            ;VALIDATE
NCMDS	=*-CMDTBL
;  JUMP TABLE LOW
CJUMPL	.BYT <INTDRV
	.BYT <VERDIR
	.BYT <MEM
	.BYT <RECORD
	.BYT <DSKCPY
	.BYT <RENAME,<SCRTCH
;  JUMP TABLE HIGH
CJUMPH	.BYT >INTDRV
	.BYT >VERDIR
	.BYT >MEM
	.BYT >RECORD
	.BYT >DSKCPY
	.BYT >RENAME,>SCRTCH
.PAGE 'ROMTBL'
; STRUCTURE IMAGES FOR CMDS
PCMD	= 5             ;1ST PARSED CMD <HD>
	.BYT %01010001  ; COPY
STRUCT	=*-PCMD         ; CMDS NOT PARSED
	.BYT %11011101  ; RENAME
	.BYT %00011100  ; SCRATCH
LDCMD	=*-STRUCT       ; LOAD CMD IMAGE
	.BYT %00011100  ; LOAD
;            --- ---
;            PGDRPGDR
;            FS1 FS2
.SKIP
;   BIT REPS:  NOT PATTERN
;              NOT GREATER THAN ONE FILE 
;              NOT DEFAULT DRIVE(S) 
;              REQUIRED FILENAME
.SKIP
MODLST	.BYT 'RWAM'     ; MODE TABLE
NMODES	=*-MODLST
;FILE TYPE TABLE
TPLST	.BYT 'DSPUL'
TYPLST	.BYT 'DSPUR'    ;DEL, SEQ, PROG, USER, RELATIVE
NTYPES	=*-TYPLST
TP1LST	.BYT 'EERSE'
TP2LST	.BYT 'LQGRL'
;
; ERROR FLAG VARS FOR BIT
;
ER00	.BYT 0
ER0	.BYT $3F
ER1	.BYT $7F
ER2	.BYT $BF
ER3	.BYT $FF
;
IPBM	.BYTE $29,$2A
DOMSK	.BYTE $00,$80   ;DOOR OPEN MASK
HDNTK	.BYT 255,76     ;INNERMOST TRACK #
;
;  NUMBER OF SECTORS PER TRACK OF DISKETTE
;
SECTRK
	.BYT 50,49,47,45,44,42,41,40
	.BYT 38,37,36,35,34,33,32,31
	.BYT 30,30,29
;
;  TABLE OF HIGH TRACK IN EACH ZONE
;     FOR HARDWARE ZONES
;
ZONTBL
	.BYTE 07,14,19,25,29,34,38,43
	.BYTE 46,50,53,57,60,65,68,70
	.BYTE 73,75,255
.END