Apple-2-SW/lawless-legends
1
0
Fork 0
mirror of https://github.com/badvision/lawless-legends.git synced 2024-06-09 23:29:37 +00:00
Code Issues Projects Releases Wiki Activity

Test that AUX RAM is available; if not complain that 128K IIe or later is required.

Browse Source
This commit is contained in:
Martin Haye 2021-03-02 17:28:04 -08:00
parent 80d7fa605d
commit e9399116c7
1 changed files with 22 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
Platform/Apple/virtual/src/core/loader.s
View File

@ -38,15 +38,30 @@ init ; Put something interesting on the screen :)
jsr ROM_setkbd
jsr ROM_setvid
jsr ROM_home
ldy #0
+ ; Test that we have AUX RAM (required)
sty pSrc
sta setAuxZP
iny
sty pSrc
cpy pSrc
sta clrAuxZP
bne +
cpy pSrc
bne ++
+ ldy #0
- lda .insuffText,y
beq - ; loop forever
jsr ROM_cout
iny
bne -
; Display welcome message
++ ldy #0
- lda .welcomeText,y
beq +
jsr ROM_cout
iny
bne -
beq +
.welcomeText: !text "Welcome to LegendOS.",$8D,0
; Init pointer to blocks we're going to move/decompress
; Init pointer to blocks we're going to move/decompress
+ lda #<dataStart
sta pData
lda #>dataStart
@ -167,4 +182,7 @@ debug jsr ROM_crout
jmp ROM_cout
}
.insuffText : !text "REQUIRES 128K IIE OR LATER.",0
.welcomeText: !text "Welcome to LegendOS.",$8D,0
dataStart = *