Added aux mem check, and fixed bug in CROSS_WEST.

This commit is contained in:
Martin Haye 2015-06-28 09:26:52 -07:00
parent f4e7586c13
commit 0c4aac3da9
2 changed files with 19 additions and 1 deletions

View File

@ -768,6 +768,24 @@ init: !zone
; put something interesting on the screen :)
jsr home
+prStr : !text "Welcome to Mythos.",0
; verify that aux mem exists
sta clrAuxWr
lda #1
sta $2000
sta setAuxWr
lda #2
sta $2000
sta clrAuxWr
sta setAuxRd
lda $2000
sta clrAuxRd
cmp #1
beq +
ldx #<.auxMsg
ldy #>.auxMsg
jmp fatalError
.auxMsg !text "Aux mem required",0
+
; close all files
lda #0
jsr closeFile

View File

@ -540,7 +540,7 @@ CROSS_WEST
CPY #NOT_LOADED
BEQ .gotNW
LDY #WEST
LDA (NE_MAP_LOC),Y
LDA (NW_MAP_LOC),Y
TAX
.gotNW LDA #NOT_LOADED
LDY SW_MAP_ID