Приветствую и прошу помощи.
Скрипт ниже - таймер, висит в трее и считает время, иногда начало отсчета мне нужно сбросить на 0, для этого есть пункт в меню.
Прошедшее от начала отсчета время выводится в ToolTip рядом с треем на панели задач.
Метка начала отсчета возвращенная TimerInit пишется не в переменную, а в файл, потому что она мне нужна и после перезагрузки компа.
Скрипт работает так как мне нужно пока включен комп, а после перезагрузки неправильно. И я кажется понял причину: TimerInit пишет метку времени от начала работы компа, а не от системного времени.
Помогите разобраться как сделать так, чтобы метка начала отсчета таймера в файле не зависела от перезагрузки компа.
Возможно TimerInit вообще не подходит для моих целей, тогда что?
PS. Я автоит только начал изучать, это один из первых скриптов, навыков программирования не имею.
Скрипт ниже - таймер, висит в трее и считает время, иногда начало отсчета мне нужно сбросить на 0, для этого есть пункт в меню.
Прошедшее от начала отсчета время выводится в ToolTip рядом с треем на панели задач.
Метка начала отсчета возвращенная TimerInit пишется не в переменную, а в файл, потому что она мне нужна и после перезагрузки компа.
Скрипт работает так как мне нужно пока включен комп, а после перезагрузки неправильно. И я кажется понял причину: TimerInit пишет метку времени от начала работы компа, а не от системного времени.
Помогите разобраться как сделать так, чтобы метка начала отсчета таймера в файле не зависела от перезагрузки компа.
Возможно TimerInit вообще не подходит для моих целей, тогда что?
PS. Я автоит только начал изучать, это один из первых скриптов, навыков программирования не имею.
Код:
#RequireAdmin
#include <Constants.au3>
#include <Date.au3>
Global $time, $h, $m, $s, $file
Opt('TrayAutoPause', 0)
Opt('TrayOnEventMode', 1)
Opt('TrayMenuMode', 2)
TraySetIcon('shell32.dll', -266)
TrayCreateItem('Reset')
TrayItemSetOnEvent(-1, 'reset')
While 1
$file=FileOpen(@ScriptDir &'\t', 0)
$time=FileRead($file)
FileClose($file)
_TicksToTime(Int(TimerDiff($time)), $h, $m, $s)
ToolTip(StringFormat('%02i:%02i', $h, $m), 1400, 1026)
Sleep(60000)
WEnd
Func reset()
$file=FileOpen(@ScriptDir &'\t', 2)
FileWrite($file, TimerInit())
FileClose($file)
EndFunc