CASLIIの解説

質問

以下のような問題があり、解答がありますが理解できません。
すみませんが、どなたか解説をお願いします。
----------------------------------------------------------
■問題
　１０進数の「５×２０」の結果を求め、その結果をメモリに格納するプログラムを作成せよ。ただし、「５×２０」の数を他の数に置き換えた時も掛け算が行えるプログラムにすること。
■解答
　SAMPLE　START
LAD GR1,0
LAD GR2,1
LD GR3,=5
LOOP LD GR4,C20
AND GR4,GR2
JZE NEXT
ADDA GR1,GR3
NEXT SLA GR3,1
SLL GR2,1
JNZ LOOP
ST GR1,ANS
RET
C20 DC 20
ANS DS 1
END

回答No.1

jjon-com · ベストアンサー

次のように行番号をつけてみました。
1:　　　LAD GR1,0
2:　　　LAD GR2,1
3:　　　LD GR3,=5
4:LOOP　LD GR4,C20
5:　　　AND GR4,GR2
6:　　　JZE NEXT
7:　　　ADDA GR1,GR3
8:NEXT　SLA GR3,1
9:　　　SLL GR2,1
10:　　　JNZ LOOP
11:　　　ST GR1,ANS

CASLのレジスタは16bit長ですが，桁数が長くてめんどうなので８bit幅として解説します。

ａ）２行・９行より，GR2はループのたび次のように変化する。
00000001 → 00000010 → 00000100 → ……
つまり，ビット１が最下位（右端）から左へと１bitずつ移動していく。

ｂ）４行・５行より，GR4には(２０)10 ＝ (00010100)2 がセットされ，前述のGR2とのANDがとられる。つまり，GR4内のビット列を右端から左へと１bitずつ調べて，その位置が１か０か判定している。

ｃ）３行・８行より，GR3はループのたび次のように２倍される。
(５)10 → (１０)10 → (２０)10 → ……

ｄ）よって７行目で解答格納領域(GR1)に加算される値は次のとおり。
1回目：GR4＝0001010零 なので ５は加算しない
2回目：GR4＝000101零0 なので １０は加算しない
3回目：GR4＝00010壱00 なので GR1に(２０)加算
4回目：GR4＝0001零100 なので ４０は加算しない
5回目：GR4＝000壱0100 なので GR1に(８０)加算
6回目：GR4＝00零10100 なので 160は加算しない
7回目：GR4＝0零010100 なので 320は加算しない
8回目：GR4＝零0010100 なので 640は加算しない

11行目でANSに格納される値は(２０)＋(８０)＝(１００)です。

お礼

ありがとうございます。
とてもわかりやすかったです（泣