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

overlay handlers

Browse Source
This commit is contained in:
Joshua Bell 2018-12-17 19:11:26 -08:00
parent 896d31c244
commit 0ca7a41536
4 changed files with 105 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

98
desktop/ovl4.s
View File

@ -2221,7 +2221,8 @@ L66C9: addr_call draw_string, path_buf2
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
rts rts
L66D8: lda winfo_entrydlg handle_f1_click:
lda winfo_entrydlg
sta screentowindow_window_id sta screentowindow_window_id
MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params
lda winfo_entrydlg lda winfo_entrydlg
@ -2270,7 +2271,7 @@ L6783: lda $08
cmp path_buf2 cmp path_buf2
bcc L6790 bcc L6790
dec path_buf2 dec path_buf2
jmp L6B44 jmp handle_f1_meta_right_key
L6790: ldx #$02 L6790: ldx #$02
ldy path_buf0 ldy path_buf0
@ -2310,7 +2311,7 @@ L67D1: MGTK_RELAY_CALL MGTK::TextWidth, $06
lda $08 lda $08
cmp #$01 cmp #$01
bcs L67D1 bcs L67D1
jmp L6B01 jmp handle_f1_meta_left_key
L6800: inc $08 L6800: inc $08
ldy #$00 ldy #$00
@ -2349,7 +2350,8 @@ L6846: jsr jt_03
rts rts
L684D: .word 0 L684D: .word 0
L684F: lda winfo_entrydlg handle_f2_click:
lda winfo_entrydlg
sta screentowindow_window_id sta screentowindow_window_id
MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params MGTK_RELAY_CALL MGTK::ScreenToWindow, screentowindow_params
lda winfo_entrydlg lda winfo_entrydlg
@ -2398,7 +2400,7 @@ L68FA: lda $08
cmp path_buf2 cmp path_buf2
bcc L6907 bcc L6907
dec path_buf2 dec path_buf2
jmp L6CF0 jmp handle_f2_meta_right_key
L6907: ldx #$02 L6907: ldx #$02
ldy path_buf1 ldy path_buf1
@ -2438,7 +2440,7 @@ L6948: MGTK_RELAY_CALL MGTK::TextWidth, $06
lda $08 lda $08
cmp #$01 cmp #$01
bcs L6948 bcs L6948
jmp L6CAD jmp handle_f2_meta_left_key
L6977: inc $08 L6977: inc $08
ldy #$00 ldy #$00
@ -2503,7 +2505,11 @@ L69D5: lda L6A17
rts rts
L6A17: .byte 0 L6A17: .byte 0
L6A18: lda path_buf0
;;; ============================================================
.proc handle_f1_delete_key
lda path_buf0
bne L6A1E bne L6A1E
rts rts
@ -2518,8 +2524,12 @@ L6A1E: dec path_buf0
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
jsr L6EA3 jsr L6EA3
rts rts
.endproc
L6A53: lda path_buf0 ;;; ============================================================
.proc handle_f1_left_key
lda path_buf0
bne L6A59 bne L6A59
rts rts
@ -2546,8 +2556,12 @@ L6A6B: ldx path_buf0
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
jsr L6EA3 jsr L6EA3
rts rts
.endproc
L6AAC: lda path_buf2 ;;; ============================================================
.proc handle_f1_right_key
lda path_buf2
cmp #$02 cmp #$02
bcs L6AB4 bcs L6AB4
rts rts
@ -2575,8 +2589,12 @@ L6AD6: dec path_buf2
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
jsr L6EA3 jsr L6EA3
rts rts
.endproc
L6B01: lda path_buf0 ;;; ============================================================
.proc handle_f1_meta_left_key
lda path_buf0
bne L6B07 bne L6B07
rts rts
@ -2606,8 +2624,12 @@ L6B23: lda path_buf0,y
jsr jt_03 jsr jt_03
jsr L6EA3 jsr L6EA3
rts rts
.endproc
L6B44: lda path_buf2 ;;; ============================================================
.proc handle_f1_meta_right_key
lda path_buf2
cmp #$02 cmp #$02
bcs L6B4C bcs L6B4C
rts rts
@ -2626,8 +2648,12 @@ L6B51: inx
jsr jt_03 jsr jt_03
jsr L6EA3 jsr L6EA3
rts rts
.endproc
L6B72: sta L6BC3 ;;; ============================================================
.proc L6B72
sta L6BC3
lda path_buf1 lda path_buf1
clc clc
adc path_buf2 adc path_buf2
@ -2653,7 +2679,12 @@ L6B81: lda L6BC3
rts rts
L6BC3: .byte 0 L6BC3: .byte 0
L6BC4: lda path_buf1 .endproc
;;; ============================================================
.proc handle_f2_delete_key
lda path_buf1
bne L6BCA bne L6BCA
rts rts
@ -2668,8 +2699,12 @@ L6BCA: dec path_buf1
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
jsr L6E9F jsr L6E9F
rts rts
.endproc
L6BFF: lda path_buf1 ;;; ============================================================
.proc handle_f2_left_key
lda path_buf1
bne L6C05 bne L6C05
rts rts
@ -2696,8 +2731,12 @@ L6C17: ldx path_buf1
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
jsr L6E9F jsr L6E9F
rts rts
.endproc
L6C58: lda path_buf2 ;;; ============================================================
.proc handle_f2_right_key
lda path_buf2
cmp #$02 cmp #$02
bcs L6C60 bcs L6C60
rts rts
@ -2725,8 +2764,12 @@ L6C82: dec path_buf2
addr_call draw_string, str_2_spaces addr_call draw_string, str_2_spaces
jsr L6E9F jsr L6E9F
rts rts
.endproc
L6CAD: lda path_buf1 ;;; ============================================================
.proc handle_f2_meta_left_key
lda path_buf1
bne L6CB3 bne L6CB3
rts rts
@ -2756,8 +2799,12 @@ L6CCF: lda path_buf1,y
jsr jt_03 jsr jt_03
jsr L6E9F jsr L6E9F
rts rts
.endproc
L6CF0: lda path_buf2 ;;; ============================================================
.proc handle_f2_meta_right_key
lda path_buf2
cmp #$02 cmp #$02
bcs L6CF8 bcs L6CF8
rts rts
@ -2776,6 +2823,9 @@ L6CFD: inx
jsr jt_03 jsr jt_03
jsr L6E9F jsr L6E9F
rts rts
.endproc
;;; ============================================================
;;; Dynamically altered table of handlers for focused ;;; Dynamically altered table of handlers for focused
;;; input field (e.g. source/destination filename, etc) ;;; input field (e.g. source/destination filename, etc)
@ -2788,12 +2838,14 @@ jt_04: jmp 0
jt_05: jmp 0 jt_05: jmp 0
jt_06: jmp 0 jt_06: jmp 0
jt_07: jmp 0 jt_07: jmp 0
jt_08: jmp 0 ; delete key ??? jt_08: jmp 0 ; delete key
jt_09: jmp 0 ; left key ??? jt_09: jmp 0 ; left key
jt_10: jmp 0 ; right key ??? jt_10: jmp 0 ; right key
jt_11: jmp 0 ; meta-left key ??? jt_11: jmp 0 ; meta-left key
jt_12: jmp 0 ; meta-right key ??? jt_12: jmp 0 ; meta-right key
jt_13: jmp 0 ; click handler ??? jt_13: jmp 0 ; click handler
;;; ============================================================
L6D48: stax $06 L6D48: stax $06
ldx path_buf0 ldx path_buf0

