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

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

rgb : (14 January 2017 - 19:30 19) У кого есть опыт с GSM модулями, хотел бы пообщаться.
Alex101 : (14 January 2017 - 06:33 06) С новым годом по старому стилю всех!
Кин-дза-дза : (07 January 2017 - 09:19 09) С Рождеством Христовым !
Shaman59 : (01 January 2017 - 21:23 21) Всех, Уважаемых форумчан и посетителей с наступившим Новым годом! Желаю всегда, Здоровья отменного, огромной Удачи и постоянного Благополучия!
Alex101 : (01 January 2017 - 21:15 21) Всі хутко похмеляйтесь...
rgb : (01 January 2017 - 05:49 05) З Новим роком!
Gipsy : (01 January 2017 - 03:39 03) з Новим роком!
Кин-дза-дза : (31 December 2016 - 18:31 18) ВСЕМ БОБРА !
Nikolai4 : (31 December 2016 - 17:43 17) В связи с приближением Нового года,
Желаю удач Вам различного рода!
Пусть Вашей они подчиняются власти,
Пусть будет Вам радость, здоровье и счастье!
Кин-дза-дза : (31 December 2016 - 10:06 10) ВСЕХ С НАСТУПАЮЩИМ 2017! Да прибудет с вами сила!
smart4on : (26 December 2016 - 22:06 22) Ребят добрый вечер, хотел бы ознакомиться с закрытой веткой на форуме про Драйвер шагового двигателя. Как я могу это сделать?
mozg : (26 December 2016 - 00:03 00) rgb, как дела?
mozg : (26 December 2016 - 00:03 00) как я тут давно не был
mozg : (26 December 2016 - 00:02 00) всем привет
rgb : (22 December 2016 - 13:04 13) Не натуральная машина, сделано в программе рендеринга.
rgb : (22 December 2016 - 09:57 09) Nikolai4, Не. Только лексус мой)))
Nikolai4 : (21 December 2016 - 19:55 19) RGB твоих рук дело ))) ?
Nikolai4 : (21 December 2016 - 19:54 19)
dimon-k714 : (19 December 2016 - 10:07 10) Привіт! З святом! Надіюсь усі були чемні. :super_tG:
shpuntic : (13 December 2016 - 20:47 20) Splin,зачем тебе отключать питание? Если не секрет конечно.
Splin : (08 December 2016 - 21:53 21) Может кто подсказать как в протеусе включать и отключать питание например микросхемы 4017?
Splin : (08 December 2016 - 10:12 10) Всем привет!
Кин-дза-дза : (02 December 2016 - 19:27 19) жми на ссылку и ты у нас
Кин-дза-дза : (02 December 2016 - 19:26 19) http://bezkz.su/foru...akometr/page-90
лисовик : (02 December 2016 - 19:20 19) ser.virus@mail.ru
Кин-дза-дза : (02 December 2016 - 19:19 19) Почту свою напиши, потолкуем
лисовик : (02 December 2016 - 19:19 19) нет
Кин-дза-дза : (02 December 2016 - 19:18 19) У тебя аська есть?
лисовик : (02 December 2016 - 19:17 19) это куда? я новенький не знаю
лисовик : (02 December 2016 - 19:17 19) собираю в протеусе но ничего не получается
Кин-дза-дза : (02 December 2016 - 19:14 19) Шуруй тогда к нам на форум )
лисовик : (02 December 2016 - 19:13 19) Хочется самому сделать
Кин-дза-дза : (02 December 2016 - 19:12 19) Купи БК Динго, он как раз на два бака расчитан
лисовик : (02 December 2016 - 18:13 18) Нет ,просто заправляю в основном 10л. а езжу на газу
Кин-дза-дза : (02 December 2016 - 14:02 14) Что за бак такой? Газовый?
лисовик : (02 December 2016 - 13:16 13) БАК
Кин-дза-дза : (02 December 2016 - 11:26 11) лисовик тогда я не понял 10л это что? Бак или сигнализатор остатка?
лисовик : (02 December 2016 - 09:40 09) на девятку
Кин-дза-дза : (30 November 2016 - 18:30 18) Куда хоть устанавливать нужно? Я явно не в авто
Кин-дза-дза : (30 November 2016 - 18:29 18) Не за что
Кин-дза-дза : (30 November 2016 - 18:28 18) Под два типа бакометров есть два форума, нужно определиться что нужно и написать в том форуме
лисовик : (30 November 2016 - 18:26 18) Спасибо за инфу , буду пробывать
Кин-дза-дза : (30 November 2016 - 18:25 18) А вообще то Бакометр 2 не требует спец прошивки, сам задаешь при калибровке сколько литров и объем бака. Бакометр1 мод. там да, прошивка под нужные требования правится
Кин-дза-дза : (30 November 2016 - 18:22 18) будет тебе и схема и прошивка
Кин-дза-дза : (30 November 2016 - 18:21 18) лисовик, пиши вот сюда: http://bezkz.su/foru...akometr/page-90
лисовик : (30 November 2016 - 17:11 17) Добрый вечер ,хочу собрать бакомер 2 на ваз 2109.Нужна схема и прошивка на 10 литров. Заранее спасибо
Кин-дза-дза : (29 November 2016 - 15:14 15) лисовик, напиши свой вопрос в форуме, помогут
лисовик : (28 November 2016 - 20:20 20) Добрый вечер , просмотрел весь форум и не нашел прошивку и схему на 10 литров Pic16F 676 на Ваз 2109 если не затруднит напишите. Заранее спасибо
алексей прос... : (28 November 2016 - 10:25 10) здравствуйте! кто может собрать бакомер на сузуки свифт .
4EPHOMOP : (24 November 2016 - 11:21 11) нужна помощь по электрике
4EPHOMOP : (24 November 2016 - 11:20 11) доброго времени суток
Вовчик : (20 November 2016 - 17:53 17) Берешь схему из "новогодний релиз" Sergey_L, доробатываеш, заказываешь у него прошивку. По дороботке схемы если интересует напишу подробней. Прошивка должна быть "позитив"
Вовчик : (20 November 2016 - 17:49 17) PAL71,
djon0007 : (20 November 2016 - 01:01 01) Ниже 28 градусов получаю только нули .
djon0007 : (20 November 2016 - 00:59 00) У меня не меряет ds18b20 ниже 28 градусов в чем может быть дело ?

