2019-10-24 05:15:42 -04:00
|
|
|
;
|
2019-12-25 10:56:32 -05:00
|
|
|
; 2019-12-22, Greg King
|
2019-10-24 05:15:42 -04:00
|
|
|
;
|
|
|
|
|
; Set the __far__ address that VERA will use for data access.
|
|
|
|
|
; This is a support function for the fastcall functions vpeek() and vpoke().
|
|
|
|
|
;
|
|
|
|
|
|
2019-12-25 10:56:32 -05:00
|
|
|
.export vaddr0
|
2019-10-24 05:15:42 -04:00
|
|
|
|
|
|
|
|
.importzp sreg
|
|
|
|
|
.include "cx16.inc"
|
|
|
|
|
|
|
|
|
|
|
2019-12-25 10:56:32 -05:00
|
|
|
vaddr0: stz VERA::CTRL ; set address for VERA's data port zero
|
|
|
|
|
ldy sreg
|
2019-10-24 05:15:42 -04:00
|
|
|
sta VERA::ADDR
|
|
|
|
|
stx VERA::ADDR+1
|
|
|
|
|
sty VERA::ADDR+2
|
|
|
|
|
rts
|
