Перейти к содержимому

Свернуть чат ЧАТ Открыть чат во всплывающем окне

Alex101 : (21 March 2017 - 22:47 22) Приветище всем!!! Как житуха други?
Nikolai4 : (09 March 2017 - 19:23 19) аналогично, бортовик напоминает по всем заменам
Gipsy : (09 March 2017 - 16:19 16) да и на щуп регулярно смотрю, особенно если далеко ехать собрался, так что увидеть что масло уже не торт не проблема
Gipsy : (09 March 2017 - 16:18 16) feliks, хз... у меня на панели при включении зажигания пишет сколько осталось км до следующего техобслуживания
feliks : (08 March 2017 - 13:17 13) Gipsy, Говориш нечего изобретать? Сделай простой приборчик .который бы извещал ,что пора менять масло в авто,а то думаешт когда его менять?
Alex101 : (07 March 2017 - 23:35 23) Gipsy, не удержался:))) feliks, не злись.
feliks : (07 March 2017 - 21:45 21) Всем привет.Кто собирал универсальный бортовой комп "УБК-1,8" схема которого размещена на этом сайте? Работает очень плохо. Нужна действительно рабочая прошивка или какието проблемы в сомой схеме? Пишите :feliks6767@yahoo.com.ua
Gipsy : (07 March 2017 - 19:55 19) о как умничать умеем :)
Alex101 : (06 March 2017 - 21:23 21) ;feliks, ; держи;j; Programm fur digitale Drehzahlanzeige V1.0 mit 16F874 ; © Johannes Walk ; ; Fur PIC16F874 ; Osc: Quartz, HS, 20MHz 30pF ; Mit Funktionstest und SPIKE-Unterdruckung ; Eingang: 100k auf 5,1V-ZD (0,5W) und 10nF gen GND in PORTA,0 ; Ausgange: ab PORTA,1 32 OUT's aufsteigend ; Anzeige: ab 0 RPM in 250 RPM-Schritten, aufsteigend, Balkenanz. LIST P=PIC16F874 ; Include file include <p16f874.inc> DZ00 equ 0x70 DZ01 equ 0x71 DZ02 equ 0x72 DZ03 equ 0x73 TIMEREG1 equ 0x60 EINGREG equ 0x61 goto Definitionen TEST clrf TIMEREG1 tests1 call TESTT btfss PORTE,2 goto tests1 tests2 call TESTT btfsc PORTE,2 goto tests2 call RESET call DISPLAY RETURN TESTT clrwdt btfss INTCON,2 ; Bit fur TMR0-Uberlauf, 1 wenn passiert RETURN bcf INTCON,2 decfsz TIMEREG1,f RETURN movlw 0x60 movwf TIMEREG1 call ROTATE call DISPLAY RETURN TIMER clrwdt btfss INTCON,2 ; Bit fur TMR0-Uberlauf, 1 wenn passiert RETURN bcf INTCON,2 decfsz TIMEREG1,f RETURN movlw 0x92 ;3D=61(20MHz), Teilerfaktor fur 0,05 sec (20,01Hz) movwf TIMEREG1 call DISPLAY ; Wenn die Zeit rum ist: RESET... call RESET call ROTATE RETURN EINGANG btfsc PORTA,0 goto e01 e00 ;Eingang=0 bcf EINGREG,0 RETURN e01 ;Eingang=1 btfss EINGREG,0 call FLANK bsf EINGREG,0 RETURN FLANK call ROTATE RETURN ROTATE RLF DZ00,f bsf DZ00,0 RLF DZ01,f RLF DZ02,f RLF DZ03,f RETURN RESET clrf DZ00 clrf DZ01 clrf DZ02 clrf DZ03 RETURN DISPLAY clrf PORTA btfss DZ00,0 bsf PORTA,1 btfss DZ00,1 bsf PORTA,2 btfss DZ00,2 bsf PORTA,3 btfss DZ00,3 bsf PORTA,4 btfss DZ00,4 bsf PORTA,5 clrf PORTB btfss DZ00,5 bsf PORTB,0 btfss DZ00,6 bsf PORTB,1 btfss DZ00,7 bsf PORTB,2 btfss DZ01,0 bsf PORTB,3 btfss DZ01,1 bsf PORTB,4 btfss DZ01,2 bsf PORTB,5 btfss DZ01,3 bsf PORTB,6 btfss DZ01,4 bsf PORTB,7 clrf PORTC btfss DZ01,5 bsf PORTC,0 btfss DZ01,6 bsf PORTC,1 btfss DZ01,7 bsf PORTC,2 btfss DZ02,0 bsf PORTC,3 btfss DZ02,1 bsf PORTC,4 btfss DZ02,2 bsf PORTC,5 btfss DZ02,3 bsf PORTC,6 btfss DZ02,4 bsf PORTC,7 clrf PORTD btfss DZ02,5 bsf PORTD,0 btfss DZ02,6 bsf PORTD,1 btfss DZ02,7 bsf PORTD,2 btfss DZ03,0 bsf PORTD,3 btfss DZ03,1 bsf PORTD,4 btfss DZ03,2 bsf PORTD,5 btfss DZ03,3 bsf PORTD,6 btfss DZ03,4 bsf PORTD,7 clrf PORTE btfss DZ03,5 bsf PORTE,0 btfss DZ03,6 bsf PORTE,1 btfss DZ03,7 bsf PORTE,2 RETURN Definitionen ; Allg. Grunddefinitionen clrw clrwdt BANKSEL TMR0 clrf PORTA clrf PORTB clrf PORTC clrf PORTD clrf PORTE BANKSEL OPTION_REG movlw b'00000000' movwf ADCON0 movlw b'00000111' movwf ADCON1 movlw b'00000001' movwf TRISA movlw b'00000000' movwf TRISB movlw b'00000000' movwf TRISC movlw b'00000000' movwf TRISD movlw b'00000000' movwf TRISE clrf INTCON movlw b'00000011' movwf OPTION_REG clrwdt BANKSEL TMR0 clrf PORTA clrf PORTB clrf PORTC clrf PORTD clrf PORTE clrf DZ00 clrf DZ01 clrf DZ02 clrf DZ03 clrf TIMEREG1 call TEST Main clrwdt call TIMER call EINGANG goto Main END
feliks : (06 March 2017 - 19:55 19) Всем привет.Нужна рабочая прошивка без глюков универсальный бортовой комп "УБК-1,8"
Alex101 : (03 March 2017 - 19:07 19) rgb, фиговое дело, во время любой пьянки разговор переходит деловое русло.
rgb : (03 March 2017 - 13:00 13) Alex101, Красиво сказал ;)
Alex101 : (03 March 2017 - 00:23 00) Gipsy, зашарить нечего, схемка с интернета.
Alex101 : (03 March 2017 - 00:22 00) rgb, в наши дни люди черезмерно увлечены выживанием:j
rgb : (02 March 2017 - 20:27 20) Gipsy, есть пару схем, но нет времени на написания статейки.
Gipsy : (02 March 2017 - 11:15 11) сейчас всё есть готовое. Изобретать нечего :)
Gipsy : (02 March 2017 - 11:15 11) при СССР ничего не было, всё нужно было самому изобретать - от регулятора яркости лампы и дверного звонка до ПК
Gipsy : (02 March 2017 - 11:14 11) дело не в том что нужно вознаграждение, просто писать не о чем стало
Gipsy : (02 March 2017 - 11:14 11) так вот зашарь статейку про ламповый усилок для наушников
Alex101 : (01 March 2017 - 15:08 15) Ни кому не охота на шару корячиться:j
Alex101 : (01 March 2017 - 15:07 15) После отмены конкурса наполнение сайта свелось к нулю.
Alex101 : (27 February 2017 - 20:39 20) Gipsy, подобные вещи ничего не дают.. А вот усилок для наушников, то ниче так, прикольный звук.
Gipsy : (27 February 2017 - 20:35 20) http://forum.ixbt.co...9:64546:5:1.jpg
Alex101 : (27 February 2017 - 20:34 20) Зимой в селе особо то и делать нечего... Ну и кореш с "железом" помог не то слово. Подарил видяху 470ю. Старинькая но на сгодня ничего. Потом и материнку с пеньком и шестью гектарами мозгов.
Gipsy : (27 February 2017 - 20:33 20) Изображение
Gipsy : (27 February 2017 - 20:32 20) хорошо когда есть время для поиграть :)
Alex101 : (27 February 2017 - 20:31 20) Да ну:), я недвно реально загорелся сделать усилок. Желаниеце появилось с игрой фаллают4. Ну там даже роботы ламповые.
Gipsy : (27 February 2017 - 20:29 20) только как о использовании накала с целью ночного освещения :)
Alex101 : (27 February 2017 - 20:29 20) Для меня проще купить чем в прошивках чтото менять. Со временем думаю исправиться... Ну по крайней мере надеюсь.
Alex101 : (27 February 2017 - 20:28 20) Тогда что говорить о 6П6С.
Gipsy : (27 February 2017 - 20:28 20) 16F886 в два раза дешевле стоят и без кварца работать будут. Но если проекты старенькие и исходников нет - то да, приходится покупать та, под что прошивка делалась
Alex101 : (27 February 2017 - 20:27 20) :)))
Gipsy : (27 February 2017 - 20:27 20) 16F876A - это совсем печалька, A 1998 This is a new data sheet...
Alex101 : (27 February 2017 - 20:25 20) Gipsy, Для меня это темный лес. Прошить еще могу. но с программированием никак.
Alex101 : (27 February 2017 - 20:24 20) Согласен, но для меня и 16F876A ничего так. Недавно купил 628 и 876 для некоторых проектов.
Gipsy : (27 February 2017 - 20:24 20) там как я понял именно в этом корпусе битами конфигурации можно отдельно включить ISCP
Gipsy : (27 February 2017 - 20:23 20) кстати про NC почитайте в даташите раздел 25.9 Special ICPORT Features (44-Pin TQFP Package Only)
Gipsy : (27 February 2017 - 20:23 20) Revision A (May 2004)
Gipsy : (27 February 2017 - 20:23 20) а 13 лет - это в электронике уже древний
Gipsy : (27 February 2017 - 20:22 20) шара - это хорошо :)
Alex101 : (27 February 2017 - 20:22 20) Gipsy, Парочка данных контроллеров досталась за 120гр.. Шара.
Alex101 : (27 February 2017 - 20:21 20) Gipsy, Термостат для инкубатора. Схемка из темы " Універсальній клімат контроль". Даны камень както древним назвать язык не поворачиваеться.
Alex101 : (27 February 2017 - 20:19 20) Gipsy, Понял. благодарю.
Gipsy : (27 February 2017 - 20:19 20) Alex101, а что делаете на таком древнем камешке?
Gipsy : (27 February 2017 - 20:18 20) Alex101, выводы, обозначенные NC можно оставлять висеть в воздухе - NC значит Not connected, внутри корпуса они ни с чем не соединены
Alex101 : (27 February 2017 - 20:17 20) Gipsy, В даный момент с ручкой и листом скрипя мозгами:J делаю таблицу для себя. Потом схемку перемалюю.... Спасибо!!!
Gipsy : (27 February 2017 - 20:15 20) Alex101, перекомпиллировать не надо, кристалл тот же, просто обратите внимание на расположение выводов
Alex101 : (27 February 2017 - 19:16 19) И еще, что делать с выводами маркеруемыми как NC/ICCK? Там их четыре штуки, мысль оставить в покое...
Alex101 : (27 February 2017 - 19:14 19) Всем привет. Не хочу новую тему постить по одному вопросу, вернее по двум. Подскажите пожалуста, нужно ли перекомпилировать прошивку от 18F4550 DIP40 для 18F4550 TQFP44 ?
Alex101 : (25 February 2017 - 21:17 21) Стремное затишье на форуме... Всем привет!
rgb : (17 February 2017 - 13:46 13) Nikolai4, ОК.
Nikolai4 : (17 February 2017 - 13:37 13) см. email рассылку
Nikolai4 : (17 February 2017 - 13:36 13) Новый заказ для разработчиков
Nikolai4 : (13 February 2017 - 17:18 17) Белая Крыса, на форуме создайте соответствующую тему
Белая Крыса : (11 February 2017 - 21:02 21) Nikolai4, Как поделиться инфой по ремонту промышленого оборудования. В данный момент металообрабатывающий станок.
Alex101 : (07 February 2017 - 20:37 20) А всетаки зашибенно в селе жить. Метель метёт по полной...
Владимир Сем... : (06 February 2017 - 02:08 02) Дорогой Самопалкин, подскажите пожалуйста. У меня была ошибка в плате, я ножку R2 припаял не к 8 ножке микросхемы а к 7, заметил не сразу, прошивал разными прошивками, биты выстанавливал как описано, пробовал две микросхемы 877а, не заработало, когда заметил и исправил ошибку, опять пробовал, не работает. Мог я данной ошибкой вывести микросхему из строя?
Nikolai4 : (04 February 2017 - 20:25 20) все на форуме!
Dominator36 : (04 February 2017 - 10:15 10) Nikolai4, Nikolai4, нужна схема бакомера.не могли бы вы помоч
Nikolai4 : (31 January 2017 - 18:02 18) rgb, http://bezkz.su/forum/topic/1082-shd/
rgb : (31 January 2017 - 09:35 09) Proks, Обратись к Николаичу. Или создай тему.
Proks : (31 January 2017 - 02:44 02) как заказать прошивку ?

