1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 06:31:31 +00:00
cc65/libsrc/geos-common/memory/doublespop.s

28 lines
483 B
ArmAsm

;
; Maciej 'YTM/Elysium' Witkowiak
;
; 22.12.99, 29.07.2000
.import popax
.importzp ptr3, ptr4
.export DoubleSPop
.export SetPtrXY
.include "geossym.inc"
DoubleSPop:
sta ptr4
stx ptr4+1
jsr popax
sta ptr3
stx ptr3+1
; rts
;
; SetPtrXY can be sometimes executed twice, but even this way it is few cycles
; faster...
SetPtrXY:
ldx #ptr4
ldy #ptr3
rts