Sub Activity_Create (FirstTime As Boolean)
Activity.LoadLayout("1")
If FirstTime Then
If File.Exists(File.DirInternal, "1.txt") Then
EditText1.Text = File.ReadString(File.DirInternal, "1.txt")
End If
End If
End Sub
Sub Button1_Click
File.WriteString(File.DirInternal, "1.txt", EditText1.Text)
End Sub