Быстрый заказ, позвонить +7-978-708-85-73
Дроссель Amadeus Productions. Быстрый заказ по телефону.
(Viber, WhatsApp, Telegram)
Amadeus Productions Дроссельный узел на Lancer IX 1.6 (4G18), 2.0 (4G63) и другие моторы
Ремкомплект РХХ на Mitsubishi Lancer IX, 1.6 (4G18), MD619857, 1450A116
Облегченный маховик на 1.6 (4G18) и другие моторы
Облегченные шкивы на 1.6 (4G18) и другие моторы
One-touch или "Ленивые поворотники"

30 страниц V  « < 27 28 29 30 >  
Reply to this topicStart new topic
> Shift-Light своими руками 2
SSh
сообщение 10.4.2019, 12:56
Сообщение #561


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Это какой-то другой код, здесь про кнопку нет никакого упоминания
На нормальной прошивке все работает так, как надо, при превышении оборотов светодиод загорается, при понижении - тухнет. Ну, и, естественно, нажатием кнопки запоминаем отсечку.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SAWA_ENTER
сообщение 10.4.2019, 13:00
Сообщение #562


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 9
Регистрация: 9.1.2019
Вне форума
Авто: VAZ2103

Репутация:   0  


Цитата(SSh @ 10.4.2019, 12:56) *
Это какой-то другой код, здесь про кнопку нет никакого упоминания

а это не про кнопку
IF SETB = 0 THEN
WRITE 0, PERIOD.Byte0
WRITE 1, PERIOD.Byte1
?
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 10.4.2019, 13:06
Сообщение #563


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Да, видимо был невнимателен sad.gif
Но про этот код я ничего не помню, вот, вроде правильный, нашел в архивах
Код
'*****************************
'* Name    : ShiftLight.bas  *
'* Author  : SSh             *
'* MCU     : PIC12F629       *
'* OSC     : Internal        *
'*****************************
' 1-led release
@ DEVICE PIC12F629,intrc_osc_noclkout 'Set oscillator - internal  
DEFINE OSC 4           ' Internal Freq. 4 MHz

TACHO     var GPIO.0
LED_HI    var GPIO.1
LED_LO    var GPIO.2
SETB      var GPIO.4
BIPPER    VAR GPIO.5

HPULSE    VAR WORD
LPULSE    VAR WORD
PERIOD    VAR WORD
STORED    VAR WORD
FIRST     VAR BYTE

TRISIO = %010001                      
CMCON  = %00000111        
GPIO  = 0
CLEAR

main:
READ 0, STORED.Byte0
READ 1, STORED.Byte1

   pulsin TACHO, 0, LPULSE
   pulsin TACHO, 1, HPULSE
   PERIOD = LPULSE+HPULSE

     IF SETB = 0 THEN
        WRITE 0, PERIOD.Byte0
        WRITE 1, PERIOD.Byte1
     ENDIF

     IF PERIOD = 0 THEN
        LED_HI   = 0
        LED_LO = 0
        GOTO main
     ENDIF

     IF PERIOD < STORED THEN
        SOUND BIPPER,[120,10]
             IF FIRST = 0 THEN
                LED_HI = 1
                LED_LO = 0
                PAUSE 100
                FIRST = 1
             ENDIF
        LED_HI = 0
        LED_LO =1
     ELSE
        LED_HI = 0
        LED_LO = 0
        FIRST = 0
     ENDIF

goto main
END

Код под 629-й пик, для 675 помимо установок надо еще отключить АЦП
ANSEL = 0

Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SAWA_ENTER
сообщение 10.4.2019, 13:09
Сообщение #564


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 9
Регистрация: 9.1.2019
Вне форума
Авто: VAZ2103

Репутация:   0  


Цитата(SSh @ 10.4.2019, 13:06) *
Да, видимо был невнимателен sad.gif
Но про этот код я ничего не помню, вот, вроде правильный, нашел в архивах

Про ацп знаю, вечером попробую, но сомневаюсь что поможет, уже все прошивки из темы перепробовал, результат примерно одинаков.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
knyazevpit
сообщение 12.10.2019, 15:45
Сообщение #565


Новичок
*

Группа:
Новичок
Сообщений: 2
Регистрация: 12.10.2019
Вне форума
Авто: Audi A6 2.6 Quattro 1997

Репутация:   0  


