#Region Service Attributes
#StartAtBoot: False
#ExcludeFromLibrary: True
#End Region
Sub Process_Globals
Public AudioOut As AudioStreamer
End Sub
Sub Service_Create
AudioOut.Initialize("AudioOut",22100,True,16,AudioOut.VOLUME_MUSIC)
AudioOut.StartPlaying
End Sub
Public Sub SendToAudio(Bytes() As Byte)
AudioOut.Write(Bytes)
End Sub
Sub Service_Start (StartingIntent As Intent)
Service.StopAutomaticForeground
End Sub
Sub Service_TaskRemoved
End Sub
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
Return True
End Sub
Sub Service_Destroy
End Sub