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

Отключаемые счетчики электроэнергии на пульте. Все с документами пломбами, гарантией и без посредников!

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

Gipsy : (07 August 2017 - 11:56 11) ездил в Киев к тёще - средняя цена на заправках 23-24 грн/литр
Gipsy : (07 August 2017 - 11:55 11) у меня из проверенных ОККО и WOG ставят цену 26.50. Ну там какието акции при заправке от 15-и литров, получается реально 25
Gipsy : (07 August 2017 - 11:54 11) rgb, а почём кстати у тебя сейчас 95-й ?
rgb : (19 July 2017 - 20:06 20) У меня в городе наверно на заправки хороший бензин завезли, больше обычного автовладельцы гоняют от светофора к светофору.
Alex101 : (07 July 2017 - 23:19 23) rgb, Удачи.
rgb : (07 July 2017 - 23:19 23) Alex101, пока
Alex101 : (07 July 2017 - 23:16 23) rgb, и не плохо находят... Давай будем закруглятся, нафлудили мы тут...
rgb : (07 July 2017 - 23:12 23) Я в сталкер играл не много, правда давно. Прогеры, как правило ищут новые интересные на их взгляд решения. На тенденции рынка, интересы потенциальных игроков.
Alex101 : (07 July 2017 - 23:08 23) rgb, К примеру. В конце ГГ щелкает рубильник и все погибают. И если чесно, я думал что продолжения не будет. А в ролике ГГ обратился к сталкерскому монолиту. Сталкер совсем другая игра. Но обе игря сделал один и тот же колектив, ну почти...
rgb : (07 July 2017 - 23:05 23) Alex101, Да согласен, я не в курсе.
Alex101 : (07 July 2017 - 23:04 23) rgb, сложно понять если не играл в игру... А так ржач конкретный.
rgb : (07 July 2017 - 23:03 23) Чем дальше смотрю ролик тем оценка падает.
rgb : (07 July 2017 - 22:59 22) По ролику прикольно, если будет время почитаю в нете про эту игру.
Alex101 : (07 July 2017 - 22:57 22) rgb, мне 36. Вовремя вопрос не заметил. Инет тормозит.
Alex101 : (07 July 2017 - 22:57 22) Любителям метро 2033 -
Alex101 : (07 July 2017 - 22:56 22) rgb, теплоламповота у спектрума зашкаливает. У моего односласника был такой. Однокласник в последствии окончил университет магистром компьютерных наук. Свинтил в штаты.
rgb : (07 July 2017 - 22:38 22) нет времени на игры, в школе когда спаял спектрум тогда и наигрался, вот был реальный интерес.
Alex101 : (07 July 2017 - 22:36 22) rgb, круто, добавить не чего. Игру "метро 2033" уважаеш?
rgb : (07 July 2017 - 22:36 22) Alex101, Сколько тебе лет?
rgb : (07 July 2017 - 22:35 22) Я думаю везде есть Великие люди, мой знакомые уже пенсионеры. Медали видел.
Alex101 : (07 July 2017 - 22:35 22) rgb, у меня реально нет проблем с алкоголем, но система есть. Временами приходится випивать, но временами вообще не лезет.
rgb : (07 July 2017 - 22:33 22) Alex101, Ну значит хватит.
Alex101 : (07 July 2017 - 22:33 22) rgb, не понял, реально великие люди по соседству живут?
Alex101 : (07 July 2017 - 22:31 22) А мне уже два дня как бухло не идет на душу, устал...
rgb : (07 July 2017 - 22:31 22) Alex101, С такими людьми (момедями) познакомился и олимпийкие призёры и в своё время кандидаты в космонавтвты с Титовым.
Alex101 : (07 July 2017 - 22:31 22) Ну а я из Черкасской области. Район Смелянский, село Поповка.
rgb : (07 July 2017 - 22:28 22) Кременчуг, а чё не весело? Это у меня не так часто.
Alex101 : (07 July 2017 - 22:25 22) rgb, даааа... не весело. Где сам живеш?
rgb : (07 July 2017 - 22:21 22) Alex101, У нас просто пятница, кто привык праздновать конец трудовой недели тот встречается с друзьями.
Alex101 : (07 July 2017 - 22:18 22) rgb, как отпраздновал? У нас в селе сегодня движняк. Я просто нарисовался, купил шашлык и сто грам. И поехал домой... Но люди гуляют, музня лабает конкретно
rgb : (07 July 2017 - 22:15 22) Alex101, Привет,З святом.
Alex101 : (07 July 2017 - 22:15 22) З св*ятом всіх. Зі св*ятом Івана купала.
Nikolai4 : (05 July 2017 - 19:50 19) shpuntic, Gipsy, Кин-дза-дза, спасиб
Кин-дза-дза : (04 July 2017 - 06:38 06) Святое дело :drinks:
Gipsy : (03 July 2017 - 20:19 20) Правда чтоль? С днюхой !!!
shpuntic : (03 July 2017 - 16:07 16) Привет Nikolai4!Поздравляю с Днем Рождения! :drinks:
Panfil : (01 July 2017 - 11:09 11) таймер
Alex101 : (30 June 2017 - 21:23 21) Nikolai4, смотрел я, клевый фильмец. Рекомендую еще до кучи "взлом", шедевр, про чувака по фамилии Мытник. Что как бэ намекает. Ну и еще один, "пираты силиконовой долины".
payalo.mobte... : (30 June 2017 - 08:33 08) востановить старый аккаунт не получилось,почт поменялась и пароль забыл(
Nikolai4 : (28 June 2017 - 22:04 22) есть на эту тему фильм "Кто Я" (Who.Am.I.) 2014года , советую посмотреть
Alex101 : (28 June 2017 - 21:43 21) dimon-k714, підстава чистої води. Але весело:j.
Alex101 : (28 June 2017 - 21:42 21) dimon-k714, приіт друже. Як справи?
Кин-дза-дза : (28 June 2017 - 17:31 17) Привет для поршенки
Кин-дза-дза : (28 June 2017 - 17:31 17) Это происки Кремля - рука Москвы так сказать
dimon-k714 : (28 June 2017 - 12:02 12) Я так думаю про вірус <<Петя>> вже почули! Що скажете, які думки?
dimon-k714 : (28 June 2017 - 11:52 11) Привіт! Давно не заходив. Як справи?
Nikolai4 : (27 June 2017 - 17:04 17) payalo.mobtehnik, а востановить не получилось?
payalo.mobte... : (27 June 2017 - 08:46 08) давно с вами не был(....забыл свой пароль от старого ника hfelyx...может помните меня)
payalo.mobte... : (27 June 2017 - 08:45 08) всем привет)
rgb : (21 June 2017 - 00:02 00) Alex101, не о чём, это был градус в теле.

Фотография

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


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

#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К   102 Количество загрузок:

#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К   107 Количество загрузок:
  • Прикрепленный файл  sonar-10s.hex   2.76К   95 Количество загрузок:


#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 сообщений

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






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

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