2018-03-05 11:05:37 +00:00
|
|
|
|
2018-07-12 16:30:35 +00:00
|
|
|
#if not(ARCH_6502)
|
|
|
|
#warn zp_reg module should be used only on 6502-compatible targets
|
|
|
|
#endif
|
|
|
|
|
2018-03-05 11:05:37 +00:00
|
|
|
inline asm byte __mul_u8u8u8() {
|
|
|
|
? LDA #0
|
2018-06-18 20:40:32 +00:00
|
|
|
? JMP __mul_u8u8u8_start
|
|
|
|
__mul_u8u8u8_add:
|
2018-07-01 17:07:47 +00:00
|
|
|
? CLC
|
|
|
|
? ADC __reg.lo
|
2018-06-18 20:40:32 +00:00
|
|
|
__mul_u8u8u8_loop:
|
2018-07-01 17:07:47 +00:00
|
|
|
? ASL __reg.lo
|
2018-06-18 20:40:32 +00:00
|
|
|
__mul_u8u8u8_start:
|
2018-07-01 17:07:47 +00:00
|
|
|
? LSR __reg.hi
|
|
|
|
? BCS __mul_u8u8u8_add
|
|
|
|
? BNE __mul_u8u8u8_loop
|
2018-03-05 11:05:37 +00:00
|
|
|
? RTS
|
|
|
|
}
|