Здравствуйте. Будет ли первый вариант шифт-лампы работать в диапазоне частот 1-50Гц?
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 12.10.2019, 18:02
Сообщение #566


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Пришлось кое-что повспоминать... 9 лет прошло...
Дискретность измерения периода для тактирующей частоты 4 МГц равна 10 мкс. Отсюда, верхняя измеряемая частота равна 100 кГц. Теперь о нижней. Здесь не все однозначно. Т.к. переменная, в которую пишем период у нас типа WORD, то наибольшее число измерений может быть равным 65535, а значение 655350 мкс. Получается, что, если измеряемые импульсы представляют собой меандр (длит. импульса равна длит. паузы), то наименьшее измеряемое значение будет равно 655350+655350 = 1310700 мкс = 1.3 сек, что соответствует частоте порядка 0,8 Гц. А если скважность импульсов (отношение периода к длительности) или слишком большая или слишком маленькая, то или сам импульс или пауза не "поместится" в переменную, и нижний предел будет ограничен чуть большим значением, порядка 1.5-2 Гц.
Думаю, ничего не напутал... я уже порядком подзабыл все эти дела
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
knyazevpit
сообщение 12.10.2019, 18:50
Сообщение #567


Новичок
*

Группа:
Новичок
Сообщений: 2
Регистрация: 12.10.2019
Вне форума
Авто: Audi A6 2.6 Quattro 1997

Репутация:   0  


Цитата(SSh @ 12.10.2019, 18:02) *
Пришлось кое-что повспоминать... 9 лет прошло...
Дискретность измерения периода для тактирующей частоты 4 МГц равна 10 мкс. Отсюда, верхняя измеряемая частота равна 100 кГц. Теперь о нижней. Здесь не все однозначно. Т.к. переменная, в которую пишем период у нас типа WORD, то наибольшее число измерений может быть равным 65535, а значение 655350 мкс. Получается, что, если измеряемые импульсы представляют собой меандр (длит. импульса равна длит. паузы), то наименьшее измеряемое значение будет равно 655350+655350 = 1310700 мкс = 1.3 сек, что соответствует частоте порядка 0,8 Гц. А если скважность импульсов (отношение периода к длительности) или слишком большая или слишком маленькая, то или сам импульс или пауза не "поместится" в переменную, и нижний предел будет ограничен чуть большим значением, порядка 1.5-2 Гц.
Думаю, ничего не напутал... я уже порядком подзабыл все эти дела

Спасибо за развернутый ответ. Будем экспериментировать.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
Lexa-kem
сообщение 11.10.2020, 20:57
Сообщение #568


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 3
Регистрация: 11.10.2020
Вне форума
Авто: AUDI A6 C4

Репутация:   0  


Доброго времени суток!
Тема ещё актуальна?
Мне интересна схема из первого поста.
Где диод просто зажигается и горит без притухания.
А возможно чтоб вместо диода срабатывало реле?
Мне нужно чтоб при определенных оборотах открывался электро клапан.
Или срабатывало реле которое будет подавать напряжение на клапан.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 12.10.2020, 4:42
Сообщение #569


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Никаких проблем. Устанавливаем вместо диода транзисторный ключ, нагруженный на реле и все. Схему ключа можно подсмотреть, скажем, в автомате управления зеркалом
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
Lexa-kem
сообщение 14.10.2020, 10:51
Сообщение #570


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 3
Регистрация: 11.10.2020
Вне форума
Авто: AUDI A6 C4

Репутация:   0  


Цитата(SSh @ 12.10.2020, 5:42) *
Никаких проблем. Устанавливаем вместо диода транзисторный ключ, нагруженный на реле и все. Схему ключа можно подсмотреть, скажем, в автомате управления зеркалом

Я в этом деле вообще мало чего понимаю.
По нарисованной схеме что-то не сложное спаять смогу.
Пост #13 в начале темы.
Там и схема и прошивка+ видео как это все работает.
А не могли бы ли вы поправить прошивку,чтоб зумер пищал не прерывно?
Я второй год пытаюсь собрать впуск с изменяемой длиной,вся засада в реле управления заслонками.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
Lexa-kem
сообщение 14.10.2020, 11:01
Сообщение #571


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 3
Регистрация: 11.10.2020
Вне форума
Авто: AUDI A6 C4

Репутация:   0  


