Регистрация | Вход

[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: demanik, ivan_fd  
Форум Picbasic.ru » Программирование МК » Proton PicBasic » 18F4550_RX_TX_RS232 (по-моему что-то со скоростью не так)
18F4550_RX_TX_RS232
DNM Дата: Ср, 22.06.2016, 11:16  |                                                                                                                Сообщение # 1
Группа: Проверенные
Ранг:  Понимаю
Сообщений: 75
Репутация: 0   ±
Замечания:   ±
На сайте с 29.09.2011

Статус: Offline

HSERIAL_BAUD = 9600 ' Set baud rate to 9600
HSERIAL_RCSTA = %10010000 ' Enable serial port and continuous receive
HSERIAL_TXSTA = %00100000 ' Enable transmit and asynchronous mode
HSERIAL_CLEAR = On ' Enable Error clearing on received characters

не передает и не принимает (ESP8266)/
причем на 18F452 и 18F1320 - все работает.

вот столкнулся с такой зигагулиной.

как правильно настроить usart на этом контроллере??


Более подробно здесь: http://asemlab.net/
Сообщение отредактировал DNM - Ср, 22.06.2016, 11:17
ЯНДЕКС Дата: 22.06.2016
anatol Дата: Ср, 22.06.2016, 13:12  |                                                                                                                Сообщение # 2
Группа: Проверенные
Ранг:  Помогаю всем
Сообщений: 472
Репутация: 32   ±
Замечания:   ±
На сайте с 10.02.2010

Статус: Offline

А документацию на контроллеры почитать и сравнить
Код
•  bit SPEN (RCSTA<7>) must be set (= 1),•  bit TRISC<6> must be cleared [b](= 0), and•  bit TRISC<7> must be set (=1).
= 18F452

Код
•  bit SPEN (RCSTA<7>) must be set (=1)•  bit TRISC<7> must be set (=1)•  bit TRISC<6> must be set [b](=1)
= 18F4550
Да и регистры немного разнятся. К примеру у 18F4550  есть BAUDCON: BAUD RATE CONTROL REGISTER
DNM Дата: Ср, 22.06.2016, 14:11  |                                                                                                                Сообщение # 3
Группа: Проверенные
Ранг:  Понимаю
Сообщений: 75
Репутация: 0   ±
Замечания:   ±
На сайте с 29.09.2011

Статус: Offline

Цитата anatol ()
bit SPEN (RCSTA<7>) must be set (=1)•  bit TRISC<7> must be set (=1)•  bit TRISC<6> must be set [b](=1)
= 18F4550
Да и регистры немного разнятся. К примеру у 18F4550  есть BAUDCON: BAUD RATE CONTROL REGISTER


Выставлял уже и BAUDCON.3=1
Не работает.


Более подробно здесь: http://asemlab.net/
ivan_fd Дата: Ср, 22.06.2016, 16:24  |                                                                                                                Сообщение # 4
Группа: Модераторы
Ранг:  Специалист
Сообщений: 893
Репутация: 124   ±
Замечания:   ±
На сайте с 12.01.2009

Статус: Offline

А конфигурацию контроллера Вы делаете. Биты конфигурации.?
DNM Дата: Чт, 23.06.2016, 10:23  |                                                                                                                Сообщение # 5
Группа: Проверенные
Ранг:  Понимаю
Сообщений: 75
Репутация: 0   ±
Замечания:   ±
На сайте с 29.09.2011

Статус: Offline

Цитата ivan_fd ()
А конфигурацию контроллера Вы делаете. Биты конфигурации.?
угу:
Declare Reminders = off
' select MCU and clock speed
Device = 18F4550
 Xtal = 48

Config_Start 
PLLDIV =  5 ; Divide by 5 (20 MHz oscillator input) 
CPUDIV = OSC1_PLL2 ; [OSC1/OSC2 Src: /1][96 MHz PLL Src: /2] 
USBDIV = 2 ; USB clock source comes from the 96 MHz PLL divided by 2 
FOSC = HSPLL_HS ; HS oscillator, PLL enabled, HS used by USB 
FCMEN = OFF ; Fail-Safe Clock Monitor disabled 
IESO = OFF ; Oscillator Switchover mode disabled 
PWRT = On ; PWRT enabled 
BOR = On'OFF ; Brown-out Reset disabled in hardware and software 
BORV = 3'2 ; 
VREGEN = On ; USB voltage regulator enabled 
WDT = OFF ; HW Disabled - SW Controlled 
WDTPS = 32768'2 ; 1:2 
MCLRE =  On ; MCLR pin enabled; RE3 input pin disabled 
LPT1OSC = OFF ; Timer1 configured for higher power operation 
PBADEN = OFF ; PORTB<4:0> pins are configured as digital I/O on Reset 
CCP2MX = On 'off ; CCP2 input/output is multiplexed with RB3 
STVREN = On ; Stack full/underflow will not cause Reset 
LVP = OFF ; Single-Supply ICSP disabled 
XINST = OFF ; Instruction set extension and Indexed Addressing mode disabled (Legacy mode) 
Debug = OFF ; Background debugger disabled, RB6 and RB7 configured as general purpose I/O pins 
Config_End 
'-----------------------------------------------------------
All_Digital = TRUE 

                        
Declare LCD_Type=0         ' Тип ЖКИ - буквенно-цифровой 
Declare LCD_DTPin PORTB.4         ' Порт данных ЖКИ 
Declare LCD_ENPin PORTB.3         ' Управление цепью E 
Declare LCD_RSPin PORTB.2         ' Управление цепью RS 
Declare LCD_Interface 4           ' 4-х битная разрядность шины данных  
Declare LCD_CommandUs 2000        ' Задержка перед посылкой команды 
Declare LCD_DataUs 50             ' Задержка перед посылкой данных 
Declare LCD_Lines 2               ' Количество строк ЖКИ 

' настроим аппаратный RX/TX модуль
Declare Hserial_Baud = 9600 ' Set baud rate to 9600
Declare Hserial_RCSTA = %10010000 ' Enable continuous receive
Declare Hserial_TXSTA = %00100000 ' Enable transmit and asynchronous mode
Declare Hserial_Clear = On ' Clear the buffer before receiving

TRISC.7 = 1
TRISC.6 = 1

'
Dim dummy[100] As Byte
Dim nn As Word
Dim ll As Byte
Dim STRING1 As String * 20  'AT - команда посылки данных  "AT+CIPSEND=0,N", N - количество посылаемых символов
Dim STRING2 As String * 20  'Длина посылаемой строки
Print At 1,1,"ESP => TRANSMIT"
DelayMS 30000
Cls
Print At 1,1,"Send"

' настроим модуль ESP8266
Main:
    HSerOut["AT", 13, 10]
    HSerIn [Wait ("OK"), dummy[0]]
    Print At 1,1,"AT"
    Print At 2,1,"OK"
 DelayMS 1000
,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,


Более подробно здесь: http://asemlab.net/
Bogdankul Дата: Пт, 03.06.2022, 17:37  |                                                                                                                Сообщение # 6
Группа: Заблокированные
Ранг:  Пытаюсь разобраться
Сообщений: 41
Репутация: -3   ±
Замечания:   ±
На сайте с 22.10.2019

Статус: Offline

Здравствуйте товарищи.

Предлагаем Вашему вниманию интересный сайт для заказа услуг стоматологии в Минске.К вашим услугам лучшие стоматологи Минска с многолетним стажем.стоматология минск,удаление зуба, отбеливание зубов,лечение зуба,удаление зуба мудрости,стоматология минск цены и стоматология платные услуги минск.
В случаях, когда терапевтическая стоматология бессильна, приходится прибегать к хирургической. А если зубосохраняющие операции не принесут результата, прибегают к удалению зуба.Необходимость вырвать зуб возникает при:полном или сильном разрушении кариесом;наличии кисты;острых формах периодонтита;количестве зубов выше нормы;неправильном расположении в десне — актуально для зубов мудрости, нередко растущих перпендикулярно основному зубному ряду;установке брекет-системы или зубного протеза;физическом травмировании, смещении в десне, невозможности восстановительной операции.Рекомендации после удаления.После операции в десне остается открытая лунка, на которую иногда накладываются швы. Нежелательно касаться лунки языком, дав сформироваться кровяному сгустку. По той же причине рекомендуется не принимать пищу на протяжении 3-4 часов после посещения стоматолога. Необходимо некоторое время воздерживаться от горячей еды и напитков, а также алкоголя. Несоблюдение рекомендации приведет к увеличению периода заживления и болезненным ощущениям.Качественно и безопасно вырвать зуб в Минске можно платно. Цена удаления зуба в стоматологии зависит от количества корней, расположения, сложности удаления. Операция проводится квалифицированными хирургами-стоматологами.
Увидимся!
протезирование зубов металлокерамика цены
сложное удаление ретинированного зуба
сколько стоят бюгельные зубные протезы
стоимость бюгельных зубных протезов
современное лечения пульпита
гнойный периодонтит зуба лечение
выпал кровяной сгусток после удаления зуба
центр имплантации зубов
сравнить коронки металлокерамика и циркониевые
базальная имплантация зубов цена в минске
стоматология съемные зубные протезы
отбеливание зубов яблоком
крови рана после удаления зуба
эстетическая имплантация зубов
съемные зубные протезы на имплантах
капы для реминерализации зубов купить
лечение пульпита 2 канала
удаление зуба мудрости губка
имплантация нижних зубов
пломбирование каналов зуба гуттаперчей
удаление обычного зуба
лечение пульпита
атипичное удаление зубов
лекарство для удаления зуба
удаление гнойного зуба
удаление дистопированных зубов
после удаления зуба остался осколок что делать
установка керамических виниров
после операции имплантации зубов
съемные зубные протезы виды и цены
гной зуб лунка удаление
металлокерамика на нижние зубы
имплантация зубов костная ткань
композитные виниры без обточки
профессиональное удаление зуба
лечение пульпита однокорневого зуба
лечение зубов в платной клинике
удаление зуба мудрости в десне
имплантация зубов какая анестезия
удаление нормального зуба мудрости
протезирование нижних зубов на имплантах
мис система имплантов
канал после удаления зуба
коронка на зуб металлокерамика
современные съемные зубные протезы
имплантация зубов в стоматологической поликлинике
установить циркониевую коронку
удаление большого зуба
съемные зубные протезы из пластмассы цена
профессиональная чистка зубов минск цены


магнитоэлектрические измерительные приборы
Bogdanvrw Дата: Пт, 25.11.2022, 02:27  |                                                                                                                Сообщение # 7
Группа: Заблокированные
Ранг:  Пытаюсь разобраться
Сообщений: 45
Репутация: -3   ±
Замечания:   ±
На сайте с 21.05.2020

Статус: Offline

Приветствую Вас дамы и господа.

Есть такой замечательный сайт для заказа услуг стоматологии в Минске.К вашим услугам лучшие стоматологи Минска с многолетним стажем.стоматология минск,удаление зуба, отбеливание зубов,лечение зуба,удаление зуба мудрости,стоматология минск цены и стоматология платные услуги минск.
Перед нами поставлена амбициозная задача: создать самую лучшую стоматологическую службу в Беларуси. И с каждым днем мы приближаемся к своей цели.Последние десять лет наблюдается большой спрос на оказание стоматологических услуг – только в одном Минске сегодня действует около двухсот зубных клиник и частных кабинетов. Наличие огромной конкуренции привело к тому, что Дентистри отвечает самым высоким стандартам качества.Мы уделяем большое внимание профессиональному развитию команды, для чего регулярно направляем сотрудников на обучение и мастер-классы как в Беларуси, так и за рубежом. Хирурги и ортопеды успешно прошли необходимое обучение и имеют допуски к осуществлению одномоментной имплантации и применению систем All-on-4 и All-on-6. Все доктора и медицинские сестры имеют первую квалификационную категорию.Выделим три наиболее важных:Специализация на решении сложнейших клинических случаев имплантации и протезирования.Принятая к исполнению политика качества и внедрение аналитических инструментов позволяет нам спрогнозировать возможные риски и принять наиболее оптимальный вариант. Многие наши Клиенты рассказывали, что по своему месту жительства им просто отказывали в лечении!Демократичная ценовая политика.Мы грамотно оптимизировали рабочий процесс и снизили затраты. У нас единый прейскурант вне зависимости от гражданства пациента;Гарантийная поддержка пациентов.На медицинские услуги предоставляются широкие гарантии. В случае наступления гарантийного случая все работы будут проведены бесплатно.За последние два года мы стали реальными лидерами в организации и проведении стоматологического лечения. Мы приняли пациентов из России, Казахстана, Украины, Литвы, Латвии, Эстонии, Польши, Германии, Швеции, Финляндии, Израиля, США, Канады, Австралии и еще десятка государств. Кроме того, к нам обращаются и со всех уголков Беларуси.По результатам проведенного в ноябре-декабре 2018 года опроса пациентов получили великолепную оценку работы: 96,4% респондентов поставили нам высшую оценку. Большое вам спасибо за доверие!самостоятельно оказывает сервисные услуги по организации лечения “под ключ”: дистанционные бесплатные консультации, трансферы, прохождение дополнительного медицинского обследования в Минске.формируем положительный имидж белорусской стоматологии и медицинской отрасли в целом. Мы открыты всему миру.Популярные стоматологические услуги в Беларуси.Самой популярной стоматологической услугой, несомненно, является имплантация зубов. Благодаря высокому качеству работ, гарантии положительного результата мы заслужили уважение и отличную репутацию среди Клиентов.Мы работаем с линейкой имплантов Megagen, Noris, а также системой премиум-уровня Straumann и Nobel. В нашем распоряжении собственные зуботехническая лаборатория и рентген-кабинет с компьютерным томографом последнего поколения.
От всей души Вам всех благ!
чувствительность зубов установка виниров
имплантация зубов цена украина
металлокерамическая коронка на имплант
удаление зуба мудрости восьмерка
профессиональная чистка зубов детям
удаление шестых зубов
чем полоскать после удаления зуба
сколько стоят протезы зубные съемные из пластмассы
стоимость пломбирования каналов зуба
протезирование металлокерамическими коронками
отечность лица после удаления зуба
чувствительность зубов после установки виниров
композитный винир на зуб
фото отбеливание зубов цены
полностью съемные зубные протезы цены
удаление зуба сверху
удаление ретинированного зуба мудрости минск
имплантация зубов клиника
показания к гигиене полости рта
циркониевая коронка на имплант цена
имплантация зубов всей челюсти
щеки после удаления зуба
частные стоматологии в минске
терапевтическая стоматология лечение кариеса
системы имплантации зубов
отбеливание потемневшего зуба
хирургическое удаление зуба
удаление дистопированных зубов
капа для отбеливания зубов стоматологическая
имплантат зуба под ключ
поставить съемные зубные протезы цены
капы для реминерализации зубов
лечение пульпита в минске
клиника лечение пульпита
циркониевая коронка откололась
минск стоматологии протезирование
керамическая коронка цена минск
импланты минск
мотивация гигиены полости рта
шатается зуб после имплантации
срочное удаление зуба минск
удаление зуба в кости
дентальная имплантация зубов
лопнул съемный зубной протез
местная анестезия зубы
после удаления зуба минск
мост из металлокерамических коронок
металлокерамика на передние 4 зуба
отбеливание зубов цвета
безметалловая керамика на зубы


сверло по дереву 30 купить
Форум Picbasic.ru » Программирование МК » Proton PicBasic » 18F4550_RX_TX_RS232 (по-моему что-то со скоростью не так)
  • Страница 1 из 1
  • 1
Поиск: