На главную страницу сайта
· Наш магазин · Объявления · Рейтинг · Статьи · Частоты · Копилка · Аэродромы · Live!
· Файлы · Диапазоны · Сигналы · Музей · Mods · LPD-форум · Клуб · Радиостанции
На сайте: гостей - 56,
участников - 11 [ Spirex, Scover, SashaShmel, sindicat, WolAN, briz, Cool, evgen10123, augrabies, Zlodey, Burbon777]
 · Начало · Опросы · События · Статистика · Поиск · Регистрация · Правила · FAQ · Галерея ·
 Форум —› Главный раздел —› РПУ "Бригантина" 
Си-Би радиостанции в нашем магазине: Alan и Midland, Alinco, Intek, MegaJet, President, Yosan, Беркут, Таис


Alan 48 Excel
руб.

Alinco DR-135CBA New
руб.

MegaJet MJ-3031M Turbo
руб.

President Harry III ASC
руб.

Yosan Stealth 5
руб.
 Страница:  ««  1  2  3  4  5  ...  12  13  14  15  16  »»Поиск в теме
Автор Сообщение
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 23 Дек 2013 08:57:39 · Поправил: darkstar (23 Дек 2013 11:54:28) #  

001 612: CLR R5 ; очистить регистр R5
001 614: MOV #000 006,R4 ; R4 = 000 006
001 620: MOV #000 001,R0 ; R0 = 000 001
001 624: BR 001 630 ; перейти на 001 630
001 626: ASL R0 ; сдвиг влево через С, R0 = R0 * 2
001 630: MOV R0,@#060 040 ; записать содержимое R0 в регистр 060 040 (запись строк при сканировании клавиатуры)
001 634: MOV @#060 040,R3 ; прочитать содержимое регистра 060 040 в R3 (чтение столбцов при сканировании клавиатуры)
001 640: BIT #000 077,R3 ; проверка битов регистра R3 по маске 0000 0000 0011 1111
001 644: BEQ 001 676 ; если все биты по маске равны нулю, то перейти на 001 676
001 646: COM R3 ; инвертировать биты R3
001 650: BIC #177 700,R3 ; обнулить биты регистра R3 по маске 1111 1111 1100 0000
001 654: MOV #000 001,R1 ; R1 = 000 001
001 660: MOV #000 006,R2 ; R2 = 000 006
001 664: BR 001 670 ; перейти на 001 670
001 666: ASL R1 ; сдвиг влево через С, R1 = R1 * 2
001 670: CMP R1,R3 ; сравнить R1 и R3
001 672: BEQ 001 704 ; если R1 = R3, то перейти на 001 704
001 674: SOB R2,001 666 ; R2 = R2 - 1, если R2 не равно нулю, то перейти на 001 666
001 676: SOB R4,001 626 ; R4 = R4 - 1, если R4 не равно нулю, то перейти на 001 626
001 700: INC R5 ; R5 = R5 + 1
001 702: BR 001 732 ; переход на 001 732 (выход)
001 704: DEC R4 ; R4 = R4 - 1
001 706: ASL R4 ; сдвиг влево через С, R4 = R4 * 2
001 710: MOV R4,-(SP) ; сохранить R4 в стеке
001 712: ASL R4 ; сдвиг влево через С, R4 = R4 * 2
001 714: ADD (SP)+,R4 ; R4 = R4 + (SP), SP = SP + 2
001 716: DEC R2 ; R2 = R2 - 1
001 720: ADD R2,R4 ; R4 = R4 + R2
001 722: MOVB 001 734(R4),R0 ; число из ячейки по адресу (R4)+001 734 скопировать в R0, для приёмника все биты старшего байта устанавливаются равными старшему биту младшего байта
001 726: MOV R0,@#111 144 ; записать регистр R0 в ячейку памяти по адресу 111 144
001 732: RTS PC ; возврат
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 23 Дек 2013 12:34:22 · Поправил: darkstar (23 Дек 2013 12:34:33) #  

Подпрограмма 010 644:

