Test a DX clock for me

Wednesday, May 21, 2008 by theAVMAN | Discussion: DesktopX

Would someone like to test this for me!

http://audiomasters.net/host/3DMetalClock.zip
25 Reply 18 Referrals
First Previous Page 1 of 2 Next Last
bilbo1930
Reply #1 Wednesday, May 21, 2008 7:04 AM
Work fine Harley!

theAVMAN
Reply #2 Wednesday, May 21, 2008 7:09 AM
Thank ya sir ! your help with the Vexa clock helped make it possible!

theAVMAN
Reply #3 Wednesday, May 21, 2008 7:12 AM
I'd give you some Karma if I could find that button!

jpkylegirl
Reply #4 Wednesday, May 21, 2008 7:15 AM
I'd give you some Karma if I could find that button!


The thumbs up button under the reply... click it.  

theAVMAN
Reply #5 Wednesday, May 21, 2008 7:22 AM
The thumbs up button under the reply... click it.


Thank you!

butch123
Reply #6 Wednesday, May 21, 2008 7:33 AM
This one I like very much.  

RomanDA
Reply #7 Wednesday, May 21, 2008 1:39 PM
ok.. looking at the code..

Code: vbscript
  1. 'Change object name to apply to new object
  2. ulHue = DesktopX.Object("3Dmetal_Clock_Face").hue
  3. ulHue = DesktopX.Object("3Dmetal_Clock_Hours").hue
  4. ulHue = DesktopX.Object("3Dmetal_Clock_Minutes").hue
  5. ulHue = DesktopX.Object("3Dmetal_Clock_Seconds").hue
  6. ulHue = ulHue + 10


Whu set the same VAR to multiple items, the only one that matters in this case is the LAST one. Applying it at the end of that function makes sense, but the beginning sets make no sense.

I would redo it:

Sub Object_OnLButtonDown(x, y)
Dim ulHue
ulHue = DesktopX.Object("3Dmetal_Clock_Face").hue
ulHue = ulHue + 10
'if hue is set to Black "1000" then set it back to Unshifted "0"
If ulHue > 1001 Then ulHue = 0

'if hue is past 255, set it to black.
If ulHue > 255 And ulHue < 999 Then ulHue = 1000

'apply the hue change to the object(s)
DesktopX.Object("3Dmetal_Clock_Face").hue = ulHue
DesktopX.Object("3Dmetal_Clock_Hours").hue = ulHue
DesktopX.Object("3Dmetal_Clock_Minutes").hue = ulHue
DesktopX.Object("3Dmetal_Clock_Seconds").hue = ulHue
End Sub

This seems to work, the main key with this is to make sure the master items are RED.
the Hue works best with a RED main image. Other than the above, it looks good.

RomanDA
Reply #8 Wednesday, May 21, 2008 1:40 PM
"Whu set the same VAR "

um.. where's my EDIT button? Im speaking Zubazzish

"Why set the same VAR" - edited

RomanDA
Reply #9 Wednesday, May 21, 2008 1:50 PM
Here is some revised code for the hue button.
It reduces the calls to set the object hue's down to a single function call.
It also saves the hue in storage so that it will be there when it comes back up the next time its run.

Code: vbscript
  1. Sub Object_OnLButtonDown(x, y)
  2. Dim ulHue
  3. ulHue = DesktopX.Object("3Dmetal_Clock_Face").hue
  4. ulHue = ulHue + 10
  5. 'if hue is set to Black "1000" then set it back to Unshifted "0"
  6. If ulHue > 1001 Then ulHue = 0
  7. If ulHue > 255 And ulHue < 999 Then ulHue = 1000
  8. Call SetHue(ulHue)
  9. End Sub
  11. '*************************************************************
  13. 'Resets the hue to 0 if right clicked
  14. Sub Object_OnRButtonDown(x, y)
  15. Call SetHue(1000)
  16. End Sub
  19. 'Resets the hue to 0 if right clicked
  20. Sub Object_OnScriptEnter
  21. If Object.LocalStorage("Hue") = "" Then
  22. ulHue = 1000
  23. Else
  24. ulHue = Object.LocalStorage("Hue")
  25. End If
  26. Call SetHue(ulHue)
  27. End Sub
  31. Function SetHue(huesetting)
  32. DesktopX.Object("3Dmetal_Clock_Face").hue = huesetting
  33. DesktopX.Object("3Dmetal_Clock_Hours").hue =huesetting
  34. DesktopX.Object("3Dmetal_Clock_Minutes").hue = huesetting
  35. DesktopX.Object("3Dmetal_Clock_Seconds").hue = huesetting
  36. Object.LocalStorage("Hue") = huesetting
  37. desktopx.Object("test").text = huesetting
  38. End Function

