mirror of
https://github.com/Michaelangel007/apple2_hgrbyte.git
synced 2024-09-27 18:56:42 +00:00
V22 fix aux/main order
This commit is contained in:
parent
7a80bf8b77
commit
889e22f5c3
BIN
bin/dhgr.byte
BIN
bin/dhgr.byte
Binary file not shown.
BIN
hgrbyte.dsk
BIN
hgrbyte.dsk
Binary file not shown.
@ -6,7 +6,7 @@ CONFIG_DHGR = 1
|
|||||||
; https://github.com/Michaelangel007/apple2_hgrbyte/
|
; https://github.com/Michaelangel007/apple2_hgrbyte/
|
||||||
;
|
;
|
||||||
; Michael Pohoreski
|
; Michael Pohoreski
|
||||||
; Version 21
|
; Version 22
|
||||||
;
|
;
|
||||||
; TL:DR;
|
; TL:DR;
|
||||||
; IJKL to move
|
; IJKL to move
|
||||||
@ -29,7 +29,7 @@ CONFIG_DHGR = 1
|
|||||||
; L Move cursor down
|
; L Move cursor down
|
||||||
;
|
;
|
||||||
; ^I Move cursor to col 0
|
; ^I Move cursor to col 0
|
||||||
; ^J Move cursor to col 39
|
; ^J Move cursor to col 79
|
||||||
; ^K Move cursor to row 0
|
; ^K Move cursor to row 0
|
||||||
; ^L Move cursor to row 191
|
; ^L Move cursor to row 191
|
||||||
; RET Center cursor
|
; RET Center cursor
|
||||||
@ -149,7 +149,7 @@ __MAIN = $900
|
|||||||
ORG __MAIN
|
ORG __MAIN
|
||||||
|
|
||||||
DhgrByte
|
DhgrByte
|
||||||
LDA #21 ; Version - copy HGR1 to aux, HGR2 to HGR1
|
LDA #22 ; Version - copy HGR1 to aux, HGR2 to HGR1
|
||||||
JSR Init_Exit ; FEATURE: Set to 00 if you don't want to copy AUX $2000 to MAIN $4000
|
JSR Init_Exit ; FEATURE: Set to 00 if you don't want to copy AUX $2000 to MAIN $4000
|
||||||
|
|
||||||
BIT PAGE1 ; Page 1
|
BIT PAGE1 ; Page 1
|
||||||
@ -374,13 +374,13 @@ DrawStatus
|
|||||||
JSR COUT
|
JSR COUT
|
||||||
|
|
||||||
DO CONFIG_DHGR
|
DO CONFIG_DHGR
|
||||||
LDY #0 ; src = &char[0][8]
|
LDY #8 ; src = &char[1][8]
|
||||||
LDA cursor_col
|
LDA cursor_col
|
||||||
CLC
|
CLC
|
||||||
ROR
|
ROR
|
||||||
BCS HaveMainMem
|
BCS HaveMainMem
|
||||||
HaveAuxMem
|
HaveAuxMem
|
||||||
LDY #8 ; src = &char[1][8]
|
LDY #0 ; src = &char[0][8]
|
||||||
HaveMainMem
|
HaveMainMem
|
||||||
|
|
||||||
LDX #0 ; dst = 0
|
LDX #0 ; dst = 0
|
||||||
|
Loading…
Reference in New Issue
Block a user