Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-11-28 15:50:16 +00:00
Code Issues Projects Releases Wiki Activity

disasm: volume icon clippping/window props

Browse Source
This commit is contained in:
Joshua Bell 2019-01-25 08:17:30 -08:00
parent c1673a5de6
commit 63de8287a7
1 changed files with 71 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

103
desktop/desktop_aux.s
View File

@ -2378,8 +2378,8 @@ done: MGTK_CALL MGTK::SetPortBits, portbits
.proc calc_window_intersections .proc calc_window_intersections
ptr := $06 ptr := $06
lda #$00 ; immediately overwritten??? lda #0 ; immediately overwritten???
jmp LA6C7 jmp start
;;; findwindow_params::window_id is used as first part of ;;; findwindow_params::window_id is used as first part of
;;; GetWinPtr params structure including window_ptr. ;;; GetWinPtr params structure including window_ptr.
@ -2389,16 +2389,19 @@ mousey: .word 0
which_area: .byte 0 which_area: .byte 0
window_id: .byte 0 window_id: .byte 0
.endproc .endproc
window_ptr: .word 0 window_ptr: .word 0 ; do not move this; see above
pt_num: .byte 0
pt_num: .byte $00
scrollbar_flags: scrollbar_flags:
.byte 0 ; bit 7 = hscroll present; bit 6 = vscroll present .byte 0 ; bit 7 = hscroll present; bit 6 = vscroll present
dialogbox_flag: dialogbox_flag:
.byte 0 ; bit 7 = dialog box .byte 0 ; bit 7 = dialog box
;;; Points at corners of icon's bounding rect
;;; pt1 +----+ pt2
;;; | |
;;; pt4 +----+ pt3
pt1: DEFINE_POINT 0,0,pt1 pt1: DEFINE_POINT 0,0,pt1
pt2: DEFINE_POINT 0,0,pt2 pt2: DEFINE_POINT 0,0,pt2
pt3: DEFINE_POINT 0,0,pt3 pt3: DEFINE_POINT 0,0,pt3
@ -2407,7 +2410,7 @@ pt4: DEFINE_POINT 0,0,pt4
xcoord: .word 0 xcoord: .word 0
ycoord: .word 0 ycoord: .word 0
LA6C7: lda more_drawing_needed_flag start: lda more_drawing_needed_flag
beq LA6FA beq LA6FA
;; portbits::cliprect::x1 = portbits::viewloc::xcoord = porbits::cliprect::x2 ;; portbits::cliprect::x1 = portbits::viewloc::xcoord = porbits::cliprect::x2
@ -2421,14 +2424,17 @@ LA6C7: lda more_drawing_needed_flag
sta portbits::cliprect::x1+1 sta portbits::cliprect::x1+1
sta portbits::viewloc::xcoord+1 sta portbits::viewloc::xcoord+1
;; ???
COPY_BYTES 6, LA629, portbits::cliprect::y1 COPY_BYTES 6, LA629, portbits::cliprect::y1
;; ???
copy16 portbits::cliprect::y1, portbits::viewloc::ycoord copy16 portbits::cliprect::y1, portbits::viewloc::ycoord
;; Corners of bounding rect (clockwise from upper-left)
;; pt1::xcoord = pt4::xcoord = portbits::cliprect::x1 ;; pt1::xcoord = pt4::xcoord = portbits::cliprect::x1
;; pt1::xcoord = pt2::xcoord = portbits::cliprect::y1 ;; pt1::ycoord = pt2::ycoord = portbits::cliprect::y1
;; pt2::xcoord = pt3::xcoord = portbits::cliprect::x2 ;; pt2::xcoord = pt3::xcoord = portbits::cliprect::x2
;; pt3::xcoord = pt4::xcoord = portbits::cliprect::y2 ;; pt3::ycoord = pt4::ycoord = portbits::cliprect::y2
LA6FA: lda portbits::cliprect::x1 LA6FA: lda portbits::cliprect::x1
sta pt1::xcoord sta pt1::xcoord
sta pt4::xcoord sta pt4::xcoord
@ -2458,17 +2464,18 @@ LA6FA: lda portbits::cliprect::x1
sta pt_num sta pt_num
next_pt: next_pt:
;; Done all 4 points?
lda pt_num lda pt_num
cmp #4 cmp #4
bne LA775 bne do_pt
lda #0
sta pt_num
;; -------------------------------------------------- ;; --------------------------------------------------
;; Finish up ;; Finish up
lda #0 set_bits:
sta pt_num MGTK_CALL MGTK::SetPortBits, portbits
LA753: MGTK_CALL MGTK::SetPortBits, portbits
;; if (cliprect::x2 < LA62B) more drawing is needed ;; if (cliprect::x2 < LA62B) more drawing is needed
lda portbits::cliprect::x2+1 lda portbits::cliprect::x2+1
cmp LA62B+1 cmp LA62B+1
@ -2482,9 +2489,10 @@ LA753: MGTK_CALL MGTK::SetPortBits, portbits
: copy #1, more_drawing_needed_flag : copy #1, more_drawing_needed_flag
rts rts
;; -------------------------------------------------- ;; ==================================================
;; Find window at Nth point, and compute bounds
LA775: lda pt_num do_pt: lda pt_num
asl a ; *4 (.sizeof(Point)) asl a ; *4 (.sizeof(Point))
asl a asl a
tax tax
@ -2506,6 +2514,9 @@ LA775: lda pt_num
sta getwinport_params sta getwinport_params
MGTK_CALL MGTK::GetWinPort, getwinport_params MGTK_CALL MGTK::GetWinPort, getwinport_params
;; --------------------------------------------------
;; Compute window bounds (including non-content area)
jsr push_pointers jsr push_pointers
MGTK_CALL MGTK::GetWinPtr, findwindow_params::window_id MGTK_CALL MGTK::GetWinPtr, findwindow_params::window_id
@ -2534,8 +2545,12 @@ LA775: lda pt_num
sub16 icon_grafport::viewloc::xcoord, #2, icon_grafport::viewloc::xcoord sub16 icon_grafport::viewloc::xcoord, #2, icon_grafport::viewloc::xcoord
sub16 icon_grafport::cliprect::x1, #2, icon_grafport::cliprect::x1 sub16 icon_grafport::cliprect::x1, #2, icon_grafport::cliprect::x1
;; --------------------------------------------------
;; Adjust window rect to account for title bar
;; Is dialog? (i.e. no title bar)
bit dialogbox_flag bit dialogbox_flag
bmi LA820 bmi check_scrollbars
;; viewloc::ycoord -= 14 ;; viewloc::ycoord -= 14
lda icon_grafport::viewloc::ycoord lda icon_grafport::viewloc::ycoord
@ -2555,7 +2570,12 @@ LA775: lda pt_num
dec icon_grafport::cliprect::y1+1 dec icon_grafport::cliprect::y1+1
: :
LA820: bit scrollbar_flags ;; --------------------------------------------------
;; Adjust window rect to account for scroll bars
check_scrollbars:
;; Horizontal scrollbar?
bit scrollbar_flags
bpl :+ bpl :+
;; cliprect::y2 += 12 ;; cliprect::y2 += 12
@ -2566,6 +2586,7 @@ LA820: bit scrollbar_flags
bcc :+ bcc :+
inc icon_grafport::cliprect::y2+1 inc icon_grafport::cliprect::y2+1
;; Vertical scrollbar?
: bit scrollbar_flags : bit scrollbar_flags
bvc :+ bvc :+
@ -2579,7 +2600,12 @@ LA820: bit scrollbar_flags
: jsr pop_pointers : jsr pop_pointers
;; --------------------------------------------------
;; xcoord = cliprect::x2 - cliprect::x1
sub16 icon_grafport::cliprect::x2, icon_grafport::cliprect::x1, xcoord sub16 icon_grafport::cliprect::x2, icon_grafport::cliprect::x1, xcoord
;; ycoord = cliprect::y2 - cliprect::y1
sub16 icon_grafport::cliprect::y2, icon_grafport::cliprect::y1, ycoord sub16 icon_grafport::cliprect::y2, icon_grafport::cliprect::y1, ycoord
;; xcoord += viewloc::xcoord ;; xcoord += viewloc::xcoord
@ -2594,32 +2620,45 @@ LA820: bit scrollbar_flags
;; ycoord += viewloc::ycoord ;; ycoord += viewloc::ycoord
add16 ycoord, icon_grafport::viewloc::ycoord, ycoord add16 ycoord, icon_grafport::viewloc::ycoord, ycoord
;; if (cliprect::x2 < xcoord) xcoord = cliprect::x2 + 1
cmp16 portbits::cliprect::x2, xcoord ;; ==================================================
;;
;; At this point, xcoord,ycoord is the bottom-right corner
;; of the window, and viewloc is the top-left corner.
;;
;; --------------------------------------------------
win_l := icon_grafport::viewloc::xcoord
win_t := icon_grafport::viewloc::ycoord
win_r := xcoord
win_b := ycoord
;; if (cliprect::x2 < win_r) cliprect::x2 = win_r + 1
cmp16 portbits::cliprect::x2, win_r
bmi :+ bmi :+
add16 xcoord, #1, portbits::cliprect::x2 add16 win_r, #1, portbits::cliprect::x2
jmp LA8D4 jmp LA8D4
;; if (viewloc::xcoord < cliprect::x1) viewloc::xcoord = cliprect::x2 ;; if (win_l < cliprect::x1) cliprect::x2 = win_l
: cmp16 icon_grafport::viewloc::xcoord, portbits::cliprect::x1 : cmp16 win_l, portbits::cliprect::x1
bmi LA8D4 bmi LA8D4
copy16 icon_grafport::viewloc::xcoord, portbits::cliprect::x2 copy16 win_l, portbits::cliprect::x2
jmp LA6FA jmp LA6FA
;; if (viewloc::ycoord < cliprect::y1) ;; if (win_t < cliprect::y1)
LA8D4: cmp16 icon_grafport::viewloc::ycoord, portbits::cliprect::y1 LA8D4: cmp16 win_t, portbits::cliprect::y1
bmi :+ bmi :+
;; viewloc::ycoord = cliprect::y2 ;; cliprect::y2 = win_t
copy16 icon_grafport::viewloc::ycoord, portbits::cliprect::y2 copy16 win_t, portbits::cliprect::y2
copy #1, more_drawing_needed_flag copy #1, more_drawing_needed_flag
jmp LA6FA jmp LA6FA
;; if (ycoord > portbits::cliprect::y2) ;; if (win_b > portbits::cliprect::y2)
: cmp16 ycoord, portbits::cliprect::y2 : cmp16 win_b, portbits::cliprect::y2
bpl LA923 bpl LA923
;; portbits::cliprect::y1 = portbits::viewloc::ycoord = ycoord + 2 ;; portbits::cliprect::y1 = portbits::viewloc::ycoord = win_b + 2
lda ycoord lda win_b
clc clc
adc #2 adc #2
sta portbits::cliprect::y1 sta portbits::cliprect::y1
@ -2638,7 +2677,7 @@ LA923: lda portbits::cliprect::x2
lda portbits::cliprect::x2+1 lda portbits::cliprect::x2+1
sta portbits::cliprect::x1+1 sta portbits::cliprect::x1+1
sta portbits::viewloc::xcoord+1 sta portbits::viewloc::xcoord+1
jmp LA753 jmp set_bits
.endproc .endproc
;;; ============================================================ ;;; ============================================================