Incorporate FDISK80

This commit is contained in:
Wayne Warthen
2016-03-21 17:05:57 -07:00
parent 5adbef5f68
commit b4fc05acfb
68 changed files with 2004 additions and 1829 deletions

View File

@@ -59,7 +59,7 @@ MEMTOP .EQU $10000
#ENDIF
;
#IFDEF PLTUNA
#INCLUDE "../HBIOS/ubios.inc"
#INCLUDE "../UBIOS/ubios.inc"
#ENDIF
;
.ORG CBIOS_LOC ; DEFINED IN STD.ASM
@@ -1790,19 +1790,14 @@ INIT:
LD HL,($FFFE) ; UNA ENTRY VECTOR
LD (9),HL ; STORE AT 0x0009
#ELSE
; ASK HBIOS FOR CRITICAL BANK ID'S (BIOS AND USER BANKS)
; SAVE THESE VALUES FOR LATER USE
LD B,BF_SYSHCBGETB ; HB FUNC: GET HCB BYTE
LD C,HCB_BIDBIOS ; BIOS BANK ID
CALL $FFF0 ; RST 8 IS NOT YET INSTALLED
LD A,E ; PUT IN A
LD (BNKBIOS),A ; SAVE IT
LD B,BF_SYSHCBGETB ; HB FUNC: GET HCB BYTE
LD C,HCB_BIDUSR ; USER BANK ID
CALL $FFF0 ; RST 8 IS NOT YET INSTALLED
LD A,E ; PUT IN A
LD (BNKUSER),A ; SAVE IT
LD B,BF_SYSGET ; HBIOS FUNC=GET SYS INFO
LD C,BF_SYSGET_BNKINFO ; HBIOS SUBFUNC=GET BANK ASSIGNMENTS
CALL $FFF0 ; CALL HBIOS, RST 08 NOT YET INSTALLED
LD A,D ; GET HBIOS BANK RETURNED IN D
LD (BNKBIOS),A ; ... AND SAVE IT
LD A,E ; GET USER BANK RETURNED IN E
LD (BNKUSER),A ; ... AND SAVE IT
; MAKE SURE USER BANK IS ACTIVE
LD B,BF_SYSSETBNK ; HB FUNC: SET BANK
LD A,(BNKUSER) ; SELECT USER BANK
@@ -1831,11 +1826,6 @@ INIT:
LD (BNKRAMD),A
#ENDIF
; CBIOS BANNER
CALL NEWLINE ; FORMATTING
LD DE,STR_BANNER ; POINT TO BANNER
CALL WRITESTR ; DISPLAY IT
; PARAMETER INITIALIZATION
XOR A ; LOAD DEFAULT IOBYTE
LD (IOBYTE),A ; STORE IT
@@ -1844,6 +1834,11 @@ INIT:
XOR A ; ZERO
LD (DEFDRIVE),A ; STORE IT
; CBIOS BANNER
CALL NEWLINE ; FORMATTING
LD DE,STR_BANNER ; POINT TO BANNER
CALL WRITESTR ; DISPLAY IT
#IFDEF PLTUNA
; SAVE COMMAND PROCESSOR IMAGE TO MALLOCED CACHE IN UNA BIOS PAGE
LD C,$F7 ; UNA MALLOC