Фотография

бaкoмeтр


  • Авторизуйтесь для ответа в теме
Сообщений в теме: 1933

#1
hfelyx

hfelyx

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 44 сообщений
  • ГородУкраина,Киев

Идея такая,вместо стандартного указателя уровня топлива ,ставим схему на мк и отображением на семисегментниках,при этом используем стандартный датчик топлива в баке.....

 

P.S. от Sergey_L
Теперь на правах модератора, постепенно буду собирать здесь все основные моменты данного проекта:
Для начала ограничимся тремя схемами, исходниками, печатками и прошиками:

 

1 - Базовая (авторская Gipsy)  - больше не поддерживается. Обновлённая  и улучшенная версия измерителя находится по этому адресу:   http://bezkz.su/foru...984-bakometr-2/

 

 

2 - 2х-с внешним опорным (модернизированная Sergey_L)
Прикрепленный файл  схема2.jpg   92.9К   2204 Количество загрузок:
Пост #497 - смена общего АНОДА на КАТОД
Пост #900 - смена ПОЗИТИВ на НЕГАТИВ
Исходники, модель и прошивка 0-25-50 Прикрепленный файл  _Bak_2x_OA_.rar   63.11К   1093 Количество загрузок:
Для уменьшения "болтанки" между 12 и 13 выводами ПИКа можно добавить емкость 1-10мкФ (по совету Gipsy)

