Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2025-02-16 04:33:41 +00:00
Code Issues Projects Releases Wiki Activity

disasm: misc rect table

Browse Source
This commit is contained in:
Joshua Bell 2019-01-04 19:34:34 -08:00
parent 53230b5967
commit 2032c53fd0
1 changed files with 20 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
desktop/desktop_main.s
View File

@ -8994,36 +8994,41 @@ open: ldy #$00
lda icon_id
jsr icon_entry_lookup
stax ptr
ldy #3
lda ($06),y
ldy #IconEntry::iconx
lda (ptr),y ; x lo
clc
adc #7
sta rect_table
sta $0804
sta rect_table+4
iny
lda ($06),y
lda (ptr),y
adc #0
sta $0801
sta $0805
sta rect_table+1
sta rect_table+5
iny
lda ($06),y
lda (ptr),y
clc
adc #7
sta $0801+1
sta $0806
sta rect_table+2
sta rect_table+6
iny
lda ($06),y
lda (ptr),y ; y hi
adc #0
sta $0803
sta $0807
ldy #91
sta rect_table+3
sta rect_table+7
ldy #11 * .sizeof(MGTK::Rect) + 3
ldx #3
L8BC1: lda grafport2,x
: lda grafport2,x
sta rect_table,y
dey
dex
bpl L8BC1
bpl :-
sub16 grafport2::cliprect::x2, grafport2::cliprect::x1, L8D54
sub16 grafport2::cliprect::y2, grafport2::cliprect::y1, L8D56
add16 $0858, L8D54, $085C