mirror of
https://github.com/bobbimanners/Applecorn.git
synced 2025-01-30 01:34:28 +00:00
Move SEI to top of XF2AUX macro. Safer!
This commit is contained in:
parent
3d4b476b5a
commit
2becfd310c
BIN
applecorn.po
BIN
applecorn.po
Binary file not shown.
@ -75,13 +75,13 @@ AUXMOS EQU $D000 ; Final location in aux LC
|
|||||||
* Called by code running in main mem to invoke a
|
* Called by code running in main mem to invoke a
|
||||||
* routine in aux memory
|
* routine in aux memory
|
||||||
XF2AUX MAC
|
XF2AUX MAC
|
||||||
|
SEI ; Disable IRQ before XFER
|
||||||
LDX $C08B ; R/W LC RAM, bank 1
|
LDX $C08B ; R/W LC RAM, bank 1
|
||||||
LDX $C08B
|
LDX $C08B
|
||||||
LDX #<]1
|
LDX #<]1
|
||||||
STX STRTL
|
STX STRTL
|
||||||
LDX #>]1
|
LDX #>]1
|
||||||
STX STRTH
|
STX STRTH
|
||||||
SEI ; Disable IRQ before XFER
|
|
||||||
SEC ; Use aux memory
|
SEC ; Use aux memory
|
||||||
BIT RTSINSTR ; Set V: use alt ZP and LC
|
BIT RTSINSTR ; Set V: use alt ZP and LC
|
||||||
JMP XFER
|
JMP XFER
|
||||||
|
@ -204,7 +204,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 2021-12-06'
|
HELLO ASC 'Applecorn MOS 2021-12-08'
|
||||||
DB $00 ; Unify MOS messages
|
DB $00 ; Unify MOS messages
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user