Прошивка (0,2,4,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40) с миганием меньше 5 литров (вместо лампы) под "классику" для AndreyUA
Фотоотчет от AndreyUA
Прошивка на 20л без мигания и с калибровкой 0, 10, 20. для экспериментов Kotmur
Все для нашей "классики" (схема и прошивка)
Печатка от Kotmur все на одной плате под шестерошный стаканчик
Фотоотчет от Kotmur
Прошивка на 50л, шаг 5л, мигание 10л, ОА
Прошивка на 55л, шаг 5л, мигание 10л, ОА
Фотоотчет и Печатка от -=OLLEG=-
Прошивки под PIC16F684 на 20 и 40 литров
Прошивка на классику 2106 с общим катодом под PIC16F676 0,1,2,3,4,5,6,8,10,12,14,16,18,20,22,24,26,28,30,32,34,36,38,40 с притуханием с 4л
Исходники под 676, ОК
Мои издевательства над приборкой

Пост # 1764 с допиленной, Новогодней прошивкой под "классику" 40L, OA, без болтанки и лишнего нуля.

Прикрепленный файл  BAK_2_OA_N_80_5.hex   5.64К   44 Количество загрузок:

3 - 3х-с внутренним опорным (модернизированная Sergey_L)
a90f804799fat.jpg

