home *** CD-ROM | disk | FTP | other *** search
- ; 4 8 K S T A N D A R D I Z E D B O O T
- ;
- ; NOTE: MSIZE AND BIOSSZ DETERMINES WHERE THIS BOOT LOADS THE SYSTEM
- ;
- MSIZE EQU 48
- BIOSSZ EQU 512
- ;
- BOOT EQU 0
- START EQU MSIZE*1024-BIOSSZ-1024
- ENDPT EQU MSIZE*1024
- NSECTS EQU (ENDPT-START)/128
- STACK EQU 100H
- ;
- LOWTRK EQU 0
- LOWSCT EQU 2
- LOWSZE EQU NSECTS
- ;
- IOBYTE EQU 0
- ACTDSK EQU 0
- ;
- ;
- ;
- ORG BOOT
- ;
- ;
- LXI SP,STACK
- INIT:
- MAIN:
- MVI C,LOWTRK ;NOW WE READ ONE TRACK
- CALL SETTRK
- LXI B,START ;SET STARTING RAM LOCATION
- LXI D,LOWSZE SHL 8 + LOWSCT
- CALL DO$READ
- LXI H,ACTDSK SHL 8 + IOBYTE
- SHLD 3
- JMP START
- ;
- ;
- DO$READ:
- PUSH B
- PUSH D
- CALL SETDMA
- POP D
- MOV C,E
- PUSH D
- CALL SETSEC
- CALL READ
- POP D
- POP B
- LXI H,128
- DAD B
- MOV B,H
- MOV C,L
- INR E
- DCR D
- JNZ DO$READ
- RET
- ;
- ;
- END BOOT
-