Disk Copy Overlay disasm - more padding garbage

This commit is contained in:
Joshua Bell 2018-11-21 20:24:30 -08:00
parent 891e7d6c1a
commit 1d6a8208c9
12 changed files with 45 additions and 32 deletions

View File

@ -3768,5 +3768,7 @@ addr: .addr 0
.endproc
.assert * = $BFFC, error, "Segment length mismatch"
PAD_TO $C000
.endproc ; desktop_aux

View File

@ -260,6 +260,5 @@ op: lda dummy1234
.include "desktop_res.s"
.assert * = $FFBA, error, "Segment length mismatch"
PAD_TO $10000

View File

@ -172,5 +172,6 @@ update_bitmap:
exit: rts
;; Pad to $160 bytes
.res $160 - (* - start), 0
PAD_TO $3F0
.endproc ; invoker

View File

@ -105,4 +105,5 @@ self: bne self ; hang on error?
;;; ============================================================
PAD_TO $A00
.endproc ; disk_copy_overlay

View File

@ -141,4 +141,5 @@ self: bne self ; hang if fails
;;; ============================================================
PAD_TO $1A00
.endproc ; disk_copy_overlay2

View File

@ -827,8 +827,8 @@ LD9C1: .addr $0C83
.addr $0C83
.addr $0C83
.addr $0C84
.addr $DA3C
.addr $DA77
.addr LDA3C
.addr LDA77
LD9D1: .byte 0, $A, $C, $10
@ -872,7 +872,8 @@ LDA35: tsx
stx LD00B
jump_addr := *+1
jmp dummy1234
lda LD451
LDA3C: lda LD451
bne LDA42
rts
@ -891,7 +892,7 @@ LDA42: lda #$00
addr_call LE0B4, str_quick_copy_padded
rts
lda LD451
LDA77: lda LD451
beq LDA7D
rts
@ -1989,12 +1990,8 @@ LE522: lda winfo_dialog::window_id
jsr LDEEB
rts
LE550: .byte $07
asl $05
.byte $04
.byte $03
.byte $02
ora ($0000,x)
LE550: .byte 7,6,5,4,3,2,1,0
LE558: .byte 0
LE559: lda winfo_dialog::window_id
jsr LE137
@ -2914,27 +2911,37 @@ LF1CC: cmp #$03
jsr disk_copy_overlay4::L127E
LF1D7: rts
;;; ============================================================
;;; Padding ???
.scope
tya
lsr a
bcs LF1DF
bcs :+
bit $C055
LF1DF: tay
: tay
lda ($28),y
pha
cmp #$E0
bcc LF1E9
bcc :+
sbc #$20
LF1E9: and #$3F
: and #$3F
sta ($28),y
lda $C000
bmi LF1F5
bmi :+
jmp L51ED
LF1F5: pla
: pla
sta ($28),y
bit $C054
lda $C000
.byte $2C
.byte $10
.endscope
.endproc
;;; ============================================================
PAD_TO $F200
.endproc

View File

@ -1461,18 +1461,16 @@ L12B9: .byte 0
.byte $7F
.byte $FF
L12DA: lda $D133
cmp $D18D
bne :+
jmp disk_copy_overlay3::LDAEE
: cmp $D1C7
bne :+
jmp disk_copy_overlay3::LDB55
: rts
;;; ============================================================
lda $D18D
sta $D12D
jsr disk_copy_overlay3::LE137
yax_call disk_copy_overlay3::MGTK_RELAY2, MGTK::ScreenToWindow, $D12D
;;; Padding: this is a random chunk of overlay part 2 ($DADA)
.byte $AD, $33, $D1, $CD, $8D, $D1, $D0, $03
.byte $4C, $EE, $DA, $CD, $C7, $D1, $D0, $03
.byte $4C, $55, $DB, $60, $AD, $8D, $D1, $8D
.byte $2D, $D1, $20, $37, $E1, $A0, $46, $A9
.byte $2D, $A2, $D1, $20, $E0, $DB
.assert * = $1300, error, "Segment length mismatch"
.endproc

View File

@ -1546,4 +1546,5 @@ L1A6D: lda on_line_params::unit_num
;;; ============================================================
PAD_TO $1C00
.endproc ; format_erase_overlay

View File

@ -1529,4 +1529,5 @@ L9EC1: .byte 0
;;; ============================================================
PAD_TO $A000
.endproc ; selector_overlay2

View File

@ -3003,4 +3003,5 @@ L6F3D: .byte 0
;;; ============================================================
PAD_TO $7000
.endproc ; common_overlay

View File

@ -260,4 +260,5 @@ L7295: rts
;;; ============================================================
PAD_TO $7800
.endproc ; file_copy_overlay

View File

@ -96,4 +96,4 @@ L70EA: MGTK_RELAY_CALL MGTK::CloseWindow, winfo_entrydlg_file_picker
;;; ============================================================
PAD_TO $7800
.endproc ; file_delete_overlay
.endproc ; file_delete_overlay