1
0
mirror of https://github.com/KarolS/millfork.git synced 2024-07-05 09:28:54 +00:00
millfork/include/zp_reg.mfk

20 lines
361 B
Plaintext
Raw Normal View History

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