Блок-схема программы

Листинг программы:

ORG 20h;от куда стартует программа

MOV P1, #00110100b ; Слово Оперативного Состояния

MOV R7, #9 ; счетчик цикла

MOV R4, #0 ; счетчик номеров телефонов

MOV @R0, #20h

MOV A, P1 ; A = 110100=34h

label3:

MOV B, @R0 ; B - хранит текущее СПС

XRL B, A ; складываем по модулю два А и В

MOV R1, B ; Результат XOR в R1

ANL A, B ; логическое умножение

MOV B, P1; пересылаем из Р1 в В

CJNE A, B, label4 ; Если СПС не равно СОС, то берем текущий СПС

INC R0

MOV R6, A; пересылаем из аккумулятора А в R6