Added a few more specialized multiply routines
git-svn-id: svn://svn.cc65.org/cc65/trunk@1193 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
30
libsrc/runtime/mulax6.s
Normal file
30
libsrc/runtime/mulax6.s
Normal file
@@ -0,0 +1,30 @@
|
||||
;
|
||||
; Ullrich von Bassewitz, 16.03.2002
|
||||
;
|
||||
; CC65 runtime: Multiply the primary register
|
||||
;
|
||||
|
||||
.export mulax6
|
||||
.importzp ptr1
|
||||
|
||||
.proc mulax6
|
||||
|
||||
sta ptr1
|
||||
stx ptr1+1
|
||||
asl a
|
||||
rol ptr1+1
|
||||
clc
|
||||
adc ptr1
|
||||
pha
|
||||
txa
|
||||
adc ptr1+1
|
||||
sta ptr1+1
|
||||
pla
|
||||
asl a
|
||||
rol ptr1+1
|
||||
ldx ptr1+1
|
||||
rts
|
||||
|
||||
.endproc
|
||||
|
||||
|
||||
Reference in New Issue
Block a user