Программа-калькулятор (0802 CD9702 CALL BLNK очистка экрана, 0834 C20A08 JNZ 080A переход если в С не 0)

Программа-калькулятор.

0802      CD9702                                          CALL    BLNK               очистка экрана

0805      21F50B                                          LXI        H,0BF5             указать на 5-ю цифру дисплея

0808      0E03                                               MVI       C,03                  записать в С 3

080A     CD4B01                                         CALL    KIND                ожидание нажатия клавиши

080D     77                                                    MOV     M,A                   записать код клавиши по адресу в H, L

080E      51                                                    MOV     D,C                    записать содержимое C вD

080F      15                                                    DCR      D                        уменьшить содержимое D на 1

0810      CA2908                                          JZ           0829                  если D=1 то переход 

0813      15                                                    DCR      D                        уменьшить содержимое D на 1

0814      CA1D08                                         JZ           081D                 если D=2 то переход

0817      32010B                                          STA       0B01                 сохранить содержимое А в памяти по адресу 0B01

081A     C33208                                          JMP       0832                  переход

081D     0604                                               MVI       B,04                  записать в B 4

081E      07                                                    RLC                                 циклический сдвиг А

081F      05                                                    DCR      B                        декрементирование B

0820      C21E08                                          JNZ        081E                 переход если вB не 0

0823      32000B                                          STA       0B00                 сохранить содержимое А в памяти по адресу 0B00                                               

08 26     C33208                                          JMP       0832                  переход

0829      E5                                                    PUSH    H                        сохранить в стеке H,L

082A     21000B                                          LXI        H,0B00             указать на ячейку памяти 0B00

082D     86                                                    ADD      M                       сложить содержимое ячейки 0B00 и А

082E      32000B                                          STA       0B00                 сохранить А в памяти по адресу 0B00

0831      E1                                                    POP       H,L                    восстановить из стека H,L    

0832      2B                                                   DCX      H                        декрементирование содержимого пары H, L

0833      0D                                                   DCR      C                        декрементирование содержимого С

0834      C20A08                                          JNZ        080A                 переход если в С не 0

*****************************************************************************************************

0837      CD9702                                          CALL    BLNK               очистка экрана

083A     21F50B                                          LXI        H,0BF5             указать на 5-ю цифру дисплея

083D     0E03                                               MVI       C,03                  записать в С 3

083F      CD4B01                                         CALL    KIND                ожидание нажатия клавиши

0842      77                                                    MOV     M,A                   записать код клавиши по адресу в H, L

0843      51                                                    MOV     D,C                    записать содержимое C вD

0844      15                                                    DCR      D                        уменьшить содержимое D на 1

0845      CA5F08                                          JZ           085F                  если D=1 то переход 

0848      15                                                    DCR      D                        уменьшить содержимое D на 1

0849      CA5208                                          JZ           0852                  если D=2 то переход

084C     32A10B                                          STA       0BA1                сохранить содержимое А в памяти по адресу 0BA1

084F      C36808                                          JMP       0868                  переход

0852      0604                                               MVI       B,04                  записать в B 4

0854      07                                                    RLC                                 циклический сдвиг А

0855      05                                                    DCR      B                        декрементирование B

0856      C25408                                          JNZ        0854                  переход если вB не 0

0859      32A00B                                          STA       0BA0                сохранить содержимое А в памяти по адресу 0BA0                                              

085C     C36808                                          JMP       0868                  переход

085F      E5                                                    PUSH    H                        сохранить в стеке H,L