Регулировка частоты на контроллере

[kison]

еще раз говорю, с приращением все понятно, я теперь разбираюсь с вычислением этого приращения. вот тут и появляется умножение.
его алгоритм не заканчивается приращением фазы.

Никто не вычисляет приращение фазы в ассемблерном прерывании на лету. Так что проблема непонятна. Считайте его на С где угодно, в С с умножением нет никаких проблем

[spballiance]

все равно не понимаю эту формулу

;Freq = Fval x Calib / 16777216
;Nominal Calib = 180143985
;for Ttimer = 4.000 uS

[spballiance]

http://www.myplace.nu/avr/minidds/minidds.asm
тут прозрачнее описано и понятно

[kison]

тут прозрачнее описано и понятно

Ну и отлично. Но учтите - там DDS грузит процессор на 100%, и делать еще что либо не получится.

[spballiance]

там DDS грузит процессор на 100%, и делать еще что либо не получится.

да черт с ним, я свяжу 2 контроллера по usart и все, ну а синус через фильтры прогоню, растяну и смещу как мне надо
и та методика на 20кгц дает погрешность 0,02Гц так что терпимо

я с телесистем так и не понял как рассчитывать приращение фаз
Но все равно этот алгоритм мне не подходит для решения "все-в-одном", обработчик АЦП будет сильно влиять на генерацию частоты

[kison]

Но все равно этот алгоритм мне не подходит для решения "все-в-одном", обработчик АЦП будет сильно влиять на генерацию частоты

Естественно. Поэтому я и предлагал вынести задачу генерации в отдельный кристалл. Лишняя t2313 вряд ли сильно удорожит проект. Там должно быть всего одно прерывание от таймера, так что если все сделать в одном кристалле, то АЦП придется обрабатывать поллингом в основном цикле. Вы прикиньте, может и в один поместится. Для этого надо всего лишь написать две процедуры - обработчик DDS на асме и поллинг АЦП на С.

[spballiance]

Вы прикиньте, может и в один поместится. Для этого надо всего лишь написать две процедуры - обработчик DDS на асме и поллинг АЦП на С.

да нет, у меня слишком ветвистая программа получится. у меня в основном контроллере уже 60% занято, а еще фурье не вбивал

кстати про USART. слишком принципиально будет, если на меге будет 16 Мгц кристал? вроде как при "нерекомендованных" значениях кварца набегает какая-то погрешность по частоте на линиях приема-передачи?

[picavr]

про USART. слишком принципиально будет, если на меге будет 16 Мгц кристал? вроде как при "нерекомендованных" значениях кварца набегает какая-то погрешность по частоте на линиях приема-передачи?

А какие там РЕКОМЕНДОВАННЫЕ КВАРЦЫ? это те что в
даташите в табличках?...
это же просто для примера расчитаны наиболее распространённые.

Берём формулы из ШИТа и расчитываем по применяемому кварцу значения регистров. А затем считаем занчение скорости и отклонение. Если в пределах 1-2% то работает.

[spballiance]

Если в пределах 1-2% то работает.

"рекомендованные" 0,0%
то есть если у меня там и там будет 16МГц, то на ошибку можно наплевать вообще?

сижу допиливаю алгоритм под себя вырезаю ненужное, добавляю нужное, в том числе и sleep в тот момент, когда генерить не надо, хотя проблема потребления меня не волнует

[Kabron]

Ну или так на PORTB.7:
'////////////////////////////////////////////////////////////////////
'/// DDS Function generator 0.1 Hz - 1250 kHz, resolution 0.1 Hz ///
'////////////////////////////////////////////////////////////////////
$regfile = "m48def.dat"
Const Fosc = 7380000
$crystal = Fosc ' adjust for used crystal
$baud = 115200
$hwstack = 32
$swstack = 32
$framesize = 32
Declare Sub Gensquare()
Declare Sub Calcload()

Dim Mload_r As Iram Long At 12 Overlay
Dim Phase As Iram Long At 26 Overlay

Dim Freq As Long
Dim Mloads As Single
Dim Mload As Long

Const Wide = 2 ^ 32
Const L = 7
Const Frmul =(wide / Fosc) * L

Ddrb = &HFF
Ddrd = &B10010010
Freq = 2002

Call Calcload
Call Gensquare()

Sub Calcload()
Mloads = Freq * Frmul
'Mloads = Mloads / 10
Mload = Mloads
End Sub

Sub Gensquare()
Phase = 0
Mload_r = Mload

Sqrs:
add r26,r12 ; 1
Adc r27,r13 ; 1
Adc r28,r14 ; 1
Adc r29,r15 ; 1
!out PORTB,r29 ; 1
rjmp Sqrs ; 2 = 7
End Sub