This commit is contained in:
Stefan 2024-04-27 20:22:33 +02:00 committed by GitHub
commit 512822ed65
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
2 changed files with 5 additions and 2 deletions

View File

@ -235,6 +235,7 @@ supported directly by BASIC, the following syntax was chosen:
<tscreen><verb>
RUN:REM arg1 " ARG2 IS QUOTED" ARG3 "" ARG5
RUN'arg1
</verb></tscreen>
<enum>

View File

@ -40,15 +40,17 @@ L1: sta name,y
ldx #0
L2: lda BASIC_BUF,x
beq done ; No "rem", no args.
beq done ; No remark, no args.
inx
cmp #REM
beq L4
cmp #'''
bne L2
; The arguments must be copied to a safe place because BASIC's input buffer
; might be re-used by the stdin console.
ldy #(SCREEN_XSIZE * 2 - 1) - 1
L4: ldy #(SCREEN_XSIZE * 2 - 1) - 1
L3: lda BASIC_BUF,y
sta args,y
dey