From 6e80ed97285f7ad501576bc20cfaceed2db1a971 Mon Sep 17 00:00:00 2001
From: Jali <jali@orca-central.de>
Date: Tue, 9 Sep 2025 23:21:23 +0200
Subject: [PATCH] Add a device to the input channel

---
 src/SUDOKU.MID | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/SUDOKU.MID b/src/SUDOKU.MID
index 9f57746..df9743d 100644
--- a/src/SUDOKU.MID
+++ b/src/SUDOKU.MID
@@ -102,7 +102,8 @@ PUTLN:  PUSHJ P,OUTSTR                 ;Calls the OUTSTR subroutine
 
 ;Subroutine that reads the contents of the file into the buffer at FIELD
 IMPRTF: .CALL [SETZ ? SIXBIT/OPEN/
-                 [.UAI,,CHDSKI] ? A ? B ((SETZ))]
+            [.UAI,,CHDSKI] ? [SIXBIT/DSK]  ;Mode, channel and device name
+                A ? B ((SETZ))]
          .LOSE %LSFIL                  ;Handle errors after opening the file
         .CALL [SETZ ? SIXBIT/SIOT/
                 [,,CHDSKI] ? [BPTR,,C] ? [,,33] ((SETZ))]