설치 / 사용기

기 타 Copilot 이용하여 시간동기화 프로램 만들기(Autoit)

2024.08.10 13:46

GreenTea 조회:190 추천:4

; NTP 서버 주소

Global $sNTPServer = "time.windows.com"

 

; NTP 서버로부터 시간을 가져오는 함수

Func _GetNTPTime($sServer)

    Local $iSocket = UDPStartup()

    Local $iUDP = UDPOpen($sServer, 123)

    Local $aNTPPacket[12] = [0x1B, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]

    Local $tNTPPacket = DllStructCreate("byte[48]")

    DllStructSetData($tNTPPacket, 1, $aNTPPacket)

    UDPSend($iUDP, DllStructGetPtr($tNTPPacket), 48)

    Local $tResponse = DllStructCreate("byte[48]")

    UDPRecv($iUDP, DllStructGetPtr($tResponse), 48)

    UDPCloseSocket($iUDP)

    UDPShutdown()

    Local $iSeconds = DllStructGetData($tResponse, 1, 43) * 256 + DllStructGetData($tResponse, 1, 44)

    $iSeconds = $iSeconds * 256 + DllStructGetData($tResponse, 1, 45)

    $iSeconds = $iSeconds * 256 + DllStructGetData($tResponse, 1, 46)

    Return $iSeconds - 2208988800

EndFunc

 

; 시스템 시간을 설정하는 함수

Func _SetSystemTime($iSeconds)

    Local $tSystemTime = DllStructCreate("ushort[8]")

    Local $iTime = _Date_Time_EncodeFileTime($iSeconds)

    DllStructSetData($tSystemTime, 1, $iTime[0])

    DllStructSetData($tSystemTime, 2, $iTime[1])

    DllStructSetData($tSystemTime, 3, $iTime[2])

    DllStructSetData($tSystemTime, 4, $iTime[3])

    DllStructSetData($tSystemTime, 5, $iTime[4])

    DllStructSetData($tSystemTime, 6, $iTime[5])

    DllStructSetData($tSystemTime, 7, $iTime[6])

    DllStructSetData($tSystemTime, 8, $iTime[7])

    DllCall("kernel32.dll", "int", "SetSystemTime", "ptr", DllStructGetPtr($tSystemTime))

EndFunc

 

; 메인 함수

Func _Main()

    Local $iNTPTime = _GetNTPTime($sNTPServer)

    _SetSystemTime($iNTPTime)

EndFunc

 

_Main()

 
코파일럿에게 오토잇으로 시간동기화 프로그램 만들어 보라고 했더니
 
잘만드네요.. 
 
미첬어요~
번호 제목 글쓴이 조회 추천 등록일
[공지] 사용기/설치기 이용안내 gooddew - - -
11282 기 타| Win11 System 10th KNM PE [38] new UMIN.J 241 55 16:53
» 기 타| Copilot 이용하여 시간동기화 프로램 만들기(Autoit) [1] new GreenTea 190 4 13:46
11280 소프트웨어| 서버에서 유용하게 쓰고 있는 시간동기화 [1] new GreenTea 187 2 12:53
11279 기 타| [배포] 251mb Internet win11 PE [48] update 딸랑쇠 1128 126 08-09
11278 기 타| WinXPE147수정버전_20240322_23H2(빌드 22635.4005) [63] update 격자 380 125 08-09
11277 소프트웨어| T.Dism 9.2 를 이용한 VHD(X) 최적화 [12] update GreenTea 968 30 08-08
11276 소프트웨어| KNM님 10th Systemboot.wim test [14] wfja88 380 23 08-08
11275 윈 도 우| VHD cleanup compact 테스트 [14] 지후빠 437 25 08-08
11274 윈 도 우| Win11-10-System pe 간단 사용기 처음해본 gif ^^ [4] 수리수리 286 20 08-08
11273 기 타| Windows 11 10-System PE_KNM님 부팅 스샷만 올려 봅니다. [26] 00go 790 44 08-07
11272 소프트웨어| COMET PE - VideoWall 수정 사용기 [16] 지후빠 546 33 08-07
11271 기 타| WinXPE147수정버전_20240322_23H2(빌드22635.3936)사용기 [63] 격자 673 124 08-06
11270 기 타| 22621.3880 xpe11 [50] update 컴아저씨훈 1050 84 08-06
11269 기 타| 오랜만에 인사드립니다. xpe151에 몇가지만 업뎃했습니다. [34] 컴아저씨훈 1169 102 08-05
11268 기 타| WinXPE147수정버전 20240322_23H2(빌드22635.3930)사용기 [45] 격자 438 91 08-05
11267 소프트웨어| (아이콘추가) Rainmeter-sInfo-2024-08-05-2 [26] 지후빠 876 55 08-05
11266 기 타| WinXPE147수정버전_20240322_23H2(빌드22631.3951)사용기 [68] 격자 571 118 08-03
11265 소프트웨어| ToolsEL Easylight 288-3C DVD PE 사용기! [19] 무월 594 41 08-03
11264 윈 도 우| 딸랑쇠 님 222mb Internet wifi PE 간단 스샷 ^^ [8] 수리수리 654 20 08-02
11263 소프트웨어| *수정* Disk Info - diskpart 이용 배치파일 [30] 지후빠 1166 57 08-01
XE1.11.6 Layout1.4.8