24
desktop/ovl5.s
View File

@ -60,12 +60,12 @@ jt_source_filename:
jump_table_entry common_overlay::L6DD0 jump_table_entry common_overlay::L6DD0
jump_table_entry common_overlay::L6E1D jump_table_entry common_overlay::L6E1D
jump_table_entry common_overlay::L69C6 jump_table_entry common_overlay::L69C6
jump_table_entry common_overlay::L6A18 jump_table_entry common_overlay::handle_f1_delete_key
jump_table_entry common_overlay::L6A53 jump_table_entry common_overlay::handle_f1_left_key
jump_table_entry common_overlay::L6AAC jump_table_entry common_overlay::handle_f1_right_key
jump_table_entry common_overlay::L6B01 jump_table_entry common_overlay::handle_f1_meta_left_key
jump_table_entry common_overlay::L6B44 jump_table_entry common_overlay::handle_f1_meta_right_key
jump_table_entry common_overlay::L66D8 jump_table_entry common_overlay::handle_f1_click
jt_destination_entries: jt_destination_entries:
.byte $29 ; length of following data block .byte $29 ; length of following data block
@ -77,12 +77,12 @@ jt_destination_entries:
jump_table_entry common_overlay::L6DD4 jump_table_entry common_overlay::L6DD4
jump_table_entry common_overlay::L6E31 jump_table_entry common_overlay::L6E31
jump_table_entry common_overlay::L6B72 jump_table_entry common_overlay::L6B72
jump_table_entry common_overlay::L6BC4 jump_table_entry common_overlay::handle_f2_delete_key
jump_table_entry common_overlay::L6BFF jump_table_entry common_overlay::handle_f2_left_key
jump_table_entry common_overlay::L6C58 jump_table_entry common_overlay::handle_f2_right_key
jump_table_entry common_overlay::L6CAD jump_table_entry common_overlay::handle_f2_meta_left_key
jump_table_entry common_overlay::L6CF0 jump_table_entry common_overlay::handle_f2_meta_right_key
jump_table_entry common_overlay::L684F jump_table_entry common_overlay::handle_f2_click
;;; ============================================================ ;;; ============================================================

