Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-12-01 20:50:06 +00:00
Code Issues Projects Releases Wiki Activity

DeskTop: mli relay params

Browse Source
This commit is contained in:
Joshua Bell 2018-01-17 17:49:27 -08:00
parent 263e0a7730
commit 2a96dfdd8b
1 changed files with 67 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

98
desktop/desktop.s
View File

@ -15181,8 +15181,12 @@ L9558: lda $E6EC,x
sty text_buffer2::length sty text_buffer2::length
rts rts
L9569: .byte 2 .proc rename_params
.byte $20, $02, $C0, $1F params: .byte 2
path: .addr $220
newpath:.addr $1FC0
.endproc
L956E: .byte 0 L956E: .byte 0
.byte 0 .byte 0
L9570: .byte $1F L9570: .byte $1F
@ -15311,7 +15315,7 @@ L9674: inx
cpy L9709 cpy L9709
bne L9674 bne L9674
stx $1FC0 stx $1FC0
yax_call JT_MLI_RELAY, L9569, RENAME yax_call JT_MLI_RELAY, rename_params, RENAME
beq L969E beq L969E
jsr L4030 jsr L4030
bne L9696 bne L9696
@ -15380,20 +15384,38 @@ buffer: .addr $800
ref_num:.byte 0 ref_num:.byte 0
.endproc .endproc
L9710: .byte $04 .proc read_params3
L9711: .byte $00,$18,$97,$04,$00,$00,$00,$00 params: .byte 4
.byte $00,$00,$00 ref_num:.byte 0
buffer: .addr L9718
request:.word 4
trans: .word 0
.endproc
L9718: .res 4, 0
.proc close_params6 .proc close_params6
params: .byte 1 params: .byte 1
ref_num:.byte 0 ref_num:.byte 0
.endproc .endproc
L971E: .byte $04 .proc read_params4
L971F: .byte $00,$AD,$97,$27,$00,$00,$00 params: .byte 4
L9726: .byte $04 ref_num:.byte 0
L9727: .byte $00,$2E,$97,$05,$00,$00,$00,$00 buffer: .addr L97AD
.byte $00,$00,$00,$00,$00,$00,$00,$00 request:.word $27
trans: .word 0
.endproc
.proc read_params5
params: .byte 4
ref_num:.byte 0
buffer: .addr L972E
request:.word 5
trans: .word 0
.endproc
L972E: .res 5, 0
.res 4, 0
L9737: .byte $01 L9737: .byte $01
L9738: .byte $00 L9738: .byte $00
@ -15408,9 +15430,13 @@ params: .byte 1
path: .addr $0220 path: .addr $0220
.endproc .endproc
L973E: .byte $03,$20,$02,$00 .proc open_params4
.byte $0D params: .byte 3
L9743: .byte $00 path: .addr $220
buffer: .addr $0D00
ref_num:.byte 0
.endproc
L9744: .byte $03,$C0,$1F,$00,$11 L9744: .byte $03,$C0,$1F,$00,$11
L9749: .byte $00 L9749: .byte $00
@ -15429,9 +15455,19 @@ L9757: .byte $0A,$00,$00
L975A: .byte $07,$C0,$1F,$C3,$00,$00,$00,$00 L975A: .byte $07,$C0,$1F,$C3,$00,$00,$00,$00
.byte $00,$00,$00,$00 .byte $00,$00,$00,$00
L9766: .byte $07,$C0,$1F .proc create_params2
L9769: .byte $00,$00,$00,$00 params: .byte 7
L976D: .byte $00,$00,$00,$00,$00,$00,$00 path: .addr $1FC0
access: .byte 0
type: .byte 0
auxtype:.word 0
storage:.byte 0
cdate: .word 0
ctime: .word 0
.endproc
.byte $00,$00
file_info_params2: .byte $0A,$20,$02 file_info_params2: .byte $0A,$20,$02
L9777: .byte $00 L9777: .byte $00
L9778: .byte $00,$00,$00 L9778: .byte $00,$00,$00
@ -15512,8 +15548,8 @@ L9809: yax_call JT_MLI_RELAY, open_params3, OPEN
L981E: lda open_params3::ref_num L981E: lda open_params3::ref_num
sta $E060 sta $E060
sta L9711 sta read_params3::ref_num
L9827: yax_call JT_MLI_RELAY, L9710, READ L9827: yax_call JT_MLI_RELAY, read_params3, READ
beq L983C beq L983C
ldx #$80 ldx #$80
jsr L4033 jsr L4033
@ -15535,8 +15571,8 @@ L985A: rts
L985B: inc $E05F L985B: inc $E05F
lda $E060 lda $E060
sta L971F sta read_params4::ref_num
L9864: yax_call JT_MLI_RELAY, L971E, READ L9864: yax_call JT_MLI_RELAY, read_params4, READ
beq L987D beq L987D
cmp #$4C cmp #$4C
beq L989F beq L989F
@ -15552,8 +15588,8 @@ L987D: inc $E10D
lda #$00 lda #$00
sta $E10D sta $E10D
lda $E060 lda $E060
sta L9727 sta read_params5::ref_num
yax_call JT_MLI_RELAY, L9726, READ yax_call JT_MLI_RELAY, read_params5, READ
L989C: lda #$00 L989C: lda #$00
rts rts
@ -15780,12 +15816,12 @@ L9A95: sta L9B30
L9AA8: ldy #$07 L9AA8: ldy #$07
L9AAA: lda file_info_params2,y L9AAA: lda file_info_params2,y
sta L9766,y sta create_params2,y
dey dey
cpy #$02 cpy #$02
bne L9AAA bne L9AAA
lda #$C3 lda #$C3
sta L9769 sta create_params2::access
lda $E05B lda $E05B
beq L9B23 beq L9B23
jsr L9C01 jsr L9C01
@ -15793,17 +15829,17 @@ L9AAA: lda file_info_params2,y
ldy #$11 ldy #$11
ldx #$0B ldx #$0B
L9AC8: lda file_info_params2,y L9AC8: lda file_info_params2,y
sta L9766,x sta create_params2,x
dex dex
dey dey
cpy #$0D cpy #$0D
bne L9AC8 bne L9AC8
lda L976D lda create_params2::storage
cmp #$0F cmp #$0F
bne L9AE0 bne L9AE0
lda #$0D lda #$0D
sta L976D sta create_params2::storage
L9AE0: yax_call JT_MLI_RELAY, L9766, CREATE L9AE0: yax_call JT_MLI_RELAY, create_params2, CREATE
beq L9B23 beq L9B23
cmp #$47 cmp #$47
bne L9B1D bne L9B1D
@ -16064,14 +16100,14 @@ L9D51: jsr L9E03
L9D5C: jsr LA46D L9D5C: jsr LA46D
jmp LA479 jmp LA479
L9D62: yax_call JT_MLI_RELAY, L973E, OPEN L9D62: yax_call JT_MLI_RELAY, open_params4, OPEN
beq L9D73 beq L9D73
jsr LA49B jsr LA49B
jmp L9D62 jmp L9D62
L9D73: rts L9D73: rts
L9D74: lda L9743 L9D74: lda open_params4::ref_num
sta L974B sta L974B
sta L9738 sta L9738
sta mark_params::ref_num sta mark_params::ref_num