И ещё такой вопрос.
Схема собрана на +12в выход с тахометра.
Я чтоб свою авто не разбирать,испытываю на рабочей газеле,а там выход +5в.
Чтоб от 5в работало,нужно убрать резисторы которые между входом тахометра и стабилитроном?
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 14.10.2020, 13:00
Сообщение #572


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Я извиняюсь, но у нас сейчас идет война и мне как-то не до прошивок...
Вот по схеме подскажу, скорее всего нужно будет убрать только резистор на 10к, и, возможно, уменьшить тот, что на 20к. Зависит от многих факторов.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
RazdolbaiT
сообщение 3.3.2022, 16:07
Сообщение #573


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 9
Регистрация: 2.3.2022
Вне форума


Репутация:   0  


Здравствуйте, Уважаемый SSh.
Спустя более 10 лет с момента открытия данной темы она всё ещё интересна и актуальна. Вы придумали довольно занимательное устройство и...это моё первое устройство на МК.
Успешно создал на основе вашей прошивки и схемы устройство отсечки зажигания карбюратопного ДВС со световой отсечкой. Это устройство научило меня новому и интересному. Благодарю Вас за Ваш труд.
Сейчас я пишу, к сожалению, столкнувшись с одним затруднением. (Если нахваливают, значит что-то будут просить whistler.gif . Надеялся поделится сюда интересной прошивкой, но при исполнении в железе возникли проблемы ).
Устройство: Система Автомотического Управления Воздушной Заслонкой (подсосом). В дальнейшем "САУВЗ". Так же устройство управляет клапаном «долива» после прогрева.
Описание проблемы:
Хотел подключить на ножку GPIO 5 термореле. Однако переключение, подобное работе кнопки "SET" невозможно. Когда я запускаю устройство у меня "фиксируется" GPIO 5. Если запуск был с притяжкой к "0", то он не переключает его в "1" если его притчнуть к «+», даже через резистор 100 Ом (остерегаюсь спалить). И наоборот, если подать питание с притяжкой GPIO5 к "1" , то он не переключается на "0".
Проблема: Как я понял, этот вывод МК работает как выход, а не как вход (А хотелось бы работу аналогичную GPIO 4). Возможно есть проблемы в работе кода, поскольку переписыванием прошивок я занялся буквально пару недель назад в ходе создания отсечки по зажиганию
Использую:
Picbasic pro 2.6, простейший программатор через COM-порт, IC-Prog 1.05D.
Если есть возможность помочь, то на ответ прикреплю примерную принципиальную схему, которую планирую использовать и исходник прошивки. Закомментировал я его довольно подробно, думаю будет сложно запутаться.
...............................
С уважением к Вам и Вашему труду.

Павел

Сообщение отредактировал RazdolbaiT - 3.3.2022, 16:16
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 3.3.2022, 16:29
Сообщение #574


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Здравствуйте.
За так сказать "ориентацию" (в хорошем смысле этого слова rolleyes.gif ) отвечает директива

TRISIO = %010101 ' Set pin directions

Понять и запомнить здесь все просто, указаны настройки портов, начиная с нулевого. Визуально единица похожа на I (input), ноль на O (Output).
Что мы имеем в нашей программе:
GPIO0 - O(utput)
GPIO1 - 1(nput)
GPIO2 - O(utput)
GPIO3 - 1(nput)
GPIO4 - O(utput)
GPIO5 - 1(nput)

Для того, чтоб порт 5 работал на выход надо переписать указанную строку след. образом:

TRISIO = %010100
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
RazdolbaiT
сообщение 3.3.2022, 17:23
Сообщение #575


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 9
Регистрация: 2.3.2022
Вне форума


Репутация:   0  


Ого, оказывается всё так просто!
Благодарю за быстрый и подробный ответ!
На днях подготовлю и проверю в железе.
По успеху приложу готовую прошивку, вдруг кто-то из читателей форума захочет повторить.
У меня есть ещё один вопрос: В описании PAUSE написано, что это создаёт паузу по отчётам внутреннего осциллятора [грубо, но объясняю как я понял] и что при частоте 4МГц там примерно 1 секунда = PAUSE 1000
Однако, если я начинаю писать задержку к оператору PAUSE, MCS выдаёт подсказку [period]. И при выполнении уже в железе у меня продолжительность мерцаний зависит от частоты генератора TACHO.
Конечно время пересчитать на частоту не сложно, но если для "отсечки" это было актуально, то вот с САУВЗ было бы удобнее задержки не привязывать к TACHO.
Попробовать оператор «PAUSES»?
или переписать строчки? :

PULSIN TАCHO, 0, LPUSE
PULSIN TАCHO, 1,HPUSE
PERIOD1 = LPULSE+HPULSE

(вместо PERIOD =LPULSE+HPULSE)

