Permalink
Fetching contributors…
Cannot retrieve contributors at this time
29 lines (22 sloc) 463 Bytes
;
; Ullrich von Bassewitz, 04.10.2001
;
; CC65 runtime: Multiply the primary register by 3
;
; Don't touch the Y-register here, the optimizer relies on it!
.export mulax3
.importzp ptr1
.proc mulax3
sta ptr1
stx ptr1+1
asl a
rol ptr1+1
clc
adc ptr1
pha
txa
adc ptr1+1
tax
pla
rts
.endproc