6502
/
cc65
mirror of https://github.com/cc65/cc65.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Alternative Atmos args

This commit is contained in:
Stefan 2024-03-26 16:40:24 +01:00 committed by GitHub
parent b993d88339
commit 6121aeeea2
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
libsrc/atmos/mainargs.s
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