diff options
author | B. Watson <yalhcru@gmail.com> | 2016-02-06 14:43:39 -0500 |
---|---|---|
committer | B. Watson <yalhcru@gmail.com> | 2016-02-06 14:43:39 -0500 |
commit | 5823ba3b17a6b65b910fe248c7dff1354bee1b18 (patch) | |
tree | c772779c01e42268d7b01905b1dae9debbe00e36 | |
parent | 4ff916de3f977e1bb3c85717ba219c40a34af70f (diff) | |
download | taipan-5823ba3b17a6b65b910fe248c7dff1354bee1b18.tar.gz |
rearrage logic in checkmem.s slightly
-rw-r--r-- | Makefile | 4 | ||||
-rw-r--r-- | checkmem.s | 15 |
2 files changed, 12 insertions, 7 deletions
@@ -115,8 +115,8 @@ test: all # C. There's probably a clever way to get ctags to handle this, but I # don't know it, so I wrote a perl script to do the job. tags: - ctags $(TAIMAIN_C_SRC) $(TAIMAIN_ASM_SRC) - perl fixtags.pl tags + @ctags $(TAIMAIN_C_SRC) $(TAIMAIN_ASM_SRC) + @perl fixtags.pl tags # The above is fast & easy, but from time to time it's necessary # to test slow loading, make sure the title screen stuff works OK. @@ -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 |