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

disasm: new folder params

Browse Source
This commit is contained in:
Joshua Bell 2019-01-10 20:58:03 -08:00
parent 9d9d5b25a8
commit 17272f74a5
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
desktop/desktop_main.s
View File

@ -2038,7 +2038,7 @@ fail: rts
.proc new_folder_dialog_params
phase: .byte 0 ; window_id?
L4F68: .word 0
win_path_ptr: .word 0
.endproc
;; access = destroy/rename/write/read
@ -2053,7 +2053,7 @@ start: copy active_window_id, new_folder_dialog_params::phase
L4FC6: lda active_window_id
beq L4FD4
jsr window_path_lookup
stax new_folder_dialog_params::L4F68
stax new_folder_dialog_params::win_path_ptr
L4FD4: copy #$80, new_folder_dialog_params::phase
yax_call invoke_dialog_proc, index_new_folder_dialog, new_folder_dialog_params
beq :+
@ -2081,7 +2081,7 @@ L4FD4: copy #$80, new_folder_dialog_params::phase
;; Failure
jsr DESKTOP_SHOW_ALERT0
copy16 L504E, new_folder_dialog_params::L4F68
copy16 L504E, new_folder_dialog_params::win_path_ptr
jmp L4FC6
rts ; ???