mirror of
https://github.com/cc65/cc65.git
synced 2024-11-17 09:07:32 +00:00
21 lines
529 B
ArmAsm
21 lines
529 B
ArmAsm
|
;
|
||
|
|
; 2019-10-22, Greg King
|
||
|
|
;
|
||
|
|
; Set the __far__ address that VERA will use for data access.
|
||
|
|
; This is a support function for the fastcall functions vpeek() and vpoke().
|
||
|
|
;
|
||
|
|
|
||
|
|
.export vset
|
||
|
|
|
||
|
|
.importzp sreg
|
||
|
|
.include "cx16.inc"
|
||
|
|
|
||
|
|
|
||
|
|
vset: ldy sreg
|
||
|
|
sei ; don't let interrupt handlers interfere
|
||
|
|
stz VERA::CTRL ; set address for VERA's data port zero
|
||
|
|
sta VERA::ADDR
|
||
|
|
stx VERA::ADDR+1
|
||
|
|
sty VERA::ADDR+2
|
||
|
|
rts
|