22 replies to this topic

[CitizenErased]

At work we cant change any of the control panel settings including the system clock. Well the problem is that the clock is like 43 minutes off. So how about a clock on its own?

[greenmachine]

At work we cant change any of the control panel settings including the system clock. Well the problem is that the clock is like 43 minutes off. So how about a clock on its own?

Get a watch?

I'd add a "set time" option to the clock I'm working on, but it uses the @HOUR, @MIN, and @SEC macros, which are based off system time.

I believe there is a script on here somewhere that gets the current time off the internet. Try searching, or Google for an online clock.

[CitizenErased]

no internet access on the operator computer

but yea i guess im basically trying to see if its actually possible to NOT run off of the system clock like every program i've ever seen. because even programs for different time zones will still have the same minutes. maybe it isnt possible since no one but me would actually want different minutes along with hours

Edited by CitizenErased, 15 April 2006 - 08:45 AM.

[Nutster]

There are several programs around that call over the internet or the company intranet to a time server to get the current time. I like Automachron, but there are plenty of others. Ask your administrator to install one of these small guys.

Edited by Nutster, 21 April 2006 - 03:52 PM.

[CitizenErased]

well im sure the administrator could just change the system clock, i was just trying to avoid contacting them as it usually takes about a month to get anything accomplished

[Lapo]

well im sure the administrator could just change the system clock, i was just trying to avoid contacting them as it usually takes about a month to get anything accomplished

Try

start run
control Timedate.cpl

[CitizenErased]

i will try that, but they also have the power schemes locked too. and with that you can change stuff but it wont let you click apply or ok, if you do a message pops up letting you know its not allowed. so im thinking it may be the same.

[Simucal]

Have you tried running the "Time" command in a cmd prompt?

That is how I manually set my system time.. and it might not be blocked on your system?

[CitizenErased]

that just might work, i think its gonna

[Simucal]

Alright, let us know

[Lapo]

i will try that, but they also have the power schemes locked too. and with that you can change stuff but it wont let you click apply or ok, if you do a message pops up letting you know its not allowed. so im thinking it may be the same.

Have you privileges to use an external program ?

edit : Uhhhh sorry :

>>>>>>>>>> no internet access on the operator computer







ClockWise
http://www.rjsoftware.com (shareware)

Options >>functions>>set date time>>> via internet
protocol = SNTP
Time server = tick.usno.navy.mil
clicca su >>> Set Clock


Atomic Clock Sync (free)
http://snipurl.com/palr

edit:
added time.vbs

Attached Files

•  time.zip   1.97K   63 downloads

Edited by Lapo, 17 April 2006 - 02:25 AM.

[CitizenErased]

no luck

still get the same "operator cannot change the system time"

maybe i could run a program that would display the system time... plus 32 (or whatever)

Edited by CitizenErased, 18 April 2006 - 06:06 AM.

[Valuater]

no luck

still get the same "operator cannot change the system time"

maybe i could run a program that would display the system time... plus 32 (or whatever)

maybe

Plain Text        expandcollapse  popup

HotKeySet( "{ESC}", "Close")

Global $time_adjust = 32; set the time adjustment in minutes

Global $sec = @SEC, $minute, $hour, $light, $time, $clocklabel
GUICreate("*PCT Watch*", 200, 50, (@DesktopWidth - 188) / 2, (@DesktopHeight - 59) / 2)
$clocklabel = GUICtrlCreateLabel("Loading...", 5, 5, 190, 40, 0x1000)
GUICtrlSetFont($clocklabel, 24)
GUISetState()
While 1
    $msg = GUIGetMsg()
    If $msg = -3 Then
        ExitLoop
    ElseIf $sec <> @SEC Then
        GUICtrlSetData($clocklabel, TimeSet())
    EndIf
WEnd
Exit
Func Close()
    Exit
EndFunc;==>Close
Func TimeSet()
    $minute = @MIN + $time_adjust
    $hour = @HOUR
    If $minute >= 60 Then
        $minute = $minute - 60
        $hour = $hour + 1
    EndIf
    $light = " AM"
    $sec = @SEC
    If $hour = 0 Then
        $hour = 12
    ElseIf $hour = 12 Then
        $light = " PM"
    ElseIf $hour > 12 Then
        $hour = $hour - 12
        $light = " PM"
    EndIf
    $time = $hour & ":" & $minute & ":" & $sec & $light
    Return $time
