DeskTop seg 1: WIP tidying param blocks

This commit is contained in:
Joshua Bell 2017-10-02 01:02:33 -07:00
parent 68113374cb
commit 38310988c7

View File

@ -3241,6 +3241,7 @@ L6340: .byte $00,$08,$68,$8D,$40,$63,$A2,$04
.byte $91,$80,$2C,$39,$63,$10,$0B,$2C .byte $91,$80,$2C,$39,$63,$10,$0B,$2C
.byte $37,$63,$10,$06,$20,$00,$BF,$40 .byte $37,$63,$10,$06,$20,$00,$BF,$40
.addr L6469 .addr L6469
lda $FBB3 lda $FBB3
pha pha
lda #$06 lda #$06
@ -3270,9 +3271,11 @@ L646A: .byte 0
sed sed
.byte $66 .byte $66
dealloc_interrupt_params: .proc dealloc_interrupt_params
.byte 1 params: .byte 1
L646E: .byte 0 int_num:.byte 0
.endproc
lda #$00 lda #$00
sta L633A sta L633A
lda L6339 lda L6339
@ -3311,7 +3314,7 @@ L64A4: rts
bit L6337 bit L6337
bpl L64C7 bpl L64C7
lda L646A lda L646A
sta L646E sta dealloc_interrupt_params::int_num
MLI_CALL DEALLOC_INTERRUPT, dealloc_interrupt_params MLI_CALL DEALLOC_INTERRUPT, dealloc_interrupt_params
L64C7: lda L6340 L64C7: lda L6340
pha pha
@ -3381,6 +3384,7 @@ L6538: .byte $00
L6539: .byte $00 L6539: .byte $00
L653A: .byte $00 L653A: .byte $00
L653B: .byte $00 L653B: .byte $00
L653C: jsr L625A L653C: jsr L625A
L653F: lda $80 L653F: lda $80
sta L6539 sta L6539