fix Championship Lode Runner

This commit is contained in:
Peter Ferrie 2018-11-19 13:51:45 -08:00
parent f312a6d3ee
commit 88d037b685

View File

@ -412,6 +412,7 @@ ProDOS_enter
pha pha
jsr @set_rdwrbuff jsr @set_rdwrbuff
pla pla
pha
bne @set_blocks bne @set_blocks
lda ldrhi lda ldrhi
sta sizehi sta sizehi
@ -419,6 +420,8 @@ ProDOS_enter
sta sizelo sta sizelo
@set_blocks @set_blocks
jsr hddrdwrpart jsr hddrdwrpart
pla
beq @jmp_zp ;seek doesn't return size
ldy #6 ldy #6
lda sizelo2 lda sizelo2
sta (packet), y sta (packet), y