Apple-2-SW/Applecorn
1
0
Fork 0
mirror of https://github.com/bobbimanners/Applecorn.git synced 2025-03-04 03:29:29 +00:00
Code Issues Projects Releases Wiki Activity

mainmem.svc.c: AUXMOVE only one byte for GBPB.

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2022-09-20 17:07:04 -04:00
parent c0ae79ab3a
commit deb58e87fe
3 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
applecorn.po
View File

Binary file not shown.

2
auxmem.init.s
View File

@ -205,7 +205,7 @@ BYTE00 BEQ BYTE00A ; OSBYTE 0,0 - generate error
RTS ; %000x1xxx host type, 'A'pple RTS ; %000x1xxx host type, 'A'pple
BYTE00A BRK BYTE00A BRK
DB $F7 DB $F7
HELLO ASC 'Applecorn MOS 2022-09-19' HELLO ASC 'Applecorn MOS 2022-09-20'
DB $00 ; Unify MOS messages DB $00 ; Unify MOS messages

7
mainmem.svc.s
View File

@ -367,15 +367,12 @@ GBPB >>> ENTMAIN
STA A4L STA A4L
LDA #>BLKBUF LDA #>BLKBUF
STA A4H STA A4H
LDA GBPBDAT ; Start of source buf LDA GBPBDAT ; Start & end of source buf
STA A1L STA A1L ; (one byte buffer)
STA A2L STA A2L
LDA GBPBDAT+1 LDA GBPBDAT+1
STA A1H STA A1H
STA A2H STA A2H
INC A2L ; End of source buf
BNE :S0
INC A2H
:S0 CLC ; AUX -> Main :S0 CLC ; AUX -> Main
JSR AUXMOVE JSR AUXMOVE
LDA GBPBHDL ; File ref number LDA GBPBHDL ; File ref number