Фотография

Простой автоматический выключатель света на ультразвуковом датчике


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

#1
va11

va11

    Новичок

  • Проверенные
  • Pip
  • 9 сообщений
Пост поддержки статьи http://bezkz.su/publ...m-datchike.html

Изображение

Исходный текст, написанный в среде Bascom:

$regfile = "attiny13.dat"
$crystal = 9600000
$hwstack = 0                                                ' default use 32 for the hardware stack
$swstack = 0                                                ' default use 10 for the SW stack
$framesize = 0

Config Portb.3 = Output                                     'выход для подключения ноги Trigger
Trigger Alias Portb.3
Trigger = 0

Config Portb.4 = Input                                      'вход для импульса Echo

Config Portb.0 = Output                                     'конфигурация для подключения светодиода
Led Alias Portb.0
Led = 0

Config Portb.1 = Output                                     'output control pin
Control Alias Portb.1
Control = 0

Config Portb.2 = Input                                      'вход для button

Dim A As Word , A2 As Word                                  'сюда копируется значение длины сигнала
Dim M As Word , Em As Eram Word
Dim I As Byte , T As Word , Tled As Byte
Const Toff = 750                                            '250=1min                                            '500 'TIME to OFF
Const Tmax = 50000

Enable Interrupts                                           'enable global ints
Enable Pcint0                                               'we enable pcint0 as this has pcint0-pcint7
On Pcint0 Btn                                               'we jump to this label when one of the pins is changed
Pcmsk = &B00000100                                          'enable pcint2  (portb.2)

Config Watchdog = 1024                                      '8192                                      '2048
M = Em : T = Tmax : Tled = 0 : Control = 0 : Led = 0
Start Watchdog

 Do
