Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("alarm")
SetShowWhenLocked("addFlags")
End Sub
Sub SetShowWhenLocked(flags As String)
Dim r As Reflector
r.Target = r.GetActivity
r.Target = r.RunMethod("getWindow")
r.RunMethod2(flags, 6815872, "java.lang.int")
End Sub