010 644: TRAP 025 ; вызов функции TRAP 025
010 646: CLR @#111 144 ; очистить ячейку 111 144
010 652: TRAP 050 ; вызов функции TRAP 050
010 654: CLR @#114 322 ; очистить ячейку 114 322
010 660: CLR @#114 330 ; очистить ячейку 114 330
010 664: CLR @#110 460 ; очистить ячейку 110 460
010 670: CLR @#110 674 ; очистить ячейку 110 674
010 674: CLR @#110 776 ; очистить ячейку 110 776
010 700: CLR @#110 714 ; очистить ячейку 110 714
010 704: CLR @#111 004 ; очистить ячейку 111 004
010 710: CLR @#111 000 ; очистить ячейку 111 000
010 714: CLR @#117 262 ; очистить ячейку 117 262
010 720: RTS PC ; возврат из подпрограммы
Реклама
Google
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 23 Дек 2013 12:40:34 · Поправил: darkstar (24 Дек 2013 08:07:21) #  

Функция TRAP 50:

005 110: MOV #000 200, @#111 010 ; положить число 000 200 в ячейку по адресу 111 010
005 116: CLR @#110 476 ; очистить ячейку 110 476
005 122 RTS PC ; выход из функции


Функция TRAP 25:

011 112: MOV #110 306,R3 ; положить число 110 306 в регистр R3
011 116: MOV #125 252,R4 ; положить число 125 252 в регистр R4
011 122: MOV R4,(R3)+ ; скопировать содержимое R4 по адресу R3, т.е. 125 252 -> (110 306). R3 = R3 + 2, т.е. R3 = 110 310
011 124: MOV R4,(R3)+ ; скопировать содержимое R4 по адресу R3, т.е. 125 252 -> (110 310). R3 = R3 + 2, т.е. R3 = 110 312
011 126: MOV R4,(R3) ; скопировать содержимое R4 по адресу R3, т.е. 125 252 -> (110 312)
011 130: RTS PC ; выход из функции
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 23 Дек 2013 12:49:07 #  

Подпрограмма 030 132:

030 132: TST @#111 166 ; проверить ячейку по адресу 111 166
030 136: BEQ 030 160 ; если это число равно нулю, то перейти на 030 160 (выход из подпрограммы)
030 140: MOV R0,-(SP) ; сохранить R0 в стеке
030 142: TRAP 027 ; вызов функции TRAP 027
030 144: TRAP 045 ; вызов функции TRAP 045
030 146: CLR @#111 012 ; очистить ячейку 111 012
030 152: CLR @#111 166 ; очистить ячейку 111 166
030 156: MOV (SP)+,R0 ; восстановить R0 из стека
030 160: RTS PC ; возврат из подпрограммы
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 24 Дек 2013 06:37:04 · Поправил: darkstar (24 Дек 2013 06:50:30) #  

Подпрограмма 030 162:

030 162: CMP R0,#000 107 ; сравнить R0 и число 000 107
030 166: BEQ 030 360 ; если R0 = 000 107, то перейти на 030 360 (выход)
030 170: CMP R0,#000 116 ; сравнить R0 и число 000 116
030 174: BEQ 030 360 ; если R0 = 000 116, то перейти на 030 360 (выход)
030 176: CMP R0,#000 122 ; сравнить R0 и число 000 122
030 202: BEQ 030 360 ; если R0 = 000 122, то перейти на 030 360 (выход)
030 204: CMP R0,#000 115 ; сравнить R0 и число 000 115
030 210: BNE 030 220 ; если R0 не равен 000 115, то перейти на 030 220
если же R0 = 000 115 (0000 0000 0100 1101), то
030 212: TST @#110 714 ; проверить ячейку по адресу 110 714
030 216: BEQ 030 360 ; если это число равно нулю, то перейти на 030 360 (выход)

030 220: CMP @#111 010,#000 221 ; сравнить ячейку по адресу 111 010 и число 000 221
030 226: BNE 030 256 ; если ячейка по адресу 111 010 не равна 000 221, то перейти на 030 256

030 230: CMP R0,#000 106 ; сравнить R0 и число 000 106
030 234: BEQ 030 360 ; если R0 = 000 106, то перейти на 030 360 (выход)
030 236: CMP #000 007,@#110 440 ; сравнить число 000 007 и ячейку по адресу 110 440
030 244: BEQ 030 360 ; если ячейка по адресу 110 440 = 000 007, то перейти на 030 360 (выход)

030 246: JSR PC,@#002 672 ; вызов подпрограммы по адресу 002 672 (см. 2 стр)
030 252: CMP R2, PC ; сравнить R2 и PC
030 254: BR 030 360 ; перейти на 030 360 (выход)

