Apple-2-SW/a2fc.system
1
0
Fork 0
mirror of https://github.com/a2-4am/a2fc.system.git synced 2024-06-26 23:29:31 +00:00
Code Issues Projects Releases Wiki Activity

another softswitch, another byte

Browse Source
This commit is contained in:
Peter Ferrie 2018-01-08 12:09:43 -08:00
parent 7aa5f52b5d
commit 1273e8dd6b
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/a2fc.system.a
View File

@ -40,7 +40,7 @@ inputfilebuffer
Start Start
ldx #(CodeEnd-CodeStart)-1; copy code to lower memory so we can load graphic at $2000 ldx #(CodeEnd-CodeStart)-1; copy code to lower memory so we can load graphic at $2000
- lda CodeStart,x - lda CodeStart,x
sta $00f8,x sta $00f7,x
dex dex
bpl - bpl -
txs txs
@ -53,9 +53,9 @@ Start
+ jmp MLI ; exit via MLI (stack is arranged to execute Open MLI call) + jmp MLI ; exit via MLI (stack is arranged to execute Open MLI call)
CodeStart CodeStart
!pseudopc $f8 { !pseudopc $f7 {
softswitches softswitches
!byte $50,$52,$54,$57,$0d !byte $50,$52,$54,$57,$0d,$5e
mliParamForClose mliParamForClose
!byte kMLICloseCount !byte kMLICloseCount
@ -85,7 +85,7 @@ Open
jsr Read ; read second half of graphic (stays in main memory) jsr Read ; read second half of graphic (stays in main memory)
; does not return if error ; does not return if error
;DHGRShow ;DHGRShow
lda $C05E ; DHGR mode inx
- ldy softswitches,x - ldy softswitches,x
sta $c000,y ; enable graphics display sta $c000,y ; enable graphics display
dex dex