-
Notifications
You must be signed in to change notification settings - Fork 0
/
tape make.asm
48 lines (42 loc) · 1.1 KB
/
tape make.asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
*=664
setlfs$=$ffba
setnam$=$$ffbd
load$=$ffd5
save$=$ffd8
start lda #$00
sta $fb
lda #$10
sta $fc
lda #$fb
ldx #$ff
ldy #$10
jsr save$
lda #1
ldx #8
tay
jsr setlfs$
lda #2
ldx #<file_
ldy #>file_
jsr setnam$
lda #0
jsr load$
lda #1
tax
tay
jsr setlfs$
lda #2
ldx #<file_
ldy #>file_
jsr setnam$
lda #$00
sta $fb
lda #$12
sta $fc
lda #$fb
ldx #$ff
ldy #$15
jsr save$
rts
;jmp $1200
file_ byte "tk"