HeirOfSlytherin

Join Date 12/2003

Date Time Widget scripting question

I have done a date time widget with a digital clock,(found a tutorial on that) but how do you do the scripting for a date time with a analog clock? I tried to replace the digital script with the analog script, but it didn't work.

Locked Post

Advanced Search

Watch this post

Do not email me updates for this post Email me updates for this post

Successfully updated karma reason!

There's aclock docklet by 'Judge' (I can't remember what it's called - seach Wincustomise, it's there, something to do with 'Italian') which has the script for an analog clock.

Basically you have to rotate the 'hands' bitmaps by working out the # of degrees per second/minute/hour. It's reasonably obvious once you see an example.

HTH

Successfully updated karma reason!

Tiggz

Join Date 08/2003

+39

This is what I use:

Code: vbscript
desktopx.Object("secondhand").rotation = second(now) * 6
desktopx.Object("minutehand").rotation = minute(now) * 6
desktopx.Object("hourhand").rotation = (hour(now) * 30) + (30 * minute(now)/60)

Successfully updated karma reason!

I already have that scripting for the clock,but how do you put the date scripting and the analog clock scripting together to make a date-analog clock? I have a script for the date-time with digital clock. I omitted the lines to the digital clock and replaced it with the analog script and it didnt work.

Successfully updated karma reason!

Sign Up or Login and this ad disappears!
There are many great features available to you once you register. Sign Up for a free account and browse the forums without ads.

Sub Object_OnScriptEnter
Object.SetTimer 1000, 30000
Call setinfo
End Sub

Sub Object_OnTimer1000
Call setinfo
End Sub

Sub setinfo
desktopx.Object("DayOfWeek").text=WeekDayName(Weekday(now),False)
desktopx.Object("MonthName").text=MonthName(Month(now)
desktopx.Object("Year").text=Year(now)
desktopx.Object("Date").text=Day(now)
t = FormatDateTime(time(),3)'---Get your system time

h= hour(t)'---Get current hour
desktopx.object("hour_hand").Rotation= h * 30 '---Multiply current hour to get correct rotation
m= minute(t)'---Get current minute
desktopx.object("minute_hand").Rotation= m * 6 '---Multiply current minute to get correct rotation
s= second(t)'---Get current second
desktopx.object("second_hand").Rotation= s * 6 '---Multiply current second to get correct rotation
End Sub
This is what i am trying to put together. Date-Time(analog)Widget.

Successfully updated karma reason!

BigDogBigFeet

Join Date 12/2005

+461

Just create a system date object and apply it to the face of your analog clock. There's a plug in called "Date using text states" which you should already have with DesktopX. It's format is ddd',' MMM dd yyyy which of course you can format to suit your needs.

Successfully updated karma reason!

For those who are interested. Figured it out. very simple

Sub Object_onscriptenter
object.SetTimer 1, 1000
End Sub

Sub object_ontimer1
t = FormatDateTime(time(),3)'---Get your system time

h= hour(t)'---Get current hour
desktopx.object("hour_hand").Rotation= h * 30 '---Multiply current hour to get correct rotation
m= minute(t)'---Get current minute
desktopx.object("minute_hand").Rotation= m * 6 '---Multiply current minute to get correct rotation
s= second(t)'---Get current second
desktopx.object("second_hand").Rotation= s * 6 '---Multiply current second to get correct rotation
desktopx.Object("DayOfWeek").text = WeekDayName(Weekday(now), False)
desktopx.Object("MonthName").text = MonthName(Month(now))
desktopx.Object("Year").text = Year(now)
desktopx.Object("Date").text = Day(now)
End Sub

Successfully updated karma reason!