Перейти к содержанию

Адвансед

Members
  • Постов

    548
  • Зарегистрирован

  • Посещение

Информация о Адвансед

  • День рождения 18.03.1979

Информация

  • Пол
    Мужчина
  • Интересы
    РЭА, авто, ПК, звук и пр....
  • Город
    Чебоксары

Электроника

  • Стаж в электронике
    6-10 лет
  • Сфера радиоэлектроники
    МК, УНЧ, Релейная защита, монтаж.

Посетители профиля

Блок последних пользователей отключён и не показывается другим пользователям.

Достижения Адвансед

Знаток

Знаток (7/14)

  • Неделя на форуме
  • Месяц на форуме
  • Год на форуме
  • 10 лет  на форуме
  • 10 постов на форуме

Последние значки

129

Репутация

  1. можно взять второй атини следить за сигналом и дергать нужный порт или основное питание. Я так делал в одном из своих устройств внешний ватчдог на атини 13, который контролирует работу mega328p
  2. Вот тут есть небольшая инструкция на 17 странице с драйверами https://at13.ru/ms800gsm_din/rukovodstvo_ms800_gsm-din.pdf а вообще, обычно микроконтроллеры с китая приходят с выставленным делением частоты на 8, то есть надо ставить перемычку на программаторе. Путь к файлу ни на что не влияет при чтении прошивки Возможно у вас какая то из ног посажена куда то или под сопротивлением.
  3. Куплю атмеги 8 5 штук за 100р. + мега 328р 1 шт 50р, в письме или конверте Так же интересуют БУ но рабочие меги 168-328 мега8-88-48 в корпусах TQFP Писать лучше в личку, если конечно согласны
  4. Здравствуйте, покупал такой модуль GSM , изначально не понравилось что после тревоги вызов сбрасывается через 30 секунд, попросил выслать прошивку чтобы вызов не сбрасывался совсем, пока сам не сбросишь или не сбросится оператором. Теперь же хочется изменить незначительные функции под себя, но в программировании слаб. Можно ли имея HEX файл, который производитель выслал мне ранее, поменять какие нибудь параметры? например, когда открываешь этот HEX в понипроге, там вроде можно изменить данные... у кого был опыт? хотя вроде устройство не сложное, может найду примеры программ и сделаю свой вариант. Спасибо.
  5. Адвансед

    ---

    позже создам тему, пока удалить
  6. Продаю сайт cxema21.ucoz.ru домен http://cxema21.ru с доменом вместе, идеальный вариант для радиотехнической тематики , сферы услуг, сервисного центра. - цена 15 000 рублей. Сайт создан лет 6 назад и сам себя раскрутил. Очень хорошие показатели по посещаемости, много ЭКСКЛЮЗИВНЫХ материалов. Пишите в ПМ или лучше сюда https://vk.com/at13m
  7. Пробую вот так, ничего ен выходит, если переменную В вместое S то выходят цифры 311010 на любое сообщение. В чем ошибка? подскажите плз.. почему то коментарии разворотило на нерусский.... $regfile = "m32def.dat" $crystal = 14745600 $baud = 9600 $hwstack = 64 $swstack = 64 $framesize = 100 Config Lcdpin = Pin , Rs = Portb.3 , E = Portb.2 , Db4 = Portb.6 , Db5 = Portb.4 , Db6 = Portb.7 , Db7 = Portb.5 Config Lcd = 16 * 2 Cursor Off Noblink Config Portc.0 = Output : Set Portb.0 Config Debounce = 50 Cursor Off Noblink Declare Sub Getline(s As String) '÷òåíèå äàííûõ èç áóôåðà Declare Sub Del_buffer() 'î÷èñòêà áóôåðà Dim R As Byte Dim S As String * 10 Dim B As Byte Cls ' ðàçáèðàåì ñîîáùåíèÿ uart Sub Getline(s As String) S = "" Do B = Inkey() 'áåðåì ñèìâîë èç áóôåðà â ôîðìàòå ASCII Select Case B Case 0 : Exit Do 'åñëè äàëüøå áóôåð ïóñòîé òî âûõîäèì èç öèêëà Case 10 : If S <> "" Then Exit Do 'êîíåö ñòðîêè - çíà÷èò âûõîäèì èç êèêëà Case Else : If B > 31 Then S = S + Chr(b) 'ñîñòàâëÿåì ñòðîêó End Select Lcd S Waitms 500 Loop End Sub 'î÷èñòêà áóôåðà UART '=================== 'Sub Del_buffer() 'Do 'B = Inkey() 'êëàäåì â ïåðåìåííóþ "Â" äàííûå èç áóôåðà 'Loop Until B = 0 'âûõîäèì èç öèêëà êîãäà â ïåðåìåííóþ ïîïàäåò 0 (áóôåð ïóñò) 'End Sub
  8. Если бы знать начинающему как это делается, по подсказкам попробовал как то так, в итоге никак(( $regfile = "m32def.dat" $crystal = 14745600 (ставил 1600000 - и так и так в железе все работает) $baud = 9600 $hwstack = 64 $swstack = 64 $framesize = 100 Config Lcdpin = Pin , Rs = Portb.3 , E = Portb.2 , Db4 = Portb.6 , Db5 = Portb.4 , Db6 = Portb.7 , Db7 = Portb.5 Config Lcd = 16 * 2 Cursor Off Noblink Config Portc.0 = Output : Set Portb.0 Config Debounce = 50 Cursor Off Noblink Dim Cmd As String * 15 Cls Do Waitms 50 Print "AT+CMGF=1" Waitms 50 Locate 2 , 2 Lcd Cmd Waitms 500 Cls If Pinc.0 = 1 Then Waitms 100 Print "ATD+791999999991;" Locate 1 , 2 Lcd "Call" Else Waitms 500 Cls End If Debounce Pinb.0 , 0 , Kn1 , Sub Loop End Kn1: Toggle Portc.0 Return End
  9. Ребята, хочу понять как выводить данные, принятые по UART на ЖК индикатор 1602, принимают данные от GSM модуля на процессор мега 32, как считать данные и выводить их на экран? не пойму. вот кусок кода, при нажатии на кнопку совершает вызов Как вывести информация которую выдает модуль GSM на дисплей?
  10. Делать можно все, было бы желание и главное нормальные готовые чертежи, а то мысли с клиентами в 90% случаев не совпадают и возникают нестыковки
  11. Есть возможность изготовления нормальных латунных ручек, размеры будут те же, но крепеж будет уже нормальный, комплект из 4 ручек 1100р. Со временем латунь окисляется, поэтому нужно будет покрыть лаком или эмалью. Обращаться на почту
  12. Ручек не осталось, просьба удалить тему. На счет фото, телефон не дает загружать фотографии на сайты.
  13. Продаю ручки из нержавеющей стали для переменных резисторов, комплект 900р. Туда входят, 1 большой и 3 маленьких, они особой конструкции, регулируемые по вылету, правда требуется поработать напильником в дырке под сам вал. Фото по запросу скину на почту. Обращаться: только на почту webdes777@mail.ru Смотрятся ну очень круто, круче алюминия в 100раз. Доставка по России за ваш счет, почтой России 1 классом (что то около 125-145р)
×
×
  • Создать...