mirror of
https://github.com/cc65/cc65.git
synced 2024-06-24 00:29:32 +00:00
Merge fa07cba622
into b1e1c13d4b
This commit is contained in:
commit
512822ed65
|
@ -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>
|
||||||
|
|
|
@ -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
|
||||||
|
|
Loading…
Reference in New Issue
Block a user