Reset Watchdog
Gosub Test
A2 = A
Waitms 100
Reset Watchdog
Gosub Test
Waitms 100

If A < M And A2 < M And A > 0 And A2 > 0 Then
   T = 0                                                    ': Led = 1
  Else
   Incr T                                                   ' : Led = 0
   If T > Tmax Then T = Tmax
End If

If T < Toff Then
   Control = 1
  Else
   Control = 0
End If

If T = 0 Then
   If Tled < 9 Then : Led = 1 : Else : Led = 0 : End If     ' on
  Else
   If T < Toff Then
      If Tled < 5 Then : Led = 1 : Else : Led = 0 : End If  ' last minute
     Else
      If Tled < 1 Then : Led = 1 : Else : Led = 0 : End If  ' off
   End If
End If

Incr Tled : If Tled > 10 Then Tled = 0


 Loop
End

'------------------------------------------------------------------------------------
 Btn:
 For I = 1 To 50
   Toggle Led : Waitms 200 : Reset Watchdog
 Next
 Gosub Test
 'Gifr = 0
 M = A : Shift M , Right , 3 : M = A -m : Em = M : T = Tmax
 'Tled = 0 : Control = 0
 Set Led                                                    ': Waitms 2000 : Reset Led : Waitms 1000
 Do : Loop
 Return

 '-----------------------------------------------------------------------------------
 Test:
 Trigger = 1                                                'даем импульс на ногу Portd.4 длительностью 15 мкс
 Waitus 15
 Trigger = 0
 Waitus 10
 Pulsein A , Pinb , 4 , 1                                   'ловим импульс высокого уровня

 Return
 '-----------------------------------------------------------------------------------


Для изменения времени горения лампы редактировать строку
Const Toff = 750
исходя из того, что число 250 соответствует 1 минуте.
  • sinver это нравится

#2
va11

va11

    Новичок

  • Проверенные
  • Pip
  • 9 сообщений
В приложении 2 прошивки с задержкой в 10с и 1с. В железе не проверял, пробуйте.

Ответы на другие вопросы:
\\Подскажите, для чего нужна подтяжка первой ноги контроллера к плюсу питания?
Это подтяжка Reset для предотвращения самопроизвольной перезагрузки.

\\ расстояние сработки 2,5 метра... Если кто знает как повысить чувствительность до заявленных 4м буду очень признателен.
Зона чувствительности датчика это конус с углом в 15* (точнее смотрите в даташите). Вы уверены, что края этого конуса на длине 2.5м не касаются пола, стен или других предметов?

\\разработайте схему пожалуйста на этрм датчике-пугалку для собак-в смысле ккак его подключать?
Попробуйте прошивку с задержкой 1с. Может это то, что вам нужно.

\\ самостоятельно меняется установка расстояния
Прочитайте значение в ячейке 0 eprom до и после появления этого эффекта. Оно изменилось?

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


  • henc и slaushkin это нравится

#3
Vell65

Vell65

    Новичок

  • Пользователи
  • Pip
  • 3 сообщений
\\ самостоятельно меняется установка расстояния
Прочитайте значение в ячейке 0 eprom до и после появления этого эффекта. Оно изменилось?
Программатор собрал на ардуине уно как посмотреть ячеки через прогу AVR Burn-O-Mat понятия не имею, ей заливаю прошивку. Предполагаю, что это именно и происходит в ячейке памяти. За прошивки спасибо.

#4
etimsk

etimsk

    Новичок

  • Проверенные
  • Pip
  • 3 сообщений
Здраствуйте!
А подскажите пожалуйста . я так понял что можно ограничить зону ? тоесть может включаться если приблизился на 20 см а на другом расстоянии не будет включаться?
Задержка 1 мин -? . А если не покидаешь зону -то постоянно включен?
Извините за дурацкие вопросы -хочу ночник сделать а то или постоянно горит или надо кнопку нажимать, я начинающий радиолюбитель пока многое не знаю.
И подскажите пожалуйста по фьюзам , надо какие трогать? есть у кого нибудь скриншот из Code Vision &

