1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-24 00:29:32 +00:00
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> <tscreen><verb>
RUN:REM arg1 " ARG2 IS QUOTED" ARG3 "" ARG5 RUN:REM arg1 " ARG2 IS QUOTED" ARG3 "" ARG5
RUN'arg1
</verb></tscreen> </verb></tscreen>
<enum> <enum>

View File

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