Sub Service_Create
manager.Initialize("manager")
' serviceId = UUID("ffe0") 'original example b4a
' charId = UUID("ffe1") 'original example b4a
serviceId = UUID("FFFFFFF-FFFF-FFFF-FFFF-FFFFFFFFFFFF")
charId = UUID("FFFFFF1-FFFF-FFFF-FFFF-FFFFFFFFFFFF")
End Sub
Private Sub UUID(id As String) As String
#if B4A
' Return "0000" & id.ToLowerCase & "-0000-1000-8000-00805f9b34fb" 'original example b4a
Return id.ToLowerCase
#else if B4I
Return id.ToUpperCase
#End If
End Sub