Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-09-27 18:54:49 +00:00
Code Issues Projects Releases Wiki Activity

Common Overlay disasm

Browse Source
This commit is contained in:
Joshua Bell 2018-11-23 10:07:33 -08:00
parent 2c292d80c0
commit 65db2c1e92
3 changed files with 31 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
desktop/desktop_res.s
View File

@ -867,6 +867,7 @@ slot_drive_string_table:
.addr sd0s, sd1s, sd2s, sd3s, sd4s, sd5s, sd6s
.addr sd7s, sd8s, sd9s, sd10s, sd11s, sd12s, sd13s
selector_menu_addr:
.addr selector_menu
;; Buffer for Run List entries

29
desktop/ovl3.s
View File

@ -36,7 +36,7 @@ L9017: lda $0C00
rts
L903C: ldx #$01
copy16 $DB1C, load
copy16 selector_menu_addr, load
load := *+1
lda dummy1234
cmp #$0D
@ -88,7 +88,7 @@ L9093: copy16 $0C00, L938B
lda L938B
jsr L9A0A
inc $0C00
copy16 $DB1C, @addr
copy16 selector_menu_addr, @addr
@addr := *+1
inc dummy1234
jsr L9CEA
@ -258,7 +258,7 @@ L9215: lda L938D
L9220: ldx L938B
inc L938B
inc $0C00
copy16 $DB1C, @addr
copy16 selector_menu_addr, @addr
@addr := *+1
inc dummy1234
txa
@ -495,11 +495,11 @@ L94A7: .byte 0
L94A8: .byte 0
L94A9: MGTK_RELAY_CALL MGTK::MoveTo, pos_D708
addr_call desktop_main::draw_text1, $AE40
addr_call desktop_main::draw_text1, desktop_aux::str_ok_label
rts
L94BA: MGTK_RELAY_CALL MGTK::MoveTo, pos_D70C
addr_call desktop_main::draw_text1, $AE96
addr_call desktop_main::draw_text1, desktop_aux::str_cancel_label
rts
L94CB: stax $06
@ -510,7 +510,7 @@ L94D4: lda ($06),y
sta path_buf2+2,y
dey
bpl L94D4
copy16 #$D487, path_buf2
copy16 #path_buf2+3, path_buf2
MGTK_RELAY_CALL MGTK::DrawText, path_buf2
rts
@ -1068,7 +1068,7 @@ L9AA1: tax
bne L9AC0
L9AA8: dec $0C00
dec L938B
copy16 $DB1C, @addr
copy16 selector_menu_addr, @addr
@addr := *+1
dec dummy1234
jmp L9CEA
@ -1289,7 +1289,7 @@ L9C81: yax_call MLI_RELAY, FLUSH, flush_close_params
yax_call MLI_RELAY, CLOSE, flush_close_params
rts
DEFINE_OPEN_PARAMS open_params2, $9C9A, $800
DEFINE_OPEN_PARAMS open_params2, L9C9A, $800
L9C9A: PASCAL_STRING "Selector.List"
@ -1456,8 +1456,8 @@ L9E05: stax L9E1B
lda LCBANK2
ldx LD3EE
L9E17: lda LD3EE,x
.byte $9D
L9E1B: .addr $1234
L9E1B := *+1
sta dummy1234,x
dex
bpl L9E17
sta ALTZPON
@ -1471,8 +1471,8 @@ L9E2A: stax L9E40
lda LCBANK2
ldx LD3AD
L9E3C: lda LD3AD,x
.byte $9D
L9E40: .addr $1234
L9E40 := *+1
sta dummy1234,x
dex
bpl L9E3C
sta ALTZPON
@ -1488,7 +1488,7 @@ L9E61: jsr L9E74
rts
L9E74: sta L9EBF
addr_call L9E05, $9EC1
addr_call L9E05, L9EC1
lda L9EBF
jsr L9BE2
stax $06
@ -1518,13 +1518,12 @@ L9EAB: inx
cpy L9EC0
bne L9EAB
stx L9EC1
ldax #$9EC1
ldax #L9EC1
rts
L9EBF: .byte 0
L9EC0: .byte 0
L9EC1: .byte 0
;; how much is buffer, how much is padding?
;;; ============================================================

32
desktop/ovl6.s
View File

@ -30,7 +30,7 @@ L7029: lda jump_table_entries+1,x
bpl L7029
lda #$00
sta path_buf0
sta $51AE
sta common_overlay::L51AE
lda #$01
sta path_buf2
lda #$06
@ -51,18 +51,18 @@ jump_table_entries:
.byte $29 ; length of the following data block
jump_table_entry L70B1
jump_table_entry L70EA
jump_table_entry $6593
jump_table_entry $664E
jump_table_entry $6DC2
jump_table_entry $6DD0
jump_table_entry $6E1D
jump_table_entry $69C6
jump_table_entry $6A18
jump_table_entry $6A53
jump_table_entry $6AAC
jump_table_entry $6B01
jump_table_entry $6B44
jump_table_entry $66D8
jump_table_entry common_overlay::L6593
jump_table_entry common_overlay::L664E
jump_table_entry common_overlay::L6DC2
jump_table_entry common_overlay::L6DD0
jump_table_entry common_overlay::L6E1D
jump_table_entry common_overlay::L69C6
jump_table_entry common_overlay::L6A18
jump_table_entry common_overlay::L6A53
jump_table_entry common_overlay::L6AAC
jump_table_entry common_overlay::L6B01
jump_table_entry common_overlay::L6B44
jump_table_entry common_overlay::L66D8
L70B1: addr_call common_overlay::L647C, path_buf0
@ -74,10 +74,10 @@ L70B1: addr_call common_overlay::L647C, path_buf0
L70C0: MGTK_RELAY_CALL MGTK::CloseWindow, winfo_entrydlg_file_picker
MGTK_RELAY_CALL MGTK::CloseWindow, winfo_entrydlg
lda #0
sta $D8EC
sta LD8EC
jsr common_overlay::set_cursor_pointer
copy16 #path_buf0, $6
ldx $50AA
ldx common_overlay::stash_stack
txs
lda #0
rts
@ -89,7 +89,7 @@ L70EA: MGTK_RELAY_CALL MGTK::CloseWindow, winfo_entrydlg_file_picker
lda #0
sta $D8EC
jsr common_overlay::set_cursor_pointer
ldx $50AA
ldx common_overlay::stash_stack
txs
return #$FF