processamento di dati lidar per l'analisi dell'evoluzione ... - CO.RI.STA
processamento di dati lidar per l'analisi dell'evoluzione ... - CO.RI.STA
processamento di dati lidar per l'analisi dell'evoluzione ... - CO.RI.STA
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
number_of_shots_2=str2num(header5(1,48:53));<br />
data_range_of_the_ADC_2=str2num(header5(1,55:61));<br />
device_identificator_2=header5(1,63:65);<br />
% ------------------------------------------------------<br />
% Chiusura del file in modalità testo<br />
stato_chiusura=fclose(fid);<br />
% ------------------------------------------------------------------<br />
% ----------- Calcolo delle <strong>di</strong>mensioni del file da analizare -------<br />
% A<strong>per</strong>tura del file<br />
fid=fopen(file_<strong>dati</strong>,'r');<br />
% Per calcolare la <strong>di</strong>mensione del file bisogna portarsi alla fine<br />
% del file stesso<br />
fseek(fid,0,'eof');<br />
% Calcolo <strong>di</strong>mensione del file<br />
filesize=ftell(fid);<br />
% Poichè ci troviamo alla fine del file,una volta ottenuta la<br />
% <strong>di</strong>mensione è opportuno chiudere il file stesso <strong>per</strong>chè ulteriori<br />
% o<strong>per</strong>azioni,come ad esempio la lettura della parte <strong>di</strong> co<strong>di</strong>ce<br />
% binario,potrebbero generare messaggi <strong>di</strong> errore<br />
fclose(fid);<br />
% ------------------------------------------------------------------<br />
% ----------------------- Conversione del file ---------------------<br />
% A<strong>per</strong>tura del file in modalità binaria<br />
fid=fopen(file_<strong>dati</strong>,'r');<br />
% Si fanno scorrere le prime headers già analizzate,fino alla parte<br />
% riguardante il co<strong>di</strong>ce binario<br />
for i=1:6<br />
fgetl(fid);<br />
end<br />
% Ciclo <strong>di</strong> conversione del file da binario a decimale<br />
% la conversione verrà eseguita <strong>per</strong> i primi 1024 campioni<br />
for i=1:number_of_data_points_1<br />
% si considerano 4 byte <strong>per</strong> volta che,dopo essere<br />
% convertiti in valori binari,devono essere concatenati.<br />
% si leggono,uno <strong>per</strong> volta,i valori all'interno del file<br />
% binario a partire dalla posizione corrente<br />
val=fread(fid,1);<br />
% si effettua la conversione da decimale a binario<br />
bin1=dec2bin(val,8);<br />
val=fread(fid,1);<br />
% si effettua la conversione da decimale a binario<br />
bin2=dec2bin(val,8);<br />
91