Курсовая работа: Устройство контроля интенсивности движения через мост
DA A;Десятичная коррекция.
MOV R6,A;R6=A.
JNC S1;Если С<>1, то S1,
MOV A,R4; иначе прибавить 1 к сотням.
ADDA,#1;A=A+1.
DA A;Десятичная коррекция.
MOVR4,A;R4=A.
S1:RET;Возврат из п/п.
;-------===== П/п сравнения количесва а/м, прошедших ранее, ======-----
;с прошедшими в этот час.
COMP: MOV A,R0;Сохранение R0
PUSH ACC;в стеке.
MOV R0,#20H;Адрес хранения младшего байта максимального
;количеств а/м.
MOVA,R6;A=R6.
SUBBA,@R0;A=A-@R0.
JC C1;Если содержимое @R0>A, то переход к C1,
MOV A,R6;иначе записать
MOV @R0,A;в память мах. кол-во а/м.
C1:INC R0;Увеличение указателя памяти.
MOV A,R4;A=R4.
SUBB A,@R0;
JC C2;
MOV A,R4;
MOV @R0,A;
INC R0;
MOV A,R3;
MOV @R0,A;
POP ACC;Восстановление