http://www.atmel.com/images/doc1644.pdf
jak i w artykule:
http://ep.com.pl/files/3453.pdf
wielokrotnie wspomniano o konieczności oczekiwania na zakończenie się instrukcji SPM:
Quote:
Bit 4 – RWWSRE: aktywowanie sekcji RWW (Read–While–Write Section Read Enable) Programowanie sekcji RWW powoduje zablokowanie jej odczytywania. Odblokowanie RWW polega na poczekaniu aż operacje programowania zostaną zakończone (SPMEN=0), następnie ustawieniu bitu RWWSRE i SPMEN oraz wykonaniu instrukcji SPM. Po poprawnym wykonaniu tych czynności, sekcja RWW jest już odblokowana.
Quote:
Nim zaczniemy operację ładowania bufora, musimy sprawdzić czy operacja zapisu pamięci EEPROM została zakończona, gdyż podczas zapisu EEPROM–a zostaje niszczona zawartość bufora tymczasowego. Robimy to przez sprawdzenie bitu EEWE w rejestrze EECR (jeśli jest wyzerowany, to znaczy że procesy zapisu się skończyły).
Pytam o zasadność, gdyż poniższy program zapisuje strony flash bez większych problemów, mimo, że instrukcje oczekiwania na zakończenie instrukcji SPM pozostają zakomentowane.
[syntax=basic4gl]$crystal = 8000000
$regfile = "m644def.dat"
$loader = $7c00
Dim Count As Byte
Dim Pages As Byte
Dim Words As Byte
For Pages = 0 To 99
'### page erase ###
' Bitwait Spmcsr.0 , Reset ' check for previous SPM complete
' Bitwait Eecr.1 , Reset
LDS r31,{pages}
Spmcsr = 3
SPM
Waitms 5
'### RWW enable ###
' Bitwait Spmcsr.0 , Reset ' check for previous SPM complete
' Bitwait Eecr.1 , Reset
Spmcsr = 17
SPM
NOP
NOP
Waitms 5
'### page buffer write ###
' Bitwait Spmcsr.0 , Reset ' check for previous SPM complete
' Bitwait Eecr.1 , Reset
For Count = 0 To 127
LDS r0,{count} ' byte of a word
LDS r1,{count} ' byte of a word
Words = Count
Shift Words , Left , 1
LDS r30,{words} ' word on page
LDS r31,{Pages} ' page
Spmcsr = 1
SPM
Waitms 5
Next Count
'### write page to flash ###
' Bitwait Spmcsr.0 , Reset ' check for previous SPM complete
' Bitwait Eecr.1 , Reset
LDS r30,0
Spmcsr = 5
Spm
Waitms 5
'### RWW enable ###
' Bitwait Spmcsr.0 , Reset ' check for previous SPM complete
' Bitwait Eecr.1 , Reset
Spmcsr = 17
SPM
NOP
NOP
Waitms 5
Next Pages
End[/syntax]Statystyki: Napisane przez mes mariusz — 29 sty 2016, o 11:11
]]>
