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

Different approach to open CHTTY

Browse Source
This commit is contained in:
Alexander Noack
2025-08-03 14:07:22 +02:00
parent 123a73966f
commit e18db15be4
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/SUDOKU.ASM
View File

@@ -17,7 +17,8 @@ BPTR==440700 ;Define a byte pointer.
CHTTYO==1 ;Define a channel for TTY output. CHTTYO==1 ;Define a channel for TTY output.
START: MOVE P,[-PDLLEN,,PDL-1] ;Initialize the stack. START: MOVE P,[-PDLLEN,,PDL-1] ;Initialize the stack.
.OPEN CHTTYO,[.UAO,,'TTY] ;Open the output channel. .CALL [SETZ ? SIXBIT/OPEN/
[.UAO,,CHTTYO] ? [SIXBIT/TTY/] ((SETZ))]
.LOSE %LSFIL ;Gobble up error messages. .LOSE %LSFIL ;Gobble up error messages.
MOVE A,[BPTR,,HELLO] ;Load A with a byte pointer to HELLO. MOVE A,[BPTR,,HELLO] ;Load A with a byte pointer to HELLO.
JRST DONE ;Jump to the end of the program. JRST DONE ;Jump to the end of the program.