ex02.asm

            ORG     8000H           ; 開始番地
            LD      SP, 0D000H      ; D000番地の内容をSPに転送
            LD      HL, 0           ; HLに0を転送
            LD      B, 2            ; BOOO番地の内容を足す回数
LOOP:       PUSH    BC              ; 残りの繰り返す回数をスタックに記憶
            CALL    KEISAN          ; KEISANへ分岐
            DEC     B               ; レジスタBの値から1を引いて、残りの回数
            JP      NZ, LOOP        ; 残りの回数が0かどうか
            JP      KAKUNO          ; 残りの回数が0なら、KAKUNOへ分岐
KEISAN:     POP     DE              ; 残りの回数をスタック上に転送　
            LD      BC, (OBOOH)     ; 設定値をロード
            ADD     HL, BC          ; 設定値の加算
            POP     BC              ; 残りの回数を転送
            PUSH    DE              ; 戻り番地をスタック上に転送
            RET                     ; 戻り番地にもどる
KAKUNO:     LD      (OCOOOH), HL    ; 演算結果をC000へ転送
            END                     ; 終わり