Hue shift

I am trying to use a hue shift button it is working but I want the default state when the clock loads to be the color I built it in.Right now upon loading it has no color until the first press of the Hue button!

Thhank you A/V

'*************************************************************
'*******              Core_Hueshift_Btn               ********
'*************************************************************

'note: To add this to any obeject, simply add this button to
'your theme, or object and change the names of the objects below
'to the objects you want to change

Sub Object_OnLButtonDown(x, y)

Dim ulHue

'Change object name to apply to new object
ulHue = DesktopX.Object("Vexa_Clock_Face").hue
ulHue = DesktopX.Object("Vexa_Clock_Hours").hue
ulHue = DesktopX.Object("Vexa_Clock_Minutes").hue
ulHue = DesktopX.Object("Vexa_Clock_Seconds").hue
    ulHue = ulHue + 10
    'if hue is set to Black "1000" then set it back to Unshifted "0"
    If ulHue > 1001 Then
                ulHue = 0
    End If
    'if hue is past 255, set it to black.
    If ulHue > 255 And ulHue < 999 Then
                ulHue = 1000
    End If   

'apply the hue change to the object(s)
DesktopX.Object("Vexa_Clock_Face").hue = ulHue
DesktopX.Object("Vexa_Clock_Hours").hue = ulHue
DesktopX.Object("Vexa_Clock_Minutes").hue = ulHue
DesktopX.Object("Vexa_Clock_Seconds").hue = ulHue

End Sub

'*************************************************************

'Resets the hue to 0 if right clicked
Sub Object_OnRButtonDown(x, y)
    DesktopX.Object("Vexa_Clock_Face").hue = 1000
  DesktopX.Object("Vexa_Clock_Hours").hue =1000
  DesktopX.Object("Vexa_Clock_Minutes").hue = 1000
  DesktopX.Object("Vexa_Clock_Seconds").hue = 1000
End Sub

'*************************************************************

'Resets the hue to 0 if right clicked
Sub Object_OnScriptEnter
    DesktopX.Object("Vexa_Clock_Face").hue = 1000
    DesktopX.Object("Vexa_Clock_Hours").hue = 1000
  DesktopX.Object("Vexa_Clock_Minutes").hue = 1000
  DesktopX.Object("Vexa_Clock_Seconds").hue = 1000
End Sub