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

apply refactor tool to ovl5/6/7

Browse Source
This commit is contained in:
Joshua Bell 2018-02-23 21:11:20 -08:00
parent c4617510d7
commit fb0c2f1cfd
3 changed files with 20 additions and 58 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
desktop/ovl5.s
View File

@ -226,8 +226,7 @@ L71C0: copy16 #path_buf0, $6
copy16 #path_buf1, $8 copy16 #path_buf1, $8
ldx $50AA ldx $50AA
txs txs
lda #$00 return #$00
rts
.byte 0 .byte 0
@ -240,8 +239,7 @@ L71D8: MGTK_RELAY_CALL MGTK::CloseWindow, winfo15
jsr L55BA jsr L55BA
ldx $50AA ldx $50AA
txs txs
lda #$FF return #$FF
rts
;;; ================================================== ;;; ==================================================

3
desktop/ovl6.s
View File

@ -135,8 +135,7 @@ L70EA: MGTK_RELAY_CALL MGTK::CloseWindow, winfo15
jsr L55BA jsr L55BA
ldx $50AA ldx $50AA
txs txs
lda #$FF return #$FF
rts
PAD_TO $7800 PAD_TO $7800
.endproc .endproc

69
desktop/ovl7.s
View File

@ -99,16 +99,10 @@ L706A: jsr L6163
lda path_buf0 lda path_buf0
bne L707B bne L707B
jsr L6D30 jsr L6D30
L707B: lda #$01 L707B: copy16 #$2001, $D484
sta $D484
lda #$20
sta $D485
jsr L6D27 jsr L6D27
jsr L6693 jsr L6693
lda #$01 copy16 #$2001, $D484
sta $D484
lda #$20
sta $D485
lda #$FF lda #$FF
sta $D8EC sta $D8EC
jmp L5106 jmp L5106
@ -133,10 +127,7 @@ L70B0: lda L7207+1,x
sta $51AE sta $51AE
lda #$80 lda #$80
sta $5104 sta $5104
lda #$01 copy16 #$0601, $D484
sta $D484
lda #$06
sta $D485
lda winfo12 lda winfo12
jsr L62C8 jsr L62C8
lda L73A9 lda L73A9
@ -236,10 +227,7 @@ L7233: entry 0, $72CD
;;; ================================================== ;;; ==================================================
lda #$01 copy16 #$2001, $D484
sta $D484
lda #$20
sta $D485
jsr L6D27 jsr L6D27
ldx L7232 ldx L7232
L726D: lda L7232+1,x L726D: lda L7232+1,x
@ -278,10 +266,7 @@ L72AF: iny
cpx path_buf0 cpx path_buf0
bne L72AF bne L72AF
sty $D443 sty $D443
L72BF: lda #$01 L72BF: copy16 #$0601, $D484
sta $D484
lda #$06
sta $D485
jsr L6D27 jsr L6D27
rts rts
@ -307,16 +292,12 @@ L72EE: MGTK_RELAY_CALL MGTK::InitPort, grafport3
MGTK_RELAY_CALL MGTK::CloseWindow, winfo12 MGTK_RELAY_CALL MGTK::CloseWindow, winfo12
sta $D8EC sta $D8EC
jsr L55BA jsr L55BA
lda #$B8 copy16 #$59B8, $5B24
sta $5B24
lda #$59
sta $5B25
ldx $50AA ldx $50AA
txs txs
ldx L73A9 ldx L73A9
ldy L73AA ldy L73AA
lda #$00 return #$00
rts
MGTK_RELAY_CALL MGTK::InitPort, grafport3 MGTK_RELAY_CALL MGTK::InitPort, grafport3
MGTK_RELAY_CALL MGTK::SetPort, grafport3 MGTK_RELAY_CALL MGTK::SetPort, grafport3
@ -325,19 +306,12 @@ L72EE: MGTK_RELAY_CALL MGTK::InitPort, grafport3
lda #$00 lda #$00
sta $D8EC sta $D8EC
jsr L55BA jsr L55BA
lda #$B8 copy16 #$59B8, $5B24
sta $5B24
lda #$59
sta $5B25
ldx $50AA ldx $50AA
txs txs
lda #$FF return #$FF
rts
lda #$01 copy16 #$2001, $D484
sta $D484
lda #$20
sta $D485
jsr L6D27 jsr L6D27
ldx L7207 ldx L7207
L737C: lda L7207+1,x L737C: lda L7207+1,x
@ -348,10 +322,7 @@ L737C: lda L7207+1,x
dex dex
dex dex
bpl L737C bpl L737C
lda #$01 copy16 #$0601, $D484
sta $D484
lda #$06
sta $D485
jsr L6D27 jsr L6D27
lda #$00 lda #$00
sta $5105 sta $5105
@ -388,8 +359,7 @@ L73EB: MGTK_RELAY_CALL MGTK::InRect, $D986
bne L73FB bne L73FB
jmp L7452 jmp L7452
L73FB: lda #$00 L73FB: return #$00
rts
L73FE: lda L73A9 L73FE: lda L73A9
cmp #1 cmp #1
@ -398,8 +368,7 @@ L73FE: lda L73A9
lda #1 lda #1
sta L73A9 sta L73A9
jsr L7467 jsr L7467
L7410: lda #$FF L7410: return #$FF
rts
L7413: lda L73A9 L7413: lda L73A9
cmp #2 cmp #2
@ -408,8 +377,7 @@ L7413: lda L73A9
lda #2 lda #2
sta L73A9 sta L73A9
jsr L7467 jsr L7467
L7425: lda #$FF L7425: return #$FF
rts
L7428: lda L73AA L7428: lda L73AA
cmp #1 cmp #1
@ -418,8 +386,7 @@ L7428: lda L73AA
lda #1 lda #1
sta L73AA sta L73AA
jsr L747B jsr L747B
L743A: lda #$FF L743A: return #$FF
rts
L743D: lda L73AA L743D: lda L73AA
cmp #2 cmp #2
@ -428,8 +395,7 @@ L743D: lda L73AA
lda #2 lda #2
sta L73AA sta L73AA
jsr L747B jsr L747B
L744F: lda #$FF L744F: return #$FF
rts
L7452: lda L73AA L7452: lda L73AA
cmp #3 cmp #3
@ -438,8 +404,7 @@ L7452: lda L73AA
lda #3 lda #3
sta L73AA sta L73AA
jsr L747B jsr L747B
L7464: lda #$FF L7464: return #$FF
rts
L7467: cmp #1 L7467: cmp #1
bne L7473 bne L7473