030 256: CMP @#111 010,#000 223 ; сравнить ячейку по адресу 111 010 и число 000 223
030 264: BNE 030 324 ; если ячейка по адресу 111 010 не равна 000 223, то перейти на 030 324

030 266: CMP R0,#000 105 ; сравнить R0 и число 000 105
030 272: BEQ 030 360 ; если R0 = 000 105, то перейти на 030 360 (выход)

030 274: CMP #000 002,@#110 440 ; сравнить число 000 002 и ячейку по адресу 110 440
030 302: BEQ 030 360 ; если ячейка по адресу 110 440 = 000 002, то перейти на 030 360 (выход)

030 304: JSR PC,@#032 040 ; вызов подпрограммы по адресу 032 040

030 310: CMP R0,#000 102 ; сравнить R0 и число 000 102
030 314: BNE 030 360 ; если R0 не равен 000 102, то перейти на 030 360 (выход)

030 316: CLR @#111 012 ; очистить ячейку 111 012
030 322: BR 030 360 ; перейти на 030 360 (выход)

030 324: CMP @#111 010,#000 234 ; сравнить ячейку по адресу 111 010 и число 000 234
030 332: BNE 030 360 ; если ячейка по адресу 111 010 не равна 000 234, то перейти на 030 360 (выход)

030 334: CMP R0,#000 103 ; сравнить R0 и число 000 103
030 340: BEQ 030 360 ; если R0 = 000 103, то перейти на 030 360 (выход)

030 342: CMP #000 002,@#110 440 ; сравнить число 000 002 и ячейку по адресу 110 440
030 350: BEQ 030 360 ; если ячейка по адресу 110 440 = 000 002, то перейти на 030 360 (выход)

030 352: JSR PC,@#002 672 ; вызов подпрограммы по адресу 002 672 (см. 2 стр)
030 356: CMP R2,R2 ; сравнить R2 и R2

030 360: RTS PC ; выход из подпрограммы
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 24 Дек 2013 07:37:41 · Поправил: darkstar (24 Дек 2013 07:57:20) #  

Подпрограмма 032 040:

032 040: TST @#114 330 ; проверить ячейку по адресу 114 330
032 044: BEQ 032 100 ; если это число равно нулю, то перейти на 032 100

032 046: TST @#114 322 ; проверить ячейку по адресу 114 322
032 052: BEQ 032 066 ; если это число равно нулю, то перейти на 032 066

032 054: JSR PC,@#002 672 ; вызов подпрограммы по адресу 002 672 (см. 2 стр)
032 060: JSR R4,PC ; вызов подпрограммы по адресу PC, сохранение адреса возврата в R4

032 062: BIT -(R0),(SP)+ ; R0 = R0 - 2. Проверить состояние битов регистра R0 по маске, на которую указывает стек. SP = SP + 2
032 064: BR 032 162 ; переход на 032 162

032 066: JSR PC,@#002 672 ; вызов подпрограммы по адресу 002 672 (см. 2 стр)
032 072: JSR R4,PC ; вызов подпрограммы по адресу PC, сохранение адреса возврата в R4

032 074: BIT @(SP)+,(R0)+ ; Проверить состояние битов ячейки, адрес которой находится в ячейке на которую указывает стек. Адрес маски - в регистре R0. R0 = R0 + 2.
032 076: BR 032 162 ; переход на 032 162

032 100: JSR PC,@#026 630 ; вызов подпрограммы по адресу 026 630

032 104: BIT #000 002,110 446 ; проверить состояние битов ячейки по адресу 110 446 с маской 000 002 ?
032 112: BEQ 032 134 ; если второй бит числа = 0, то перейти на 032 134

032 114: JSR PC,@#026 650 ; вызов подпрограммы по адресу 026 650
032 120: MOV @#110 324,@#114 326 ; скопировать число из ячейки 110 324 в ячейку 114 326
032 126: MOV #000 203, 111 012 ; положить число 000 203 в ячейку 111 012 ?

032 134: BIT #000 002, 110 452 ; проверить состояние битов ячейки по адресу 110 452 с маской 000 002 ?
032 142: BEQ 032 156 ; если второй бит числа = 0, то перейти на 032 156

032 144: JSR PC,@#026 642 ; вызов подпрограммы по адресу 026 642

032 150: MOV #000 202,111 012 ; положить число 000 202 в ячейку 111 012 ?