#5
Ramzesss

Ramzesss

    Новичок

  • Пользователи
  • Pip
  • 4 сообщений
Подскажите как реализовать задержку перед включением?

Собрал в железе, все работает! Вот фьюзы для Sinaprog.
Прикрепленный файл  sonar_fuses.jpg   46.86К   96 Количество загрузок:

#6
etimsk

etimsk

    Новичок

  • Проверенные
  • Pip
  • 3 сообщений

Здраствуйте! 

Огромное спасибо автору за данную разработку -устройство действительно очень нужное а главное простое для начинающих. За 6 месяцев работы -ни одного нарекания -срабатывает чётко и качественно а возможность ограничить 

зону -супер! 

К сожалению я не умею пока писать программы -поэтому очень прошу пожалуйста кто может скиньте прошивку на 3 минуты и 5 минут задержку отключения.



#7
Fanin

Fanin

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
Люди так как все же увеличить дальность ? А то пол метра и дальше не хочет.

#8
maikl9999

maikl9999

    Пользователь

  • Проверенные
  • PipPip
  • 11 сообщений

Чтобы самостоятельно не менялась установка расстояния необходимо параллельно кнопке поставить конденсатор 0.1Мкф. Автору спасибо, очень практичная штуковина.



#9
hanan

hanan

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений

В приложении 2 прошивки с задержкой в 10с и 1с. В железе не проверял, пробуйте.

Ответы на другие вопросы:
\\Подскажите, для чего нужна подтяжка первой ноги контроллера к плюсу питания?
Это подтяжка Reset для предотвращения самопроизвольной перезагрузки.

\\ расстояние сработки 2,5 метра... Если кто знает как повысить чувствительность до заявленных 4м буду очень признателен.
Зона чувствительности датчика это конус с углом в 15* (точнее смотрите в даташите). Вы уверены, что края этого конуса на длине 2.5м не касаются пола, стен или других предметов?

\\разработайте схему пожалуйста на этрм датчике-пугалку для собак-в смысле ккак его подключать?
Попробуйте прошивку с задержкой 1с. Может это то, что вам нужно.

\\ самостоятельно меняется установка расстояния
Прочитайте значение в ячейке 0 eprom до и после появления этого эффекта. Оно изменилось?

 

В приложении 2 прошивки с задержкой в 10с и 1с. В железе не проверял, пробуйте.

Ответы на другие вопросы:
\\Подскажите, для чего нужна подтяжка первой ноги контроллера к плюсу питания?
Это подтяжка Reset для предотвращения самопроизвольной перезагрузки.

\\ расстояние сработки 2,5 метра... Если кто знает как повысить чувствительность до заявленных 4м буду очень признателен.
Зона чувствительности датчика это конус с углом в 15* (точнее смотрите в даташите). Вы уверены, что края этого конуса на длине 2.5м не касаются пола, стен или других предметов?

\\разработайте схему пожалуйста на этрм датчике-пугалку для собак-в смысле ккак его подключать?
Попробуйте прошивку с задержкой 1с. Может это то, что вам нужно.

\\ самостоятельно меняется установка расстояния
Прочитайте значение в ячейке 0 eprom до и после появления этого эффекта. Оно изменилось?

Здравствуйте,

Скачал оба файла-задержка у обоих 1 мин. как у оригинала.

Проверил на   MD5 -одинаковы с оригиналом.Просьба -дать правильные файлы.Спасибо.



#10
Andry111

Andry111

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений

Добрый день , а кто нибудь испытал работу с US-020  датчиком ? Вроде он до 7 метров 



#11
va11

va11

    Новичок

  • Проверенные
  • Pip
  • 9 сообщений

Проверил на   MD5 -одинаковы с оригиналом.Просьба -дать правильные файлы.Спасибо.

 

 

Это 2 разных файла:

 

dif_500.jpgi.gif

 

 

Но на всякий случай я еще раз их скомпилировал. Пробуйте.

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

  • Прикрепленный файл  sonar-1s.hex   2.76К   82 Количество загрузок:
  • Прикрепленный файл  sonar-10s.hex   2.76К   70 Количество загрузок:


