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

winfo for alert dialog

Browse Source
This commit is contained in:
Joshua Bell 2018-03-15 00:00:36 -07:00
parent fcb99ec3cf
commit 3e9d7da755
3 changed files with 69 additions and 69 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

114
desktop/desktop.s
View File

@ -4372,7 +4372,7 @@ alert_bitmap2_params:
;; Looks like window param blocks starting here ;; Looks like window param blocks starting here
.proc winfoF .proc winfo_alert_dialog
window_id: .byte $0F window_id: .byte $0F
options: .byte MGTK::option_dialog_box options: .byte MGTK::option_dialog_box
title: .addr 0 title: .addr 0
@ -17031,13 +17031,13 @@ dialog_param_addr:
jmp prompt_input_loop jmp prompt_input_loop
: lda findwindow_window_id : lda findwindow_window_id
cmp winfoF cmp winfo_alert_dialog
beq :+ beq :+
jmp prompt_input_loop jmp prompt_input_loop
: lda winfoF : lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
lda winfoF lda winfo_alert_dialog
sta event_params sta event_params
MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params
MGTK_RELAY_CALL MGTK::MoveTo, screentowindow_windowx MGTK_RELAY_CALL MGTK::MoveTo, screentowindow_windowx
@ -17071,12 +17071,12 @@ done: jsr reset_state
content: content:
lda findwindow_window_id lda findwindow_window_id
cmp winfoF cmp winfo_alert_dialog
beq :+ beq :+
return #$FF return #$FF
: lda winfoF : lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
lda winfoF lda winfo_alert_dialog
sta event_params sta event_params
MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params
MGTK_RELAY_CALL MGTK::MoveTo, screentowindow_windowx MGTK_RELAY_CALL MGTK::MoveTo, screentowindow_windowx
@ -17322,14 +17322,14 @@ LA83E: lda LD8E8
LA84B: jsr LBC03 LA84B: jsr LBC03
LA84E: return #$FF LA84E: return #$FF
LA851: lda winfoF LA851: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr set_penmode_xor2 jsr set_penmode_xor2
MGTK_RELAY_CALL MGTK::PaintRect, desktop_aux::ok_button_rect MGTK_RELAY_CALL MGTK::PaintRect, desktop_aux::ok_button_rect
MGTK_RELAY_CALL MGTK::PaintRect, desktop_aux::ok_button_rect MGTK_RELAY_CALL MGTK::PaintRect, desktop_aux::ok_button_rect
return #0 return #0
LA86F: lda winfoF LA86F: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr set_penmode_xor2 jsr set_penmode_xor2
MGTK_RELAY_CALL MGTK::PaintRect, desktop_aux::cancel_button_rect MGTK_RELAY_CALL MGTK::PaintRect, desktop_aux::cancel_button_rect
@ -17433,7 +17433,7 @@ do1: ldy #1
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB0B6 MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB0B6
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
@ -17448,7 +17448,7 @@ do2: ldy #1
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr LBE8D jsr LBE8D
jsr LBE9A jsr LBE9A
@ -17479,12 +17479,12 @@ do2: ldy #1
rts rts
do5: jsr reset_state do5: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
rts rts
do3: jsr bell do3: jsr bell
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
axy_call draw_dialog_label, 6, desktop_aux::str_exists_prompt axy_call draw_dialog_label, 6, desktop_aux::str_exists_prompt
jsr draw_yes_no_all_cancel_buttons jsr draw_yes_no_all_cancel_buttons
@ -17498,7 +17498,7 @@ LAA7F: jsr prompt_input_loop
rts rts
do4: jsr bell do4: jsr bell
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
axy_call draw_dialog_label, 6, desktop_aux::str_large_prompt axy_call draw_dialog_label, 6, desktop_aux::str_large_prompt
jsr draw_ok_cancel_buttons jsr draw_ok_cancel_buttons
@ -17564,7 +17564,7 @@ do1: ldy #1
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB0B6 MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB0B6
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
@ -17579,7 +17579,7 @@ do2: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr LBE8D jsr LBE8D
jsr copy_dialog_param_addr_to_ptr jsr copy_dialog_param_addr_to_ptr
@ -17598,12 +17598,12 @@ do2: ldy #$01
rts rts
do3: jsr reset_state do3: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
rts rts
do4: jsr bell do4: jsr bell
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
axy_call draw_dialog_label, 6, desktop_aux::str_ramcard_full axy_call draw_dialog_label, 6, desktop_aux::str_ramcard_full
jsr draw_ok_button jsr draw_ok_button
@ -17661,7 +17661,7 @@ do1: ldy #$01
lda (ptr),y lda (ptr),y
sta file_count+1 sta file_count+1
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
lda #165 lda #165
sta dialog_label_pos sta dialog_label_pos
@ -17687,11 +17687,11 @@ do1: ldy #$01
rts rts
do3: jsr reset_state do3: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
rts rts
do2: lda winfoF do2: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr draw_ok_button jsr draw_ok_button
: jsr prompt_input_loop : jsr prompt_input_loop
@ -17748,7 +17748,7 @@ do1: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
lda LAD1F lda LAD1F
bne LAD54 bne LAD54
@ -17768,7 +17768,7 @@ do3: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr LBE8D jsr LBE8D
jsr copy_dialog_param_addr_to_ptr jsr copy_dialog_param_addr_to_ptr
@ -17786,7 +17786,7 @@ do3: ldy #$01
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
rts rts
do2: lda winfoF do2: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr draw_ok_cancel_buttons jsr draw_ok_cancel_buttons
LADC4: jsr prompt_input_loop LADC4: jsr prompt_input_loop
@ -17801,11 +17801,11 @@ LADC4: jsr prompt_input_loop
LADF4: rts LADF4: rts
do5: jsr reset_state do5: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
rts rts
do4: lda winfoF do4: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
axy_call draw_dialog_label, 6, desktop_aux::str_delete_locked_file axy_call draw_dialog_label, 6, desktop_aux::str_delete_locked_file
jsr draw_yes_no_all_cancel_buttons jsr draw_yes_no_all_cancel_buttons
@ -17839,7 +17839,7 @@ LAE49: lda #$80
jsr LBD69 jsr LBD69
lda #$00 lda #$00
jsr LB509 jsr LB509
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
addr_call draw_dialog_title, desktop_aux::str_new_folder_title addr_call draw_dialog_title, desktop_aux::str_new_folder_title
jsr set_penmode_xor2 jsr set_penmode_xor2
@ -17865,7 +17865,7 @@ LAE90: lda ($08),y
sta path_buf0,y sta path_buf0,y
dey dey
bpl LAE90 bpl LAE90
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
yax_call draw_dialog_label, 2, desktop_aux::str_in_colon yax_call draw_dialog_label, 2, desktop_aux::str_in_colon
lda #55 lda #55
@ -17912,7 +17912,7 @@ LAEFF: inx
return #0 return #0
LAF16: jsr reset_state LAF16: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
return #1 return #1
.endproc .endproc
@ -17937,7 +17937,7 @@ LAF34: lda #$00
ror a ror a
eor #$80 eor #$80
jsr LB509 jsr LB509
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
addr_call draw_dialog_title, desktop_aux::str_info_title addr_call draw_dialog_title, desktop_aux::str_info_title
jsr copy_dialog_param_addr_to_ptr jsr copy_dialog_param_addr_to_ptr
@ -17965,7 +17965,7 @@ LAF9B: yax_call draw_dialog_label, 4, desktop_aux::str_info_create
yax_call draw_dialog_label, 6, desktop_aux::str_info_type yax_call draw_dialog_label, 6, desktop_aux::str_info_type
jmp reset_state jmp reset_state
LAFB9: lda winfoF LAFB9: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr copy_dialog_param_addr_to_ptr jsr copy_dialog_param_addr_to_ptr
ldy #0 ldy #0
@ -18002,7 +18002,7 @@ LAFF8: ldy row
pha pha
jsr reset_state jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer_with_flag jsr set_cursor_pointer_with_flag
pla pla
rts rts
@ -18057,7 +18057,7 @@ do1: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB231 MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB231
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
@ -18073,7 +18073,7 @@ do3: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr LBE8D jsr LBE8D
jsr copy_dialog_param_addr_to_ptr jsr copy_dialog_param_addr_to_ptr
@ -18091,7 +18091,7 @@ do3: ldy #$01
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
rts rts
do2: lda winfoF do2: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr draw_ok_cancel_buttons jsr draw_ok_cancel_buttons
LB0FA: jsr prompt_input_loop LB0FA: jsr prompt_input_loop
@ -18107,7 +18107,7 @@ LB0FA: jsr prompt_input_loop
LB139: rts LB139: rts
do4: jsr reset_state do4: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
rts rts
.endproc .endproc
@ -18148,7 +18148,7 @@ do1: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB22D MGTK_RELAY_CALL MGTK::MoveTo, desktop_aux::LB22D
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
@ -18164,7 +18164,7 @@ do3: ldy #$01
sta file_count+1 sta file_count+1
jsr adjust_str_files_suffix jsr adjust_str_files_suffix
jsr compose_file_count_string jsr compose_file_count_string
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr LBE8D jsr LBE8D
jsr copy_dialog_param_addr_to_ptr jsr copy_dialog_param_addr_to_ptr
@ -18182,7 +18182,7 @@ do3: ldy #$01
addr_call draw_text1, str_file_count addr_call draw_text1, str_file_count
rts rts
do2: lda winfoF do2: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr draw_ok_cancel_buttons jsr draw_ok_cancel_buttons
LB218: jsr prompt_input_loop LB218: jsr prompt_input_loop
@ -18198,7 +18198,7 @@ LB218: jsr prompt_input_loop
LB257: rts LB257: rts
do4: jsr reset_state do4: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
rts rts
.endproc .endproc
@ -18225,7 +18225,7 @@ LB27D: jsr LBD75
jsr LBD69 jsr LBD69
lda #$00 lda #$00
jsr LB509 jsr LB509
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
addr_call draw_dialog_title, desktop_aux::str_rename_title addr_call draw_dialog_title, desktop_aux::str_rename_title
jsr set_penmode_xor2 jsr set_penmode_xor2
@ -18255,7 +18255,7 @@ LB2CA: lda ($08),y
rts rts
LB2ED: copy16 #$8000, LD8E7 LB2ED: copy16 #$8000, LD8E7
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
LB2FD: jsr prompt_input_loop LB2FD: jsr prompt_input_loop
bmi LB2FD bmi LB2FD
@ -18268,7 +18268,7 @@ LB2FD: jsr prompt_input_loop
return #0 return #0
LB313: jsr reset_state LB313: jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
return #1 return #1
.endproc .endproc
@ -18283,7 +18283,7 @@ LB313: jsr reset_state
;; Create window ;; Create window
MGTK_RELAY_CALL MGTK::HideCursor MGTK_RELAY_CALL MGTK::HideCursor
jsr open_alert_window jsr open_alert_window
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
addr_call draw_dialog_title, desktop_aux::str_warning addr_call draw_dialog_title, desktop_aux::str_warning
MGTK_RELAY_CALL MGTK::ShowCursor MGTK_RELAY_CALL MGTK::ShowCursor
@ -18338,7 +18338,7 @@ draw_string:
pha pha
jsr reset_state jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
jsr set_cursor_pointer jsr set_cursor_pointer
pla pla
rts rts
@ -18512,8 +18512,8 @@ LB526: bit LD8E7
LB537: jmp reset_state LB537: jmp reset_state
.proc open_dialog_window .proc open_dialog_window
MGTK_RELAY_CALL MGTK::OpenWindow, winfoF MGTK_RELAY_CALL MGTK::OpenWindow, winfo_alert_dialog
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr set_penmode_xor2 jsr set_penmode_xor2
MGTK_RELAY_CALL MGTK::FrameRect, desktop_aux::confirm_dialog_outer_rect MGTK_RELAY_CALL MGTK::FrameRect, desktop_aux::confirm_dialog_outer_rect
@ -18522,8 +18522,8 @@ LB537: jmp reset_state
.endproc .endproc
.proc open_alert_window .proc open_alert_window
MGTK_RELAY_CALL MGTK::OpenWindow, winfoF MGTK_RELAY_CALL MGTK::OpenWindow, winfo_alert_dialog
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr set_fill_white jsr set_fill_white
MGTK_RELAY_CALL MGTK::PaintBits, alert_bitmap2_params MGTK_RELAY_CALL MGTK::PaintBits, alert_bitmap2_params
@ -18872,7 +18872,7 @@ loop: MGTK_RELAY_CALL MGTK::GetEvent, event_params
lda event_kind lda event_kind
cmp #MGTK::event_kind_button_up cmp #MGTK::event_kind_button_up
beq exit beq exit
lda winfoF lda winfo_alert_dialog
sta event_params sta event_params
MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params
MGTK_RELAY_CALL MGTK::MoveTo, screentowindow_windowx MGTK_RELAY_CALL MGTK::MoveTo, screentowindow_windowx
@ -18943,7 +18943,7 @@ LB93B: copy16 #LD8EF, textptr
sta textlen sta textlen
MGTK_RELAY_CALL MGTK::DrawText, drawtext_params MGTK_RELAY_CALL MGTK::DrawText, drawtext_params
MGTK_RELAY_CALL MGTK::SetTextBG, desktop_aux::LAE6D MGTK_RELAY_CALL MGTK::SetTextBG, desktop_aux::LAE6D
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
rts rts
.endproc .endproc
@ -18953,7 +18953,7 @@ LB93B: copy16 #LD8EF, textptr
.proc draw_filename_prompt .proc draw_filename_prompt
lda path_buf1 lda path_buf1
beq done beq done
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
jsr set_fill_white jsr set_fill_white
MGTK_RELAY_CALL MGTK::PaintRect, rect1 MGTK_RELAY_CALL MGTK::PaintRect, rect1
@ -18964,7 +18964,7 @@ LB93B: copy16 #LD8EF, textptr
addr_call draw_text1, path_buf1 addr_call draw_text1, path_buf1
addr_call draw_text1, path_buf2 addr_call draw_text1, path_buf2
addr_call draw_text1, str_2_spaces addr_call draw_text1, str_2_spaces
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
done: rts done: rts
.endproc .endproc
@ -19132,7 +19132,7 @@ LBB0B: sta LBB62
MGTK_RELAY_CALL MGTK::SetPortBits, setportbits_params3 MGTK_RELAY_CALL MGTK::SetPortBits, setportbits_params3
addr_call draw_text1, str_1_char addr_call draw_text1, str_1_char
addr_call draw_text1, path_buf2 addr_call draw_text1, path_buf2
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
rts rts
.endproc .endproc
@ -19155,7 +19155,7 @@ LBB63: lda path_buf1
MGTK_RELAY_CALL MGTK::SetPortBits, setportbits_params3 MGTK_RELAY_CALL MGTK::SetPortBits, setportbits_params3
addr_call draw_text1, path_buf2 addr_call draw_text1, path_buf2
addr_call draw_text1, str_2_spaces addr_call draw_text1, str_2_spaces
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
rts rts
.endproc .endproc
@ -19189,7 +19189,7 @@ LBBBC: ldx path_buf1
MGTK_RELAY_CALL MGTK::SetPortBits, setportbits_params3 MGTK_RELAY_CALL MGTK::SetPortBits, setportbits_params3
addr_call draw_text1, path_buf2 addr_call draw_text1, path_buf2
addr_call draw_text1, str_2_spaces addr_call draw_text1, str_2_spaces
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
rts rts
.endproc .endproc
@ -19219,7 +19219,7 @@ LBC2D: dec path_buf2
addr_call draw_text1, path_buf1 addr_call draw_text1, path_buf1
addr_call draw_text1, path_buf2 addr_call draw_text1, path_buf2
addr_call draw_text1, str_2_spaces addr_call draw_text1, str_2_spaces
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
rts rts

