Public Sub SetDefaults (Sound As Boolean, Light As Boolean, Vibrate As Boolean) As NB6
If IsOld Then
OldNotification.Sound = Sound
OldNotification.Light = Light
OldNotification.Vibrate = Vibrate
Else
If IsChannel Then
Channel.RunMethod("enableLights", Array(Light))
Channel.RunMethod("enableVibration", Array(Vibrate))
Else
Dim CurrentDefaults As Int
If Sound Then CurrentDefaults = 1
If Vibrate Then CurrentDefaults = Bit.Or(CurrentDefaults, 2)
If Light Then CurrentDefaults = Bit.Or(CurrentDefaults, 4)
NotificationBuilder.RunMethod("setDefaults", Array(CurrentDefaults))
End If
End If
Return Me
End Sub