-
Сообщения
-
Третий день "ремонта".. Интересно, сегодня злосчастная кнопка будет явлена миру? -
Смотрим напряжения на всех электролитах, рядом со входом в 12в. Не все напряжения перечислены. У Краба два недостатка для новичков: 1 Он богат. 2 Он специалист из высшей лиги в радиоэлектронике. Эти два качества позволяют ему заниматься чем угодно, в том числе посылать всех к мастеру, читать/писать тут на форуме или силой мысли ставить диагноз аппаратуре на расстоянии. -
Можно просто приклеить к корпусу джакузи изнутри.
-
-
Можно. Часто без паяльника. Доберитесь до кнопки и фото в тему. Проверьте еще не отвалилась ли пайка на плате под кнопкой.
-
By DedLogoped · Posted
На новой плате уже установлен свой БП, вон та платка на термосоплях. Так что ваш старый "БП ТВ" можете определить куда в другое место. Очевидно, что в специальное для него место в ванне! Ну явно в ванне и не должно быть никаких отверстий кроме форсунок и слива, так что я думаю или в смеситель, или в слив, ну или в цепь форсунок где вставляется. -
-
-
Similar Content
-
By Дмитрий -
Программа для говорящей GSM-сигнализации на языке BASCOM-AVR
' Авторская работа. Автор: Дмитрий Абловацкий.
'Программа для говорящей GSM сигнализации на модуле SIM800L.
'SIM800L Revision:1418B04SIM800L24.
'Настройка микроконтроллера Attiny85: фюзы, изменение только LOW на $E2
$regfile = "attiny85.dat"
$crystal = 8000000
$hwstack = 40
$swstack = 16
$framesize = 32
Config Portb.0 = Input
Config Portb.1 = Output
Config Portb.2 = Input
Open "comb.3:9600,8,n,1" For Input As #2 'RXD - вход
Open "comb.4:9600,8,n,1" For Output As #1 'TXD - выход
Dim Buffered As String * 300
Dim On_off As Bit
Dim In_str As Byte
Dim I As Byte
Dim I1 As Long
Dim Telephone As String * 12
Config Debounce = 100
Telephone = "registered"
' - - - - - - - - - - -Подготовка модуля - - - - - - - - - -
Reset Portb.1 'выход модуля из спящего режима
Wait 12 ' время для самоподготовки модуля
Print #1 , "AT" ' Проверка на готовность модуля к работе
Input #2 , Buffered ' Ответ
In_str = Instr(buffered , "0")
If In_str = 0 Then
Waitms 250
Print #1 , "ATE0V0+CMEE=0;+CLIP=0" 'Выкл эха, только код ошибки, выключить АОН
Input #2 , Buffered ' Ответ
'Waitms 250
'Print #1 , "AT+CNMI=1,2,0,0,0" ' СМС не сохранять, направлять в микроконтроллер
'Input #2 , Buffered ' Ответ
Waitms 250
Print #1 , "ATS0=0" ' автоответ ручной
Input #2 , Buffered ' Ответ
Waitms 250
Print #1 , "AT+CSCLK=1" ' спящий режим
Input #2 , Buffered ' Ответ
Waitms 250
Print #1 , "AT+CLCC=1" ' установить автоматическое отображение статуса
Input #2 , Buffered ' Ответ
Waitms 250
Print #1 , "AT&W" ' сохранить
Input #2 , Buffered ' Ответ
End If
Print #1 , "AT+CPIN?" ' Готовность модуля к работе с картой
Input #2 , Buffered ' Ответ +CPIN READY или 4- нет карты
In_str = Instr(buffered , "SIM PIN")
Input #2 , Buffered ' Ответ 0 - OK или нет ответа
If In_str <> 0 Then 'если карта есть, но нужен PIN - код
Print #1 , "AT+CPIN=0000" 'PIN - код !Возможно Сим-карта заблокируется после 3 неправильных
Input #2 , Buffered ' Ответ 0 - OK или 4- неправильный PIN - код
Input #2 , Buffered ' Ответ +CPIN READY или нет ответа
Input #2 , Buffered ' Ответ Call Ready или нет ответа
Input #2 , Buffered ' Ответ SMS Ready или нет ответа
End If
Wait 2
For I = 1 To 3
Print #1 , "AT+CPAS" 'Готовность к выполнению команд
Input #2 , Buffered ' Ответ
In_str = Instr(buffered , "0")
If In_str <> 0 Then 'Если модуль готов к работе
Wait 1
Print #1 , "AT+CREG?" ' проверка на регистрацию в сети
Input #2 , Buffered ' Ответ
In_str = Instr(buffered , ",1")
If In_str <> 0 Then ' если зарегистрирован
Goto M1 ' выход , иначе ещё попытки
End If
End If
If I = 2 Then
Wait 1
Print #1 , "AT+CFUN=1,1" 'перезагрузка модуля
Input #2 , Buffered ' Ответ
Wait 5
End If
Wait 5
Next
M1:
Do
' - - - - - - - - - - - PIR датчик - - - - - - - - - -
If Pinb.2 = 1 And On_off = 1 And Pinb.0 = 1 Then ' если 1
Wait 3 ' время для пробуждения SIM800L
For I = 1 To 3 ' три попытки дозвониться
Print #1 , "AT+CCALR?" ' идентификатор готовности совершить звонок
Input #2 , Buffered ' Ответ
Input #2 , Buffered ' Ответ
In_str = Instr(buffered , " 1")
If In_str <> 0 Then ' если готов совершить звонок ' если 2
Wait 1
Print #1 , "ATD" ; Telephone ; ";" ' набор номера
Input #2 , Buffered 'ответ
Input #2 , Buffered 'ответ
Input #2 , Buffered 'ответ ' голосовое соединение
In_str = Instr(buffered , "3,0,0") '
If In_str <> 0 Then ' если голосовое соединение ' если 3
For I1 = 1 To 4000000 ' примерно 40 сек ожидание, если соединение и бездействие до сброса
If Pinb.3 = 0 Then ' если абонент возьмёт трубку или сбросит соединение
Input #2 , Buffered 'ответ
Wait 1
For I1 = 1 To 500000 ' примерно 5 сек ожидание сброса
If Pinb.3 = 0 Then ' если сброс соединения
Input #2 , Buffered 'ответ
Goto M2
End If
Next
In_str = Instr(buffered , "0,0,0")
If In_str <> 0 Then ' если голосовое соединение
Print #1 , "AT+CREC=4,C:\User\3__.amr,1,100" ' передача речевого сообщения
Input #2 , Buffered ' Ответ
Wait 8 'Время речевого сообщения + добавленное
M2:
Waitms 250
Print #1 , "ATH0"
Input #2 , Buffered
Bitwait Pinb.2 , Reset
Goto M1
End If
End If
Next
End If ' 3-End If
End If ' 2-End If
Wait 1
Print #1 , "ATH0"
Input #2 , Buffered
Wait 10
Next
End If ' 1-End If
' - - - - - - - - - - -Проверка на входящий звонок по RING - - - - - - - - - -
If Pinb.0 = 0 Then ' если поступил звонок
' - - - - - - - - - - - включение и выключение сигнализации - - - - - - - - - -
Input #2 , Buffered ' Ответ +CLCC: 1,1,4,0,0,"+7**********",145,""
In_str = Instr(buffered , "+7" )
If Telephone = "registered" Then
Telephone = Mid(buffered , In_str , 12 )
Else
In_str = Instr(buffered , Telephone )
End If
Input #2 , Buffered ' Ответ 2 - первый звонок
Input #2 , Buffered ' Ответ 2 - второй звонок
If In_str <> 0 Then ' если зарегистрированный номер телефона
In_str = Instr(buffered , "1,6,0,0,") ' если сброс
If In_str = 0 Then ' если входящий звонок продолжается
Waitms 250
Print #1 , "ATA"
Input #2 , Buffered ' Ответ
Input #2 , Buffered ' Ответ +CLCC: 1,1,0,0,0,"+7**********",145,""
If On_off = 0 Then
On_off = 1
Wait 1
Print #1 , "AT+CREC=4,C:\User\1__.amr,1,100" ' передача речевого сообщения
Input #2 , Buffered ' Ответ
Wait 8 'Время речевого сообщения + добавленное
Print #1 , "ATH0"
Input #2 , Buffered ' Ответ
Else
On_off = 0
Wait 1
Print #1 , "AT+CREC=4,C:\User\2__.amr,1,100" ' передача речевого сообщения
Input #2 , Buffered ' Ответ
Wait 8 'Время речевого сообщения + добавленное
Print #1 , "ATH0"
Input #2 , Buffered ' Ответ
End If
End If
Else ' если незарегистрированный номер телефона
Wait 1
Print #1 , "ATH0"
Input #2 , Buffered ' Ответ
Bitwait Pinb.0 , Set
End If
End If
Set Portb.1 ' в спящий режим SIM800L
Enable Interrupts
Enable Int0
Enable Pcint0
Idle ' в спящий режим микроконтроллер
Reset Portb.1 ' выход модуля из спящего режима
Disable Interrupts
Disable Int0
Disable Pcint0
Loop
End
Источник https://178654.blogspot.com/p/gsm.html
-
By anastasialashmanova
Здравствуйте! Кто-нибудь сталкивался в работе с модулями фирмы Quectel? Есть плата Quectel MC60 TE-A KIT возможно ли работать с ней без отладочной платы GSMEVB-KIT?При подключении модуль выдает поток информации, полученный с GNSS, но он не отвечает на АТ-команды, из-за чего это может быть? При подключении к RXD_EXT и TXD_EXT информация перестает приходить при переключении S102, а при подключении на GNSS_RXD и GNSS_TXD информация приходит постоянно.
Вот как выглядит получаемая информация.
$GNGGA,000419.095,,,,,0,0,,,M,,M,,*56
$GPGSA,A,1,,,,,,,,,,,,,,,*1E
$GLGSA,A,1,,,,,,,,,,,,,,,*02
$GPGSV,1,1,00*79
$GLGSV,1,1,00*65
$GNGLL,,,,,000419.095,V,N*64
$GNRMC,000420.095,V,,,,,0.00,0.00,060180,,,N*56
$GNVTG,0.00,T,,M,0.00,N,0.00,K,N*2C
-
By WhiteManPrk
Здравствуйте, собираю автосигнализацию с автозапуском на Arduino + GSM модулем. Набросал схему для контроля напряжения АКБ, ручника, педали тормоза и т.д. Столкнулся с проблемой, что при питании от блока питания 12В на резисторных делителях "плывет" сопротивление и соответственно неправильно работает. Может кто-нибудь сможет подсказать, как решить проблему.
P.S. На разъеме J1: 1Pin - GND, 2Pin - 12V. Земля везде общая. Резисторные делители R1, R2 и R11, R12. Стабилитроны D3-D6 1N4733A на 5.1В.
-
By Петрович15
Добрый день.
Помогите определить, что за сигнализация на фото. Была какая-то недорогая (Украина), программировалась с помощью СМС. Установлена года два назад.
Потерялись контакты человека, что устанавливал, СМС мне приходят на телефон и также я знаю код от панели возле двери.
Цель сменить номер, чтоб приходила СМС на другой номер.
Никаких обозначений и названий я не нашел на самой коробке!
Помогите пожалуйста!
-
By Aven
Находимся в поиске программиста на длительный проект.
Что есть: плата на основе STM32F103 + SIM808 (используется GSM, GPS, Bluetooth) + GPIO
Задача - заставить все это работать с сервером (сервер пишется).
Подробности при личном общении.
Желательно Ростов-на-Дону или Ростовская область.
Связь через ЛС или почту Rough_ne(a)mail.ru.
-
