Dim varprova As List
Dim var1 As String
Dim var2 As String
Dim var3 As String
dim FileDir as String
FileDir = File.DirRootExternal & "/download"
varprova.Initialize
If File.Exists(FileDir,"prova.txt") Then
    varprova =  File.ReadList(FileDir, "prova.txt")  
    var1=varprova.Get(0)
    var2=varprova.Get(1)
    var3=varprova.Get(2)
    Log(var1 &".. "& var2 &".. "&var3)  
Else
    varprova.Add("prova1")
    varprova.Add("prova2")  
    varprova.Add("prova3")  
    File.WriteList(FileDir,"prova.txt",varprova)
End If
Return