12
desktop/ovl6.s
View File

@ -57,12 +57,12 @@ jt_filename:
jump_table_entry common_overlay::L6DD0 jump_table_entry common_overlay::L6DD0
jump_table_entry common_overlay::L6E1D jump_table_entry common_overlay::L6E1D
jump_table_entry common_overlay::L69C6 jump_table_entry common_overlay::L69C6
jump_table_entry common_overlay::L6A18 jump_table_entry common_overlay::handle_f1_delete_key
jump_table_entry common_overlay::L6A53 jump_table_entry common_overlay::handle_f1_left_key
jump_table_entry common_overlay::L6AAC jump_table_entry common_overlay::handle_f1_right_key
jump_table_entry common_overlay::L6B01 jump_table_entry common_overlay::handle_f1_meta_left_key
jump_table_entry common_overlay::L6B44 jump_table_entry common_overlay::handle_f1_meta_right_key
jump_table_entry common_overlay::L66D8 jump_table_entry common_overlay::handle_f1_click
L70B1: addr_call common_overlay::L647C, path_buf0 L70B1: addr_call common_overlay::L647C, path_buf0

24
desktop/ovl7.s
View File

@ -146,12 +146,12 @@ jt_pathname: .byte $29
jump_table_entry common_overlay::L6DD0 jump_table_entry common_overlay::L6DD0
jump_table_entry common_overlay::L6E1D jump_table_entry common_overlay::L6E1D
jump_table_entry common_overlay::L69C6 jump_table_entry common_overlay::L69C6
jump_table_entry common_overlay::L6A18 jump_table_entry common_overlay::handle_f1_delete_key
jump_table_entry common_overlay::L6A53 jump_table_entry common_overlay::handle_f1_left_key
jump_table_entry common_overlay::L6AAC jump_table_entry common_overlay::handle_f1_right_key
jump_table_entry common_overlay::L6B01 jump_table_entry common_overlay::handle_f1_meta_left_key
jump_table_entry common_overlay::L6B44 jump_table_entry common_overlay::handle_f1_meta_right_key
jump_table_entry common_overlay::L66D8 jump_table_entry common_overlay::handle_f1_click
jt_entry_name: .byte $29 jt_entry_name: .byte $29
jump_table_entry L72CD jump_table_entry L72CD
@ -162,12 +162,12 @@ jt_entry_name: .byte $29
jump_table_entry common_overlay::L6DD4 jump_table_entry common_overlay::L6DD4
jump_table_entry common_overlay::L6E31 jump_table_entry common_overlay::L6E31
jump_table_entry common_overlay::L6B72 jump_table_entry common_overlay::L6B72
jump_table_entry common_overlay::L6BC4 jump_table_entry common_overlay::handle_f2_delete_key
jump_table_entry common_overlay::L6BFF jump_table_entry common_overlay::handle_f2_left_key
jump_table_entry common_overlay::L6C58 jump_table_entry common_overlay::handle_f2_right_key
jump_table_entry common_overlay::L6CAD jump_table_entry common_overlay::handle_f2_meta_left_key
jump_table_entry common_overlay::L6CF0 jump_table_entry common_overlay::handle_f2_meta_right_key
jump_table_entry common_overlay::L684F jump_table_entry common_overlay::handle_f2_click
;;; ============================================================ ;;; ============================================================