Сообщение отредактировал RazdolbaiT - 3.3.2022, 17:40
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 3.3.2022, 18:21
Сообщение #576


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Для определения точных временных интервалов, зависящих только от стабильности и точности кварцевого резонатора необходимо использовать систему т.н. прерываний, используя имеющиеся в составе МК аппаратные таймеры. Но это совершенно отдельная тема, хотя и достаточно подробно описанная на многих ресурсах. Существуют даже специальные утилитки, при помощи которых рассчитываются настройки таймеров для получения требуемого интервала. Напр. "Pic Timer Calculator", генерирующий необходимый код под PicBasic. Или калькулятор от mikroe, предназначенный для генерации кода под их компиляторы. Существуют и многочисленные онлайн калькуляторы. Или этот
Команды-же типа PAUSE хоть и выдают более-менее истинные значения, но на эти значения накладывается и время выполнения других операторов программы, поэтому если требуется большая точность, то только через прерывания по по таймеру.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
RazdolbaiT
сообщение 3.3.2022, 19:09
Сообщение #577


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 9
Регистрация: 2.3.2022
Вне форума


Репутация:   0  


Спасибо!
Мне как раз и нужны паузы в выполнении программы, например для правильной реакции на кнопку и датчик (короткий контакт / длительный контакт) и задержки переключения "Вперёд-Назад"что бы обмотка привода САУВЗ не начала работать "в обе стороны" со всеми прелестями индуктивной нагрузки. Тут особой точности во времени не нужно.
Попробую посчитать и подобрать "среднее значение" необходимых задержек. А то режимы у МК работают вполне правильно, а алгоритм переключения между режимами (холодный/прогретый) не происходил, поскольку GPIO 5 работал как выход.
Буду пробовать dh.gif
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 3.3.2022, 19:31
Сообщение #578


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Ну, если точность не нужна, то можно обойтись и без таймеров/прерываний
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
RazdolbaiT
сообщение 4.3.2022, 18:22
Сообщение #579


Начинающий Технический Маньяк
**

Группа:
Технический Маньяк
Сообщений: 9
Регистрация: 2.3.2022
Вне форума


Репутация:   0  


К моему сожалению, Замена цифры не решила проблему с переключением. unknw.gif
Видимо мне не удалось написать код правильно и по этой причине он не работает.
Сейчас у меня ножка GPIO 5 подтянута к "+" через резистор 10К, при коммутации на землю (Выключатель с фиксацией),
Не выполняется переключение между режимами из сценария "САУВЗ" в сценарий "Управления клапаном" и на оборот.
Если подключая питание вывод GPIO 5 Притянут к 0 или 1, то он выбирает соответствующий режим, но потом из него не
переключается. И алгоритм открытия Воздушной заслонки не отпрабатыват.
Ещё одна проблема: Хочется записать обороты как для САУВЗ, так и для срабатывания клапана отдельно.
Т.е. если я нажимаю SET в режиме САУВЗ, то он прописывает обороты двигателя, которые требуется удерживать, а если
я нажимаю кнопку SET в режиме работы клапана, то хотелось бы произвести запись других оборотов, при превышение
которых клапан будет открываться.
К сожалению и этого мне не удалось добиться, запись оборотов в режиме работы клапана, если и происходит, то при
превышении записанных оборотов на ножке GPIO 1 (SIG) выходной уровень не изменяется.
В Общих чертах - терплю фиаско bh.gif

Набросал схему, которая будет использоваться для "открытого" доступа, в которой коммутация мотора выполнена на реле.
Обвязка МК по сути такая же, как планирую использовать, потому особой разницы в схеме не будет.
У себя использую уже готовый драйвер двигателя с очень добротной обвязкой, потому нынешний текст прошивки написан
под него. Алгоритм работы привода простой: вход "+" и вход "сигнал":
при уровне "1" поворачивает в одну сторону, при уровне "0" в обратную. Без "+" привод стоит, независимо от уровня на "сигнал". Но суть схемы та же

Прикрепленное изображение


Хотел прикрепить файл .PBP, но данный тип файла загружать мне запрещено. Добавил код файлом текст
Повторю его здесь в сообщении, он довольно длинный:

Код
'*****************************
'* Name    : САУВЗ.bas       *
'* Author  : RazdolbaiT      *
'* MCU     : PIC12F675       *
'* OSC     : Internal        *
'*****************************

'@ DEVICE PIC12F675,INTOSC 'Set oscillator - internal  
_intosc
DEFINE OSC 4           ' Internal Freq. 4 MHz

