Проверка на четность чисел, расположенных с адреса 0400H объемом 10N байт. Расположить четные числа в последовательных ячейках с адреса 0200H, а нечетные – с адреса 0300H.

    Код программы:

       LXI H,400H

       LXI D,300H

       MVI B,40H

M2:    MOV A,M

       ANI 01H

       JNZ M1

       INX H

       DCR B

       JNZ M2

       JMP M3

M1:    MOV A,M

       MVI M,00H

       XCHG

       MOV M,A

       XCHG

       INX H

       INX D

       DCR B

       JNZ M2

M3:    LXI H,400H

       LXI D,200H      

       MVI B,40H

M4:    MOV A,M

       ADD A,00H

       JZ M5

       MOV A,M

       XCHG

       MOV M,A

       XCHG

       INX D

       INX H

       DCR B

       JNZ M4

       HLT

M5:    INX H

       DCR B

       JNZ M4

       HLT