032 156: JSR PC,@#027 736 ; вызов подпрограммы по адресу 027 736

032 162: RTS PC ; выход из подпрограммы
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 24 Дек 2013 08:20:06 · Поправил: darkstar (24 Дек 2013 08:31:30) #  

Функция TRAP 27:

007 576: CLR -(SP) ; SP=SP-2. Очистить ячейку стека
007 600: TRAP 030 ; вызов функции TRAP 030
007 602: TST @#110 714 ; проверить ячейку по адресу 110 714
007 606: BEQ 007 640 ; если это число равно нулю, то перейти на 007 640
если число не равно нулю, то:

007 610: MOV @#110 346,@#110 306 ; скопировать ячейку 110 346 в ячейку 110 306
007 616: MOV @#110 350,@#110 310 ; скопировать ячейку 110 350 в ячейку 110 310
007 624: BR 007 640 ; перейти на 007 640

007 626: CLR -(SP) ; SP=SP-2. Очистить ячейку стека
007 630: BR 007 636 ; перейти на 007 636
007 632: MOV #000 001,-(SP) ; SP=SP-2. Записать в стек число 000 001
007 636: TRAP 034 ; вызов функции TRAP 034

007 640: CLR @#110 460 ; очистить ячейку 110 460
007 644: TST R5 ; проверить содержимое регистра R5
007 646: BEQ 007 666 ; если R5=0, то перейти на 007 666

007 650: INC @#110 460 ; увеличить на единицу содержимое ячейки 110 460
007 654: TST (SP) ; проверить ячейку по адресу из стека
007 656: BNE 007 676 ; если содержимое ячейки не равно нулю, то перейти на 007 676

007 660: JSR PC,@#010 046 ; вызов подпрограммы 010 046
007 664: BR 007 676 ; переход на 007 676

007 666: JSR PC,@#002 672 ; вызов подпрограммы 002 672 (см. лист 2)
007 672: MOVB (R0),-(PC) ; число из ячейки по адресу R0 скопировать в ячейку по адресу PC-2, для приёмника (PC-2) все биты старшего байта устанавливаются равными старшему биту младшего байта
007 674: MOVB R4,R0 ; R4 скопировать в R0, для приёмника R0 все биты старшего байта устанавливаются равными старшему биту младшего байта
007 676: TST (SP)+ ; проверить содержимое ячейки по адресу из стека. SP=SP+2.
007 700: RTS PC ; выход из функции
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 24 Дек 2013 08:50:07 · Поправил: darkstar (24 Дек 2013 11:02:00) #  

TRAP 45 - 004 740 -> 010 072 - 235

Функция TRAP 45:

010 072: CLR -(SP) ; SP=SP-2. Очистить стек
010 074: MOV @#110 312,@#114 334 ; скопировать содержимое ячейки 110 312 в ячейку 114 334
010 102: JSR PC,@#016 304 ; выполнить подпрограмму 016 304 (см. лист 1)
010 106: MOVB R3,@-(R2) ; R2=R2-2. Содержимое регистра R3 скопировать в ячейку по адресу из ячейки, на которую указывает R2. Для приёмника все биты старшего байта устанавливаются равными старшему биту младшего байта.
010 110: MOVB R3,(R2) ; R3 скопировать в ячейку по адресу R2, для приёмника все биты старшего байта устанавливаются равными старшему биту младшего байта
010 112: IOT ; прерывание ввода-вывода? (PC = 000 020, PSW = 000 022) ?
010 114: BR 010 134 ; переход на 010 134

010 116: CLR -(SP) ; SP=SP-2. Очистить стек
010 120: BR 010 126 ; переход на 010 126
010 122: MOV #000 001,-(SP) ; SP=SP-2. Записать 000 001 в ячейку, на которую указывает SP
010 126: MOV @#110 312,@#114 334 ; скопировать содержимое ячейки 110 312 в ячейку 114 334
010 134: CLR @#110 460 ; очистить ячейку 110 460
010 140: TRAP 035 ; вызов функции TRAP 035
010 142: TST R5 ; проверить R5
010 144: BEQ 010 164 ; если R5=0, то перейти на 010 164

010 146: INC @#110 460 ; увеличить на 1 содержимое ячейки 110 460
010 152: TST (SP) ; проверить ячейку, на которую указывает стек
010 154: BNE 010 172 ; если содержимое ячейки не равно нулю, то перейти на 010 172

