Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
If File.Exists(File.DirInternal & "/AAA", "")=False Then File.MakeDir(File.DirInternal , "AAA")
If File.Exists(File.DirInternal & "/AAA", "ACECON.TXT")=False Then
StartActivity(frmCondiciones)
If File.Exists(File.DirInternal & "/AAA", "ACECON.TXT")=False Then ExitApplication
End If