; definizione di variabile archivio di tipo STRU_FILEINFO

STRU_FILEINFO archivio

; utilizzo dei dati contenuti nella struttura

; definizione di variabile archivio di tipo STRU_FILEINFO

STRU_FILEINFO archivio

; definizione delle veriabile ausiliarie

STRING banco_f                        ; è il nome del banco della flash

I32 num_file                          ; è il numero dei file da leggere

I32 reso                              ; risultato dell'operazione

; assegno un valore alle variabili

banco_f = "/FA/*.*"

; uso il valore salvato nel registro 220

num_file = r(220)

; eseguo la funzione di apertura file

reso = f_dir(banco_f, num_file, archivio)

; eseguo delle operazioni sui dati letti

if (reso)

    sr(3) = "Ci sono " # str_i(reso, 1, 10) # " file nella flash"

else

    sr(3) = "La flash è vuota!"

endif