From 3a1e9f3b72eaaf56a4c98394ec61e6e843744cd6 Mon Sep 17 00:00:00 2001 From: Wayne Warthen Date: Wed, 29 May 2019 14:57:56 -0700 Subject: [PATCH] Cleanup --- Source/HBIOS/hbios.asm | 42 ++++++++++++++++++++++++++++++------------ 1 file changed, 30 insertions(+), 12 deletions(-) diff --git a/Source/HBIOS/hbios.asm b/Source/HBIOS/hbios.asm index c73dff3a..3773112a 100644 --- a/Source/HBIOS/hbios.asm +++ b/Source/HBIOS/hbios.asm @@ -945,11 +945,13 @@ HB_START1: ; BNKCALL ARRIVES HERE, BUT NOW RUNNING IN RAM BANK LD HL,MSG_HBVER CALL DSKY_SHOWSEG #ENDIF - -#IF (WBWDEBUG=USEMIO) ; BUFFER OUTPUT UNTIL +; +#IF (WBWDEBUG == USEMIO) ; BUFFER OUTPUT UNTIL CALL MIO_INIT ; WE GET TO BOOT MESSAGE #ENDIF ; +#IF 0 +; ; TEST DEBUG *************************************************************************************** ; PRTS("DEBUG-IVT$") @@ -959,6 +961,7 @@ HB_START1: ; BNKCALL ARRIVES HERE, BUT NOW RUNNING IN RAM BANK ; ; TEST DEBUG *************************************************************************************** ; +#ENDIF ; ; DISCOVER CPU TYPE ; @@ -1031,7 +1034,8 @@ HB_CPU1: ; ; PRE-CONSOLE INITIALIZATION ; - +#IF 0 +; ; TEST DEBUG *************************************************************************************** ; CALL NEWLINE @@ -1039,6 +1043,8 @@ HB_CPU1: ; ; TEST DEBUG *************************************************************************************** ; +#ENDIF +; #IF (ASCIENABLE) CALL ASCI_PREINIT #ENDIF @@ -1054,12 +1060,17 @@ HB_CPU1: #IF (PIO_4P | PIO_ZP) CALL PIO_PREINIT #ENDIF +; +#IF 0 +; ; TEST DEBUG *************************************************************************************** ; CALL NEWLINE CALL REGDMP ; ; TEST DEBUG *************************************************************************************** +; +#ENDIF ; DIAG(%01111111) ; @@ -1070,7 +1081,7 @@ HB_CPU1: XOR A ; INITIALLY, FIRST SERIAL UNIT IS CONSOLE LD (CB_CONDEV),A ; SAVE IT, ACTIVATES CONSOLE ON HBIOS -#IF (WBWDEBUG=USEMIO) ; OUTPUT ANY CACHED DEBUG TEXT +#IF (WBWDEBUG == USEMIO) ; OUTPUT ANY CACHED DEBUG TEXT LD HL,MIOOUTPTR LD E,(HL) INC HL @@ -1088,6 +1099,8 @@ NXTMIO: LD A,(HL) ; CALL WRITESTR ; WRITESTR WILL WORK WILL ONLY PRINT UP TO FIRST $ #ENDIF ; +#IF 0 +; ; TEST DEBUG *************************************************************************************** ; CALL NEWLINE2 @@ -1097,6 +1110,8 @@ NXTMIO: LD A,(HL) ; ; TEST DEBUG *************************************************************************************** ; +#ENDIF +; ; ANNOUNCE HBIOS ; CALL NEWLINE2 @@ -2762,10 +2777,10 @@ SIZ_PIO .EQU $ - ORG_PIO #INCLUDE "bcd.asm" #INCLUDE "decode.asm" ; -#IF WBWDEBUG=USEXIO +#IF (WBWDEBUG == USEXIO) #INCLUDE "xio.asm" #ENDIF -#IF WBWDEBUG=USEMIO +#IF (WBWDEBUG == USEMIO) #INCLUDE "mio.asm" #ENDIF ; @@ -3560,11 +3575,12 @@ COUT: ; COUT1: ; -#IF WBWDEBUG=USEXIO +#IF (WBWDEBUG == USEXIO) LD A,E ; GET OUTPUT CHAR BACK TO ACCUM CALL XIO_OUTC ; OUTPUT VIA XIO #ENDIF -#IF WBWDEBUG=USEMIO +; +#IF (WBWDEBUG == USEMIO) LD A,E CALL MIO_OUTC ; OUTPUT VIA MIO #ENDIF @@ -3598,10 +3614,11 @@ CIN: ; CIN1: ; -#IF WBWDEBUG=USEXIO +#IF (WBWDEBUG == USEXIO) CALL XIO_INC ; GET CHAR #ENDIF -#IF WBWDEBUG=USEMIO +; +#IF (WBWDEBUG == USEMIO) CALL MIO_INC ; GET CHAR #ENDIF ; @@ -3633,10 +3650,11 @@ CST: ; CST1: ; -#IF WBWDEBUG=USEXIO +#IF (WBWDEBUG == USEXIO) CALL XIO_IST ; GET STATUS #ENDIF -#IF WBWDEBUG=USEMIO +; +#IF (WBWDEBUG == USEMIO) CALL MIO_IST ; GET STATUS #ENDIF ;