aboutsummaryrefslogtreecommitdiff
path: root/checkmem.s
diff options
context:
space:
mode:
authorB. Watson <yalhcru@gmail.com>2016-02-06 14:43:39 -0500
committerB. Watson <yalhcru@gmail.com>2016-02-06 14:43:39 -0500
commit5823ba3b17a6b65b910fe248c7dff1354bee1b18 (patch)
treec772779c01e42268d7b01905b1dae9debbe00e36 /checkmem.s
parent4ff916de3f977e1bb3c85717ba219c40a34af70f (diff)
downloadtaipan-5823ba3b17a6b65b910fe248c7dff1354bee1b18.tar.gz
rearrage logic in checkmem.s slightly
Diffstat (limited to 'checkmem.s')
-rw-r--r--checkmem.s15
1 files changed, 10 insertions, 5 deletions
diff --git a/checkmem.s b/checkmem.s
index b48c12b..06c7917 100644
--- a/checkmem.s
+++ b/checkmem.s
@@ -42,9 +42,14 @@ init:
lda RAMTOP
cmp #$c0
- bcs done ; if ramtop is $c000, we're OK
+ bcc have_cart
- ; if ramtop is below $c000, we have a cartridge (or XL BASIC)
+ ; if ramtop is $c000 or higher, we're OK, just exit.
+ rts
+
+have_cart:
+ ; if ramtop is below $c000, we have a cartridge (or XL BASIC).
+ ; print the "remove cart" message...
lda #<msg
sta FR0
lda #>msg
@@ -57,14 +62,14 @@ msgloop:
dey
bpl msgloop
+ ; ...wait for a keystroke...
wait4key:
lda CH
cmp #$ff
beq wait4key
- jmp WARMSV
-done:
- rts
+ ; ...and do a warmstart.
+ jmp WARMSV
end:
.word INITAD