010 156: JSR PC,@#010 364 ; вызов подпрограммы 010 364
010 162: BR 010 172 ; переход на 010 172

010 164: JSR PC,@#031 520 ; вызов подпрограммы 031 520
010 170: TRAP 037 ; вызов функции TRAP 037
010 172: TST @#110 714 ; проверить ячейку по адресу 110 714
010 176: BNE 010 206 ; если содержимое ячейки не равно нулю, то перейти на 010 206

010 200: MOV @#114 334,@#110 312 ; скопировать содержимое ячейки 114 334 в ячейку 110 312
010 206: TST (SP)+ ; проверить ячейку, на которую указывает стек. SP=SP+2.
010 210: RTS PC ; выход из функции
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 31 Дек 2013 08:31:53 · Поправил: darkstar (31 Дек 2013 08:35:51) #  

Прописал все TRAP-ы и кое-какие подпрограммы, ибо куда ни ткнись - везде идёт вызов функции с кучей вложенных подпрограмм.
Слишком длинные тексты получаются.
Буду выкладывать в Экселе, но пока без комментов. Если где и есть комментарии, то не факт, что они верные :) Всё будет корректироваться.
Аппаратно-программный комплекс Бригантины внушает уважение к разработчикам :)

http://www.radioscanner.ru/uploader/2013/31_12_2013_trap_01_5.zip
http://www.radioscanner.ru/uploader/2013/31_12_2013_trap_52_5.zip
http://www.radioscanner.ru/uploader/2013/31_12_2013_sub_prog.zip
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 31 Дек 2013 09:02:58 #  

Огромный труд. Респект.
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 31 Дек 2013 14:07:19 · Поправил: darkstar (31 Дек 2013 14:20:40) #  

Огромный труд проделали разработчики, а я уж пользуюсь, можно сказать, всем готовеньким :)
Весь код написан в рукопашную и мастером своего дела - нет тупых кодовых последовательностей которые возникают при машинной генерации кода, но и распутывать тоже надо вручную :) т.к. есть многословные команды, и есть данные, которые находятся в том же адресном пространстве, что и команды, и различить их непросто, а автоматизированными методами почти невозможно.
Уже как-то начинаешь понимать сам код и всё реже заглядываешь в справочники.
Логика написания программы становится понятна. Видно, что где-то подпрограмму взяли типовую, а где-то писали по месту.
Единственно, пока не распутаешь все подпрограммы, ход основной программы не восстановить.
Тормозил на мозгокрутных выражениях, а теперь вижу, что это не команды, а аргументы для функций :)
Подпрограмм же реально туча ...
Ну как будут на работе перерывчики, буду заглядывать в код.
А вообще мне нравится - я бы даже сказал, что этот ассемблер получше, чем обкоцанный АТмеловский...
AVIAAMATOR
Участник
Offline3.9
с авг 2006
Сообщений: 962

Дата: 31 Дек 2013 18:06:36 #  

Огромный труд. Респект.
hs_19
Присоединяюсь.
У меня вопрос, уважаемый darkstar - какова конечная цель Вашей работы? Что-то поменять в алгоритме управления "Бригантиной"? По-моему, с Вашим уровнем знания ассемблера 1801ВМ1 и имея полную принципиальную схему, проще написать управляющую программу заново и так, как Вам нужно =)
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 31 Дек 2013 19:30:46 · Поправил: darkstar (31 Дек 2013 19:33:58) #  

Поначалу я так и хотел - переписать программу, только ещё думал заменить процессорный блок на что-то более современное.
Но теперь вижу, что и так всё неплохо :)
Может добавить свистелок и перделок, раз уж есть матричная индикация :) Навроде приветствия позывным владельца при включении РПУ :)
Пока точно не знаю. В родной прошивке не устравивает незапоминающийся уровень громкости. Тормоза при листании каналов, подтормаживание при перестройке валкодером. Хотелось бы отдельную кнопочку на USB/LSB с индикацией, внешнее управление с интерфейсом по типу Icom, а лучше полностью с ним совместимого. SDR-панораму внешнюю навесить на первую ПЧ.
Главное, что есть неплохое железо, полностью контролируемое программно. Вот и разбираюсь, как лучше его контролировать.
AVIAAMATOR
Участник
Offline3.9
с авг 2006
Сообщений: 962

