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

more sensible addressing

Browse Source
This commit is contained in:
Peter Ferrie 2018-01-08 15:53:47 -08:00
parent cda45789fd
commit 930d934d6c
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/a2fc.system.a
View File

@ -38,11 +38,11 @@ MACHID = $BF98
inputfilebuffer inputfilebuffer
!fill $40 !fill $40
Start Start
ldx #(CodeEnd-CodeStart)-1; copy code to lower memory so we can load graphic at $2000 ldx #(CodeEnd-CodeStart); copy code to lower memory so we can load graphic at $2000
- ldy CodeStart,x - ldy CodeStart-1,x
sty $50,x sty $4f,x
dex dex
bpl - bne -
;CheckFor128K ;CheckFor128K
lda MACHID lda MACHID
and #$30 and #$30
@ -73,7 +73,7 @@ mliParamForClose ; first handle will be 1, the same as kMLIC
!byte $00 ; ProDOS file refnum (filled by MLI_OPEN call) !byte $00 ; ProDOS file refnum (filled by MLI_OPEN call)
!word $2000 ; data address !word $2000 ; data address
!byte $00 !byte $00
CopyToAux=*+2 ; +1 of real address because indexed by X (#$FF) below CopyToAux=*+1
CopyToAuxLow=*+1 CopyToAuxLow=*+1
CopyToAuxHigh=*+2 CopyToAuxHigh=*+2
ReadFile ReadFile