added I/O port 2 support for the TI-74 implementation

2025-04-27 18:53:07 +03:00
parent 08c3c869c5
commit 4df14f49f5
2 changed files with 2 additions and 2 deletions
@@ -39,7 +39,7 @@
 480 NEXT I:GOTO 180
 490 IF CMD=4 THEN 500 ELSE 530
 500 FOR I=X TO Y
-510 IF Z=0 THEN INPUT DMEM(I)
+510 IF Z=0 THEN INPUT DMEM(I) ELSE IF Z=2 THEN DMEM(I)=ASC(KEY$)
 520 NEXT I:GOTO 180
 530 IF CMD=6 THEN 540 ELSE 570
 540 IF X=0 THEN DMEM(Z)=Y:GOTO 180