2
desktop/inc/desktoplc.inc
View File

@ -69,7 +69,7 @@ updatethumb_stash := updatethumb_params + 5 ; not part of struct
;;; ============================================================ ;;; ============================================================
;;; Resources ;;; Resources
winfoF := $D57D winfo_alert_dialog := $D57D
winfo_entrydlg := $D5B7 winfo_entrydlg := $D5B7
winfo_entrydlg_file_picker := $D5F1 winfo_entrydlg_file_picker := $D5F1
winfo_entry_picker := $D665 winfo_entry_picker := $D665

22
desktop/ovl2.s
View File

@ -41,7 +41,7 @@ L0800: pha
L080C: lda #$00 L080C: lda #$00
sta $D8E8 sta $D8E8
jsr LB509 jsr LB509
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
addr_call draw_dialog_title, $B245 addr_call draw_dialog_title, $B245
axy_call draw_dialog_label, $01, $B257 axy_call draw_dialog_label, $01, $B257
@ -64,7 +64,7 @@ L0841: jsr prompt_input_loop
L085F: bit $D887 L085F: bit $D887
bmi L0832 bmi L0832
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
MGTK_RELAY_CALL MGTK::PaintRect, $AE6E MGTK_RELAY_CALL MGTK::PaintRect, $AE6E
@ -90,7 +90,7 @@ L08B7: lda $D443
cmp #$10 cmp #$10
bcs L08B1 bcs L08B1
jsr set_cursor_pointer jsr set_cursor_pointer
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
MGTK_RELAY_CALL MGTK::PaintRect, $AE6E MGTK_RELAY_CALL MGTK::PaintRect, $AE6E
@ -109,7 +109,7 @@ L0902: jsr prompt_input_loop
beq L090C beq L090C
jmp L09C2 jmp L09C2
L090C: lda winfoF L090C: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
ldy #$11 ldy #$11
@ -126,7 +126,7 @@ L090C: lda winfoF
lda L09D7 lda L09D7
jsr L126F jsr L126F
bcs L099B bcs L099B
L0942: lda winfoF L0942: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
MGTK_RELAY_CALL MGTK::PaintRect, $AE6E MGTK_RELAY_CALL MGTK::PaintRect, $AE6E
@ -174,7 +174,7 @@ L09B8: jsr prompt_input_loop
L09C2: pha L09C2: pha
jsr set_cursor_pointer jsr set_cursor_pointer
jsr reset_state jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
ldx L09D8 ldx L09D8
pla pla
rts rts
@ -184,7 +184,7 @@ L09D8: .byte 0
L09D9: lda #$00 L09D9: lda #$00
sta $D8E8 sta $D8E8
jsr LB509 jsr LB509
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
addr_call draw_dialog_title, $B319 addr_call draw_dialog_title, $B319
ldax #$B32A ldax #$B32A
@ -204,7 +204,7 @@ L0A0E: jsr prompt_input_loop
L0A18: bit $D887 L0A18: bit $D887
bmi L0A0E bmi L0A0E
copy16 #$A898, $A89A copy16 #$A898, $A89A
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
MGTK_RELAY_CALL MGTK::PaintRect, $AE6E MGTK_RELAY_CALL MGTK::PaintRect, $AE6E
@ -230,7 +230,7 @@ L0A7A: lda $D443
cmp #$10 cmp #$10
bcs L0A74 bcs L0A74
jsr set_cursor_pointer jsr set_cursor_pointer
lda winfoF lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
MGTK_RELAY_CALL MGTK::PaintRect, $AE6E MGTK_RELAY_CALL MGTK::PaintRect, $AE6E
@ -250,7 +250,7 @@ L0AC7: jsr prompt_input_loop
beq L0AD1 beq L0AD1
jmp L0B31 jmp L0B31
L0AD1: lda winfoF L0AD1: lda winfo_alert_dialog
jsr set_port_from_window_id jsr set_port_from_window_id
MGTK_RELAY_CALL MGTK::SetPenMode, pencopy MGTK_RELAY_CALL MGTK::SetPenMode, pencopy
MGTK_RELAY_CALL MGTK::PaintRect, $AE6E MGTK_RELAY_CALL MGTK::PaintRect, $AE6E
@ -282,7 +282,7 @@ L0B2A: jsr prompt_input_loop
L0B31: pha L0B31: pha
jsr set_cursor_pointer jsr set_cursor_pointer
jsr reset_state jsr reset_state
MGTK_RELAY_CALL MGTK::CloseWindow, winfoF MGTK_RELAY_CALL MGTK::CloseWindow, winfo_alert_dialog
ldx L0B47 ldx L0B47
pla pla
rts rts