Support for Application Banks

Source/HBIOS/hbios.asm

@@ -334,6 +334,8 @@ CB_BIDRAMD0	.DB	BID_RAMD0
 CB_RAMD_BNKS	.DB	RAMD_BNKS
 CB_BIDROMD0	.DB	BID_ROMD0
 CB_ROMD_BNKS	.DB	ROMD_BNKS
+CB_BIDAPP0	.DB	BID_APP0
+CB_APP_BNKS	.DB	APP_BNKS
 ;
 	.FILL	(HCB + HCB_SIZ - $),0	; PAD REMAINDER OF HCB
 ;
@@ -4422,6 +4424,8 @@ SYS_GET:
 	JP	Z,SYS_GETCPUSPD
 	CP	BF_SYSGET_PANEL
 	JP	Z,SYS_GETPANEL
+	CP	BF_SYSGET_APPBNKS
+	JP	Z,SYS_GETAPPBNKS
 	SYSCHKERR(ERR_NOFUNC)		; SIGNAL ERROR
 	RET
 ;
@@ -4631,6 +4635,8 @@ SYS_GETMEMINFO:
 ;   RETURNS:
 ;     D: HBIOS BANK ID
 ;     E: USER BANK ID
+;     H: FIRST APP BANK ID
+;     L: APP BANK COUNT
 ;
 SYS_GETBNKINFO:
 	LD	A,(CB_BIDBIOS)
@@ -4735,6 +4741,22 @@ SYS_GETPANEL1:	; HANDLE NON-EXISTENT FRONT PANEL
 	OR	A			; SET FLAGS
 	RET				; DONE
 ;
+; GET APPLICATION BANK INFORMATION
+;   RETURNS:
+;     H: FIRST APP BANK ID
+;     L: APP BANK COUNT
+;     E: BANK SIZE (IN 256-BYTE PAGES)
+;
+SYS_GETAPPBNKS:
+	LD	A,(CB_BIDAPP0)		; FIRST BANK ID
+	LD	H,A
+	LD	A,(CB_APP_BNKS)		; NUMBER OF BANKS
+	LD	L,A
+	LD	E,$80			; (256 * $80) = 32KB
+;
+	XOR	A
+	RET
+;
 ; SET SYSTEM PARAMETERS
 ; PARAMETER(S) TO SET INDICATED IN C
 ;