disassembly: misc labels

This commit is contained in:
Joshua Bell 2018-11-16 20:02:54 -08:00
parent e771d2cc63
commit ab1389d6df
3 changed files with 151 additions and 130 deletions

View File

@ -16,6 +16,8 @@ L0CD7 := $0CD7
L0CF9 := $0CF9 L0CF9 := $0CF9
L0D14 := $0D14 L0D14 := $0D14
path_buf_main := $1FC0
dynamic_routine_800 := $0800 dynamic_routine_800 := $0800
dynamic_routine_5000 := $5000 dynamic_routine_5000 := $5000
dynamic_routine_7000 := $7000 dynamic_routine_7000 := $7000
@ -237,6 +239,7 @@ L415B: sta active_window_id
cmp16 L4242, #15 cmp16 L4242, #15
bpl L41CB bpl L41CB
jsr offset_grafport2 jsr offset_grafport2
ldx #$0B ldx #$0B
ldy #$1F ldy #$1F
lda grafport2,x lda grafport2,x
@ -245,6 +248,7 @@ L415B: sta active_window_id
dex dex
lda grafport2,x lda grafport2,x
sta ($06),y sta ($06),y
ldx #$03 ldx #$03
ldy #$17 ldy #$17
lda grafport2,x lda grafport2,x
@ -253,6 +257,7 @@ L415B: sta active_window_id
dex dex
lda grafport2,x lda grafport2,x
sta ($06),y sta ($06),y
L41CB: ldx cached_window_id L41CB: ldx cached_window_id
dex dex
lda win_buf_table,x lda win_buf_table,x
@ -494,9 +499,9 @@ menu_accelerators:
lda event_key lda event_key
sta LE25C sta LE25C
lda event_modifiers lda event_modifiers
beq L43A1 beq :+
lda #1 lda #1
L43A1: sta LE25D : sta LE25D
MGTK_RELAY_CALL MGTK::MenuKey, menu_click_params MGTK_RELAY_CALL MGTK::MenuKey, menu_click_params
menu_dispatch2: menu_dispatch2:
@ -511,19 +516,20 @@ menu_dispatch2:
dey dey
tya tya
asl a asl a
sta L43E5 sta proc_addr
txa txa
clc clc
adc L43E5 adc proc_addr
tax tax
copy16 dispatch_table,x, L43E5 copy16 dispatch_table,x, proc_addr
jsr L43E0 jsr call_proc
MGTK_RELAY_CALL MGTK::HiliteMenu, menu_click_params MGTK_RELAY_CALL MGTK::HiliteMenu, menu_click_params
rts rts
L43E0: tsx call_proc:
tsx
stx LE256 stx LE256
L43E5 := *+1 proc_addr := *+1
jmp dummy1234 ; self-modified jmp dummy1234 ; self-modified
.endproc .endproc
@ -548,10 +554,10 @@ L43E0: tsx
sta findwindow_window_id sta findwindow_window_id
DESKTOP_RELAY_CALL DT_FIND_ICON, event_coords DESKTOP_RELAY_CALL DT_FIND_ICON, event_coords
lda findicon_which_icon lda findicon_which_icon
beq L4415 beq :+
jmp L67D7 jmp L67D7
L4415: jmp L68AA : jmp L68AA
not_desktop: not_desktop:
cmp #MGTK::area_menubar ; menu? cmp #MGTK::area_menubar ; menu?
@ -592,24 +598,27 @@ not_menu:
;;; ============================================================ ;;; ============================================================
.proc handle_inactive_window_click .proc handle_inactive_window_click
jmp L445D ptr := $6
jmp start
L445C: .byte 0 L445C: .byte 0
L445D: jsr clear_selection
start: jsr clear_selection
ldx findwindow_window_id ldx findwindow_window_id
dex dex
lda LEC26,x lda LEC26,x
sta icon_param sta icon_param
lda icon_param lda icon_param
jsr icon_entry_lookup jsr icon_entry_lookup
stax $06 stax ptr
ldy #$01 ldy #1
lda ($06),y lda (ptr),y
beq L44A6 beq L44A6
ora #$80 ora #$80
sta ($06),y sta (ptr),y
iny iny
lda ($06),y lda (ptr),y
and #$0F and #$0F
sta L445C sta L445C
jsr zero_grafport5_coords jsr zero_grafport5_coords
@ -617,7 +626,7 @@ L445D: jsr clear_selection
jsr reset_grafport3 jsr reset_grafport3
lda L445C lda L445C
sta selected_window_index sta selected_window_index
lda #$01 lda #1
sta selected_icon_count sta selected_icon_count
lda icon_param lda icon_param
sta selected_icon_list sta selected_icon_list
@ -627,7 +636,7 @@ L44A6: MGTK_RELAY_CALL MGTK::SelectWindow, findwindow_window_id
sta cached_window_id sta cached_window_id
jsr DESKTOP_COPY_TO_BUF jsr DESKTOP_COPY_TO_BUF
jsr L6C19 jsr L6C19
lda #$00 lda #0
sta cached_window_id sta cached_window_id
jsr DESKTOP_COPY_TO_BUF jsr DESKTOP_COPY_TO_BUF
lda #MGTK::checkitem_uncheck lda #MGTK::checkitem_uncheck
@ -691,10 +700,12 @@ next: dey
jsr poll_drive jsr poll_drive
ldx L45A0 ldx L45A0
beq done beq done
: lda L45A0,x : lda L45A0,x
sta L45A9,x sta L45A9,x
dex dex
bpl :- bpl :-
done: rts done: rts
L4559: lda DEVLST,y L4559: lda DEVLST,y
@ -941,22 +952,25 @@ params: .addr dummy0000
begin: begin:
jsr set_watch_cursor jsr set_watch_cursor
ldx #$FF ldx #$FF
L46F8: inx : inx
lda LD355,x lda buf_win_path,x
sta $220,x sta $220,x
cpx LD355 cpx buf_win_path
bne L46F8 bne :-
inx inx
lda #'/' lda #'/'
sta $220,x sta $220,x
ldy #$00 ldy #$00
L470C: iny : iny
inx inx
lda buf_filename2,y lda buf_filename2,y
sta $220,x sta $220,x
cpy buf_filename2 cpy buf_filename2
bne L470C bne :-
stx $220 stx $220
MLI_RELAY_CALL GET_FILE_INFO, get_file_info_params MLI_RELAY_CALL GET_FILE_INFO, get_file_info_params
beq L472B beq L472B
@ -989,16 +1003,16 @@ L4748: cmp #FT_SYSTEM
L4755: DESKTOP_RELAY_CALL DT_UNHIGHLIGHT_ALL L4755: DESKTOP_RELAY_CALL DT_UNHIGHLIGHT_ALL
MGTK_RELAY_CALL MGTK::CloseAll MGTK_RELAY_CALL MGTK::CloseAll
MGTK_RELAY_CALL MGTK::SetMenu, blank_menu MGTK_RELAY_CALL MGTK::SetMenu, blank_menu
ldx LD355 ldx buf_win_path
L4773: lda LD355,x : lda buf_win_path,x
sta $220,x sta $220,x
dex dex
bpl L4773 bpl :-
ldx buf_filename2 ldx buf_filename2
L477F: lda buf_filename2,x : lda buf_filename2,x
sta INVOKER_FILENAME,x sta INVOKER_FILENAME,x
dex dex
bpl L477F bpl :-
addr_call L4842, $280 addr_call L4842, $280
addr_call L4842, $220 addr_call L4842, $220
jsr L48BE jsr L48BE
@ -1009,12 +1023,13 @@ L477F: lda buf_filename2,x
DEFINE_GET_FILE_INFO_PARAMS get_file_info_params2, $1800 DEFINE_GET_FILE_INFO_PARAMS get_file_info_params2, $1800
L47B8: ldx LD355 L47B8: ldx buf_win_path
stx L4816 stx L4816
L47BE: lda LD355,x : lda buf_win_path,x
sta $1800,x sta $1800,x
dex dex
bpl L47BE bpl :-
inc $1800 inc $1800
ldx $1800 ldx $1800
lda #'/' lda #'/'
@ -1034,11 +1049,12 @@ L47D7: inx
L47F3: ldx L4816 L47F3: ldx L4816
L47F6: lda $1800,x L47F6: lda $1800,x
cmp #$2F cmp #'/'
beq L4808 beq L4808
dex dex
bne L47F6 bne L47F6
L4800: lda #$FE L4800: lda #$FE
L4802: jsr DESKTOP_SHOW_ALERT0 L4802: jsr DESKTOP_SHOW_ALERT0
pla pla
pla pla
@ -1189,7 +1205,7 @@ done: jsr set_pointer_cursor
L4968: jsr L4AAD L4968: jsr L4AAD
ldx $840 ldx $840
L496E: lda $840,x L496E: lda $840,x
sta LD355,x sta buf_win_path,x
dex dex
bpl L496E bpl L496E
jmp L4A17 jmp L4A17
@ -1197,7 +1213,7 @@ L496E: lda $840,x
L497A: jsr L4AAD L497A: jsr L4AAD
ldx L0800 ldx L0800
L4980: lda L0800,x L4980: lda L0800,x
sta LD355,x sta buf_win_path,x
dex dex
bpl L4980 bpl L4980
jsr L4A17 jsr L4A17
@ -1255,12 +1271,12 @@ L4A0A: ldy #$00
lda ($06),y lda ($06),y
tay tay
L4A0F: lda ($06),y L4A0F: lda ($06),y
sta LD355,y sta buf_win_path,y
dey dey
bpl L4A0F bpl L4A0F
L4A17: ldy LD355 L4A17: ldy buf_win_path
L4A1A: lda LD355,y L4A1A: lda buf_win_path,y
cmp #$2F cmp #'/'
beq L4A24 beq L4A24
dey dey
bpl L4A1A bpl L4A1A
@ -1270,13 +1286,13 @@ L4A24: dey
iny iny
L4A2B: iny L4A2B: iny
inx inx
lda LD355,y lda buf_win_path,y
sta buf_filename2,x sta buf_filename2,x
cpy LD355 cpy buf_win_path
bne L4A2B bne L4A2B
stx buf_filename2 stx buf_filename2
lda L4A46 lda L4A46
sta LD355 sta buf_win_path
lda #$00 lda #$00
jmp launch_file jmp launch_file
@ -1303,7 +1319,7 @@ L4A6F: lda ($08),y
bpl L4A6F bpl L4A6F
L4A77: ldy L0800 L4A77: ldy L0800
L4A7A: lda L0800,y L4A7A: lda L0800,y
cmp #$2F cmp #'/'
beq L4A84 beq L4A84
dey dey
bne L4A7A bne L4A7A
@ -1311,7 +1327,7 @@ L4A84: dey
sty L0800 sty L0800
ldy $840 ldy $840
L4A8B: lda $840,y L4A8B: lda $840,y
cmp #$2F cmp #'/'
beq L4A95 beq L4A95
dey dey
bne L4A8B bne L4A8B
@ -1322,21 +1338,21 @@ L4A95: dey
jsr L4D19 jsr L4D19
rts rts
L4AAD: ldy LD355 L4AAD: ldy buf_win_path
L4AB0: lda LD355,y L4AB0: lda buf_win_path,y
sta L0800,y sta L0800,y
dey dey
bpl L4AB0 bpl L4AB0
addr_call copy_LD3EE_str, $840 addr_call copy_LD3EE_str, $840
ldy L0800 ldy L0800
L4AC3: lda L0800,y L4AC3: lda L0800,y
cmp #$2F cmp #'/'
beq L4ACD beq L4ACD
dey dey
bne L4AC3 bne L4AC3
L4ACD: dey L4ACD: dey
L4ACE: lda L0800,y L4ACE: lda L0800,y
cmp #$2F cmp #'/'
beq L4AD8 beq L4AD8
dey dey
bne L4ACE bne L4ACE
@ -1629,33 +1645,37 @@ L4CF3: iny
;;; ============================================================ ;;; ============================================================
.proc L4D19 .proc L4D19
ldy #$00
ldy #0
lda ($06),y lda ($06),y
tay tay
L4D1E: lda ($06),y : lda ($06),y
sta path_buf3,y sta path_buf3,y
dey dey
bpl L4D1E bpl :-
ldy #$00
ldy #0
lda ($08),y lda ($08),y
tay tay
L4D2B: lda ($08),y : lda ($08),y
sta path_buf4,y sta path_buf4,y
dey dey
bpl L4D2B bpl :-
addr_call L6F90, path_buf4 addr_call L6F90, path_buf4
ldx #$01 ldx #$01
iny iny
iny iny
L4D3E: lda path_buf4,y : lda path_buf4,y
sta LE04B,x sta LE04B,x
cpy path_buf4 cpy path_buf4
beq L4D4E beq :+
iny iny
inx inx
jmp L4D3E jmp :-
L4D4E: stx LE04B : stx LE04B
lda path_buf4 lda path_buf4
sec sec
sbc LE04B sbc LE04B
@ -1685,25 +1705,26 @@ L4D4E: stx LE04B
jsr restore_dynamic_routine jsr restore_dynamic_routine
jsr set_pointer_cursor jsr set_pointer_cursor
pla pla
bpl L4D8A bpl :+
jmp L4D9D jmp L4D9D
L4D8A: ldy #$00 : ldy #0
lda ($06),y lda ($06),y
tay tay
L4D8F: lda ($06),y : lda ($06),y
sta path_buf3,y sta path_buf3,y
dey dey
bpl L4D8F bpl :-
jsr redraw_windows_and_desktop jsr redraw_windows_and_desktop
jsr L8F1B jsr L8F1B
L4D9D: pha L4D9D: pha
jsr set_pointer_cursor jsr set_pointer_cursor
pla pla
bpl L4DA7 bpl :+
jmp redraw_windows_and_desktop jmp redraw_windows_and_desktop
L4DA7: addr_call L6F90, path_buf3 : addr_call L6F90, path_buf3
sty path_buf3 sty path_buf3
addr_call L6FAF, path_buf3 addr_call L6FAF, path_buf3
beq L4DC2 beq L4DC2
@ -1712,15 +1733,15 @@ L4DA7: addr_call L6F90, path_buf3
pla pla
jmp L5E78 jmp L5E78
L4DC2: ldy #$01 L4DC2: ldy #1
L4DC4: iny : iny
lda path_buf3,y lda path_buf3,y
cmp #$2F cmp #'/'
beq L4DD2 beq :+
cpy path_buf3 cpy path_buf3
bne L4DC4 bne :-
iny iny
L4DD2: dey : dey
sty path_buf3 sty path_buf3
addr_call L6FB7, path_buf3 addr_call L6FB7, path_buf3
ldax #path_buf3 ldax #path_buf3
@ -1770,7 +1791,7 @@ L4E1A: sta L4E71
lda ($06),y lda ($06),y
tay tay
L4E34: lda ($06),y L4E34: lda ($06),y
sta LD355,y sta buf_win_path,y
dey dey
bpl L4E34 bpl L4E34
lda selected_icon_list lda selected_icon_list
@ -3247,7 +3268,7 @@ L5A10: lda ($06),y
dey dey
bpl L5A10 bpl L5A10
dec $1F00 dec $1F00
lda #$2F lda #'/'
sta $1F01 sta $1F01
ldax #$1F00 ldax #$1F00
ldy $1F00 ldy $1F00
@ -3295,7 +3316,7 @@ L5A7F: lda cached_window_icon_count
bmi L5AA9 bmi L5AA9
and #$FF and #$FF
beq L5AA9 beq L5AA9
cmp #$2F cmp #'/'
beq L5AA9 beq L5AA9
pha pha
jsr DESKTOP_COPY_FROM_BUF jsr DESKTOP_COPY_FROM_BUF
@ -3725,7 +3746,7 @@ L5E28: sta L5E77
lda ($06),y lda ($06),y
tay tay
L5E3A: lda ($06),y L5E3A: lda ($06),y
sta LD355,y sta buf_win_path,y
dey dey
bpl L5E3A bpl L5E3A
lda L5CD9 lda L5CD9
@ -9730,7 +9751,7 @@ L9558: lda text_buffer2::data,x
.proc L9571_impl .proc L9571_impl
DEFINE_RENAME_PARAMS rename_params, $220, $1FC0 DEFINE_RENAME_PARAMS rename_params, $220, path_buf_main
rename_dialog_params: rename_dialog_params:
.byte 0 .byte 0
@ -9834,23 +9855,23 @@ L9655: ldy #$00
lda ($06),y lda ($06),y
tay tay
L965A: lda ($06),y L965A: lda ($06),y
sta $1FC0,y sta path_buf_main,y
dey dey
bpl L965A bpl L965A
inc $1FC0 inc path_buf_main
ldx $1FC0 ldx path_buf_main
lda #'/' lda #'/'
sta $1FC0,x sta path_buf_main,x
ldy #$00 ldy #$00
lda ($08),y lda ($08),y
sta L9709 sta L9709
L9674: inx L9674: inx
iny iny
lda ($08),y lda ($08),y
sta $1FC0,x sta path_buf_main,x
cpy L9709 cpy L9709
bne L9674 bne L9674
stx $1FC0 stx path_buf_main
yax_call JT_MLI_RELAY, RENAME, rename_params yax_call JT_MLI_RELAY, RENAME, rename_params
beq L969E beq L969E
jsr JT_SHOW_ALERT0 jsr JT_SHOW_ALERT0
@ -9926,11 +9947,11 @@ L972E: .res 5, 0
DEFINE_CLOSE_PARAMS close_params3 DEFINE_CLOSE_PARAMS close_params3
DEFINE_DESTROY_PARAMS destroy_params, $220 DEFINE_DESTROY_PARAMS destroy_params, $220
DEFINE_OPEN_PARAMS open_params4, $220, $0D00 DEFINE_OPEN_PARAMS open_params4, $220, $0D00
DEFINE_OPEN_PARAMS open_params5, $1FC0, $1100 DEFINE_OPEN_PARAMS open_params5, path_buf_main, $1100
DEFINE_READ_PARAMS read_params6, $1500, $AC0 DEFINE_READ_PARAMS read_params6, $1500, $AC0
DEFINE_WRITE_PARAMS write_params, $1500, $AC0 DEFINE_WRITE_PARAMS write_params, $1500, $AC0
DEFINE_CREATE_PARAMS create_params3, $1FC0, ACCESS_DEFAULT DEFINE_CREATE_PARAMS create_params3, path_buf_main, ACCESS_DEFAULT
DEFINE_CREATE_PARAMS create_params2, $1FC0 DEFINE_CREATE_PARAMS create_params2, path_buf_main
.byte $00,$00 .byte $00,$00
@ -9938,7 +9959,7 @@ L972E: .res 5, 0
.byte 0 .byte 0
DEFINE_GET_FILE_INFO_PARAMS file_info_params3, $1FC0 DEFINE_GET_FILE_INFO_PARAMS file_info_params3, path_buf_main
.byte 0 .byte 0
@ -10113,7 +10134,7 @@ L9931: .addr L9B36 ; Overlay for L97DD
L9937: .byte 0 L9937: .byte 0
L9938: .addr 0 L9938: .addr 0
.addr $220 .addr $220
.addr $1FC0 .addr path_buf_main
.proc L993E .proc L993E
lda #0 lda #0
@ -10203,31 +10224,31 @@ L9A22: bit LE05B
bne L9A36 bne L9A36
jmp L9B28 jmp L9B28
L9A36: ldx $1FC0 L9A36: ldx path_buf_main
ldy L9B32 ldy L9B32
dey dey
L9A3D: iny L9A3D: iny
inx inx
lda $220,y lda $220,y
sta $1FC0,x sta path_buf_main,x
cpy $220 cpy $220
bne L9A3D bne L9A3D
stx $1FC0 stx path_buf_main
jmp L9A70 jmp L9A70
L9A50: ldx $1FC0 L9A50: ldx path_buf_main
lda #'/' lda #'/'
sta $1FC1,x sta path_buf_main+1,x
inc $1FC0 inc path_buf_main
ldy #$00 ldy #$00
ldx $1FC0 ldx path_buf_main
L9A60: iny L9A60: iny
inx inx
lda LE04B,y lda LE04B,y
sta $1FC0,x sta path_buf_main,x
cpy LE04B cpy LE04B
bne L9A60 bne L9A60
stx $1FC0 stx path_buf_main
L9A70: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params2 L9A70: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params2
beq L9A81 beq L9A81
jsr show_error_alert jsr show_error_alert
@ -10439,29 +10460,29 @@ L9C33: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params3
jmp L9C33 jmp L9C33
L9C48: copy16 file_info_params3::blocks_used, L9CD8 L9C48: copy16 file_info_params3::blocks_used, L9CD8
L9C54: lda $1FC0 L9C54: lda path_buf_main
sta L9CD6 sta L9CD6
ldy #$01 ldy #$01
L9C5C: iny L9C5C: iny
cpy $1FC0 cpy path_buf_main
bcs L9CCC bcs L9CCC
lda $1FC0,y lda path_buf_main,y
cmp #$2F cmp #'/'
bne L9C5C bne L9C5C
tya tya
sta $1FC0 sta path_buf_main
sta L9CD7 sta L9CD7
L9C70: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params3 L9C70: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params3
beq L9C95 beq L9C95
pha pha
lda L9CD6 lda L9CD6
sta $1FC0 sta path_buf_main
pla pla
jsr show_error_alert_dst jsr show_error_alert_dst
jmp L9C70 jmp L9C70
lda L9CD7 lda L9CD7
sta $1FC0 sta path_buf_main
jmp L9C70 jmp L9C70
jmp LA39F jmp LA39F
@ -10474,7 +10495,7 @@ L9C95: sub16 file_info_params3::aux_type, file_info_params3::blocks_used, L9C
bcs L9CCD bcs L9CCD
L9CCC: clc L9CCC: clc
L9CCD: lda L9CD6 L9CCD: lda L9CD6
sta $1FC0 sta path_buf_main
rts rts
L9CD4: .word 0 L9CD4: .word 0
@ -10920,16 +10941,16 @@ LA10A: yax_call launch_dialog, index_unlock_dialog, LA054
lda #$03 lda #$03
sta LA054 sta LA054
jsr LA379 jsr LA379
ldx $1FC0 ldx path_buf_main
ldy L9B32 ldy L9B32
dey dey
LA123: iny LA123: iny
inx inx
lda $220,y lda $220,y
sta $1FC0,x sta path_buf_main,x
cpy $220 cpy $220
bne LA123 bne LA123
stx $1FC0 stx path_buf_main
LA133: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params2 LA133: yax_call JT_MLI_RELAY, GET_FILE_INFO, file_info_params2
beq LA144 beq LA144
jsr show_error_alert jsr show_error_alert
@ -11167,39 +11188,39 @@ found: dex
rts rts
LA341: ldx #$00 LA341: ldx #$00
ldy $1FC0 ldy path_buf_main
lda #'/' lda #'/'
sta $1FC1,y sta path_buf_main+1,y
iny iny
LA34C: cpx L97AD LA34C: cpx L97AD
bcs LA35C bcs LA35C
lda L97AD+1,x lda L97AD+1,x
sta $1FC1,y sta path_buf_main+1,y
inx inx
iny iny
jmp LA34C jmp LA34C
LA35C: sty $1FC0 LA35C: sty path_buf_main
rts rts
.endproc .endproc
;;; ============================================================ ;;; ============================================================
.proc LA360 .proc LA360
ldx $1FC0 ldx path_buf_main
bne LA366 bne LA366
rts rts
LA366: lda $1FC0,x LA366: lda path_buf_main,x
cmp #$2F cmp #'/'
beq LA374 beq LA374
dex dex
bne LA366 bne LA366
stx $1FC0 stx path_buf_main
rts rts
LA374: dex LA374: dex
stx $1FC0 stx path_buf_main
rts rts
.endproc .endproc
@ -11211,7 +11232,7 @@ LA374: dex
dey dey
LA37F: iny LA37F: iny
lda path_buf3,y lda path_buf3,y
cmp #$2F cmp #'/'
bne LA38A bne LA38A
sty L9B32 sty L9B32
LA38A: sta $220,y LA38A: sta $220,y
@ -11219,7 +11240,7 @@ LA38A: sta $220,y
bne LA37F bne LA37F
ldy path_buf4 ldy path_buf4
LA395: lda path_buf4,y LA395: lda path_buf4,y
sta $1FC0,y sta path_buf_main,y
dey dey
bpl LA395 bpl LA395
rts rts
@ -13743,7 +13764,7 @@ LBD22: ldx path_buf1
beq LBD33 beq LBD33
dec path_buf1 dec path_buf1
lda path_buf1,x lda path_buf1,x
cmp #$2F cmp #'/'
bne LBD22 bne LBD22
LBD33: rts LBD33: rts
@ -14706,10 +14727,10 @@ L0DC2: pla
L0DEC: ldy #$0E L0DEC: ldy #$0E
bne L0DFA bne L0DFA
L0DF0: cmp #$0B L0DF0: cmp #$0B
bne L0DF8 bne :+
ldy #$0F ldy #$0F
bne L0DFA bne L0DFA
L0DF8: ldy #$06 : ldy #$06
L0DFA: txa L0DFA: txa
sta ($08),y sta ($08),y
lda L0E32 lda L0E32