Дата: 31 Дек 2013 19:57:01 · Поправил: AVIAAMATOR (31 Дек 2013 20:03:01) #  

В родной прошивке не устраивает незапоминающийся уровень громкости.
Думаю, что без переделки "железа" это не решить, поскольку данные об уровне громкости перед выключением питания записать некуда (там, насколько понимаю, только ПЗУ и ОЗУ без внешней батарейки). Нужно "прикручивать" что-то типа flash-памяти.
Тормоза при листании каналов, подтормаживание при перестройке валкодером
Мда, неприятные эффекты. Эта проблема, имхо, более серьезная. Вполне возможно, что дело в быстродействии ЦП, ОЗУ и архитектуре всей системы управления.
В любом случае желаю Вам всяческих успехов в этой непростой работе.
С наступающим Новым Годом!
73!
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 31 Дек 2013 20:31:03 #  

AVIAAMATOR
(там, насколько понимаю, только ПЗУ и ОЗУ без внешней батарейки)
Батарейка таки есть. Частотные каналы на на ней держутся. 3 элемента АА.
AVIAAMATOR
Участник
Offline3.9
с авг 2006
Сообщений: 962

Дата: 31 Дек 2013 21:20:53 · Поправил: AVIAAMATOR (01 Янв 2014 15:35:41) #  

Батарейка таки есть. Частотные каналы на на ней держутся. 3 элемента АА.
hs_19
Ну тогда чуть проще - если ОЗУ не занято полностью, то можно попробовать уровень усиления по НЧ запоминать (если есть аппаратно-программная возможность его установки).
Впрочем, это не та ветка, чтобы прописные истины излагать =)
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 04 Янв 2014 08:19:08 · Поправил: darkstar (04 Янв 2014 08:25:48) #  

Хотелось бы как-нибудь увеличить плотность шага валкодера.
9 импульсов на оборот это даже не смешно...



Так получается, что валкодер только для красоты...
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 04 Янв 2014 08:23:20 · Поправил: hs_19 (04 Янв 2014 08:24:19) #  

darkstar
Без изменения конструкции, думаю - никак. Если в штатном виде все оставлять - то диск другой нужен, как минимум, и последующая регулировка оптических узлов по углу. Или, как вариант - применить готовый малогабаритный от "BOURNS"
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 04 Янв 2014 08:50:27 · Поправил: darkstar (04 Янв 2014 09:36:36) #  

Похоже, всё-таки целесообразнее будет ввести внешнее управление...
или же кардинально перелопачивать переднюю панель, чего делать не хотелось бы.
Была задумка распечатать лазерником на прозрачной основе плоский диск с рисками, оптодатчики взять мышиные и повернуть на 90 градусов относительно штатных... но это всё равно будут сопли...
Есть ещё мысль взять старенький IC-721 за обзорный, а Бригантину перестраивать синхронно, по командам CI-V.

П.С.
Сейчас провернул валкодер - всё-таки 18 шагов на один оборот, видимо считает по обеим фронтам.
И при медленном вращении может путать направление. Например: проехал частоту, и надо на пару шагов назад вернуться. Начинаешь вращаешь назад, а счёт сначала пойдёт вперёд на один шаг, и только потом назад.
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 04 Янв 2014 11:32:18 · Поправил: hs_19 (04 Янв 2014 13:39:50) #  

darkstar
И при медленном вращении может путать направление. Например: проехал частоту, и надо на пару шагов назад вернуться. Начинаешь вращаешь назад, а счёт сначала пойдёт вперёд на один шаг, и только потом назад.
Да, верно. Неоптимальные углы датчиков оптических.
Хотел спросить - наблюдаете ли Вы шелчки от энкодера при перестройке?
Есть ещё мысль взять старенький IC-721 за обзорный, а Бригантину перестраивать синхронно, по командам CI-V.
Т.е. поступить по образу и подобию техрешения примененного в "Омнириге"? Дрова какие-то придется лабать под упрпвление РПУ.
На мой взгляд было бы интересней заточить под это дело хамлиб, он по сетке пашет, (хотя омнириг наверное тоже, я его просто знаю хуже)

Похоже, всё-таки целесообразнее будет ввести внешнее управление...
Бриганинские клоны в р-166 именно так и работают, -с внешним управлением.
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 04 Янв 2014 14:58:50 #  

