Ну это само собой)) Ситуацию, в которой спорость бы перескавивала между соседними значениями еще нужно постараться создать, умудриться еще резистром попасть так. Разве что многооборотным выйдет.
от нас скачёк на британию плохой, за пятном, а на 10-ке на 1 ватт во время прохода и американцы были
Вот как бы не на 7-ке было, но утверждать не буду.)
Относительно американцев, помнится только соорудили log yagi за первый час получислось 85 qso, в основном янки, некоторые оценивали 599+40db. Правда, 1КВ было на выходе.
И не стыдно тебе по таким пустякам гонять старого, бальнова человека? :)
Лучше б рассолу прислалъ....
так я сам не новый )))
я жеж тебе верил, как себе, что ты в своих текстах не можешь неправильно написать, нет подумать о возрасте - после 50 человеку свойственно переставлять местами...даже из реплик на этом сайте можно сразу сказать кому и за сколько )))
Насчет рассола, ты жеж знаешь, он у нас позиционируется как как лучший рассол всех времён и народов, так сказать ЭТАЛОН РАССОЛА на планете земля, а с тех пор как в USA на рассол бум, он здесь идёт на вес золота )))
PS я то думал, что таймера переменными пересеклись, фуф, отлегло...
ЗЗЫ выяснился дефект фикции - на самой малой скорости пропускает знаки (((
нашёл!!!
Две константы связаны 100 в таймере и 100 миллисекунд интервал точки, интервал точки всегда должен быть меньше интервала таймера, тогда пропускать не будет
выяснилось - будет, но значительно меньше...видимо из-за асинхронности таймеров...
а если зацепиться за loop этих артефактов нет совсем, на любых скоростях
Все твердят, точки бифуркации, точки бифуркации...на них видимо скетч и напарывается во временных отрезках...
как там у тебя с этим с библиотекой таймеров, как обходишь, как выставляются приоритеты???
ну дак у тебя тоже в бифуркациях не пропускает. Тогда я не понимаю.
если функция опроса датчика скорости стоит в loop тоже не пропускает )))
Особенно сказывается когда выставляешь минимальную скорость, может это подскажет что-то
как вариант - потеря истинного указателя на символ для передачи, он забегает вперёд???
и отслеживать пропуски в мониторе порта совсем не комильфо, телеграф то я принимаю в фоновом режиме, занимаясь попутно любыми другими делами, единственный недостаток - для домочадцев, это пиликанье )))
Вы про реализацию изменеия скорости передачи на потенциометре?
Нет
у меня большое подозрение, что два раза уменьшается указатель на элемент строки при прерывании таймером, чтение значения с потенциометра и установка значения скорости при вынесении процедуры в loop отрабатывает безукоризненно!!!
так как иногда пропускает и пробел тоже
Если буква строки взята в отработку, то выдаёт её код азбукой морзе правильно, не усекает
с другой стороны, фунция имеет рандомный глюк, вот прямо имитирует работу оператора, захочешь такую написать - замаешься )))
uint8_t newdottime = 100 - 5*(analogRead(mySpeedPin)>>6); // тут все твои чтения и вычисления
поигрался с опциями компилятора, вот так при получасовом тесте на минимальной скорости глюков не заметил
ЗЫ рано обрадовался, начал лыгать на больших скоростях
PPS изменил выкинув map 5 минут полёт нормальный пытаю на других скоростях, неужели в ней была вся проблема? (Нет, поигравшись со скоростями нашёл такое положение, что чётко во втором CQ всегда пропускает С и эта скорость равна 30 открыл-закрыл монитор порта и глюк исчез, чудеса)))
нууу, у мня идей больше неть. бери, значить, другой код маяка.
Не!!! "Русские не сдаются"!!!
Я тут явную связь выявил, стоит открыть-закрыть монитор порта и скетч начинает работать правильно...
Надо смотреть обработку сериала, он правда что делает, при открытии монитора порта - резетит но с открытым последовательным... потом закрываю и всё работает как надо...
уменьшил скорость порта до 9600, пытаю, пока работает как надо, теперь надо строку вводимую в мониторе порта сохранить в еепром и забирать оттуда, если было сохранение, попробую сам прикрутить
работает как часы, скорость не скачет и без гистерезиса )))
Дед чесслово не подглядывал, писал сам, а получилось как ты сказал )))
Тока не говори, что это подсознание сработало, после прочитанного...
Ну это само собой)) Ситуацию, в которой спорость бы перескавивала между соседними значениями еще нужно постараться создать, умудриться еще резистром попасть так. Разве что многооборотным выйдет.
По уму так не делаеца. :(
По уму так не делаеца. :(
что не так?
Заводим соощение
const int msg_ReadSensors = 0x105;
Заводим еще один таймер
THandle hSensorRead = INVALID_HANDLE;
в сетапе взводим его на 100 миллисекунд
hSensorRead = TimerList.Add(tmrSensorRead, 100);
Пишем функцию отклика на него
void tmrSensorRead(void){
SendMessage(msg_ReadSensor); // пхаем в очередь сообщение на чтение потанцометра
}
в лупе добавляем к switch
case msg_ReadSensor:{
uint8_t newdottime = ..... // тут все твои чтения и вычисления
if (newdottime != DOT_TIME){ // меняем ТОЛЬКО если значения РЕАЛЬНО ИЗМЕНИЛИСЬ
DOT_TIME = newdottime;
DASH_TIME = 3*DOT_TIME;
}
break;
}
идея понятна, всё остальное тоже через таймер?
идея понятна, всё остальное тоже через таймер?
Можно и НЕ через таймеры, НО через очередь. Крайне желательно.
Не знаю как насчёт маяков, но мне как то с Великобританией приходилось работать на QRPP (менее 1 вт).) При том что дома обычная верёвка была.)
в сетапе взводим его на 100 миллисекунд
hSensorRead = TimerList.Add(tmrSensorRead, 100);
не взлетело!
Взвод таймера ломает всю логику, не могу понять, код привести?
Не знаю как насчёт маяков, но мне как то с Великобританией приходилось работать на QRPP (менее 1 вт).) При том что дома обычная верёвка была.)
от нас скачёк на британию плохой, за пятном, а на 10-ке на 1 ватт во время прохода и американцы были
Я пока не рядом с компом. Пджди, вечером разберемся
Или пришли мне код внапочту
ок
отослал
от нас скачёк на британию плохой, за пятном, а на 10-ке на 1 ватт во время прохода и американцы были
Вот как бы не на 7-ке было, но утверждать не буду.)
Относительно американцев, помнится только соорудили log yagi за первый час получислось 85 qso, в основном янки, некоторые оценивали 599+40db. Правда, 1КВ было на выходе.
прикрепи, пож-та, сам файл ino вложением.
Позно. Я уже набит мидихлорианами. Ночью паматрю. :-)
У нас тут хаашо, +3, иконы битлов, ладан, гашыш. :-) Мяса жарица, стаканы звенят, сдвигаясь, мелодично, радуют слух и желудок. :-) да и коть счастлив.
Мышей жреть. Сосецких. :-)
+3 хаашо... Много ли человеку надо. У нас +23, а ветер холодный, понимаешь ли...)
Сегодня снег выпал, в понед. -8 в прогнозе. А вы говорите...
Аптамуш, не надо бездумно копировать, надо копировать вдумчива. В этой строке
hSensorRead = TimerList.Add(tmrSensorRead, 100); // таймер опроса потенциометра скорости опрашиваем раз в 0.1 секунды (на этой строке валится)
поменяй местами функцию и интервал местами, от так
hSensorRead = TimerList.Add(100, tmrSensorRead);
и сё.
И не стыдно тебе по таким пустякам гонять старого, бальнова человека? :)
Лучше б рассолу прислалъ....
И не стыдно тебе по таким пустякам гонять старого, бальнова человека? :)
Лучше б рассолу прислалъ....
так я сам не новый )))
я жеж тебе верил, как себе, что ты в своих текстах не можешь неправильно написать, нет подумать о возрасте - после 50 человеку свойственно переставлять местами...даже из реплик на этом сайте можно сразу сказать кому и за сколько )))
Насчет рассола, ты жеж знаешь, он у нас позиционируется как как лучший рассол всех времён и народов, так сказать ЭТАЛОН РАССОЛА на планете земля, а с тех пор как в USA на рассол бум, он здесь идёт на вес золота )))
PS я то думал, что таймера переменными пересеклись, фуф, отлегло...
ЗЗЫ выяснился дефект фикции - на самой малой скорости пропускает знаки (((
нашёл!!!
Две константы связаны 100 в таймере и 100 миллисекунд интервал точки, интервал точки всегда должен быть меньше интервала таймера, тогда пропускать не будет
выяснилось - будет, но значительно меньше...видимо из-за асинхронности таймеров...
а если зацепиться за loop этих артефактов нет совсем, на любых скоростях
Все твердят, точки бифуркации, точки бифуркации...на них видимо скетч и напарывается во временных отрезках...
как там у тебя с этим с библиотекой таймеров, как обходишь, как выставляются приоритеты???
Сегодня снег выпал, в понед. -8 в прогнозе. А вы говорите...
а у нас вчера в тени +30 было
всё таки точки буфуркации в таймерах видимо имеют место быть...
Вот так значительно лучше
1hSensorRead = TimerList.Add(113,tmrSensorRead);// таймер опроса потенциометра скорости опрашиваем раз в 0.113 секунды (на этой строке уже не валится)2uint8_t newdottime = 101 - map(analogRead(mySpeedPin), 0,1023,0,15)*5;// тут все чтения и вычисленияОй. Забыл про саафтара. Подтверждаю, понужал меня не спать изо всех сил.
Судя по аватару, это и есть автор.
Выставь пока таймер опроса потанцометра на 103 мс. все остальное завтра.
А вапще, третий таймер можно выкинуть, а SendMessage для аналогово чтения влепить в конец функции sendPause.
Выкинуть то можно, но желательно чтобы все таймера обрабатывались правильно, как реализовано в библиотеке если два или более тамера сработали?
С этим я разбираюсь.
С этим я разбираюсь.
вот это я тебя озадачил )))
Запусти у себя
01/*02Name: TimersTest.ino03Created: 30.04.2019 9:01:4204Author: DetSimen05*/06#include <TimerList.h>07#include <Messages.h>08#include <DEF_Message.h>09#include <Generics.h>1011externTTimerList TimerList;12TMessageList MessageList(12);1314THandle hTimer1, hTimer2, hTimer3, hTimer4;15161718voidtmr1(void) {19SendMessage(msg_TimerEnd, 1);20}2122voidtmr2(void) {23SendMessage(msg_TimerEnd, 2);24}2526voidtmr3(void) {27SendMessage(msg_TimerEnd, 3);28}2930voidtmr4(void) {31SendMessage(msg_TimerEnd, 4);32}333435voidsetup()36{37delay(1000);38Serial.begin(115200);39Serial<<"Program started\n";4041hTimer1 = TimerList.Add(1000, tmr1);42hTimer2 = TimerList.Add(2000, tmr2);43hTimer3 = TimerList.Add(1000, tmr3);44hTimer4 = TimerList.Add(2000, tmr4);454647}4849voidloop()50{51staticuint8_t sec = 0;5253if(not MessageList.Available())return;5455TMessage msg = MessageList.GetMessage();5657switch(msg.Message)58{59casemsg_TimerEnd: {60if(msg.LoParam == 1) {61sec++;62Serial<<"Timer 1 ends "<< sec << eoln;63break;64}65if(msg.LoParam == 2) {66Serial<<"Timer 2 ends "<< sec << eoln;;67break;68}69if(msg.LoParam == 3) {70Serial<<"Timer 3 ends "<< sec << eoln;;71break;72}73if(msg.LoParam == 4) {74Serial<<"Timer 4 ends "<< sec << eoln;75sec = 0;76Serial<< eoln << eoln;77}78break;79}80default:81Serial.print("Unknown message 0x");Serial.println(msg.Message, HEX);82break;83}848586}потом интервалы поменяй на вот так
1hTimer1 = TimerList.Add(1000, tmr1);2hTimer2 = TimerList.Add(2000, tmr2);3hTimer3 = TimerList.Add(4000, tmr3);4hTimer4 = TimerList.Add(8000, tmr4);и последи. Тама все интервалы пересекаюца, не будет ли пропусков где.
У мня нет.
Котъ озадачен и негодуэ.
Се, я пойду с трудящимися солидарничать. Ищите мня после 12-го.
Се, я пойду с трудящимися солидарничать. Ищите мня после 12-го.
ни чё се, а я до компа только добрался )))
test1
01Program started02Timer 1 ends 103Timer 3 ends 104Timer 1 ends 205Timer 2 ends 206Timer 3 ends 207Timer 4 ends 2080910Timer 1 ends 111Timer 3 ends 112Timer 1 ends 213Timer 2 ends 214Timer 3 ends 215Timer 4 ends 2161718Timer 1 ends 119Timer 3 ends 120Timer 1 ends 221Timer 2 ends 222Timer 3 ends 223Timer 4 ends 2242526Timer 1 ends 127Timer 3 ends 128Timer 1 ends 229Timer 2 ends 230Timer 3 ends 231Timer 4 ends 2323334Timer 1 ends 135Timer 3 ends 136Timer 1 ends 237Timer 2 ends 238Timer 3 ends 239Timer 4 ends 2404142Timer 1 ends 143Timer 3 ends 144Timer 1 ends 245Timer 2 ends 246Timer 3 ends 247Timer 4 ends 2484950Timer 1 ends 151Timer 3 ends 152Timer 1 ends 253Timer 2 ends 254Timer 3 ends 255Timer 4 ends 2565758Timer 1 ends 159Timer 3 ends 160Timer 1 ends 261Timer 2 ends 262Timer 3 ends 263Timer 4 ends 2test-2
001Program started002Timer 1 ends 1003Timer 1 ends 2004Timer 2 ends 2005Timer 1 ends 3006Timer 1 ends 4007Timer 2 ends 4008Timer 3 ends 4009Timer 1 ends 5010Timer 1 ends 6011Timer 2 ends 6012Timer 1 ends 7013Timer 1 ends 8014Timer 2 ends 8015Timer 3 ends 8016Timer 4 ends 8017018019Timer 1 ends 1020Timer 1 ends 2021Timer 2 ends 2022Timer 1 ends 3023Timer 1 ends 4024Timer 2 ends 4025Timer 3 ends 4026Timer 1 ends 5027Timer 1 ends 6028Timer 2 ends 6029Timer 1 ends 7030Timer 1 ends 8031Timer 2 ends 8032Timer 3 ends 8033Timer 4 ends 8034035036Timer 1 ends 1037Timer 1 ends 2038Timer 2 ends 2039Timer 1 ends 3040Timer 1 ends 4041Timer 2 ends 4042Timer 3 ends 4043Timer 1 ends 5044Timer 1 ends 6045Timer 2 ends 6046Timer 1 ends 7047Timer 1 ends 8048Timer 2 ends 8049Timer 3 ends 8050Timer 4 ends 8051052053Timer 1 ends 1054Timer 1 ends 2055Timer 2 ends 2056Timer 1 ends 3057Timer 1 ends 4058Timer 2 ends 4059Timer 3 ends 4060Timer 1 ends 5061Timer 1 ends 6062Timer 2 ends 6063Timer 1 ends 7064Timer 1 ends 8065Timer 2 ends 8066Timer 3 ends 8067Timer 4 ends 8068069070Timer 1 ends 1071Timer 1 ends 2072Timer 2 ends 2073Timer 1 ends 3074Timer 1 ends 4075Timer 2 ends 4076Timer 3 ends 4077Timer 1 ends 5078Timer 1 ends 6079Timer 2 ends 6080Timer 1 ends 7081Timer 1 ends 8082Timer 2 ends 8083Timer 3 ends 8084Timer 4 ends 8085086087Timer 1 ends 1088Timer 1 ends 2089Timer 2 ends 2090Timer 1 ends 3091Timer 1 ends 4092Timer 2 ends 4093Timer 3 ends 4094Timer 1 ends 5095Timer 1 ends 6096Timer 2 ends 6097Timer 1 ends 7098Timer 1 ends 8099Timer 2 ends 8100Timer 3 ends 8101Timer 4 ends 8102103104Timer 1 ends 1105Timer 1 ends 2106Timer 2 ends 2107Timer 1 ends 3108Timer 1 ends 4109Timer 2 ends 4110Timer 3 ends 4111Timer 1 ends 5112Timer 1 ends 6113Timer 2 ends 6114Timer 1 ends 7ну дак у тебя тоже в бифуркациях не пропускает. Тогда я не понимаю.
ну дак у тебя тоже в бифуркациях не пропускает. Тогда я не понимаю.
если функция опроса датчика скорости стоит в loop тоже не пропускает )))
Особенно сказывается когда выставляешь минимальную скорость, может это подскажет что-то
как вариант - потеря истинного указателя на символ для передачи, он забегает вперёд???
и отслеживать пропуски в мониторе порта совсем не комильфо, телеграф то я принимаю в фоновом режиме, занимаясь попутно любыми другими делами, единственный недостаток - для домочадцев, это пиликанье )))
Ну тогда сделай как я в #127 говорил про третий таймер
Ну тогда сделай как я в #127 говорил про третий таймер
съедает, иногда паузы между знаками иногда буквы
Ну не знаю тогда. Седня чота думается плохо
Ну не знаю тогда. Седня чота думается плохо
так оно и понятно, шашлычок в маринаде подходит небось
У нас -3, мы с котяном дома.
У нас -3, мы с котяном дома.
у нас +21, я пока дома, лежу на гвоздях
Короче, это надо у аксакалов спрашивать. Если оне снизойдут, канеш. Вапще не удивлюсь, если в моих таймерах и очередях всякая хня понаписана.
Вы про реализацию изменеия скорости передачи на потенциометре?
Вы про реализацию изменеия скорости передачи на потенциометре?
Нет
Вы про реализацию изменеия скорости передачи на потенциометре?
Нет
у меня большое подозрение, что два раза уменьшается указатель на элемент строки при прерывании таймером, чтение значения с потенциометра и установка значения скорости при вынесении процедуры в loop отрабатывает безукоризненно!!!
так как иногда пропускает и пробел тоже
Если буква строки взята в отработку, то выдаёт её код азбукой морзе правильно, не усекает
с другой стороны, фунция имеет рандомный глюк, вот прямо имитирует работу оператора, захочешь такую написать - замаешься )))
Вынеси в loop. Я сиравно пью до 12-го.
и попробуй не map() а
1uint8_t newdottime = 100 - 5*(analogRead(mySpeedPin)>>6);// тут все твои чтения и вычисленияВынеси в loop. Я сиравно пью до 12-го.
и попробуй не map() а
1uint8_t newdottime = 100 - 5*(analogRead(mySpeedPin)>>6);// тут все твои чтения и вычисленияпоигрался с опциями компилятора, вот так при получасовом тесте на минимальной скорости глюков не заметил
ЗЫ рано обрадовался, начал лыгать на больших скоростях
PPS изменил выкинув map 5 минут полёт нормальный пытаю на других скоростях, неужели в ней была вся проблема? (Нет, поигравшись со скоростями нашёл такое положение, что чётко во втором CQ всегда пропускает С и эта скорость равна 30 открыл-закрыл монитор порта и глюк исчез, чудеса)))
001/*002Name: Morze.ino003Created: 21.04.2019 4:16:26004Author: DetSimen005*/006#pragma GCC otimize ("-Os") //где х - 0, 1, 2, 3, fast, g, s - уровень оптимизации007//#include <EEPROM.h>008#include "Arduino.h"009#include "MorzeTable.h"010#include "TimerList.h"011#include "Messages.h"012013#define toneFreq (800) //частота звука (выбирайте между 600 - 1000Гц)014staticuint8_t TXPin = 13;// пин передаччика015inttonePin = A4;// выход звука на радиостанцию016intmySpeedPin = A0;// потенциометр скорости017intmySpeed;// переменная для потенуиометра018019externTTimerList TimerList;// списой таймеров (до 10) паумолчанью020021TMessageList MessageList(12);// очереть на 12 сапщений022023staticconstintmsg_ReadSerial = 0x100;// сообщение "Читать Сериал"024staticconstintmsg_SendChar = 0x101;// сообщение "Передать символ (букву)"025staticconstintmsg_SendNextBit = 0x102;// сообщение "Передать следующий бит в букве"026staticconstintmsg_ReadSensors = 0x105;// считать потенциометр скорости027028static/*const*/uint32_t DOT_TIME = 35;// основное время, длительность точки 75 мс, остальные производные029static/*const*/uint32_t DASH_TIME = 3 * DOT_TIME;// длительность тире030031staticconstuint16_t REPEAT_TIME = 5000;// Задержка в мс между повторениями текста, по умолчанию 5 сек.032staticconstuint16_t SERIAL_TIMEOUT = 2000;// если в течение 2000 мс не было данных с сериала, значит приняли всю строку033034staticconstuint8_t MAX_STRING_LENGTH = 128;// макс длина передаваемой строки035036enumclassenumTXState :bool{ Pause =false, Bit =true};037038enumTXState TXState = enumTXState::Pause;// что передаем в данный момент: или бит (точка/тире) или паузу039040THandle hTXTimer = INVALID_HANDLE;// таймер передаччика041THandle hSerialTimer = INVALID_HANDLE;// таймер таймаута приема из Serial042THandle hRepeatTimer = INVALID_HANDLE;// таймер повтора фразы043THandle hSensorRead = INVALID_HANDLE;// таймер для опроса потенциометра скорости передачи044045uint8_t TXCurrentMask = 0;// маска текущего символа046uint8_t TXCurrentCode = 0;// битовый код Морзе текущего символа047boolTXBusy =false;// идет передача бита или паузы048boolTXStopped =false;// передаччик остановлен нахрен. ничего не передаеца049050051String StringToTransmit;// строка, которую будем слать052uint16_t TransmitCharIndex = 0;// индекс текущего символа, в этой строке053054055voidTXOnOff(constboolOn) {// передаччик вкл/выкл056digitalWrite(TXPin, On);057if(On) {tone(tonePin, toneFreq);}else{ noTone(tonePin);}058}059060voidtmrTXTimer(void) {// здесь кончился таймер передачи бита/паузы061SendMessage(msg_TimerEnd, hTXTimer);062TimerList.Stop(hTXTimer);// остановим этот таймер063}064065voidtmrSerialTimer(void) {// строку приняли до конца066SendMessage(msg_TimerEnd, hSerialTimer);067TimerList.Stop(hSerialTimer);// таймер больше не нужен068}069070voidtmrRepeat(void) {// таймер повтора кончился, начинаем передавать сначала071TransmitCharIndex = 0;072TXStopped =false;073TimerList.Stop(hRepeatTimer);074}075076voidsendBit(constboolaBit) {// передать один бит (точку == false или тире == true)077078TXState = enumTXState::Bit;// признак: передаем бит079080TXOnOff(true);// ключ на старт!081082TXBusy =true;// передаччик теперя занят083084TimerList.setNewInterval(hTXTimer, aBit ? DASH_TIME : DOT_TIME);// длительность таймера разная для точки и тире085TimerList.Reset(hTXTimer);// перезапустим его сначала интервала086087}088089voidsendPause(constuint8_t kf = 1) {// передаем паузу длиной в 1 точку по умолчанию090TXState = enumTXState::Pause;091092TXBusy =true;// передаччик занят093094TimerList.setNewInterval(hTXTimer, kf*DOT_TIME);// либо длительность паузы кратна точке в kf раз095TimerList.Reset(hTXTimer);// перезапустим таймер сначала096}097098voidtmrSensorRead(void){099SendMessage(msg_ReadSensor);// пхаем в очередь сообщение на чтение потанцометра100}101102;voidsetup()103{104Serial.begin(115200);105delay(1000);// чтоб всё устаканилось к старту106pinMode(TXPin, OUTPUT);107TXOnOff(false);// ключ выключен108109// все таймеры создаюца по умолчанию остановленными110//111hTXTimer = TimerList.AddStopped(DOT_TIME, tmrTXTimer);// таймер передаччика бит112hSerialTimer = TimerList.AddStopped(SERIAL_TIMEOUT, tmrSerialTimer);// таймер таймаута чтения из Serial113hRepeatTimer = TimerList.AddStopped(REPEAT_TIME, tmrRepeat);// таймер повтора передачи строки114hSensorRead = TimerList.Add(100,tmrSensorRead);// таймер опроса потенциометра скорости опрашиваем раз в 0.1 секунды (на этой строке валится)115116StringToTransmit.reserve(MAX_STRING_LENGTH);// хапнем сразу место под строку, чтоб не перераспределять потом117StringToTransmit ="CQ DX UA6EM CQ DX UA6EM QSA? 73! 73! 73! K";// строка для передачи по умолчанию118TransmitCharIndex = 0;119}120121voidloop()122{123if(Serial.available()) {// если в сериал чота припрыгало124SendMessage(msg_ReadSerial);// пошлем команду прочесть сериал125TXStopped =true;// передачу остановим126TransmitCharIndex = 0;// и все индексы и маски обнулим,127TXCurrentCode = 0;// так как после приема будем передавать уже новую строку128TXCurrentMask = 0;129}130// тут читаем потенциометр скорости131// mySpeed = map(analogRead(mySpeedPin), 0,1023,0,15);132// DOT_TIME = 100-mySpeed*5;133// DASH_TIME = 3 * DOT_TIME;134135if((not TXBusy) and (not TXStopped)) {// если передаччик не остановлен и не занят передачей бита136137if(TXCurrentMask > 0)// если маска еще до конца не сдвинулась138{139SendMessage(msg_SendNextBit);// передать следующий бит знака140}141else142{143SendMessage(msg_SendChar);// знак кончился, начать передавать след. символ144}145}146147148if( not MessageList.Available())return;// если сапщений в очереди нет, выходим149150TMessage msg = MessageList.GetMessage();151152switch(msg.Message)153{154155156casemsg_TimerEnd: {157if(msg.LoParam == hSerialTimer) {// кончился таймер приёма по сериал158TXStopped =false;// можно стартовать передаччик, есличо159break;160}161if(msg.LoParam == hTXTimer) {// кончился таймер передачи бита/паузы162TXBusy =false;// можно передавать следующий163164if(TXState == enumTXState::Bit) {// если передавали бит, передадим 1 паузу165TXOnOff(false);// выключим ключ166TXCurrentMask >>= 1;167if(TXCurrentMask>0) sendPause();elsesendPause(3);// а если знак кончился, то 3 паузы168}169170break;171}172173break;174}175176casemsg_SendNextBit: {// передаем след. бит (точка/тире)177sendBit(TXCurrentCode & TXCurrentMask);178break;179}180181casemsg_ReadSerial: {// чтение из сериала182if(!TimerList.isActive(hSerialTimer)) {// если таймер таймаута остановлен183StringToTransmit ="";// значить читаем новую строку184TransmitCharIndex = 0;185}186StringToTransmit +=char(Serial.read());// берем символ из сериал и вклеиваем в строку187TimerList.Reset(hSerialTimer);// перезапускаем таймер таймаута (помнишь? 2 секунды после ПОСЛЕДНЕГО символа)188break;189}190191casemsg_SendChar: {// послать знак192if(TransmitCharIndex < StringToTransmit.length()) {// если строка еще не кончиилась193charc = StringToTransmit[TransmitCharIndex++];// взять символ194if(c !=' ') {// если не пробел, то195TXCurrentCode = getMorzeCode(c);// по нему взять код Морзя см. MorzeTable.cpp196TXCurrentMask = getSymbolMask(getMorzeCode(c));// и маску см. MorzeTable.cpp197}198elsesendPause(7);// пробел между словами - передаем паузу в 7 точек199}200else{// если строка кончилась201TXStopped =true;// остановим передачу202TransmitCharIndex = 0;// вернем указатель на 0 символ строки203TimerList.Reset(hRepeatTimer);// и запустим таймер для REPEAT204}205break;206}207// тут читаем потенциометр скорости208209casemsg_ReadSensor:{210uint8_t newdottime = 100 - map(analogRead(mySpeedPin), 0,1023,0,15)*5;// тут все твои чтения и вычисления211Serial.print("Скорость = ");212Serial.println( newdottime);213if(newdottime != DOT_TIME){// меняем ТОЛЬКО если значения РЕАЛЬНО ИЗМЕНИЛИСЬ214DOT_TIME = newdottime;215DASH_TIME = 3*DOT_TIME;216}217break;218}219Serial.print("Unknown message code: 0x");Serial.println(msg.Message, HEX);220break;221}222223}нууу, у мня идей больше неть. бери, значить, другой код маяка.
вот эту строчку проверь внимательно, нет ли ашыбок
006#pragma GCC otimize ("-Os") //где х - 0, 1, 2, 3, fast, g, s - уровень оптимизацииты и default потерял в 219 строчке.
конец перепишы вот так
01casemsg_ReadSensor: {02uint8_t newdottime = 100 - 5*(analogRead(mySpeedPin)>>6);// тут все твои чтения и вычисления03if(newdottime != DOT_TIME) {// меняем ТОЛЬКО если значения РЕАЛЬНО ИЗМЕНИЛИСЬ04DOT_TIME = newdottime;05DASH_TIME = 3 * DOT_TIME;06Serial.print("Скорость = ");07Serial.println(newdottime);08}09break;10}11default:12Serial.print("Unknown message code: 0x");Serial.println(msg.Message, HEX);13break;14}нууу, у мня идей больше неть. бери, значить, другой код маяка.
Не!!! "Русские не сдаются"!!!
Я тут явную связь выявил, стоит открыть-закрыть монитор порта и скетч начинает работать правильно...
Надо смотреть обработку сериала, он правда что делает, при открытии монитора порта - резетит но с открытым последовательным... потом закрываю и всё работает как надо...
уменьшил скорость порта до 9600, пытаю, пока работает как надо, теперь надо строку вводимую в мониторе порта сохранить в еепром и забирать оттуда, если было сохранение, попробую сам прикрутить