#12
hanan

hanan

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений

 


Проверил на   MD5 -одинаковы с оригиналом.Просьба -дать правильные файлы.Спасибо.

 

 

Это 2 разных файла:

 

dif_500.jpgi.gif

 

 

Но на всякий случай я еще раз их скомпилировал. Пробуйте.

 

Большое спасибо. Всё работает.



#13
vovanxp

vovanxp

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений

Здравствуйте,что за элементы стоят рядом с конденсатором в левом верхнем углу платы с трансформаторным питанием?



#14
Ustes

Ustes

    Новичок

  • Пользователи
  • Pip
  • 6 сообщений
  • ГородЭкспериментально-испытательный регион №16

Как правильно подключить в место реле симистор+оптрон, дайте схему подключения.



#15
Mirage

Mirage

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений
  • ГородРоссия

Всем здравствовать!

 

У меня ChipBlasterAVR Evaluation V2.01 пишет, что hex файл большой и в тиньку13а не влезет. Программатор AVR-910. Брал для пробы другую прошивку, меньшего размера, шьет без проблем. У тиньки13а размер флеша 1кБ, а hex файл 2 с лишним килобайта. 

 

 

Вот и возник вопрос: кто чем прошивал? 

 

.............

up: разобрался. Просто пару лет не прошивал, забыл все. Прошилось прогой CodeVisionAVR Evaluation V2.05.9.

 

Заработала сразу. И сразу понял, что секундная задержка мала. Стоило чуть шевельнуться в поле активности, как светодиод гас (вместо реле поставил). Перешил на 10 секунд и порядок, теперь не будет ложных срабатывай. До Нового года заказал на Али под эту схему 9 сонаров, обошлись по 44 рубля с копейками за штуку. Сегодня проверил все, работают.

 

Пока собрал на макетной плате, которая без пайки с проводами. Питал от лабораторного БП. Осталось собрать в железе и проводить полевые испытания. 

 

Спасибо за этот девайс.



#16
Evgenij37

Evgenij37

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений

При первом включении устройство заработало сразу, а через минуту отказалось работать. Но если держать пальцем за нижний контакт излучателя приемника, который с буквой R, устройство отлично работает. Так же работает если к этому контакту просто припаять провод. С чем это связано?  Что можно реально предпринять в данной ситуации?



#17
slavyan

slavyan

    Пользователь

  • Проверенные
  • PipPip
  • 17 сообщений

Всем привет. Автор устройства, VA11, или кто подскажет, можно разнести между собой ультразвуковой датчик и плату управления на ATtiny шлейфовым проводом на расстояние ~3 метра? Не будет ли сказываться влияние помех от бытовой техники на работу девайса? Спасибо.

И ещё вопрос, какова диаграмма направленности срабатывания этого датчика?


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

#18
Lagros

Lagros

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений

Сделал себе такой. Работает без проблем.

051acedf_s.jpg]



#19
inko1973

inko1973

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений
  • ГородДонецк

После n-ной перезаливки программы заработало (шил скачанным файлом, содержавшем одну строку кода). Но оказывается на выходе 6 МК сигнал не появляется, когда входишь в охранную зону, а пропадает!!! Т.е. нужно применять реле низкого уровня. Короче все наоборот. Автор, поправь программу, чтобы без танцев с бубном было. Алгоритм должен быть таким: когда никого нет в охранной зоне на выходе 6 МК не должно быть управляющего сигнала, после вхождения тела в охранную зону на 6 ноге должен появляться сигнал высокого уровня. Когда тело покидает охранную зону на 6 ноге МК высокий уровень должен оставаться еще какое-то время.



#20
zamivana

zamivana

    Новичок

  • Пользователи
  • Pip
  • 4 сообщений

Собрал схему, все работает. Но!. Если проходить датчик быстро, то не всегда срабатывает. Очень медленно отдупляется. Если кто знает причину - подскажите . Заранее благодарен. Может частоту увеличить?
-






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

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