From 88d037b6859e60964e65a843340431b80f3edd46 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Mon, 19 Nov 2018 13:51:45 -0800
Subject: [PATCH] fix Championship Lode Runner

---
 src/glue.prorwts2.a | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/glue.prorwts2.a b/src/glue.prorwts2.a
index 179b8d8b3..0be700628 100644
--- a/src/glue.prorwts2.a
+++ b/src/glue.prorwts2.a
@@ -412,6 +412,7 @@ ProDOS_enter
     pha
     jsr    @set_rdwrbuff
     pla
+    pha
     bne    @set_blocks
     lda    ldrhi
     sta    sizehi
@@ -419,6 +420,8 @@ ProDOS_enter
     sta    sizelo
 @set_blocks
     jsr    hddrdwrpart
+    pla
+    beq    @jmp_zp ;seek doesn't return size
     ldy    #6
     lda    sizelo2
     sta    (packet), y