; Author : Гринев Сергей (for_dgf@mail.ru) .include "m328pdef.inc" ;**************************************************** Карта входов и выходов ; Порт B ; PB0(icp) in !Mode переключатель - 2 ; PB1(osc1) in !Mode переключатель - 1 ; PB2(ss) in !Mode переключатель - 0 ; PB3(mosi) in !Цифровой вход ; PB4(miso) in !Цифровой вход ; PB5(sck) out !Вспомогательный светодиод на Ардуино ;******************************************************************************* ; Порт D ; PD0(rxd) !UART обмен ; PD1(txd) !UART обмен ; PD2(int0) in !Вход датчика DH1 ; PD3(int1) in !Вход датчика DH2 (отключен) ; PD4(t0) out !Сигнал управления током симистора ; PD5(t1) in !Соединить с PD6 ; PD6(ain0) out !Соединить с PD5 ; PD7(ain1) in !Mode переключатель 3 ;******************************************************************************* ; Порт C ; PC0(adc0) out !Сигнал зажигания выход ; PC1(adc1) in !Свободен ; PC2(adc2) in !Свободен ; PC3(adc3) in !Свободен ; PC4(adc4/scl) in ! ; PC5(adc5/sda) in ! ; adc6 in !Канал АЦП выбора таблицы или Канал АЦП корректора ; adc7 in !Канал АЦП выбора таблицы или Канал АЦП корректора #define VersionName "1Ц.4T.ДИ - Один импульс" ;Одноцилиндровый двигатель cо штатным индуктивным датчиком ;Эмуляция второго датчика #define _Betta 8.0 ;Угловое расстояние от ВМТ до метки Delta. #define _Delta 22.0 ;Угловой размер метка Delta #define _UOZMax 30.0 ;Максимальный угол опережения зажигания (==LBetta) #define _Alfa 0.1 ;Угловое расстояние отключения сигнала зажигания после метки Delta #define _StopTime 2.0 ;Время (сек) детектирования режима СТОП #define _Manual 5.0 ;Угловая апертура ручного корректора УОЗ на +/- (не более половины Delta) ;Ручной корректор отключается при ADCCanCorSelectr = 0. ;Середина кода АЦП соотвествует сдвигу 0 градусов #define _Load 0.0 ;Угловая апертура корректора нагрузки в "-" (не более Delta) .equ Base = 360 ;Угол-база в градусах .equ Fn = 14 ;Частота тактовых импульсов, поступающих на таймер Т1 .equ TblCount = 8 ;Количество таблиц УОЗ 2N (N=1, 2, 4, 8, 16, 32). Номер активной таблицы ;переключается напряжением на входе канала АЦП ADCCanTblSelectr. ;При ADCCanTblSelectr = 0 номер таблицы выбирается максимальным из доступных. .equ ADCBufferSize = 8 ;Длина кольцевых буферов каналов АЦП (2, 4, 8, 16, 32) .equ LoadBufferSize = 32 ;Длина кольцевого буфера корректора нагрузки (32, 64, 128) .equ ADCCanTblSelectr= 0 ;[4..7] - Номер канала мультиплексора датчика ДАД/ДПЗД (выбор активной таблицы) .equ ADCCanCorSelectr= 0 ;[4..7] - Номер канала мультиплексора ручного корректора УОЗ .equ ADCCanA = 0 ;[4..7] - Номер канала A пользователя. ADCCanA =0 – канал отключен. .equ ADCCanB = 0 ;[4..7] - Номер канала Б пользователя. ADCCanB =0 – канал отключен. .equ ProtectClk = 6 ;Интервал дискретизации протокола защиты от пульсаций в мкс .equ ProtectCount = 2 ;Количество повторных чтений протоколом защиты с интервалом ProtectClk после первого ;изменения линии датчика. Значение может быть в пределах 1-7. .equ CmdLineBit = 0 ;Номер бита сигнала управления .equ TriacLineBit = 4 ;Номер бита сигнала управления током симистора .equ StartDeltaCode = 0b00001010 ;Код начала метки Delta на цилиндре .include "core.inc" ;Подключение Ядра (сегмент кода, сегмент данных) .dseg .org EndCoreDseg .equ DeltaVitual = int(_Delta/(Base-_Delta)*65536+0.5) .CSEG .org EndCoreCSeg reset: sbi DDRC,CmdLineBit ;Назначение линии PC0(adc0) контролера для работы на выход cbi PORTC,CmdLineBit ;Деактивировать выходную линию sbi DDRD,TriacLineBit ;Назначение линии PD4(t0) контролера для работы на выход sbi PORTD,TriacLineBit ;Включить ток симистора SetLEDCtrl 2 ;Светодиод на Arduino отражает состояние основного входного датчика ;0 - Выключен ;1 - Delta ;2 - CPU D2(PD2) ;3 - CPU D3(PD3) ;4 - CPU A3(PC3) ;5 - CPU A2(PC2) ;6 - CPU A1(PC1) ;7 - CPU A0(PC0) ;8 - Остановка ;9 - Низкие обороты ;10- УОЗ макс. ;11- УОЗ мин. ;12- Флаг Ign1 ;13- Флаг Ign2 ;14- UARTCtrl ;15- Включен load A,CoreSetup ;Начальное значение 0b000000X0 (Все включено), ;где X=ADCDisableBit устанавливает Сore при анализе параметров ;___________________76543210 ;ADCCanTblSelectr, ADCCanCorSelectr, ADCCanA, ADCCanB ori A,0b10101100 ;Настройка параметров Ядра store CoreSetup,A ;Инверсная логика: 0 - включен, 1 - отключен ;7 - Отключен датчик DH2 ;6 - Отключено усреднение по двум отсчетам Т1 ;5 - Отключен вызов события ServiceA ;4 - Отключен вызов события ServiceB ;3 - Отключен корректор для коммутатора ХХ.37.34 ;2 - Отключен корректор нагрузки ;1 - Отключен АЦП ;0 - Отключен UART ret ;Если есть DIP переключатели, то следующий блок может отключать включенные ранее функции- sbis PinD,7 ;Если DIP переключатель замкнут на землю, то UART отключен sbi CoreSetup,UARTDisableBit load A,ECoreSetup sbis PinB,0 ;Если DIP переключатель замкнут на землю, то ручной корректор отключен cbr A,(1<