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

DeskTop: More overlay resource identifiers

Browse Source
This commit is contained in:
Joshua Bell 2018-05-06 09:15:41 -07:00
parent bbe9ff8896
commit e894207778
2 changed files with 32 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
desktop/desktop_main.s
View File

@ -13509,7 +13509,7 @@ done: rts
sta ptr+2 sta ptr+2
LBA10: MGTK_RELAY_CALL MGTK::TextWidth, ptr LBA10: MGTK_RELAY_CALL MGTK::TextWidth, ptr
add16 $09, LBB09, $09 add16 $09, LBB09, $09
cmp16 $09, $D20D cmp16 $09, screentowindow_windowx
bcc LBA42 bcc LBA42
dec $08 dec $08
lda $08 lda $08
@ -13565,7 +13565,7 @@ LBA7C: dey
sta textlen sta textlen
: MGTK_RELAY_CALL MGTK::TextWidth, params : MGTK_RELAY_CALL MGTK::TextWidth, params
add16 result, point6::xcoord, result add16 result, point6::xcoord, result
cmp16 result, $D20D cmp16 result, screentowindow_windowx
bcc LBABF bcc LBABF
dec textlen dec textlen
lda textlen lda textlen

60
desktop/ovl4.s
View File

@ -128,15 +128,15 @@ L51AF: MGTK_RELAY_CALL MGTK::FindWindow, findwindow_params
bne L51BE bne L51BE
rts rts
L51BE: cmp #$02 L51BE: cmp #MGTK::area_content
bne L51C6 bne :+
jmp L51C7 jmp L51C7
rts rts ; ???
L51C6: rts : rts
L51C7: lda $D20E L51C7: lda findwindow_window_id
cmp winfo_entrydlg cmp winfo_entrydlg
beq L51D2 beq L51D2
jmp L531F jmp L531F
@ -320,7 +320,7 @@ L53B5: and #$7F
L542E: .byte 0 L542E: .byte 0
L542F: lda $D20F L542F: lda screentowindow_windowy
cmp $177F cmp $177F
bcc L5438 bcc L5438
rts rts
@ -330,7 +330,7 @@ L5438: lda $D920
jsr L6D2A jsr L6D2A
lda $D920 lda $D920
jsr L6274 jsr L6274
L5446: lda $D20F L5446: lda screentowindow_windowy
sta $D920 sta $D920
bit $D8F0 bit $D8F0
bpl L5457 bpl L5457
@ -345,20 +345,20 @@ L5457: lda $D920
L5468: rts L5468: rts
L5469: lda $D20E L5469: lda findcontrol_which_part
cmp #$01 cmp #MGTK::part_up_arrow
bne L5473 bne L5473
jmp L550A jmp L550A
L5473: cmp #$02 L5473: cmp #MGTK::part_down_arrow
bne L547A bne L547A
jmp L5533 jmp L5533
L547A: cmp #$03 L547A: cmp #MGTK::part_page_up
bne L5481 bne L5481
jmp L54BA jmp L54BA
L5481: cmp #$04 L5481: cmp #MGTK::part_page_down
bne L5488 bne L5488
jmp L54DF jmp L54DF
@ -373,7 +373,7 @@ L5488: lda #MGTK::ctl_vertical_scroll_bar
lda #MGTK::ctl_vertical_scroll_bar lda #MGTK::ctl_vertical_scroll_bar
sta updatethumb_which_ctl sta updatethumb_which_ctl
MGTK_RELAY_CALL MGTK::UpdateThumb, updatethumb_params MGTK_RELAY_CALL MGTK::UpdateThumb, updatethumb_params
lda $D20D lda updatethumb_stash
jsr L6227 jsr L6227
jsr L606D jsr L606D
rts rts
@ -1103,7 +1103,7 @@ L5C2F: sta $D920
rts rts
L5C4F: ldx #$03 L5C4F: ldx #$03
L5C51: lda $D209,x L5C51: lda screentowindow_screenx,x
sta L5CF0,x sta L5CF0,x
dex dex
bpl L5C51 bpl L5C51
@ -1116,29 +1116,29 @@ L5C60: dec L5CEF
bmi L5CA6 bmi L5CA6
lda #$FF lda #$FF
sta L5CF6 sta L5CF6
lda $D208 lda event_kind
sta L5CF5 sta L5CF5
cmp #$00 cmp #MGTK::event_kind_no_event
beq L5C60 beq L5C60
cmp #$04 cmp #MGTK::event_kind_drag
beq L5C60 beq L5C60
cmp #$02 cmp #MGTK::event_kind_button_up
bne L5C96 bne L5C96
MGTK_RELAY_CALL MGTK::GetEvent, event_params MGTK_RELAY_CALL MGTK::GetEvent, event_params
jmp L5C60 jmp L5C60
L5C96: cmp #$01 L5C96: cmp #MGTK::event_kind_button_down
bne L5CA6 bne L5CA6
MGTK_RELAY_CALL MGTK::GetEvent, event_params MGTK_RELAY_CALL MGTK::GetEvent, event_params
return #$00 return #$00
L5CA6: return #$FF L5CA6: return #$FF
L5CA9: lda $D209 L5CA9: lda event_xcoord
sec sec
sbc L5CF0 sbc L5CF0
sta L5CF4 sta L5CF4
lda $D20A lda event_xcoord+1
sbc L5CF1 sbc L5CF1
bpl L5CC5 bpl L5CC5
lda L5CF4 lda L5CF4
@ -1149,11 +1149,11 @@ L5CC2: return #$FF
L5CC5: lda L5CF4 L5CC5: lda L5CF4
cmp #$05 cmp #$05
bcs L5CC2 bcs L5CC2
L5CCC: lda $D20B L5CCC: lda event_ycoord
sec sec
sbc L5CF2 sbc L5CF2
sta L5CF4 sta L5CF4
lda $D20C lda event_ycoord+1
sbc L5CF3 sbc L5CF3
bpl L5CE5 bpl L5CE5
lda L5CF4 lda L5CF4
@ -2098,7 +2098,7 @@ L6718: rts
L6719: jsr L6E45 L6719: jsr L6E45
stax $06 stax $06
cmp16 $D20D, $06 cmp16 screentowindow_windowx, $06
bcs L672F bcs L672F
jmp L67C4 jmp L67C4
@ -2106,7 +2106,7 @@ L672F: jsr L6E45
stax L684D stax L684D
ldx path_buf2 ldx path_buf2
inx inx
lda #$20 lda #' '
sta path_buf2,x sta path_buf2,x
inc path_buf2 inc path_buf2
copy16 #path_buf2, $06 copy16 #path_buf2, $06
@ -2114,7 +2114,7 @@ L672F: jsr L6E45
sta $08 sta $08
L6751: MGTK_RELAY_CALL MGTK::TextWidth, $06 L6751: MGTK_RELAY_CALL MGTK::TextWidth, $06
add16 $09, L684D, $09 add16 $09, L684D, $09
cmp16 $09, $D20D cmp16 $09, screentowindow_windowx
bcc L6783 bcc L6783
dec $08 dec $08
lda $08 lda $08
@ -2161,7 +2161,7 @@ L67C4: copy16 #path_buf0, $06
sta $08 sta $08
L67D1: MGTK_RELAY_CALL MGTK::TextWidth, $06 L67D1: MGTK_RELAY_CALL MGTK::TextWidth, $06
add16 $09, path_pos1, $09 add16 $09, path_pos1, $09
cmp16 $09, $D20D cmp16 $09, screentowindow_windowx
bcc L6800 bcc L6800
dec $08 dec $08
lda $08 lda $08
@ -2226,7 +2226,7 @@ L688F: rts
L6890: jsr L6E72 L6890: jsr L6E72
stax $06 stax $06
cmp16 $D20D, $06 cmp16 screentowindow_windowx, $06
bcs L68A6 bcs L68A6
jmp L693B jmp L693B
@ -2242,7 +2242,7 @@ L68A6: jsr L6E72
sta $08 sta $08
L68C8: MGTK_RELAY_CALL MGTK::TextWidth, $06 L68C8: MGTK_RELAY_CALL MGTK::TextWidth, $06
add16 $09, L69C4, $09 add16 $09, L69C4, $09
cmp16 $09, $D20D cmp16 $09, screentowindow_windowx
bcc L68FA bcc L68FA
dec $08 dec $08
lda $08 lda $08
@ -2289,7 +2289,7 @@ L693B: copy16 #path_buf1, $06
sta $08 sta $08
L6948: MGTK_RELAY_CALL MGTK::TextWidth, $06 L6948: MGTK_RELAY_CALL MGTK::TextWidth, $06
add16 $09, path_pos2, $09 add16 $09, path_pos2, $09
cmp16 $09, $D20D cmp16 $09, screentowindow_windowx
bcc L6977 bcc L6977
dec $08 dec $08
lda $08 lda $08