Исходники, модель и прошивка 0-127-255 Прикрепленный файл  _Bak_3x_OA_.rar   67.86К   717 Количество загрузок:
Печатка от ASUS
Фотоотчет от ASUS


  • bivisska, reirif, Anry1976 и 6 другим это нравится

#2
Gipsy

Gipsy

    Продвинутый пользователь

  • Разработчик MICROCHIP
  • PipPipPip
  • 545 сообщений
  • ГородСтаниславів

Улучшенное устройство здесь: http://bezkz.su/foru...984-bakometr-2/


  • sanyasanevich это нравится

Заказ прошивок:  blackblick (a) yandex ru


#3
hfelyx

hfelyx

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 44 сообщений
  • ГородУкраина,Киев
собрана устройство по этой схеме

Прикрепленные файлы

  • Прикрепленный файл  0807190.lay   16.6К   584 Количество загрузок:
  • Прикрепленный файл  s7556832.jpg   22.58К   983 Количество загрузок:


#4
miron

miron

    Продвинутый пользователь

  • Заказчики
  • PipPipPip
  • 276 сообщений
  • Городднепропетровск
всем привет, краткий отчет по пятилитровой пришивке(остальные на момент испытаний были недосягаемы); вся схема потребляет 20мА, через делитель (бак) идет 2.5мА, все цифры(литры) отображаются отлично, как и предполагалось достоверные данные можно считать только на стоянке (когда бензин спокоен), показания одинаковы что с заведеным мотором что с заглушеным, измерительная цепь запитана от общей пятивольтовой кренки. во время движения цифры скачут, здесь сказываются конструкция измерителя (имеем что имеем), на торпеду измеритель не выносил лежал на полке под бардачком( выносить наверно и не буду во время движения будет отвлекать) пристрою гдето рядом. сегодня с ним был совершон 280км перелет, все нормально.
Думаю особого внимания заслуживает двухлитровая прошивка (по идее показания будут точнее, и нетак важно на скоко кривой бак), на досуге ее както испытаю(но сначала нада выпить 20 двухлитровых баклаг пива), удобней калибровать.
  • ASDFGH010 это нравится