У меня щелчки заметны только при шаге 1 кГц.
Датчики не закреплены, просто торчат как попало, но склеены между собой попарно.
С Омниригом и иже с ним дело не имел :)
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 04 Янв 2014 15:43:48 · Поправил: hs_19 (04 Янв 2014 16:01:42) #  

darkstar
У меня щелчки заметны только при шаге 1 кГц.
Везде? А 10-100Гц в начале-середине-конце диапазона?

Датчики не закреплены, просто торчат как попало, но склеены между собой попарно.
В этом видимо косяк и есть... Нормального сдвига не формируется для определения направления.

С Омниригом и иже с ним дело не имел :)
Есть ещё мысль взять старенький IC-721 за обзорный, а Бригантину перестраивать синхронно, по командам CI-V
Именно это он и делает...
Хотелось бы отдельную кнопочку на USB/LSB с индикацией, внешнее управление с интерфейсом по типу Icom, а лучше полностью с ним совместимого. SDR-панораму внешнюю навесить на первую ПЧ.
Было бы классно сделать режимонезависимые фильтры и ару(прежде всего).Насчет сдр по первой пч есть некоторые сомнения. Обусловлены они наличием программно управляемых делителей в начале линейного тракта. Хотя, оно может и правильнее, в том смысле, что контроллер рпу будет пытаться все аремя нормализовать уровень под заданное в п.о. значение.


И для финала вопрос - ацп аналоговой шкалы всегда грузится после включения одинаково?
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 04 Янв 2014 20:28:24 · Поправил: darkstar (05 Янв 2014 13:45:29) #  

С АЦП проблем не замечал, при включении сразу показывает уровень РЧ.
Щелчки при шаге 1 кГц весьма заметны и даже раздражают, будто клювиками переключаешь частоту.
При шаге 100 Гц щелчков почти не слышно, нужно напрягать слух чтобы их выловить.
При шаге 10 Гц щелчки незаметны совсем.
По диапазонам не гонял, ибо это мазохизм - ехать шагом 1,8 кГц на оборот (шаг 100) по диапазону.

Режимонезависимые фильтры и АРУ - это само собой. Тоже раздражает, что нельзя выбрать самому.
Пускай бы основные режимы задавались с клавы, как они есть, но оставьте возможность подправить вручную... но нет - сделали для дурака, чтобы случайно не напортачил.
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 04 Янв 2014 20:50:20 · Поправил: hs_19 (04 Янв 2014 20:55:38) #  

darkstar
С АЦП проблем не замечал, при включении сразу показывает уровень РЧ.
Да, так и есть.
Собственно я спросил неверно. Правильнее было бы так: шкала РЧ полностью регулируется в "ручном" режиме регулировки усиления? Не бывает такого, что на слух регулировка правильная а ацп шкалы загружается при всключении как то коряво и при ручной регулировке усиления реакция не на полный "градусник"?
На обоих экземплярах такая дурь время от времени бывает, отчего я склонен думать, что это косяк разработки, а не приобретенный дефект... Там градусник просто устроен: счетчик и ацп, - лезть лениво, чтобы разбираться. Выключение и последующее включение помогают.
Из опыта - проверьте питание на бп и на кросс - плате. Если разницы нет, то нет повода беспокоиться, если разница есть - разъем и плоские провода от бп в топку. У меня разница была, причем питание проседало сообразно кручению енкодера очень заметно со стороны кросса.
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 05 Янв 2014 04:11:32 · Поправил: darkstar (05 Янв 2014 04:15:20) #  

