Sub Activity_Create(FirstTime As Boolean)
Dim l As List
l.Initialize
l.Add("èèèèèèèèè")
File.WriteList(File.DirInternal, "1.txt", l)
Dim l2 As List
l2 = File.ReadList(File.DirInternal, "1.txt")
Log(l2.Get(0)) 'displays the characters in the log
End Sub