jali/PDP10Sudoku
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix output

Browse Source
This commit is contained in:
Alexander Noack
2025-09-07 22:13:19 +02:00
parent d4363be3b4
commit bd17f8bb79
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/SUDOKU.MID
View File

@@ -20,7 +20,7 @@ CHDSKI==2 ;Read channel for disk input.
JCL: BLOCK 30 ;Reserve space for the command line. JCL: BLOCK 30 ;Reserve space for the command line.
FNAME1: BLOCK 15 ;The first part of the file name. FNAME1: BLOCK 15 ;The first part of the file name.
FNAME2: BLOCK 15 ;The second file name. FNAME2: BLOCK 15 ;The second file name.
FIELD: BLOCK 9 ;Reserve 9 words to FIELD: BLOCK 9 ;Reserve 9 words to store the grid.
;Print flags ;Print flags
;Allows to change the beavihour of the OUTSTR and PUTLN subroutines. ;Allows to change the beavihour of the OUTSTR and PUTLN subroutines.
@@ -103,7 +103,7 @@ PUTLN: PUSHJ P,OUTSTR ;Calls the OUTSTR subroutine
POPJ P, ;before returning. POPJ P, ;before returning.
IMPRTF: PUSH P,A ;Save the A register. IMPRTF: PUSH P,A ;Save the A register.
.OPEN .OPEN CHDSKI,[.UOA,,]
DONE: .LOGOUT 2, ;Exit point for the program. DONE: .LOGOUT 2, ;Exit point for the program.
WELCOME:ASCIZ /SUDOKU SOLVER v0.1/ ;Text of the welcome banner. WELCOME:ASCIZ /SUDOKU SOLVER v0.1/ ;Text of the welcome banner.