EndFunc;==>TimeSet

8)

[Simucal]

Alright.. I wrote this up for you real quick.. I actually think it is a pretty neat solution.


When you said your time was off by 43 minutes.. I assumed it was 43 minutes slow, but this would be easy to change from the script I have here.

What this does is when your mouse moves ANYWHERE on your taskbar, a "tooltip" will be by your mouse with the readjusted time.

Plain Text        expandcollapse  popup

Global $Hour, $Min, $State

While 1
    $coord = MouseGetPos()
    If $coord[1] > (@DesktopHeight - 50) Then
        CalcAdjustedTime()
        ToolTip("Clock: " & $Hour & ":" & $Min & " " & $State) 
    Else
        ToolTip("") 
    EndIf
    Sleep(10)
WEnd
Exit

Func CalcAdjustedTime()
    If @MIN + 43 > 60 Then
        $Hour = @HOUR + 1
        $Min = (@MIN + 43)-60
    Else
        $Hour = @HOUR
        $Min = (@MIN + 43)
    EndIf
    If $Hour > 12 Then
        $Hour = $Hour - 12
        $State = "PM"
    Else
        $State = "AM"
    EndIf
EndFunc

[Simucal]

Ahh, val is too fast for me

Try them both out.

Edited by Simucal, 18 April 2006 - 07:19 AM.

[CitizenErased]

you guys kick ass, but i not exactly sure how much its off, so since im a noob how would i adjust your script to make it right. like what numbers exactly.

damn you guys really kick ass

[Simucal]

Ok, I shamelessly ripped Val's TimeSet func to replace CalcTime.. his was better.

How about this (Should overlay your clock time exactly):

Plain Text        expandcollapse  popup

HotKeySet( "{ESC}", "Close")

Global $time_adjust = 39,$sec, $min, $hour, $light, $time

While 1
        Timeset()
        ToolTip($time, (@DesktopWidth-56),(@DesktopHeight-22)) 
    Sleep(10)
WEnd
Exit

Func TimeSet()
    $min = @MIN + $time_adjust
    $hour = @HOUR
    If $min >= 60 Then
        $min = $min - 60
        $hour = $hour + 1
    EndIf
    $light = " AM"
    If $hour = 0 Then
        $hour = 12
    ElseIf $hour = 12 Then
        $light = " PM"
    ElseIf $hour > 12 Then
        $hour = $hour - 12
        $light = " PM"
    EndIf
    If $min < 10 Then
        $time = $hour & ":" & "0" & $min & $light
        Else
    $time = $hour & ":" & $min & $light
    EndIf
    Return $time
EndFunc;==>TimeSet

Func Close()
    Exit
EndFunc

You adjust how much it is off by changing the value: $time_adjust

So if you wanted it to be ahead 32 minutes, the make the line read:
Global $time_adjust = 32,$sec, $min, $hour, $light, $time

Edited by Simucal, 18 April 2006 - 07:37 AM.

[CitizenErased]

so it adjusts by minutes? and the clock is slow by the way, i think you have to add 32 minutes to make it right. i had an equation on a post-it. lol

once again, thank you... now to track down a usbdrive

edit: wow, i just tried it on my computer and its beautiful. i am in awe at your speedy script writing talents

Edited by CitizenErased, 18 April 2006 - 07:44 AM.

[Simucal]

Yea, it adjusts by minutes, just set the Global line to:

Global $time_adjust = 32,$sec, $min, $hour, $light, $time

What style did you end up going with?

Edited by Simucal, 25 April 2006 - 05:52 PM.

[CitizenErased]

i really like the overlay script but that tooltip is so creative. hmmm choices...
i think i have access to the registry, so hopefully i can make this autorun each day at startup

edit: ok well today i'll find out the exact time its off, come back and adjust the code accordingly, and then compile it to an .exe and try it out tomorrow.

Edited by CitizenErased, 18 April 2006 - 08:23 PM.