Цитата(impuls-v @ Jan 8 2007, 15:40)
1) где можно прочитать информацию о структуре hex файла.
Где то у меня была, но не нашёл. Высылаю отрывок из моего программатора. По нему попробуй разобраться. Очень давно писал и не очень грамотно. Не ругаться!
Код
repeat
readln(FileH,SAnsw);
if SAnsw[1]<>':' then begin
res:=MessageDlg(' Файл не "Intel Hex"! Первый символ не ":"!',
MtError,[mbOK],0);
CloseFile(FileH);
goto ExOpen;
end;
bh:=SAnsw[2]+SAnsw[3];
count:=lo(RHex(bh));
sum:=count;
bh:=SAnsw[4]+SAnsw[5]+SAnsw[6]+SAnsw[7];
adr:=RHex(bh);
sum:=lo(sum+lo(adr)+hi(adr));
bh:=SAnsw[8]+SAnsw[9];
tzap:=lo(RHex(bh));
sum:=lo(sum+tzap);
j:=10;
for i:=1 to count do begin
bh:=SAnsw[j]+SAnsw[j+1];
j:=j+2;
d:=lo(RHex(bh));
sum:=lo(sum+d);
WData(adr,d);
adr:=adr+1;
end;
if adr>maxadr then maxadr:=adr;
sum:=lo(-sum);
bh:=SAnsw[j]+SAnsw[j+1];
d:=lo(RHex(bh));
if d<>sum then begin
res:=MessageDlg(' Ошибка контрольной суммы в строке '+
IntToStr(line)+'!',MtError,[mbOK],0);
CloseFile(FileH);
goto ExOpen;
end;
line:=line+1;
until(eof(FileH) or (tzap=1));
adr:=maxadr;
CloseFile(FileH);
{$I+}
Bootloader и CVAVR, общие вопросы
Jan 8 2007, 14:40