Занятия фигней на рабочем месте развивают боковое зрение, слух, реакцию и бдительность в целом

#5
ASUS

ASUS

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 441 сообщений
  • ГородКозелец
Gipsy, Хочу к вашему вниманию предоставить альтернативный датчик, он статический.Надо как можно больше убрать механики.И упростить конструкцию! ниже файл в ворлде дос

Прикрепленные файлы


  • sanyasanevich и ASDFGH010 это нравится
http://vk.com/album30425408_92726012 vой альбом поделок!

#6
ASUS

ASUS

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 441 сообщений
  • ГородКозелец
подправил чуть схему)) cool

Добавлено (13.04.2011, 18:12)
---------------------------------------------
обьясните мне куда какой провод с датчика подсоединять! Там их три!

Прикрепленные файлы

  • Прикрепленный файл  s8292280.png   15.52К   719 Количество загрузок:

  • ASDFGH010 это нравится
http://vk.com/album30425408_92726012 vой альбом поделок!

#7
hfelyx

hfelyx

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 44 сообщений
  • ГородУкраина,Киев
ПЕЧАТКА,ноги семисегментников надо немного раздвинуть(формовировать)

Прикрепленные файлы

  • Прикрепленный файл  3405348.lay   63.91К   504 Количество загрузок:
  • Прикрепленный файл  s1393932.jpg   27.95К   734 Количество загрузок:

  • ASDFGH010 это нравится

#8
ASUS

ASUS

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 441 сообщений
  • ГородКозелец
предлагаю печатную плату с двух частей

Прикрепленные файлы

  • Прикрепленный файл  4470395.gif   11.66К   1149 Количество загрузок:
  • Прикрепленный файл  bakomerchic.lay   35.88К   987 Количество загрузок:

  • ASDFGH010 это нравится
http://vk.com/album30425408_92726012 vой альбом поделок!

#9
Belsad

Belsad

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 78 сообщений
У меня вопрос по поводу индикатора, а именно, с общим анодом или катодом и динамический или статический?

#10
Gipsy

Gipsy

    Продвинутый пользователь

  • Разработчик MICROCHIP
  • PipPipPip
  • 545 сообщений
  • ГородСтаниславів
Belsad, динамический, общий анод

Заказ прошивок:  blackblick (a) yandex ru


#11
ASUS

ASUS

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 441 сообщений
  • ГородКозелец
Газ имеет свойство при разных температурах создавать разное давление поэтому никаким прибором точно не определить количество! Талько свешиванием! Есть конешно электронные датчики давления ну этот микроконтроллер и принцип роботы будут очень отличатся! Газ надо мерять газовым счетчиком!

Добавлено (29.04.2011, 21:27)
---------------------------------------------
Такое предложение у меня! У микроконтроллере остались не задействованые выводы! Возможно ли добавить третюю цыфру которая будет показывать десятые литра! и добавить кнопочку еще одну или оставить эту ну сделать так чтоб можно было сразу выбрать предел калибровки, потом шаг а дальше калибровать и потом этому устройству можно будет присвоить названия универсального

Добавлено (29.04.2011, 21:39)
---------------------------------------------
управление можно так! при первом включеннии кнопочкой короткими нажатиями выбрать шаг, нажав и удерживая перейти в режим калибровки! Когда бак полон ! вновь нажать и удерживать чтоб прейти в режим измерения!

  • лисовик это нравится
