AD9835

[myown]

Хто-небудь побачити або може мені допомогти з кодом для AD9835 в Привет-технічна C, або
інші C.

 

[Manu]

Яка ваша проблема?

 

[myown]

Як ініціалізації та передачі частота коду для даного пристрою на C без SPI, використання ПОС
і один з чотирьох портів?

 

[myown]

Я завантажити examle джерело, але цю мову я не розумію.
Anyboby чи може мені допомогти перекласти це ПМКД

"Пуск обладнання
'################################################# ######################

$ Regfile = "8515def.dat"
$ Кристалі = 8000000

Config Pind.7 = результат 'Sclk
Config Pind.6 = результат 'SData
Config Pind.5 = результат 'Fsync

Sclk Alias Portd.7
Sdata Alias Portd.6
Fsync Alias Portd.5

Встановити Sclk 'Встановити початковий PIN-код
держава
Встановити Fsync 'Встановити початковий PIN-код
держава'################################################# ######################
'Кінець Апаратні конфігураціїDim Fword0 As Long На
І H60
Dim Low_byte0 Як Byte На
І H60 оверлейной
Dim Low_mid_byte0 Як Byte На
І H61 оверлейной
Dim High_mid_byte0 Як Byte На
І H62 оверлейной
Dim High_byte0 Як Byte На
І H63 оверлейной
Fword0 =
І H346DC

Dim Setfreq As Long
Dim Freq Як Одномісний
Dim як єдиногоSetfreq = 400 "Змінити
Значення
до потрібного Freq.У ГерцаГраф = 536.870912 "Це кол
для
1 Гц на 8 МГц MCLK вводу
Freq = Setfreq * Граф
Fword0 = Freq
'Оголошення підпрограм
'################################################# ######################

Заявляють Підкатегорії Send_dds (ByVal швейцарських Як Word)

'################################################# ######################
'Кінець заявляють підпрограм

"Почати відправлення команди на DDS
'################################################# ######################

Телефонуйте Send_dds (И Hf800) 'Скидання DDS і
кладе у його режиму очікуванняТелефонуйте Send_dds (И H3000 Low_byte0) Ці 4 рядки
посилає частота.з ДДС
Телефонуйте Send_dds (И H2100 Low_mid_byte0) Ці 4 рядки
посилає частота.з ДДС
Телефонуйте Send_dds (И H3200 High_mid_byte0) Ці 4 рядки
посилає частота.з ДДС
Телефонуйте Send_dds (И H2300 High_byte0) Ці 4 рядки
посилає частота.з ДДСТелефонуйте Send_dds (И H8000) 'Встановлює синхронізації та
SELSRC регістрів 0
Телефонуйте Send_dds (И H5000) 'Встановлює SELSRC
Регістри 0
Телефонуйте Send_dds (И Hc000) 'Приносить DDS з
з
очікування

'################################################# ######################
'Кінець відправки команд для DDSPowerdown 'Покласти в процесорі
Powerdown для державних менше шуму
Кінець 'Кінець програми'################################################# #######################'Це підпрограм, які надсилають дані в DDS
'################################################# #######################
Під Send_dds (ByVal швейцарських Як Word)Скидання Fsync
Waitus 1
Shiftout Portd.6, Portd.7, південно-західний, 0, 16, 15
Встановити Fsync

End Sub