>>464 こんなのでどう？
　　　　lda　09001h
　　　　mov　e,a
　　　　mvi　d,0　　; de<--(9001h)の値
　　　　lda　09000h
　　　　mov　c,a
　　　　mvi　b,0　　; bc<--(9000h)の値
; ここから掛け算：HL <-- HL*DE (16bit)
　　　　lxi　h,0000
　　　　mvi　a,10h
LBL1:　 dad　h
　　　　xchg
　　　　dad　h
　　　　xchg
　　　　jnc　LBL2
　　　　dad　b
LBL2:　 dcr　a
　　　　jnz　0108
　　　　shld 09002h　　; 答