http://vk.com/album30425408_92726012 vой альбом поделок!

#12
Gipsy

Gipsy

    Продвинутый пользователь

  • Разработчик MICROCHIP
  • PipPipPip
  • 545 сообщений
  • ГородСтаниславів
Quote (@SUS)
Такое предложение у меня! У микроконтроллере остались не задействованые выводы! Возможно ли добавить третюю цыфру которая будет показывать десятые литра! и добавить кнопочку еще одну или оставить эту ну сделать так чтоб можно было сразу выбрать предел калибровки, потом шаг а дальше калибровать и потом этому устройству можно будет присвоить названия универсального

Добавлено (29.04.2011, 21:39)
---------------------------------------------
управление можно так! при первом включеннии кнопочкой короткими нажатиями выбрать шаг, нажав и удерживая перейти в режим калибровки! Когда бак полон ! вновь нажать и удерживать чтоб прейти в режим измерения!

Как говорится "нет предела совершенству" и улучшать можно безгранично :). Но ввиду отсутствия свободного времени вряд ли я буду заниматься какими-то переделками прошивки.

Quote
program bakometr;

const
stNormal : byte = 1;
stCalibr : byte = 2;
AdrHi : byte = 12;
litr : array [0..AdrHi] of byte = (0,5,10,15,20,25,30,35,40,45,50,55,60);

var
C1 : sbit at porta.5;
C2 : sbit at porta.2;
i,j,cc: byte;
V : word; absolute 0x30;
Vhi : byte; absolute 0x31;
VLo : byte; absolute 0x30;

L10,L1:byte;
dat : array [0..AdrHi] of byte;
mode : byte;
calibrN : byte;

procedure Led(i: byte);
begin
if I=0 then begin
portc:=$04;
porta.4:=0;
end;
if I=1 then begin
portc:=$2D;
porta.4:=1;
end;
if I=2 then begin
portc:=$22;
porta.4:=0;
end;
if I=3 then begin
portc:=$28;
porta.4:=0;
end;
if I=4 then begin
portc:=$09;
porta.4:=1;
end;
if I=5 then begin
portc:=$18;
porta.4:=0;
end;
if I=6 then begin
portc:=$10;
porta.4:=0;
end;
if I=7 then begin
portc:=$0D;
porta.4:=0;
end;
if I=8 then begin
portc:=$00;
porta.4:=0;
end;
if I=9 then begin
portc:=$08;
porta.4:=0;
end;
end;

procedure delay10;
begin
delay_ms(10);
end;

procedure ReadData;
begin
for i := 0 to AdrHi do dat[i]:=EEPROM_Read(i);
end;

begin
porta := %00010000;
trisa := %11001011;
portc := $FF;
trisc := 0;
wpua := 1;
cmcon := $07;
ansel := 2;
adcon0:= 4;
adcon1:= $30;

mode:=stNormal;
ReadData;
ADC_Init;
i:=0;
while true do
begin
inc(I);
if mode = stNormal then
begin
if (i.7) and (V<6) then
begin
C1:=0;
C2:=0;
end;
if i=0 then
begin
V:=ADC_Read(1);
V:=V shr 2;
if V<=dat[AdrHi]
then V:=litr[adrHi]
else begin
if V>=dat[0]
then V:=litr[0]
else begin
for j:=0 to AdrHi-1 do
if (V<=dat[j]) and (V>dat[j+1]) then cc:=j;
if cc=AdrHi
then V:=Litr[AdrHi]
else begin
V:= (dat[cc]-V);
j:=(Litr[cc+1]-Litr[cc]);
V:= V * j;
j:=(dat[cc]-dat[cc+1]);
V:= V / j;
V:= V + litr[cc];
end;
end;
end;
L10:= v div 10;
L1 := V mod 10;
if (porta.0 = 0) then
begin
C1:=1;
C2:=1;
portc:=$3B;
porta.4:=1;
calibrN:=0;
mode:=stCalibr;
delay10;
repeat until porta.0 = 1;
delay10;
end;
end;
end;
if mode = stCalibr then
begin
L10:=litr[calibrN] div 10;
l1:=litr[calibrN] mod 10;
if i>127 then
begin
C1:=0;
C2:=0;
end;
if porta.0 = 0 then
begin
delay10;
repeat until porta.0 = 1;
delay10;
V:=adc_read(1);
V:=V shr 2;
EEPROM_Write(calibrN,VLo);
inc(calibrN);
if calibrN>AdrHi then
begin
mode:= stNormal;
CalibrN:=0;
delay10;
delay10;
delay10;
delay10;
ReadData;
end;
end;
end;