TACHO       var GPIO.0
SIG         var GPIO.1   'Сигнал
SERV          var GPIO.2   'Привод
SETB        var GPIO.4   'Запись
TERM        VAR GPIO.5   'Термореле NC

HPULSE   VAR WORD        
LPULSE   VAR WORD        
PERIOD   VAR WORD        'Период САУВЗ
PERIOD1  VAR WORD        'Период Клапана
STORED   VAR WORD        'Память оборотов САУВЗ
STORED1  VAR WORD        'Память Оборотов Клапана

TRISIO = %010000                          
ANSEL  = 0                
CMCON  = %00000111

'-----------------Выбор Режима-------------------
main:

IF SETB = 0 THEN        'Пауза, что бы при выходе
SERV = 0                'из режима 3 не произошло
SIG = 0                 'случайной записи
Pause 3000
goto main
ENDIF

IF TERM = 0 THEN        'Режим САУВЗ
SERV = 1                'Если Sig = 1, то ВЗ от-
SIG = 1                 'крывается.              
goto main1
ENDIF

IF TERM = 1 THEN        'Режим упр.Клапаном
SERV = 0                'Если Sig = 1, то клапан
SIG = 0                 'открывается
pause 25
goto main2
ENDIF
'Если Serv = 1, то работает привод
'Если Serv = 0, то привод отключен        

'--------------------CАУВЗ-----------------------
main1:                    
READ 0, STORED.Byte0
READ 1, STORED.Byte1

pulsin TACHO, 0, LPULSE
pulsin TACHO, 1, HPULSE
PERIOD = LPULSE+HPULSE

IF TERM = 1 THEN        'Переход на Упр.Клапаном
SERV = 1     'Полное открытие ВЗ перед переход в
SIG = 0      'режим. Паузу следует задать равной
PAUSE 600    'времени открытия ВЗ из крайнего по
SERV = 0     'ложения при напряжении около 9.8В.
Sig = 0
goto main2  
ENDIF

IF SETB = 0 THEN        'Запись прогрев. оборотов
WRITE 0, PERIOD.Byte0   'которые удерживает САУВЗ
WRITE 1, PERIOD.Byte1
ENDIF

IF PERIOD = 0 THEN
SERV = 1
SIG = 1
GOTO main1
ENDIF

             'Условие "нормального" отклонения
IF PERIOD < STORED + STORED/125 and PERIOD > STORED + STORED/125 THEN
SERV = 0     'Отключение привода при достижении
SIG = 0      'прогревочных оборотов двигателя.
pause 20
GOTO main1
ENDIF

IF PERIOD > STORED THEN
SERV = 1     'Закрытие ВЗ при недостатке оборотов
SIG = 1      'двигателя.
GOTO main1
ENDIF

IF PERIOD < STORED Then
SERV = 1     'Открытие ВЗ при превышении оборотов
SIG = 0      'двигателя.
GOTO main1
ENDIF


'--------------Управление Клапаном---------------
main2:
SERV = 0                    
READ 2, STORED1.Byte0
READ 3, STORED1.Byte1

pulsin TACHO, 0, LPULSE
pulsin TACHO, 1, HPULSE
PERIOD1 = LPULSE+HPULSE

IF SETB = 0 THEN        'Запись оборотов клапана.
WRITE 2, PERIOD1.Byte0  
WRITE 3, PERIOD1.Byte1
ENDIF

IF TERM = 0 THEN        'Переключение в режим 1
Pause 1500              'или режим 3
goto dumaem
ENDIF
dumaem:
if TERM = 0 THEN                                            
goto main1
ENDIF
if TERM = 1 THEN                                            
goto main3
ENDIF



IF PERIOD = 0 THEN
SERV = 0      'Пока двигатель заглушен, клапан
SIG = 0       'закрыт
GOTO main2
ENDIF

IF PERIOD > STORED1 THEN
SERV = 0     'Пока обороты ниже заданных, клапан
SIG = 0      'закрыт.
pause 50
GOTO main2
ENDIF

IF PERIOD < STORED1 THEN
SERV = 0     'Когда обороты выше заданных, клапан
SIG = 1      'открыт.
pause 50
GOTO main2
ENDIF

'-----------Режим записи оборотов САУВЗ----------
'-----------------особые условия:----------------
'---------первый запуск или прогретый ДВС--------
main3:

SERV = 0    
SIG = 0    

READ 0, STORED.Byte0
READ 1, STORED.Byte1

