Sub Activity_Create(FirstTime As Boolean)
p.SetScreenOrientation(0)
Activity.LoadLayout("l5")
If File.Exists(File.DirInternal, video) = False Then
File.Copy(File.DirAssets, video, File.DirInternal, video)
End If
vv.Initialize("videoview")
pContent.AddView(vv,0,40dip,100%x,100%y-40dip)
vv.LoadVideo( File.DirInternal, video)
vv.Play
End Sub