Replace '0' with ' '

2026-01-11 14:26:25 +01:00
parent 2c11b2ff26
commit 9d1f276175
1 changed files with 2 additions and 0 deletions
--- a/src/sudoku.s
+++ b/src/sudoku.s
@@ -119,6 +119,8 @@ PFIELN: .IOT  CHTTYO,[^M]              ;Print a carriage return.
 PFIENO: .IOT  CHTTYO,[040]             ;Print a space.
        ILDB  B,X                      ;Load the next field.
        ADDI  B,060                    ;Convert number into char.
+        CAIN  B,060                    ;If B is not '0', skip
+        MOVEI B,040                    ;Replace '0' with a space character.   
        .IOT  CHTTYO,B                 ;Print the number.
        .IOT  CHTTYO,[040]             ;Print a space
        .IOT  CHTTYO,[174]             ;Print a '|' symbol