theAVMAN
Reply #10 Wednesday, May 21, 2008 1:57 PM
RomanDA

Thank you very much !I will keep this in mind for this application,I assume this will work in other instances also.

Thanks again
Harley

RomanDA
Reply #11 Wednesday, May 21, 2008 2:11 PM
sure.. it reads 1 items hue, then increments that, then stores it back out to the local storage. not real bad. It also looks for that local storage on 1st run to see if there is anything in there, if so, it uses that value.

I think i need to add this to the snippets!

mike b1954
Reply #12 Thursday, May 22, 2008 10:15 PM

Hi Harley .. It looks great ... Run first time ... 

I am not sure if this is correct for you but if I mouse over the colour changer... keep it still and just click away I can get loads of other colours too ... Is it supposed to do that ? ...

Nice clock for sure ... works well  !!

Regards

Mike


ZubaZ
Reply #13 Thursday, May 22, 2008 11:45 PM
I am not sure if this is correct for you but if I mouse over the colour changer... keep it still and just click away I can get loads of other colours too ... Is it supposed to do that ? ..
That's a hue shift . .and by design.

theAVMAN
Reply #14 Wednesday, July 9, 2008 10:37 AM
I have a new one I need somebody to check if anyone wants toWWW Link

ZubaZ
Reply #15 Wednesday, July 9, 2008 10:58 AM
Other than the fact that their is no actual clock . . it works.
Animation plays, close button destroys the object.  Shines are in place.

RickJP
Reply #16 Wednesday, July 9, 2008 11:07 AM
Works fine can see the clock at bottom,
Don't like the date display 7/9/8
Would use 09/07/08 if could of worked out how to change it.

aufisch
Reply #17 Wednesday, July 9, 2008 11:21 AM
3D Metal clock: First start, runs smoothly, colouring works. I close the clock and when I restart the clock, I can't change the colour anymore (Vista64bit). I have repeated this several time, but since the first run, I am unable to change the colour.

Turbo clock: Works fine (I do have a digital clock) except that the close button next to the date took some time to actually do something. To explain; I wanted to close the clock but the close button didn't react at all (no mouse-over too). I wrote this in my feedback to you, but after writing I thought I would try once more and suddenly the button had a red mouse-over and worked. I repeated this and I got a lag again but shorter this time.
Suggestion; to include a switch for 'English'-time and 'Military'-time (the latter being commonly used in continental Europe)

theAVMAN
Reply #18 Thursday, July 10, 2008 10:01 AM
Works fine can see the clock at bottom,
Don't like the date display 7/9/8
Would use 09/07/08 if could of worked out how to change it.


Thank you and it is changed
3D Metal clock: First start, runs smoothly, colouring works. I close the clock and when I restart the clock, I can't change the colour anymore (Vista64bit). I have repeated this several time, but since the first run, I am unable to change the colour.


aufisch

3D Metal that was an old link sorry!
newWWW Link

Turbo clock: Works fine (I do have a digital clock) except that the close button next to the date took some time to actually do something. To explain; I wanted to close the clock but the close button didn't react at all (no mouse-over too). I wrote this in my feedback to you, but after writing I thought I would try once more and suddenly the button had a red mouse-over and worked. I repeated this and I got a lag again but shorter this time.
Suggestion; to include a switch for 'English'-time and 'Military'-time (the latter being commonly used in continental Europe)


Thank you

1 I moved the close button to the top layer and all lag is gone!

2 I am not quite sure how to add the switch but I will try

Thanks again
Harley

theAVMAN
Reply #19 Thursday, July 10, 2008 10:28 AM
Zubaz if your still on could you give it 1 more shot for me?Or anyone just toverify it is all working ok!

Thank you A/V
WWW Link

Philly0381
Reply #20 Thursday, July 10, 2008 10:37 AM
theAVMAN just gave it a test, shows date and time and the turbine is spinning.   

Please login to comment and/or vote for this skin.

Welcome Guest! Please take the time to register with us.
There are many great features available to you once you register, including:

  • Richer content, access to many features that are disabled for guests like commenting on the forums and downloading skins.
  • Access to a great community, with a massive database of many, many areas of interest.
  • Access to contests & subscription offers like exclusive emails.
  • It's simple, and FREE!
Login
First Previous Page 1 of 2 Next Last

Home | About | Privacy | Upload Guidelines | Terms of Service | Help
Copyright © Stardock Corporation. All Rights Reserved.


web-wc01