Neurochirurgie minim invazivă
"Primum non nocere" este ideea ce a deschis drumul medicinei spre minim invaziv. Avansul tehnologic extraordinar din ultimele decenii a permis dezvoltarea tuturor domeniilor medicinei. Microscopul operator, neuronavigația, tehnicile anestezice avansate permit intervenții chirurgicale tot mai precise, tot mai sigure. Neurochirurgia minim invazivă, sau prin "gaura cheii", oferă pacienților posibilitatea de a se opera cu riscuri minime, fie ele neurologice, infecțioase, medicale sau estetice. www.neurohope.ro |
Help CRC
Last Updated: May 25 2016 14:40, Started by
diaconuliviu
, May 25 2016 14:40
·
0
#1
Posted 25 May 2016 - 14:40
Vreau sa calculez CRC pentru un sir de valori hexa dintr-o memorie dupa o anumita formula gasita si folosita si de producatori.
i:integer; CRC:word; Hig,Low:byte; bin[$0,$9F]:array of bytes; i:=$0; CRC:=$AAAA; while i<$7E do begin //CRC cicle //writeln('I= ',i); CRC:=CRC xor ((bin[i+$1] shl $8) or bin[i]); //Writeln(' XORCRC ',CRC); //CRC:=(CRC + CRC) or (CRC shr $F); CRC:=(CRC shl $1) or (CRC shr $F); //Writeln(' ORCRC ',CRC); i:=i+$2; end; //CRC cicle Hig:=Hi(CRC); Low:=Lo(CRC); bin[$7E]:=Hig; bin[$7F]:=Low; Primii octeti sint 00 40. Deja dupa prima iteratie CRC trece de $FFFF si creste in continuare, cind de fapt, la final ar trebui sa fie doi octeti; Unde gresesc? Am folosit Free Pascal IDE Multumesc Edited by diaconuliviu, 25 May 2016 - 14:44. |
Anunturi
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users