pulsin TACHO, 0, LPULSE
pulsin TACHO, 1, HPULSE
PERIOD1 = LPULSE+HPULSE

IF SETB = 0 THEN        'Короткое нажате кнопки
Pause 1400              'SET
goto dumaem1            'Запись прогрев. оборотов
ENDIF                   'которые удерживает САУВЗ

dumaem1:                'Запись или переход
IF SETB = 1 THEN        'В выбор режима
WRITE 0, PERIOD.Byte0
WRITE 1, PERIOD.Byte1
GOTO main3
ENDIF

IF SETB = 0 THEN        'Зажатие кнопки SET
GOTO main               'выводит из режима
ENDIF        



IF TERM = 1 THEN
GOTO main3
ENDIF

IF TERM = 0 THEN        'Зажатие кнопки TERM или
Pause 1500              'присоединение холодного
goto dumaem2        'термореле выводит из реж                                    
ENDIF
dumaem2:
IF TERM = 0 THEN
goto main
ENDIF

IF TERM = 1 THEN
GOTO main3
ENDIF


END

'Для перехода в особый режим, следует провести
'следующие действия:
'1. Отключить зажигание, снять контакты термореле
'2. Включить зажигание (без запуска двигателя).
'3. Коротко нажать кнопку TEMP на плате САУВЗ.
'+Для настройки оборотов на прогретом двигателя
'4а. Произвести запуск двигателя.
'5а. Довести обороты двигателя до желаемых
'6а. Удерживая обороты, коротко нажать SET
'    спустя 3 секунды опустить обороты
'7а. Для выхода из режима зажать Set на 2 секунды
'+Для настройки ПРИ ПЕРВОМ ЗАПУСКЕ (лучше вдвоём)
' и ХОЛОДНОМ ДВИГАТЕЛЕ (когда запуск без подсоса
' невозможен).
'4б. Снять разъём привода, привести ВЗ вручную на
'    3/4 закрытого положения.
'5б. Произвести запуск двигателя, при необходи-
'    мости подгазовывать.
'6б. Привести вручную ВЗ к желаемым оборотам.
'7б. Коротко нажать кнопку SET, не снижать обо-
'    роты в течении 3-х секунд.
'8б. Зажать кнопку SET на 2 секунды, для выхода
'    из режима
'9б Заглушить ДВС,подключить термодатчик и привод
'   Произвести запуск двигателя
' ВЫХОД ИЗ РЕЖИМА ПРОИСХОДИТ ПРИ ЗАЖАТИИ КНОПКИ
' ЗАПИСИ, ИЛИ ПРИ ОТКЛЮЧЕНИИ ЗАЖИГАНИЯ, ИЛИ ПРИ
' ПОДКЛЮЧЕНИЯ "ХОЛОДНОГО" ТЕРМОРЕЛЕ, ИЛИ ПРИ ЗА
' ЖАТИИ КНОПКИ TERM.!!!

Прикрепленные файлы
Прикрепленный файл  _____1.txt ( 7,6 килобайт ) Кол-во скачиваний: 15
 
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post
SSh
сообщение 5.3.2022, 6:36
Сообщение #580


Технический Маньяк-Гуру
*******

Группа:
Администраторы
Сообщений: 7044
Регистрация: 3.6.2009
Из: Армения
Вне форума
Авто: Lancer IX, AT

Репутация:   263  


Цитата(RazdolbaiT @ 4.3.2022, 19:22) *
К моему сожалению, Замена цифры не решила проблему с переключением. unknw.gif
Сейчас у меня ножка GPIO 5 подтянута к "+" через резистор 10К, при коммутации на землю (Выключатель с фиксацией),

Если порт работает на выход, то его притягивать никуда, особенно к плюсу, не надо.
Go to the top of the page
¬
Вставить ник в форму быстрого ответа
+Quote Post

30 страниц V  « < 27 28 29 30 >
Fast ReplyReply to this topicStart new topic
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 



Быстрый заказ, позвонить +7-978-708-85-73
Дроссель Amadeus Productions. Быстрый заказ по телефону.
(Viber, WhatsApp, Telegram)
Amadeus Productions Дроссельный узел на Lancer IX 1.6 (4G18), 2.0 (4G63) и другие моторы
Ремкомплект РХХ на Mitsubishi Lancer IX, 1.6 (4G18), MD619857, 1450A116
Облегченный маховик на 1.6 (4G18) и другие моторы
Облегченные шкивы на 1.6 (4G18) и другие моторы
One-touch или "Ленивые поворотники"