Так как занимаюсь ремонтом автомобильной электроники, возникла острая необходимость в приборе который может симулировать выходные сигналы различных датчиков. Со многими датчиками разобрался, а вот с сигналом датчика положения коленчатого вала встал в ступор. Нужно реализовать следующее, 58 импульсов после чего пробел два импульса и так далее по циклу. Генерировать сигнал без проблем, а вот как реализовать пропуск двух импульсов не могу сообразить. Большая просьба, толкните в нужном направлении.
Код:
$regfile = "m8def.dat" $crystal = 10000000 $hwstack = 40 $swstack = 16 $framesize = 32 '=============================Присваиваем имена пинам=========================== Imp Alias Portd.5 '=============================Конфигурация портов=============================== Config Portd.5 = Output '=============================Конфигурация таймера============================== Config Timer0 = Timer , Prescale = 1 On Timer0 Tik Enable Interrupts 'разрешить прерывания Start Timer0 'старт таймера 0 '=============================Объявляем переменные============================== Dim Pulse As Word Dim Limit As Word Dim Limit2 As Word Do Enable Timer0 Limit = 150 Limit2 = 75 Loop Tik: Incr Pulse If Pulse > Limit Then Pulse = 0 If Pulse < Limit2 Then Imp = 1 Else Imp = 0 End If Return
Отредактировано angald (2015-11-01 14:09:35)
