Осваиваем PIC24

[st_1]

Хе-хе. Узнаю свой код. Откуда он у вас?

А что, вы его нигде не выкладывали?

P.S: Если вы посчитаете нужным, то я его удалю.

[realid]

А что, вы его нигде не выкладывали?

P.S: Если вы посчитаете нужным, то я его удалю.

Да не, не надо удалять. Я просто запамятовал, чтобы где-то его выкладывал или отправлял кому-то, хотя может быть
Сверхестественного в нем ничего нет

[Dtolok]

'************************************************* *****************************
' инициализация the RTC on a PIC24 microcontroller
'************************************************* *****************************
sub procedure PIC24_RTC_Init ()
dim tempASM as word
tempASM = OSCCON ' Only for linker to include the register
' Unlock the OSCCON register and then enable SOSC to enable the 32.xxxkHz
' crystal for the RTC
asm
disi #7
mov OSCCON, W1
mov.b #0x02, W0
mov.b #0x46, W2
mov.b #0x57, W3
mov.b W2, [W1]
mov.b W3, [W1]
mov.b W0, [W1]
end asm
tempASM = NVMKEY ' Only for linker to include the register
tempASM = RCFGCAL ' Only for linker to include the register
RCFGCAL = 0x0000
' Unlock the RCFGCAL register and enable the RTC
asm
PUSH W12
DISI #9
MOV #0x55, W12
MOV W12, NVMKEY
MOV #0xAA, W12
MOV W12, NVMKEY
BSET RCFGCAL, #13
NOP
NOP
BSET RCFGCAL, #15
POP W12
end asm
End sub
типа вот так?

[Dtolok]

Базовая последовательность
кода для переключения тактирования.
;Выбор нового генератора поместите в W0
;OSCCONH (старший байт) Разрешающая
;последовательность
MOV #OSCCONH, w1
MOV #0x78, w2
MOV #0x9A, w3
MOV.b w2, [w1]
MOV.b w3, [w1]
;Установите выбор нового генератора
MOV.b WREG, OSCCONH
;OSCCONL (младший байт) Разрешающая
;последовательность
MOV #OSCCONL, w1
MOV #0x46, w2
MOV #0x57, w3
MOV.b w2, [w1]
MOV.b w3, [w1]
;Начало режима переключения генератора
BSET OSCCON, #0
не пойму где значение старшего и младшего байтов?

[Dtolok]

http://read.pudn.com/downloads167/so...C/RTCC.c__.htm

[realid]

Базовая последовательность
кода для переключения тактирования.
;Выбор нового генератора поместите в W0
;OSCCONH (старший байт) Разрешающая
;последовательность
MOV #OSCCONH, w1
MOV #0x78, w2
MOV #0x9A, w3
MOV.b w2, [w1]
MOV.b w3, [w1]
;Установите выбор нового генератора
MOV.b WREG, OSCCONH
;OSCCONL (младший байт) Разрешающая
;последовательность
MOV #OSCCONL, w1
MOV #0x46, w2
MOV #0x57, w3
MOV.b w2, [w1]
MOV.b w3, [w1]
;Начало режима переключения генератора
BSET OSCCON, #0
не пойму где значение старшего и младшего байтов?

Значение OSCCONH загружается из w0(он же WREG). А BSET OSCCON, #0 запускает процедуру переключения такт. генератора (OSCCONL).
Значение чего?

[Dtolok]

Значение OSCCON получается надо загрузить в WREG и запустить последовательность?

[realid]

Значение OSCCON получается надо загрузить в WREG и запустить последовательность?

Да. Предварительно нужное значение вы помещаете в WREG (w0).

[Dtolok]

т.е. mov.b #0x02, W0 это запись 1 в OSCCON.SOSCEN... а если прочитать этот регистр то мы в младшем байте должны получить 0х02.. а у меня читается 0 - значит запись не произошла и генератор не запущен. а может быть проблема в регистре конфигурации?

[realid]

'************************************************* *****************************
' инициализация the RTC on a PIC24 microcontroller
'************************************************* *****************************
sub procedure PIC24_RTC_Init ()
dim tempASM as word
tempASM = OSCCON ' Only for linker to include the register
' Unlock the OSCCON register and then enable SOSC to enable the 32.xxxkHz
' crystal for the RTC
asm
disi #7
mov OSCCON, W1
mov.b #0x02, W0
mov.b #0x46, W2
mov.b #0x57, W3
mov.b W2, [W1]
mov.b W3, [W1]
mov.b W0, [W1]
end asm
tempASM = NVMKEY ' Only for linker to include the register
tempASM = RCFGCAL ' Only for linker to include the register
RCFGCAL = 0x0000
' Unlock the RCFGCAL register and enable the RTC
asm
PUSH W12
DISI #9
MOV #0x55, W12
MOV W12, NVMKEY
MOV #0xAA, W12
MOV W12, NVMKEY
BSET RCFGCAL, #13
NOP
NOP
BSET RCFGCAL, #15
POP W12
end asm
End sub
типа вот так?

Ошибка красным. Надо mov #OSCCONL, W1. Разница есть, у вас загружается содержимое OSCCON в W1. У меня адрес OSCCONL в W1.