mirror of
https://github.com/cc65/cc65.git
synced 2024-12-26 08:32:00 +00:00
Allow longer file names, use BASIC input buffer
git-svn-id: svn://svn.cc65.org/cc65/trunk@1813 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
parent
c024ddbdb2
commit
d0c237bcd8
@ -15,12 +15,9 @@
|
|||||||
|
|
||||||
.proc SETNAM
|
.proc SETNAM
|
||||||
|
|
||||||
; Limit the length of the name and store it into the zero page
|
; Store the length of the name into the zero page
|
||||||
|
|
||||||
cmp #16+1
|
sta FNAM_LEN
|
||||||
bcc @L1
|
|
||||||
lda #16 ; Use a maximum of 16 chars
|
|
||||||
@L1: sta FNAM_LEN
|
|
||||||
|
|
||||||
; Check if we have to copy the name to low memory
|
; Check if we have to copy the name to low memory
|
||||||
|
|
||||||
@ -34,19 +31,19 @@
|
|||||||
stx TMPPTR
|
stx TMPPTR
|
||||||
sty TMPPTR+1 ; Store pointer to name in TMPPTR
|
sty TMPPTR+1 ; Store pointer to name in TMPPTR
|
||||||
|
|
||||||
; Copy the given name into DOS_FN1
|
; Copy the given name into INBUF.
|
||||||
|
|
||||||
ldy #$00
|
ldy #$00
|
||||||
@L2: lda (TMPPTR),y
|
@L2: lda (TMPPTR),y
|
||||||
sta DOS_FN1,y
|
sta INBUF,y
|
||||||
iny
|
iny
|
||||||
cpy FNAM_LEN
|
cpy FNAM_LEN
|
||||||
bne @L2
|
bne @L2
|
||||||
|
|
||||||
; Load the new parameters for the low memory buffer
|
; Load the new parameters for the low memory buffer
|
||||||
|
|
||||||
ldx #<DOS_FN1
|
ldx #<INBUF
|
||||||
ldy #>DOS_FN1
|
ldy #>INBUF
|
||||||
|
|
||||||
; Instead of banking in the ROM, store the values directly into the zeropage
|
; Instead of banking in the ROM, store the values directly into the zeropage
|
||||||
|
|
||||||
|
@ -21,8 +21,7 @@ CURS_Y = $CD ; Cursor row
|
|||||||
SCREEN_PTR = $C8 ; Pointer to current char in text screen
|
SCREEN_PTR = $C8 ; Pointer to current char in text screen
|
||||||
CRAM_PTR = $EA ; Pointer to current char in color RAM
|
CRAM_PTR = $EA ; Pointer to current char in color RAM
|
||||||
|
|
||||||
DOS_FN1 = $25E ; DOS filename buffer #1
|
INBUF = $25E ; BASIC Input buffer
|
||||||
DOS_FN1LEN = $26E ; DOS filename length #1
|
|
||||||
CHARCOLOR = $53B
|
CHARCOLOR = $53B
|
||||||
FKEY_COUNT = $55D ; Characters for function key
|
FKEY_COUNT = $55D ; Characters for function key
|
||||||
FKEY_SPACE = $55F ; Function key definitions
|
FKEY_SPACE = $55F ; Function key definitions
|
||||||
|
Loading…
Reference in New Issue
Block a user