Эхо-репитер, г.Пушкино, 434.625 МГц

Автор	Сообщение
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 27 Мар 2015 23:11:03 # Добрый день. Поставил "эхо-репитер" в городе Пушкино (17км от МКАД по Ярославскому шоссе) на частоте 434,625 МГц (63 канал LPD). Когда "эхо-репитер" бездействует, то каждые 15 минут передается радио посылка в формате Азбуки Морзе. Просьба сообщить, кто и где слышит "эхо-репитер". Спасибо.
RU245 Участник с мар 2006 Орехово-Зуево Сообщений: 2967	Дата: 27 Мар 2015 23:12:57 # rk50 Высота, антенна, мощность?
Реклама Google
cosmocarrot Участник с окт 2010 Москва Сообщений: 1	Дата: 28 Мар 2015 11:45:16 # Не слышу. 20 км на восток от Пушкино.
Chip_SET Участник с сен 2006 Пушкино М.О. Сообщений: 49	Дата: 29 Мар 2015 19:29:31 # 500 метров, не пашет )))
9922 Участник с апр 2009 Москва Сообщений: 38	Дата: 30 Мар 2015 12:22:42 # 1км не пашет , хотя на подъезде к Пушкино были слышны потуги работы которые очень напоминали последний выдох ПеЖе или деградировавшую память контроллера.
RU245 Участник с мар 2006 Орехово-Зуево Сообщений: 2967	Дата: 30 Мар 2015 13:04:52 · Поправил: RU245 (30 Мар 2015 13:10:56) # Высота, антенна, мощность? - центр города, первый этаж, лпдшка в металлическом шкафчике над унитазом.
РадиоАматор Участник с мар 2014 Москва Сообщений: 9	Дата: 30 Мар 2015 15:57:34 # С ЖД платформы Пушкино на 5 Вт не открывается. На частоте какие-то строители работают в цифре.
ako Участник с апр 2005 Москва-Центр Сообщений: 106	Дата: 30 Мар 2015 18:56:57 # Попробовал сию. Не слышу попугая. Пробовал из Текстильщиков. Мощность 5 ватт, антенны ANLI WH-14 на 9м этаже, направлены правда на юг.
RU245 Участник с мар 2006 Орехово-Зуево Сообщений: 2967	Дата: 30 Мар 2015 22:14:30 · Поправил: RU245 (30 Мар 2015 22:16:39) # С района м.Волгоградский Проспект тоже не слышно. Автор темы, Рома - печёт пироги, ему не до репки :)
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 04 Май 2015 13:02:50 · Поправил: rk50 (04 Май 2015 14:14:02) # Репитер отключил в 16-00 29 марта, сейчас снова включил. Каждые 15 минут при бездействии передает азбукой Морзе мои координаты, можно дешифровать любой программой по работе с цифровыми видами связи. Высота подвеса антенны -18 метров Выходная мощность 2.5 Вт Антенна -5/8 . Кто и где слышит?
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 07 Май 2015 16:03:36 # 1км не пашет , хотя на подъезде к Пушкино были слышны потуги работы которые очень напоминали последний выдох ПеЖе или деградировавшую память контроллера. Контроллер не может издыхать, он работает или не работает. Репитер собран на двух контроллерах. Если имеете опыт в написании программного обеспечения можете доработать: Исходник программы для управления модулем звукозаписи, выполненным на другом микроконтроллере: ;######################################################## ;# 25 ÿíâàðÿ 2015 ãîäà ;# ÓÏÐÀÂËÅÍÈÅ ÝÕÎÐÅÏÈÒÅÐÎÌ ;# PB4-óïðàâëåíèå ïåðåäà÷åé TX ;# PB0 - òîíîâûé âûõîä TONE ;# PB2 -èíäèêàòîð ñîñòîÿíèÿ LED ;# PB3 - âõîä äåòåêòîðà IN ;# ÀËÃÎÐÈÒÌ ÐÀÁÎÒÛ: ;# 1.1ÒÎÍ 3 ÑÅÊ.-> ÏÀÓÇÀ 3 ÑÅÊ -> ÈÍÔÎÐÌÀÖÈß 1 -> ÒÀÉÀÓÒ 15 ÌÈÍÓÒ ;# 1.2 -> ÒÎÍ 3 ÑÅÊ. -> ÏÀÓÇÀ 3 ÑÅÊ ÒÀÉÌÀÓÒ 15 ÌÈÍÓÒ ;# 1.3 ->ÒÎÍ 3 ÑÅÊ. -> -> ÏÀÓÇÀ 3 ÑÅÊ -> ÒÀÉÀÓÒ 15 ÌÈÍÓÒ ;# 1.4 ->ÒÎÍ 3ÑÅÊ -> ÏÀÓÇÀ 3 ÑÅÊ -> ÈÍÔÎÐÌÀÖÈß 2 ... ; Äîáàâëåíû 3-ðå òîíîâûå ïîñûëêè â ôîðìàòå Àçáóêè Ìîðçå â ïåðèîä 15, 30, 45 è 60 ìèí - 24 ôåâðàëÿ 2015 ãîä. ; äîáàâëåíà ôóíêöèÿ âîñïðîèçâåäåíèÿ ðàíåå çàïèñàííîé ôðïàçû ïîñëå ïåðâîãî òàì-àóòà â ìèíóò. ; Îêàí÷àòåëüíî äîðàáîòàíà ñ óñòðàíåíèåì âñåõ îøèáîê. ;######################################################## .include "tn13def.inc" .list .def tmp = r16; .def tmpa = r17; .def tmp_1 = r18; ñîòîÿíèå ïîðòà PORTB .def short = r19; ðåãèñòð äëÿ ôîðìèðîâàíèÿ äëèííîé çàäåðæêè .def long = r20; ðåãèñòð äëÿ îñ÷åòà âðåìåíè ñòîðîæåâûì òàéìåðîì .def tmp_2 = r21; âðåìÿ çàïèñ îãðàíè÷åííîå 10ñåê .def tmp_3 = r22; .def counter = r23; .def vtmp_2 = r24; âðåìÿ çàïèñè, èñïîëüçóåòñÿ äëÿ ïîâîòîðíîãî âîñïðîèçâåäåíèÿ ðàíåå çàïèñàííîé ðàäèîïîñûëêè .equ tx = 4 ; PB0 TX .equ led = 2 ; PB1 LED .equ tone = 0 ; PB2 TONE .equ det = 3 ; PB3 IN - âõîä äåòåêòîðà .equ play_rec = 1; PB1 óïðàâëåíèå çàïèñüþ è ÷òåíèåì .equ t_1 = 255 .equ t_2 = 3 ; çàäåðæêà d1000 1 mS .equ t_3 = 12; çàäåðæêà d3000 3S .equ t_30min = 16; 31 çàäåðæêà äëèííàÿ 30 ìèíóò .equ t_4 = 1 ; çàäåðæêà 1 ìÑ äëÿ ôîðìèðîâàíèÿ òîíà ãåíåðàòîðà .equ t_10s = 42 ; çàäåðæêà 10.25 Ñåê T=(42-1)0.25=10.25S .equ wait_point = 63; çàäåðæêà äëÿ ôîðìèðîâàíèÿ òî÷êè + .equ wait_point_tone = 32 ; çàäåðæêà äëÿ ôîðìèðîâàíèÿ òîíîâîé òî÷êè .equ counter_info = 4 ; ñ÷åò÷èê èíôîðìàöèè .cseg .org 0 ldi tmp, low(RAMEND) out SPL, tmp ;######################################################## ;# ÈÍÈÖÈÀËÈÇÀÖÈß ÒÀÉÌÅÐÀ ;######################################################## ldi tmp, 0x05; êîýôôèöèåíò äåëåíèÿ òàéìåðà-ñ÷åò÷èêà TCCR0 1024 out TCCR0B, tmp; çàãðóçèòü â ðåãèñòð óïðàâëåíèÿ ;######################################################## ;# ÈÍÈÖÈÀËÈÇÀÖÈß ÌÈÊÐÎÊÎÍÒÐÎËËÅÐÂÀ ;######################################################## ldi tmp, 0b0010111; PINB3- in, PINB0, PINB1, PINB2 -out out DDRB, tmp ldi tmp, 0xFF ; out PORTB out PORTB, tmp ldi counter, counter_info rcall d3000 rcall d3000 ;######################################################## ;# ÎÑÍÎÂÍÀß ÏÐÎÃÐÀÌÌÀ ;######################################################## start: ;##################################################################### ;# ÈÍÈÖÈÀËÈÇÀÖÈß ;##################################################################### ;### Íåñóùàÿ 3 ÑÅÊ -> PAUSE 3S-> TONE 3S-> PAUSE 3S->INFO> PAUSE 3S-> TONE 3S-> ÎÒÊËÞ×ÅÍÈÅ rjmp start_info; Òíîâàÿ ïîñûëêà â ôîðìàòå Àçáóêè Ìîðçå RK50.RU Petrov Roman 79031423721 end_end_info: ldi counter, counter_info end_info: ;###################################################################### ;# Âåòâëåíèå, îò÷åò òàé-àóòà ïðè íåèñïîëüçîâàíèè ðåïèòåðà ;###################################################################### start_0: ldi long, t_30min; çàäàíèå âðåìåíè òàéìàóòà â 15 ìèíóò T=60(16-1) = 900 S time_out_1: clr short dec long cpi long, 0 breq start_counter_info; ïåðåéòè íà ìåòêó ïðè ðàâåíòñå time_long =0 det3:; Îäèí öèêë =0.235Ñ Ïîëíàÿ çàäåðæêà ðàâíà 60 ñåêóíä in tmp_1, PINB sbrs tmp_1, det; ïðîïóñòèòü ñëåäóþùóþ êîìàíäó, åñëè det=1 -íåò ñèãíàëà íà âõîäå òåòåêòîðà rjmp write ;####################################################################### ; ÔÎÐÌÈÐÎÂÀÍÈÅ ÒÀÉÌ-ÀÓÒÀ â T=0.25255 = 15 ÌÈÍÓÒ, ÏÎ ÈÑÒÅ×ÅÍÈÈ ÊÎÒÎÐÎÃÎ ;Â ÝÔÈÐ ÂÛÄÀÅÒÑß ÐÀÄÈÎÏÎÑÛËÊÀ ;####################################################################### inc short cpi short, t_1; ñðàâíèòü ñ t_1 (255) breq time_out_1; ïðè ðàâåíòñâå ïåðåéòè íà ìåòêó Çàäåðæêà 0.25255 = 63,75Ñ rcall d250ms rjmp det3 start_counter_info: rjmp start_counter_info_0 ;######################################################################### ; ÏÐÎÖÅÑÑ ÇÀÏÈÑÈ È ÂÎÑÏÐÎÈÇÂÅÄÅÍÈß ÑÈÃÍÀËÀ Ñ ÎÃÐÀÍÈ×ÅÍÈÅÌ ÇÀÏÈÑÈ Â 10.5 ÑÅÊÓÍÄ ; ;######################################################################### write: clr tmp_2 sbi PORTB, PLAY_REC; REC - íà÷àòü çàïèñü write_1: rcall d250ms inc tmp_2 cpi tmp_2, t_10s breq stop_write; ïðè ðàâåíñòâå tmp=255 ïåðåéòè íà ìåòêó stop_write (T=0,218 *48 =10,5S ) in tmp_1, PINB sbrs tmp_1, det ; ïðîïóñòèòü åñëè det = 1 - ñèãíàë íà âõîäå ïðîïàë rjmp write_1 ; ïîâòîðèòü öèêë stop_write: ; êîíåö çàïèñè ; Æäàòü ïîêà íå çàêîí÷èòñÿ ñèãíàë det_1: in tmp_1, PINB sbrs tmp_1, det; ïðîïóñòèòü åñëè play_rec = 1 - ñèãíàë íà âõîäå ïðîïàë rjmp det_1 cbi PORTB, LED; ãîðèò ñâåòîäèîä cbi PORTB, TX; ïåðåäà÷à rcall d250ms; Ïâóçà äëÿ òîãî, ÷òîáû óñïåë îòêðûòñÿ øóìîïîäàâèòåëü îò CTCSS-ñèãíàëà rcall d250ms cbi PORTB, PLAY_REC; PLAY-íà÷àòü âîñïðîèçâåäåíèå ðàíåå çàïèñàííîãî ôàéëà ;####################################################################### ;# PLAY ;;####################################################################### play: rcall d250ms dec tmp_2 cpi tmp_2, 0 breq stop_play_end; ïðè ðà
XOR Участник с янв 2007 ... Сообщений: 214	Дата: 07 Май 2015 18:01:37 # это шо за портянка с кракозябрами? где схема? или хотя бы описание, скорее всего там что то типа ISD146
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 07 Май 2015 19:28:36 # это шо за портянка с кракозябрами? где схема? или хотя бы описание, скорее всего там что то типа ISD146 Это называет Ассемблер для микроконтроллеров АВР.
XOR Участник с янв 2007 ... Сообщений: 214	Дата: 07 Май 2015 20:12:48 # спасибо, кэп! шо это асм и камень attiny13 я и сам вижу, я спрашиваю почему все каменты кракозябрами и почему не вкопилке?
50ET01 Участник с ноя 2013 Мск. обл, Казань, деревня рядом Сообщений: 2550	Дата: 07 Май 2015 20:24:58 # Кодировка не та.
XOR Участник с янв 2007 ... Сообщений: 214	Дата: 07 Май 2015 20:50:42 # те это типа уже нормально выкладывать куски исходников с нечитаемыми каментами и без описания?
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 07 Май 2015 22:07:30 # ;######################################################## ;# 25 января 2015 года ;# УПРАВЛЕНИЕ ЭХОРЕПИТЕРОМ ;# PB4-управление передачей TX ;# PB0 - тоновый выход TONE ;# PB2 -индикатор состояния LED ;# PB3 - вход детектора IN ;# АЛГОРИТМ РАБОТЫ: ;# 1.1ТОН 3 СЕК.-> ПАУЗА 3 СЕК -> ИНФОРМАЦИЯ 1 -> ТАЙАУТ 15 МИНУТ ;# 1.2 -> ТОН 3 СЕК. -> ПАУЗА 3 СЕК ТАЙМАУТ 15 МИНУТ ;# 1.3 ->ТОН 3 СЕК. -> -> ПАУЗА 3 СЕК -> ТАЙАУТ 15 МИНУТ ;# 1.4 ->ТОН 3СЕК -> ПАУЗА 3 СЕК -> ИНФОРМАЦИЯ 2 ... ; Добавлены 3-ре тоновые посылки в формате Азбуки Морзе в период 15, 30, 45 и 60 мин - 24 февраля 2015 год. ; добавлена функция воспроизведения ранее записанной фразы после первого там-аута в минут. ; Окончательна доработана с устранением всех ошибок. ;######################################################## .include "tn13def.inc" .list .def tmp = r16; .def tmpa = r17; .def tmp_1 = r18; сотояние порта PORTB .def short = r19; регистр для формирования длинной задержки .def long = r20; регистр для осчета времени сторожевым таймером .def tmp_2 = r21; время запис ограниченное 10сек .def tmp_3 = r22; .def counter = r23; .def vtmp_2 = r24; время записи, используется для повоторного воспроизведения ранее записанной радиопосылки .equ tx = 4 ; PB0 TX .equ led = 2 ; PB1 LED .equ tone = 0 ; PB2 TONE .equ det = 3 ; PB3 IN - вход детектора .equ play_rec = 1; PB1 управление записью и чтением .equ t_1 = 255 .equ t_2 = 3 ; задержка d1000 1 mS .equ t_3 = 12; задержка d3000 3S .equ t_30min = 16; 31 задержка длинная 30 минут .equ t_4 = 1 ; задержка 1 мС для формирования тона генератора .equ t_10s = 42 ; задержка 10.25 Сек T=(42-1)0.25=10.25S .equ wait_point = 63; задержка для формирования точки + .equ wait_point_tone = 32 ; задержка для формирования тоновой точки .equ counter_info = 4 ; счетчик информации .cseg .org 0 ldi tmp, low(RAMEND) out SPL, tmp ;######################################################## ;# ИНИЦИАЛИЗАЦИЯ ТАЙМЕРА ;######################################################## ldi tmp, 0x05; коэффициент деления таймера-счетчика TCCR0 1024 out TCCR0B, tmp; загрузить в регистр управления ;######################################################## ;# ИНИЦИАЛИЗАЦИЯ МИКРОКОНТРОЛЛЕРВА ;######################################################## ldi tmp, 0b0010111; PINB3- in, PINB0, PINB1, PINB2 -out out DDRB, tmp ldi tmp, 0xFF ; out PORTB out PORTB, tmp ldi counter, counter_info rcall d3000 rcall d3000 ;######################################################## ;# ОСНОВНАЯ ПРОГРАММА ;######################################################## start: ;##################################################################### ;# ИНИЦИАЛИЗАЦИЯ ;##################################################################### ;### Несущая 3 СЕК -> PAUSE 3S-> TONE 3S-> PAUSE 3S->INFO> PAUSE 3S-> TONE 3S-> ОТКЛЮЧЕНИЕ rjmp start_info; Тновая посылка в формате Азбуки Морзе end_end_info: ldi counter, counter_info end_info: ;###################################################################### ;# Ветвление, отчет тай-аута при неиспользовании репитера ;###################################################################### start_0: ldi long, t_30min; задание времени таймаута в 15 минут T=60(16-1) = 900 S time_out_1: clr short dec long cpi long, 0 breq start_counter_info; перейти на метку при равентсе time_long =0 det3:; Один цикл =0.235С Полная задержка равна 60 секунд in tmp_1, PINB sbrs tmp_1, det; пропустить следующую команду, если det=1 -нет сигнала на входе детектора rjmp write ;####################################################################### ; ФОРМИРОВАНИЕ ТАЙМ-АУТА в T=0.25255 = 15 МИНУТ, ПО ИСТЕЧЕНИИ КОТОРОГО ;В ЭФИР ВЫДАЕТСЯ РАДИОПОСЫЛКА ;####################################################################### inc short cpi short, t_1; сравнить с t_1 (255) breq time_out_1; при равенстве перейти на метку Задержка 0.25255 = 63,75С rcall d250ms rjmp det3 start_counter_info: rjmp start_counter_info_0 ;######################################################################### ; ПРОЦЕСС ЗАПИСИ И ВОСПРОИЗВЕДЕНИЯ СИГНАЛА С ОГРАНИЧЕНИЕМ ЗАПИСИ В 10.5 СЕКУНД ; ;######################################################################### write: clr tmp_2 sbi PORTB, PLAY_REC; REC - начать запись write_1: rcall d250ms inc tmp_2 cpi tmp_2, t_10s breq stop_write; при равенстве tmp=255 перейти на метку stop_write (T=0,218 48 =10,5S ) in tmp_1, PINB sbrs tmp_1, det ; пропустить если det = 1 - сигнал на входе пропал rjmp write_1 ; повторить цикл stop_write: ; конец записи ; Ждать пока не закончится сигнал det_1: in tmp_1, PINB sbrs tmp_1, det; пропустить если play_rec = 1 - сигнал на входе пропал rjmp det_1 cbi PORTB, LED; горит светодиод cbi PORTB, TX; передача rcall d250ms; Пвуза для того, чтобы успел открытся шумоподавитель от CTCSS-сигнала rcall d250ms cbi PORTB, PLAY_REC; PLAY-начать воспроизведение ранее записанного файла ;####################################################################### ;# PLAY ;;####################################################################### play: rcall d250ms dec tmp_2 cpi tmp_2, 0 breq stop_play_end; при равенстве нулю tmp перейти на метку rjmp play stop_play_end: ; Пауза перед тоновой посылкой, т.е. концом передачи ldi tmp, 0x06 pause_tone: dec tmp cpi tmp,0 breq exit_pause rcall d250ms rjmp pause_tone exit_pause: rcall tone_3s ; тоновая посылка sbi PORTB, LED; не горит светодиод sbi PORTB, TX; передача закончена rjmp start_0 ;###################################################### ;# Пауза 3 секунды = 3000 мС ;# T=1MHz/1024=976,5 Hz 1,24 mS 1,024256=261 mS ;# T=218 mS T=0.925 mS -1 цикл ;# Реальная T=1,45S ;###################################################### d3000: push tmp ldi tmpa, t_3 d3000_1: clr tmp out TCNT0, tmp dec tmpa cpi tmpa,0 breq output wait_1:; 232 mS in tmp, TCNT0 cpi tmp, t_1 brlo wait_1 rjmp d3000_1 output: pop tmp ret ;################################################################ ;# ЗАДЕРЖКА ДЛЯ ФОРМИРОВАНИЯ ТОНА T=2,34 mS F=500 Hz ;# ИСПОЛЬЗОВАНИЕ ТАЙМЕРА TCNT0 ;# F=977Hz T=1,024 ms ;# Реальная задержка T=937 mkS ;################################################################ d1000: ; ФОРМИРОВАНИЕ ЗАДЕРЖКИ в 1 МС F=1/(2T)=500 Hz для ГЕНЕРАТОРА push tmp clr tmp out TCNT0, tmp wait_2: in tmp, TCNT0 cpi tmp, t_4 brlo wait_2 pop tmp ret ;################################################################ ;# ЗАДЕРЖКА 250 мС ;################################################################ d250ms: ; ФОРМИРОВАНИЕ ЗАДЕРЖКИ в 1 МС F=1/(2T)=500 Hz для ГЕНЕРАТОРА push tmp clr tmp out TCNT0, tmp wait_3: ; Итоговая задержка в 1 мС in tmp, TCNT0 cpi tmp, t_1; сравнить с числом t_1=255 brlo wait_3 pop tmp ret ;############################################################ ;# ФОРМИРОВАНИЕ ТОНА 0,944 mS при t_2=7 ;############################################################ tone_3s: ; t=1,85*60=111 ms ldi tmpa, t_2; 3 stop_1: dec tmpa cpi tmpa,0 breq tone_stop ldi tmp_1, 0b111100 ; tmp_1=60 (Было t_1=255) tone_start: ; Цикл выполняется 1,85 ms sbi PORTB, TONE rcall d1000; задержка в 1 мС cbi PORTB, TONE rcall d1000; задержка в 1 мС ;############################################################ ;######## ОСЧЕТ 3 СЕКУНД ТОНОВОЙ ПОСЫЛКИ dec tmp_1 cpi tmp_1, 0 breq stop_1; при равенстве перейтина метку stop_1 rjmp tone_start tone_stop: ret ;############################################################ ;# ИНФОРМАЦИОННОЫЕ ПОСЫЛКИ В ПЕРИОД 15, 30, 45 и 60 минут ;############################################################ start_counter_info_0: dec counter cpi counter, 3 breq info_1 cpi counter, 2 breq info_2 cpi counter, 1 breq info_3 cpi counter, 0 breq info_4 ######################################################### info_1: cbi PORTB, LED; cbi PORTB, TX ; rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d3000; ПАУЗА 3 СЕК rcall word_2 rcall word_3 rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d3000; ПАУЗА 3 СЕК sbi PORTB, LED; sbi PORTB, TX ; rjmp end_info info_2: cbi PORTB, LED; cbi PORTB, TX ; rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d250ms rcall tone_3s ; тоновая посылка 2 rcall d3000; ПАУЗА 3 СЕК rcall word_4 ; hello i rcall word_1 ; rk50.ru rcall word_2 ;79031423721 rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d250ms rcall tone_3s ; тоновая посылка 2 rcall d3000; ПАУЗА 3 СЕК sbi PORTB, LED; sbi PORTB, TX ; rjmp end_info info_3: ; cbi PORTB, LED; cbi PORTB, TX ; rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d250ms rcall tone_3s ; тоновая посылка 2 rcall d250ms rcall tone_3s ; тоновая посылка 3 rcall d3000; ПАУЗА 3 СЕК rcall word_4; hello i rcall word_1 ; rk50.ru rcall word_3 ; Petrov Roman rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d250ms rcall tone_3s ; тоновая посылка 2 rcall d250ms rcall tone_3s ; тоновая посылка 3 rcall d3000; ПАУЗА 3 СЕК sbi PORTB, LED; sbi PORTB, TX ; rjmp end_info info_4: cbi PORTB, LED; cbi PORTB, TX ; rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d250ms rcall tone_3s ; тоновая посылка 2 rcall d250ms rcall tone_3s ; тоновая посылка 3 rcall d250ms rcall tone_3s ; тоновая посылка 4 rcall d3000; ПАУЗА 3 СЕК rcall word_4 rcall word_5 rcall word_1 rcall d3000; ПАУЗА 3 СЕК rcall tone_3s ; тоновая посылка 1 rcall d250ms rcall tone_3s ; тоновая посылка 2 rcall d250ms rcall tone_3s ; тоновая посылка 3 rcall d250ms rcall tone_3s ; тоновая посылка 4 rcall d3000; ПАУЗА 3 СЕК sbi PORTB, LED; sbi PORTB, TX ; rjmp end_end_info start_info: cbi PORTB, LED; cbi PORTB, TX ; rcall d3000; ПАУЗА 3 СЕК rcall word_4 rcall word_5 rcall word_1 rcall word_3 rcall word_2 rcall d3000; ПАУЗА 3 СЕК sbi PORTB, LED; погасить светодиод sbi PORTB, TX ; выключение передачи rjmp end_info ;############################################################ ;# ФОРМИРОВАНИЕ ТОНОВОЙ ИНФОРМАЦИОННОЙ ПОСЫЛКИ В ФОРМАТЕ АЗБУКИ МОРЗЕ ;############################################################ word_1: rcall pause_word rcall symbol_R rcall symbol_K rcall symbol_5 rcall symbol_0; ЦИФРА 0 rcall symbol_tchk rcall symbol_R rcall symbol_U ret word_2: rcall pause_word rcall symbol_M rcall symbol_Y rcall pause_word rcall symbol_T rcall symbol_E rcall symbol_L rcall symbol_tchk rcall pause_word rcall symbol_7 rcall symbol_9 rcall symbol_0; ЦИФРА 0 rcall symbol_3 rcall symbol_1 rcall symbol_4 rcall symbol_2 rcall symbol_3 rcall symbol_7 rcall symbol_2 rcall symbol_1 ret word_3: rcall pause_word rcall symbol_P rcall symbol_E rcall symbol_T rcall symbol_R rcall symbol_O; БУВА О rcall symbol_V rcall pause_word rcall symbol_R rcall symbol_O rcall symbol_M rcall symbol_A rcall symbol_N ret word_4: rcall pause_word rcall symbol_H rcall symbol_E rcall symbol_L rcall symbol_L rcall symbol_O rcall pause_word rcall symbol_I ret word_5: rcall pause_word rcall symbol_M rcall symbol_I rcall symbol_D rcall symbol_L rcall symbol_A rcall symbol_N rcall symbol_D rcall pause_word rcall symbol_G rcall symbol_X rcall symbol_T rcall symbol_4 rcall symbol_0 rcall symbol_0 ret ;############################################################ ;# Таблица символов в формате Азбуки Морзе ;############################################################ symbol_H: rcall point rcall point rcall point rcall point rcall pause_symbol ret symbol_I: rcall point rcall point rcall pause_symbol ret symbol_D: rcall tire rcall point rcall point rcall pause_symbol ret symbol_L: rcall point rcall tire rcall point rcall point rcall pause_symbol ret symbol_G: rcall tire rcall tire rcall point rcall pause_symbol ret symbol_X: rcall tire rcall point rcall point rcall tire rcall pause_symbol ret symbol_R : rcall point rcall tire rcall point rcall pause_symbol ret symbol_K : rcall tire rcall point rcall tire rcall pause_symbol ret symbol_5 : rcall point rcall point rcall point rcall point rcall point rcall pause_symbol ret symbol_0: ;ЦИФРА 0 rcall tire rcall tire rcall tire rcall tire rcall tire rcall pause_symbol ret symbol_point: rcall point rcall point rcall point rcall point rcall point rcall point rcall pause_symbol ret symbol_U : rcall point rcall point rcall tire rcall pause_symbol ret symbol_P : rcall point rcall tire rcall tire rcall point rcall pause_symbol ret symbol_E : rcall point rcall pause_symbol ret symbol_T : rcall tire rcall pause_symbol ret symbol_Y : rcall tire rcall point rcall tire rcall tire rcall pause_symbol ret symbol_V : rcall point rcall point rcall point rcall tire rcall pause_symbol ret symbol_O : ; буква О rcall tire rcall tire rcall tire rcall pause_symbol ret symbol_M : rcall tire rcall tire rcall pause_symbol ret symbol_A : rcall point rcall tire rcall pause_symbol ret symbol_N : rcall tire rcall point rcall pause_symbol ret symbol_7 : rcall tire rcall tire rcall point rcall point rcall point rcall pause_symbol ret symbol_9 : rcall tire rcall tire rcall tire rcall tire rcall point rcall pause_symbol ret symbol_1 : rcall point rcall tire rcall tire rcall tire rcall tire rcall pause_symbol ret symbol_4 : rcall point rcall point rcall point rcall point rcall tire rcall pause_symbol ret symbol_2 : rcall point rcall point rcall tire rcall tire rcall tire rcall pause_symbol ret symbol_3 : rcall point rcall po
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 07 Май 2015 22:12:07 # Рабочий код, который сейчас работает. Еле уместил в 1 Кб. Это вторая причина по которой я писал на Ассемблере.
Данилыч Участник с дек 2006 Видное МО Сообщений: 479	Дата: 07 Май 2015 22:33:40 # лучше такой бинарник 1101000010010010110100001011100011010000101101001101000010111101110100001011111011010000101101010010000011010001100000001101000110000011110100001011101111010000101110001101000110000010001000001101000010010010110100011000000111010000101101011101000110 0001010010000011010001100000010010000000110111001100000010110111010001100000101101000010111000001000001101000010111011110100001011010111010001100000101101000010111000110100001011010111010000101111000010000011010000101111111101000010111110110100001011 0001110100001011010111010000101101001101000110001011
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 07 Май 2015 22:50:54 # Пожалуйста, в формате HEX. :020000020000FC :100000000FE90DBF05E003BF07E107BB0FEF08BB1A :1000100074E031D030D0B2C074E040E133274A956B :10002000403041F026B323FF06C033953F3FB1F384 :1000300037D0F8CF4BC05527C19A32D053955A329A :1000400019F026B323FFF9CF26B323FFFDCFC298C3 :10005000C49826D025D0C19823D05A95503009F0A5 :10006000FBCF06E00A95003011F01AD0FBCF20D06C :10007000C29AC49AD2CF0F931CE0002702BF1A95F0 :10008000103021F002B70F3FE8F3F7CF0F9108953A :100090000F93002702BF02B70130E8F30F910895D4 :1000A0000F93002702BF02B70F3FE8F30F910895A7 :1000B00013E01A95103049F02CE3C09AE9DFC0989C :1000C000E7DF2A952030A9F3F8CF08957A957330A9 :1000D00031F0723089F0713009F17030A9F1C298B5 :1000E000C498C9DFE5DFC7DF5ED072D0C4DFE0DFD0 :1000F000C2DFC29AC49A91CFC298C498BCDFD8DF3D :10010000CFDFD6DFB8DF72D045D04DD0B4DFD0DF3F :10011000C7DFCEDFB0DFC29AC49A7FCFC298C4983F :10012000AADFC6DFBDDFC4DFBBDFC2DFA4DF5ED076 :1001300031D04ED0A0DFBCDFB3DFBADFB1DFB8DF34 :100140009ADFC29AC49A69CFC298C49894DFB0DF8C :10015000A7DFAEDFA5DFACDFA3DFAADF8CDF46D0F1 :100160004ED018D088DFA4DF9BDFA2DF99DFA0DFAD :1001700097DF9EDF80DFC29AC49A4ECFC298C498A0 :100180007ADF34D03CD006D023D00DD074DFC29AB1 :10019000C49A43CFFAD063D067D06BD071D0D7D098 :1001A0005ED07DD00895F1D09CD08AD0EED085D09D :1001B00081D044D0CCD0E9D0A0D0A6D061D0C0D0DE :1001C000AAD0B0D0B6D0BCD098D0B3D0A4D0089527 :1001D000DCD06AD06FD071D042D07ED077D0D5D06D :1001E0003ED07AD07ED081D084D00895CED017D0A2 :1001F00061D024D023D070D0C8D017D00895C5D0F6 :1002000070D013D016D01AD070D073D012D0BDD009 :100210001BD01FD052D086D033D032D008959FD07B :100220009ED09DD09CD0C0D0089599D098D0BCD0FD :100230000895A0D094D093D0B7D0089590D09AD0FC :100240008ED08DD0B1D0089595D094D088D0ACD038 :10025000089590D084D083D08DD0A6D008957FD03B :1002600089D07DD0A1D0089585D079D083D09CD07D :10027000089575D074D073D072D071D095D0089590 :1002800079D078D077D076D075D08ED0089567D0D9 :1002900066D065D064D063D062D086D008955FD038 :1002A0005ED068D081D008955AD064D063D057D042 :1002B0007BD0089554D078D008955CD075D008953F :1002C00059D04DD057D056D06FD0089548D047D090 :1002D00046D050D069D008954DD04CD04BD064D08A :1002E000089548D047D060D0089539D043D05CD02D :1002F000089540D034D058D008953CD03BD02FD072 :100300002ED02DD051D0089535D034D033D032D026 :1003100026D04AD0089523D02DD02CD02BD02AD04F :1003200043D008951CD01BD01AD019D023D03CD074 :10033000089515D014D01ED01DD01CD035D00895EE :100340000ED00DD00CD016D015D02ED0089507D0D9 :1003500006D005D004D003D002D026D0089560E2A4 :10036000C09A96DEC09894DE6A95603009F0F8CFA6 :1003700013D0089560E6C09A8BDEC09889DE6A9536 :10038000603009F0F8CF08D0089566E005D06A958E :10039000603009F0FBCF08950F93002702BF02B72A :1003A0000F33E8F30F91089562E0F6DF6A9560304D :0603B00009F0FBCF0895E7 :00000001FF
rk50 Участник с мар 2015 Москва Сообщений: 15	Дата: 07 Май 2015 22:52:24 # Дело в том, что молодые программисты отвязаны от железа. Ассемблер -защищает авторские права, на Си -может любой разобраться.
РадиоАматор Участник с мар 2014 Москва Сообщений: 9	Дата: 07 Май 2015 23:42:12 · Поправил: РадиоАматор (07 Май 2015 23:51:06) # .
РадиоАматор Участник с мар 2014 Москва Сообщений: 9	Дата: 07 Май 2015 23:44:19 # Проверил. Эхо-репитер топик-стартера, как обычно, не работает. Репитер Пушкинской радиошколы, на 145,7875 как обычно, работает. В общем, все как обычно, все как всегда.
9922 Участник с апр 2009 Москва Сообщений: 38	Дата: 08 Май 2015 10:18:41 # Контроллер не может издыхать, он работает или не работает. Репитер собран на двух контроллерах. Перевожу на общедоступный язык ... tiny13 имеет память которая очень не любит ВЧ излучения выглядит это со стороны так три-четыре раза работает замечательно а потом наступает фаза деградации памяти и работа превращается в нечто типа на воде вилами писаное или бабушка на двое сказала
ПАлексей Участник с сен 2007 Россия Сообщений: 1467	Дата: 08 Май 2015 12:50:45 · Поправил: ПАлексей (08 Май 2015 12:55:12) # rk50 Потрите свои кракозябры, пока ещё Вам редактирование этого поста доступно (сутки ещё не прошли). И вообще, зачем форум всякой фигнёй засирать? Прямо как спамер какой-то сюда всякой никому не нужной дряни напихали!
50ET01 Участник с ноя 2013 Мск. обл, Казань, деревня рядом Сообщений: 2550	Дата: 08 Май 2015 20:35:10 · Поправил: 50ET01 (09 Май 2015 07:33:39) # ПАлексей Если Вы НЕГРАМОТНЫЙ в программировании (не шнурками) - не лезьте просто..
Реклама Google

	Время загрузки страницы (сек.): 0.041; miniBB® Магазин раций, антенн и аксессуаров. Много Си-Би техники.