mirror of
https://github.com/cc65/cc65.git
synced 2025-01-11 11:30:13 +00:00
24 lines
299 B
ArmAsm
24 lines
299 B
ArmAsm
|
;
|
||
|
; Ullrich von Bassewitz, 21.08.1998
|
||
|
;
|
||
|
; CC65 runtime: Load effective address with offset in A relative to SP and pus it
|
||
|
;
|
||
|
|
||
|
.export pleaasp
|
||
|
.import pushax
|
||
|
.importzp sp
|
||
|
|
||
|
.proc pleaasp
|
||
|
|
||
|
ldx sp+1 ; Get high byte
|
||
|
clc
|
||
|
adc sp
|
||
|
bcc @L9
|
||
|
inx
|
||
|
@L9: jmp pushax
|
||
|
|
||
|
.endproc
|
||
|
|
||
|
|
||
|
|