Sub Globals
Dim MP As MediaPlayer
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Main")
MP.Initialize2("MP") ' Sound
MP.Load(File.DirAssets, "Knock.mp3")
End Sub
Sub Panel1_Touch (Action As Int, X As Float, Y As Float)
MP.Play
End Sub