Uparłem się by somodzielnie napisać bootloader dla ATmega644.
Z przyswajaniem teorii znalezionej w nocie:
http://www.atmel.com/images/doc1644.pdf
jestem już na finiszu.
Postanowiłem napisać najprostszy "pre bootloader", który zapisze mi pierwsze 100 stron flash-a wartościami odpowiadającymi danej stronie.
Prawie się udało, tyle, że strony zapisywane są do połowy, tzn, zostaje zapisane pierwsze 128 bajtów, pozostałe zostają czyste (FF).
[syntax=basic4gl]$regfile = "m644def.dat"
$loader = $7c00
Dim Count As Byte
Dim Pages As Byte
Config Portb.4 = Output
Config Pinb.5 = Input
Reset Portb.4
If Pinb.5 = 0 Then
Set Portb.4
For Pages = 0 To 99
'### page erase ###
LDS r31,{pages}
Spmcsr = 3
SPM
waitms 5
'### page reenable ###
Bitwait Spmcsr.0 , Reset
Spmcsr = 17
SPM
NOP
NOP
Waitms 5
'### page buffer write ###
For Count = 0 To 127
LDS r0,{pages}
LDS r1,{pages}
LDS r31,{pages}
LDS r30,{count}
Spmcsr = 1
SPM
Waitms 5
Next Count
'### write page to flash ###
Spmcsr = 5
Spm
Waitms 5
'### page reenable ###
Bitwait Spmcsr.0 , Reset
Spmcsr = 17
SPM
NOP
NOP
Waitms 5
Next Pages
Reset Portb.4
End If[/syntax]
Widzę, że strona się kasuje, a zapisuje się tak na prawdę zaledwie 128 bajtów (dla 128 słów powinno się zapisać 256 bajtów). Prawdopodobnie tu coś źle robię:
[syntax=basic4gl]'### page buffer write ###
For Count = 0 To 127
LDS r0,{pages}
LDS r1,{pages}
LDS r31,{pages}
LDS r30,{count}
Spmcsr = 1
SPM
Next Count
'### write page to flash ###
Spmcsr = 5
Spm[/syntax]
Hmm... Do r0 ładuję pierwszy bajt słowa, do r1 ładuję drugi bajt słowa. czynność powtarzam 128 razy. 128 rozy po 2 bajty, następnie zapisuję stronę do flash. Kurcze powinno działać, a nie działa... (działa częściowo - zapisuje się pierwsze 128 bajtów).Statystyki: Napisane przez mes mariusz — 21 sty 2016, o 10:59
]]>
