12 lines
260 B
ArmAsm
12 lines
260 B
ArmAsm
.export store_filename
|
|
.importzp ptr1
|
|
|
|
store_filename:
|
|
sta ptr1
|
|
stx ptr1+1
|
|
ldy #$0f ;store filename
|
|
: lda (ptr1),y
|
|
sta $027f,y
|
|
dey
|
|
bpl :-
|
|
rts
|