さて、今回はLaboratoryテーマ??11「マシン語の割り算（16ビット版）」です。
前回の「マシン語の割り算」では、割られる数が8ビット（0〜255）でした。 （2023年6月22日記事参照「 Laboratoryテーマ??3「マシン語の割り算」 」）
ただ、それでは大きい値の計算が出来ないので急遽Laboratoryテーマ??11として、「マシン語の割り算（16ビット版）」をテーマに新規追加しました。 （2023年6月27日記事参照「 しまった 」）
考え方は8ビット版と同じで、「8回ループ」を「16回ループ」に変更しただけです。
それに伴い、ビットシフト（ローテイト）が1回（8bit）で良かったところ、すべて2回（16bit）になったのでロジック長くなっています。
16ビット割り算のサンプルプログラムです。
「WARISMPL.BAS」【 ダウンロード 】
マシン語での計算結果と、検算用にBASICで単純計算した結果を列記します。
マシン語のサンプルです。
起動すると、WARIZAN.BINを作成します。
16ビットへのロジック変更の際、レジスタペア数が足りなかったので、2個16ビット変数を利用しているので、サブルーチンとしてアドレス変更する際は、そこの変更を忘れないように気を付けてください。（&HBF4C：3ヵ所、&HBF4E：3ヵ所）
変数使わない手もありますが、煩雑になるので楽で解り易い方法を選択しました。
IN
OUT
HL
割られる数
BC
商
B
割る数
HL
余り
「WARIZAN.BAS」【 ダウンロード 】
マシン語のサブルーチンとして必要なのは&HBF00~&HBF37までです。
&HBF38~&HBF4Fは計算元値を代入してサブルーチンコールします。
では、次回はLaboratoryテーマ??5「16ビットアドレス値の10進数表示」です。