Пока до кросс-платы не добрался :) Задница так же как и морда снимается?
Разъёмы между блоками и кросс-платой я поменять не смогу... но путь от БП до кросса попробую усилить.
При включении/отключении части индикаторов (смена режима, например) яркость остальных индикаторов немного меняется :(
Усиление покручу.
YuriVR
Участник
Offline5.0
с ноя 2008
Омск
Сообщений: 2678

Дата: 05 Янв 2014 09:08:38 #  

Наблюдаю за этой веткой, т.к. Бригантина родом из Омска. Интересны все Ваши изыскания, но а сигналы то Вы на нее принимаете вообще?
Если да, то как впечатления по сравнению с другими профессиональными и не очень РПУ?
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 05 Янв 2014 10:10:20 · Поправил: hs_19 (05 Янв 2014 10:26:54) #  

darkstar
Пока до кросс-платы не добрался :) Задница так же как и морда снимается?
Да, на 4 болтах. Сторону с антенным входным блоком защиты тяните без фанатизма, там кабели не сильно длинные. В принципе, задачу с доступом можно себе облегчить демонтировав один из верхних элементов корпуса (задний) Т.е. сначала освободить заднюю панель и немного ее отодвинуть назад, а потом демонтировать один из профилированных элементов сверху. Второй, передний можно не дергать. Жесткость кузова сохранится и кассеты за него держутся. Собственно провода там стоят модные в конце 80 - начале 90х, плоские. Сечение малое и разъемы сопливые. Именно в ножах разъемов фигня и происходит. У меня падало 0,25-0,3В на канале 5В в статике, при верчении енкодера, когда проц обрабатывал прерывание, точишко потребления подпрыгивал, и на осциллографе воткнутом в канал +5 был кромешный ужас) Запаял все наглухо, мгтфом 0,75 Емкости фильтров в бп просели за пределы заводских 5%, где то на треть. Заменил на более емкие. Теперь если что то и дергается - то это только реакция преобразователя 24в->5в. Его я курочить не стал, хотя можно было бы. Преобразователи кстати, интересно сделаны...(Ну это для отдельной темы))))

Наблюдаю за этой веткой, т.к. Бригантина родом из Омска. Интересны все Ваши изыскания, но а сигналы то Вы на нее принимаете вообще?
Если да, то как впечатления по сравнению с другими профессиональными и не очень РПУ?


Впечатления, самые что ни есть) Получше екд-500, иногда лучше 160го (если бы ару крутилось отдельно от режимов - то однозначно было бы лучше).

з.ы.Посетив как то прошлым летом однополчан был приятно порадован наличием новых 166х р-ст в составе, сильно понравился возбудитель на базе той же "Бригантины", ну или 170го, твердотельник на 0,5кВт и авск. Классная техника. Возбудитель такой в пару к свом Бригантинам я бы не прочь заиметь...

В ключе заданного вопроса (о происхождении техники) я осмыслил наличие техники у себя и пришел к выводу, что я фанат продукции ОНИИП))) Три 160х, лазурь, 2 Бриганины....
YuriVR
Участник
Offline5.0
с ноя 2008
Омск
Сообщений: 2678

Дата: 05 Янв 2014 10:49:18 #  

hs_19
Впечатления, самые что ни есть) Получше екд-500, иногда лучше 160го (если бы ару крутилось отдельно от режимов - то однозначно было бы лучше).

Хорошо, передам авторам привет при случае )
По поводу АРУ и прочих регулировок – в современной профессиональной технике попадаются и хуже варианты – даже аттенюатором управлять нельзя. Объясняют авторы такие решение тем, что уровень среднего пользователя сейчас такой, что незачем доверять ему что-либо, кроме кнопки вкл/выкл.
Но я с таким не согласен – должно быть два режима:
– автомат – для работы в автоматических комплексах;
– полностью ручной режим – для профессионалов на случай проведения измерений и выяснения причин плохого качества связи при работе автомата.
hs_19
Участник
Offline5.7
с мая 2004
СПб
Сообщений: 2995

Дата: 05 Янв 2014 12:47:04 · Поправил: hs_19 (05 Янв 2014 12:49:38) #  

YuriVR
По поводу АРУ и прочих регулировок – в современной профессиональной технике попадаются и хуже варианты – даже аттенюатором управлять нельзя.
На забугорной 5го поколения кой чего покрутить все таки можно.
Отечественной не довелось видеть ничего круче 166й.

Хорошо, передам авторам привет при случае )
Отлично, и поблагодарите. Есть за что.
Реализовать такое в то время - достойно всяческого уважения.
darkstar
Участник
Offline2.8
с янв 2007
Сибирь
Сообщений: 446

Дата: 05 Янв 2014 13:46:48 · Поправил: darkstar (05 Янв 2014 13:48:18) #  

YuriVR
А исходников кода у авторов случайно не завалялось? :)
Или это те авторы, которые руководящие?
Реклама
Google
 Страница:  ««  1  2  3  4  5  ...  12  13  14  15  16  »» 

Создавать сообщения могут только зарегистрированные участники форума.
Войти в форум :: » Логин » Пароль
Начало
Средства связи, рации. Купить радиостанции Motorola, Yaesu, Vertex, приемники, антенны.
Время загрузки страницы (сек.): 0.023; miniBB ®