;this is a quick bootstrap that loads at track 0 sector 1
;it will be put into memory at 0000 by the Sdprom bootstrap disk read
;then it will be executed and read in the rest of the first two tracks

MSIZE	EQU	56
PROM	EQU	0F000H
LOADER	EQU	PROM+02DH	;LOADS IN 'N' SECTORS
BIOS	EQU	5A00H+(MSIZE-24)*1024
NREC	EQU	045H		;STORAGE FOR 'N' RECORDS
SCTR	EQU	043H		;STORE FOR CURRENT SECTOR
TADDR	EQU	040H		;STORE FOR TRANSFER ADDRESS
STACK	EQU	0080H		;STACK LOCATION
NUMBR	EQU	051		;NUMBER OF SECTORS TO LOAD
;
	LXI	SP,STACK
	LXI	H,2H		;set sector to 2 and track to 0
	SHLD	SCTR
	LXI	H,BIOS-1600H
	SHLD	TADDR
	MVI	A,NUMBR
	STA	NREC
	CALL	LOADER
	JMP	BIOS

	END