Что нового

Запись отметок времени с момента запуска скрипта в txt

Сообщения
34
Репутация
0
Версия AutoIt: 3.3.14.0

Описание:
Вечер добрый.
Имеется непростой вопрос.

После запуска скрипта autoit запускается таймер и в файл 1.txt в первую строку вводится отметка 00:00:00
Затем скрипт переходит в режим ожидания - каждый раз когда я нажму кнопку тильда "~" - в новую строку вводится сколько прошло времени - с момента запуска скрипта (например 00:06:34)
То есть чем больше нажатий на кнопку тильда "~" - тем больше строк в файле 1.txt.
Завершение работы скрипта - кнопка "F12"

Примечания:
 

Вложения

  • 1.txt
    0 байт · Просмотры: 1

Tempo

AutoIT Гуру
Сообщения
616
Репутация
205
Код:
#include <WinAPISys.au3>
#include <Date.au3>
_WinAPI_SetKeyboardLayout(WinGetHandle(AutoItWinGetTitle()), 0x4109)
HotKeySet("`", "_FileWriteTime")
HotKeySet("{F12}", "_Exit")
FileWrite("1.txt", "00:00:00" & @CRLF)
Global $hTimer = TimerInit()

While Sleep(10)
WEnd

Func _FileWriteTime()
	Local $iHours, $iMins, $iSecs
	_TicksToTime(TimerDiff($hTimer), $iHours, $iMins, $iSecs)
	FileWrite("1.txt", StringFormat("%02d:%02d:%02d\n", $iHours, $iMins, $iSecs))
EndFunc   ;==>_FileWriteTime

Func _Exit()
	Exit
EndFunc   ;==>_Exit
 
Автор
В
Сообщения
34
Репутация
0
Tempo, при нажатии на клавишу "~" - скрипт записывает время - в одну строку, а не на новой строке.

В результате - если три раза нажать на "~" - то получится одна длинная строка, а не три строки.
 

Tempo

AutoIT Гуру
Сообщения
616
Репутация
205
Код:
#include <WinAPISys.au3>
#include <Date.au3>
_WinAPI_SetKeyboardLayout(WinGetHandle(AutoItWinGetTitle()), 0x4109)
HotKeySet("`", "_FileWriteTime")
HotKeySet("{F12}", "_Exit")
FileWrite("1.txt", "00:00:00" & @CRLF)
Global $hTimer = TimerInit()

While Sleep(10)
WEnd

Func _FileWriteTime()
	Local $iHours, $iMins, $iSecs
	_TicksToTime(TimerDiff($hTimer), $iHours, $iMins, $iSecs)
	FileWrite("1.txt", StringFormat("%02d:%02d:%02d\r\n", $iHours, $iMins, $iSecs))
EndFunc   ;==>_FileWriteTime

Func _Exit()
	Exit
EndFunc   ;==>_Exit
 

Tempo

AutoIT Гуру
Сообщения
616
Репутация
205
Василиса Лукьянчикова, клавиша F12 зарезервирована в Windows

Код:
#include <WinAPISys.au3>
#include <Date.au3>
_WinAPI_SetKeyboardLayout(WinGetHandle(AutoItWinGetTitle()), 0x4109)
HotKeySet("`", "_FileWriteTime")
HotKeySet("{F11}", "_Exit") ;F11
FileWrite("1.txt", "00:00:00" & @CRLF)
Global $hTimer = TimerInit()

While Sleep(10)
WEnd

Func _FileWriteTime()
	Local $iHours, $iMins, $iSecs
	_TicksToTime(TimerDiff($hTimer), $iHours, $iMins, $iSecs)
	FileWrite("1.txt", StringFormat("%02d:%02d:%02d\r\n", $iHours, $iMins, $iSecs))
EndFunc   ;==>_FileWriteTime

Func _Exit()
	Exit
EndFunc   ;==>_Exit
 
Верх