.defm mul10b
asl
sta $02
asl
asl
clc
adc $02
.endm Ez a létező leggyorsabb algoritmus 6502-n a 10-el való szorzásra. A bemenet és a kimenet is az A regiszterben van. Kétféleképpen lehet igazából használni: makróból vagy szubrutinból. A makró kétszer olyan gyors, mint a szubrutin (N*14 ciklus vs N*26 ciklus), viszont (N*5)-9 byte-val foglal több helyet a memóriában (N*8 vs (N*3)+9) (N a meghívások száma, de ezt gondolom gondoltátok).int2hex: sta $03
and #$0f
tax
lda int2hexc,x
sta $02
lda $03
lsr
lsr
lsr
lsr
tax
lda int2hexc,x
ldx $02
rts
int2hexc: .byte 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70 Ez pedig egy 8 bites integert alakít át hexadecimális sztringgé. A bemenet és a kimenet felső byte-ja az A regiszterben van, a kimenet alsó byte-ja az X regiszterben. |