delay_ms(1);
if i.0 then begin
C2 := 0;
Led(L10);
C1 := 1;
end else
begin
C1 := 0;
Led(L1);
C2 := 1;
end;
end;

end.


Вот вам исходник - кому интересно - переделывайте.

Эта строчка отвечает за точки калибровки:
litr : array [0..AdrHi] of byte = (0,5,10,15,20,25,30,35,40,45,50,55,60);
В даном примере - прошивка до 60Л с калибровкой через 5Л

AdrHi : byte = 12; - количество точек калибровки

Заказ прошивок:  blackblick (a) yandex ru


#13
Belsad

Belsad

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 78 сообщений
А чем эту прошивку скомпелировать, научил бы кто, а цыган, поможешь?

Добавлено (04.05.2011, 23:03)
---------------------------------------------
http://gbo-shop.ru/m...er-class-b.html

Этот мультиклапан помоему мериет не давление а уровень сжиженого газа.


#14
Gipsy

Gipsy

    Продвинутый пользователь

  • Разработчик MICROCHIP
  • PipPipPip
  • 545 сообщений
  • ГородСтаниславів
Belsad, - компилятор http://www.mikroe.com/eng....tup.zip
  • alvoua это нравится

Заказ прошивок:  blackblick (a) yandex ru


#15
Mehvz

Mehvz

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 33 сообщений
Кто подскажет, если делать калибровку штатный датчик надо отключать или нет.
Пробовал на ВАЗе 2107 когда подключаю даный прибор то стрелка датчика отклоняется мол в пустом баке есть несколько литров топлива.
Что делать...
  • равиль это нравится

#16
Gipsy

Gipsy

    Продвинутый пользователь

  • Разработчик MICROCHIP
  • PipPipPip
  • 545 сообщений
  • ГородСтаниславів
Mehvz, увеличте сопротивление входного делителя, схема ставится в паралель с штатным прибором

Например так

Прикрепленные файлы

  • Прикрепленный файл  s5945240.gif   11.42К   800 Количество загрузок:

Заказ прошивок:  blackblick (a) yandex ru


#17
Belsad

Belsad

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 78 сообщений
Начал собирать, хочу показать что получилось, панелька собрана на оргстекле не очень аккуратно - но мне пойдет.

Добавлено (21.05.2011, 10:56)
---------------------------------------------
Вопрос, точка на индикаторе светится?

Добавлено (21.05.2011, 10:57)
---------------------------------------------
И ещё вопрос, в теме обсуждения несколько схем подключения в том числе без подачи напряжения на датчик, на Мазду какой собирать?

Прикрепленные файлы

  • Прикрепленный файл  s6850142.jpg   11.67К   498 Количество загрузок:
  • Прикрепленный файл  s1690516.jpg   23.15К   403 Количество загрузок:


#18
ASUS

ASUS

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 441 сообщений
  • ГородКозелец
Украсил smile

Добавлено (21.05.2011, 15:09)
---------------------------------------------

Прикрепленные файлы

  • Прикрепленный файл  s2014991.gif   119.04К   455 Количество загрузок:

http://vk.com/album30425408_92726012 vой альбом поделок!

#19
dimoniy_32

dimoniy_32

    Продвинутый пользователь

  • Проверенные
  • PipPipPip
  • 35 сообщений
Собрал работает ,куда подключать,
к какому проводу от датчика розовому? машина ваз 2106

#20
Gipsy

Gipsy

    Продвинутый пользователь

  • Разработчик MICROCHIP
  • PipPipPip
  • 545 сообщений
  • ГородСтаниславів

@SUS, Красиво украсил, только доработки то не учтены sad.gif
Важно мнение людей, которые запустили девайс в железе.

Правильная (по моему мнению) схема :
s1401255.jpg

Ув. соавторы, может определимся с включением схемы и выдадим таки "на гора" окончательный вариант?

 

Прикрепленные файлы

  • Прикрепленный файл  s1401255.gif   11.42К   596 Количество загрузок:

  • Shaman59 это нравится

Заказ прошивок:  blackblick (a) yandex ru





Количество пользователей, читающих эту тему: 0

0 пользователей, 0 гостей, 0 анонимных