Реферат: Измерение угла опережения зажигания

LD BC, (R1) ; вычисление количества оборотов.

LD (A1), BC

LD (A2),10

CALL DEL ; вызов процедуры деления.

LD BC, (A2)

LD (A2), BC

LD (A1), 50000

CALL DEL

LD (A2),6

CALL YMH ; вызов процедуры умножения.

LD BC, (A1)

LD (R3), BC

LD (R10),0

CALL DECT ; вызов процедуры разбиения на десятки.

EXX

RETI

A: IN A, 1 ; ввод значения Счетчика2 с выхода таймера.

XOR FFH

LD L, A

IN A, 1

XOR FFH

LD H, A

LD (R2), HL ; вычисление угла опережения зажигания.

LD (A1), 36 (10)

LD (A2), HL

CALL YMH

LD HL, (A1)

LD BC, (R1)

LD (A1), BC