View File

@ -296,7 +296,7 @@ watch_cursor:
LD343: .word 0 LD343: .word 0
buf_filename2: .res 16, 0 buf_filename2: .res 16, 0
LD355: .res 43, 0 buf_win_path: .res 43, 0
temp_string_buf: temp_string_buf:
.res 45, 0 .res 45, 0

View File

@ -333,7 +333,7 @@ L9282: lda L938D
lda ($06),y lda ($06),y
tay tay
L92C1: lda ($06),y L92C1: lda ($06),y
sta LD355,y sta buf_win_path,y
dey dey
bpl L92C1 bpl L92C1
lda #$FF lda #$FF
@ -349,7 +349,7 @@ L92D6: lda L938D
lda ($06),y lda ($06),y
tay tay
L92E5: lda ($06),y L92E5: lda ($06),y
sta LD355,y sta buf_win_path,y
dey dey
bpl L92E5 bpl L92E5
jmp L9307 jmp L9307
@ -361,11 +361,11 @@ L92F0: lda L938D
lda ($06),y lda ($06),y
tay tay
L92FF: lda ($06),y L92FF: lda ($06),y
sta LD355,y sta buf_win_path,y
dey dey
bpl L92FF bpl L92FF
L9307: ldy LD355 L9307: ldy buf_win_path
L930A: lda LD355,y L930A: lda buf_win_path,y
cmp #$2F cmp #$2F
beq L9314 beq L9314
dey dey
@ -376,13 +376,13 @@ L9314: dey
ldx #$00 ldx #$00
L931B: iny L931B: iny
inx inx
lda LD355,y lda buf_win_path,y
sta buf_filename2,x sta buf_filename2,x
cpy LD355 cpy buf_win_path
bne L931B bne L931B
stx buf_filename2 stx buf_filename2
lda L938A lda L938A
sta LD355 sta buf_win_path
jsr JUMP_TABLE_LAUNCH_FILE jsr JUMP_TABLE_LAUNCH_FILE
jsr set_cursor_pointer jsr set_cursor_pointer
lda #$FF lda #$FF