diff --git a/Source/HBIOS/cvdu.asm b/Source/HBIOS/cvdu.asm
index 05f9cb34..2b30d6d1 100644
--- a/Source/HBIOS/cvdu.asm
+++ b/Source/HBIOS/cvdu.asm
@@ -58,7 +58,7 @@ CVDU_INIT1:
 	PRTS("KB$")
 	CALL	CVDU_LOADFONT		; LOAD FONT DATA FROM ROM TO CVDU STRORAGE
 	CALL	CVDU_VDARES
-	CALL	KBD_INIT		; INITIALIZE KEYBOARD DRIVER
+;	CALL	KBD_INIT		; INITIALIZE KEYBOARD DRIVER
 
 	; ADD OURSELVES TO VDA DISPATCH TABLE
 	LD	BC,CVDU_FNTBL		; BC := FUNCTION TABLE ADDRESS
@@ -373,7 +373,7 @@ CVDU_LOADFONT:
 	LD	(CVDU_STACK),SP		; SAVE STACK
 	LD	HL,(CVDU_STACK)		; AND SHIFT IT
 	LD	DE,$2000		; DOWN 4KB TO
-	CCF				; CREATE A
+	OR	A			; CREATE A
 	SBC	HL,DE			; DECOMPRESSION BUFFER
 	LD	SP,HL			; HL POINTS TO BUFFER
 	EX	DE,HL			; START OF STACK BUFFER
@@ -430,7 +430,7 @@ CVDU_XY2IDX:
 	RET				; RETURN
 ;
 ;----------------------------------------------------------------------
-; WRITE VALUE IN A TO CURRENT VDU BUFFER POSTION, ADVANCE CURSOR
+; WRITE VALUE IN A TO CURRENT VDU BUFFER POSITION, ADVANCE CURSOR
 ;----------------------------------------------------------------------
 ;
 CVDU_PUTCHAR:
@@ -442,7 +442,7 @@ CVDU_PUTCHAR:
 	CALL	CVDU_WRX		; DO IT
 
 	; PUT THE CHARACTER THERE
-	POP	AF			; RECOVER CHARACTER VALLUE TO WRITE
+	POP	AF			; RECOVER CHARACTER VALUE TO WRITE
 	LD	C,31			; DATA REGISTER
 	CALL	CVDU_WR			; DO IT
 
diff --git a/Source/HBIOS/hbios.asm b/Source/HBIOS/hbios.asm
index 6f19af58..e696311f 100644
--- a/Source/HBIOS/hbios.asm
+++ b/Source/HBIOS/hbios.asm
@@ -2798,7 +2798,7 @@ SYS_VER:
 ; SET ACTIVE MEMORY BANK AND RETURN PREVIOUSLY ACTIVE MEMORY BANK
 ;   NOTE THAT IT GOES INTO EFFECT AS HBIOS FUNCTION IS EXITED
 ;   HERE, WE JUST SET THE CURRENT BANK
-;   CALLER MUST EXTABLISH UPPER MEMORY STACK BEFORE INVOKING THIS FUNCTION!
+;   CALLER MUST ESTABLISH UPPER MEMORY STACK BEFORE INVOKING THIS FUNCTION!
 ;
 SYS_SETBNK:
 #IF (MEMMGR == MM_Z280)
@@ -3191,8 +3191,8 @@ SYS_PEEK:
 	PUSH	IY
 	DI
   #ELSE
-	LD	A,I
-	DI
+	LD	A,I			; SAVE THE INTERRUPT STATUS
+	DI				;  COPY IFF2 TO P/V FLAG
 	PUSH	AF
   #ENDIF
 #ENDIF
@@ -3204,8 +3204,8 @@ SYS_PEEK:
 	.DB	$FD,$ED,$6E		; LDCTL	(C),IY
 	POP	IY
   #ELSE
-	POP	AF
-	JP	PO,$+4
+	POP	AF			; RECALL INITIAL INTERRUPT STATUS
+	JP	PO,$+4			; RETURN TO INITIAL STATE
 	EI
   #ENDIF
 #ENDIF
diff --git a/Source/HBIOS/vga.asm b/Source/HBIOS/vga.asm
index e6e7f6a8..dea1aea8 100644
--- a/Source/HBIOS/vga.asm
+++ b/Source/HBIOS/vga.asm
@@ -528,7 +528,7 @@ VGA_LOADFONT:
 	LD	(VGA_STACK),SP		; SAVE STACK
 	LD	HL,(VGA_STACK)		; AND SHIFT IT
 	LD	DE,$2000		; DOWN 4KB TO
-	CCF				; CREATE A
+	OR	A			; CREATE A
 	SBC	HL,DE			; DECOMPRESSION BUFFER
 	LD	SP,HL			; HL POINTS TO BUFFER
 	EX	DE,HL			; START OF STACK BUFFER