15.01.2015 Views

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

SHOW MORE
SHOW LESS

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

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!