Apple-2-SW/lawless-legends
1
0
Fork 0
mirror of https://github.com/badvision/lawless-legends.git synced 2025-08-15 06:27:24 +00:00
Code Issues Projects Releases Wiki Activity

Fix for real Apple hardware: enabling language card requires reads, not writes.

Browse Source
This commit is contained in:
Martin Haye
2016-07-07 19:01:56 -07:00
parent 0837f4a360
commit d773465455
2 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Platform/Apple/virtual/src/core/mem.s
View File

@@ -458,9 +458,10 @@ SWXX: bit monrts ; set V to denote SWX (not SBX)
.shst lda evalStkH+1,x ; get hi byte of pointer to store to .shst lda evalStkH+1,x ; get hi byte of pointer to store to
cmp #$D0 ; in $0000.CFFF range, cmp #$D0 ; in $0000.CFFF range,
bcc .norm ; just do normal store bcc .norm ; just do normal store
sta setLcRW+lcBank2 ; PLASMA normally write-protects the LC,
sta setLcRW+lcBank2 ; but let's allow writing there. Don't use BIT as it affects V flg.
cmp #$E0 ; in $E000.FFFF range do normal store after write-enable cmp #$E0 ; in $E000.FFFF range do normal store after write-enable
; Apple IIc note: turning on LC requires a 6502 read, not write. So putting sta below didn't work.
lda setLcRW+lcBank2 ; PLASMA normally write-protects the LC,
lda setLcRW+lcBank2 ; but let's allow writing there. Don't use BIT as it affects V flg.
bcs .norm bcs .norm
sty tmp sty tmp
jsr l_SXXX ; helper function in low memory because it switches us out (we're in main LC) jsr l_SXXX ; helper function in low memory because it switches us out (we're in main LC)

1
Platform/Apple/virtual/src/plasma/gameloop.pla
View File

@@ -2374,6 +2374,7 @@ def startGame()
q_mapNum = 0 q_mapNum = 0
restoreMapPos() restoreMapPos()
fin fin
crout()
end end
/////////////////////////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////////////////////////