8086 vs. Z80 vs. 6809 vs. 6502　その14

274 ：ナイコンさん：2021/05/06(木) 11:25:51.17 .net

8080でも使える16bit×16bit乗算
40年前にこれがあれば、、、１.5ｆｐｓのフライトシミュレータが作れたかも
; DEHL <- DE * BC
　 LD A,D
　 LD HL,0
　 LD D,8
　 ADD A,A
loop1:
　 JP NC,skip1
　 ADD HL,BC
skip1:
　 ADD HL,HL
　 RLA
　 DEC D
　 JP NZ,loop1
　 LD D,A
　 LD A,E
　 LD E,8
　 ADD A,A
loop2:
　 JP NC,skip2
　 ADD HL,BC
skip2:
　 ADD HL,HL
　 RLA
　 DEC E
　 JP NZ,loop2
　 LD,E,A