#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Version=beta
#AutoIt3Wrapper_icon=A.ico
#AutoIt3Wrapper_outfile=Current DML Rev v1.0.exe
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_Res_Comment=Current DML Rev
#AutoIt3Wrapper_Res_Description=Current DML Rev
#AutoIt3Wrapper_Res_Fileversion=1.0.0.0
#AutoIt3Wrapper_Res_ProductVersion=1.0.0.0
#AutoIt3Wrapper_Res_LegalCopyright=Copyright © 2009 - © 2012 Spayrosam (Samir.L)
#AutoIt3Wrapper_Res_Field=CompanyName|Spayrosam
#AutoIt3Wrapper_Res_Field=ProductName|Current DML Rev
#AutoIt3Wrapper_Res_Field=ProductVersion|1.0.0.0
#AutoIt3Wrapper_Res_Field=Current DML Rev|1.0.0.0
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
MsgBox(0, "Current DML Rev", _CurrentDMLRevURL())
Func _CurrentDMLRevURL()
FileDelete(@TempDir & "\SHA1ChecksumURL")
FileDelete(@TempDir & "\CurrentDMLRevURL") ;Clean
Local $hDownload = InetGet("http://code.google.com/p/dios-mios-lite-source-project/downloads/list?can=1&q=&colspec=Filename", @TempDir & "\CurrentDMLRevURL", 1, 1) ;Download Header
Do
Sleep(250)
Until InetGetInfo($hDownload, 2)
InetClose($hDownload)
$GetCurrentDMLRevURL = FileRead(@TempDir & "\CurrentDMLRevURL")
FileClose($GetCurrentDMLRevURL)
FileDelete(@TempDir & "\CurrentDMLRevURL") ;Clean
$StringCurrentDMLRevURL = _splitInfo($GetCurrentDMLRevURL, 'dios\-mios\-lite\-source\-project\.googlecode\.com\/files\/DMLr(\d\d)\.elf', 1)
$URLCurrentDMLRevURL = "http://dios-mios-lite-source-project.googlecode.com/files/DMLr" & $StringCurrentDMLRevURL & ".elf"
$URLCurrentDMLRevURLCheat = "http://dios-mios-lite-source-project.googlecode.com/files/DMLr" & $StringCurrentDMLRevURL & ".elf"
$URLCurrentDMLRevURL_nmm_nodisc = "http://dios-mios-lite-source-project.googlecode.com/files/DMLr" & $StringCurrentDMLRevURL & "_nmm_nodisc.elf"
$URLCurrentDMLRevURL_nodisc = "http://dios-mios-lite-source-project.googlecode.com/files/DMLr" & $StringCurrentDMLRevURL & "_nodisc.elf"
$URLCurrentDMLRevURL_nmm = "http://dios-mios-lite-source-project.googlecode.com/files/DMLr" & $StringCurrentDMLRevURL & "_nmm.elf"
$StringSHA1Checksum_nmm_nodisc = _Get_SHA1Checksum("http://code.google.com/p/dios-mios-lite-source-project/downloads/detail?name=DMLr" & $StringCurrentDMLRevURL & "_nmm_nodisc.elf")
$StringSHA1Checksum_nodisc = _Get_SHA1Checksum("http://code.google.com/p/dios-mios-lite-source-project/downloads/detail?name=DMLr" & $StringCurrentDMLRevURL & "_nodisc.elf")
$StringSHA1Checksum_nmm = _Get_SHA1Checksum("http://code.google.com/p/dios-mios-lite-source-project/downloads/detail?name=DMLr" & $StringCurrentDMLRevURL & "_nmm.elf")
$StringSHA1Checksum = _Get_SHA1Checksum("http://code.google.com/p/dios-mios-lite-source-project/downloads/detail?name=DMLr" & $StringCurrentDMLRevURL & ".elf")
Return (@CRLF & _
"+ DMLr" & $StringCurrentDMLRevURL & "_nmm_nodisc.elf : " & $URLCurrentDMLRevURL_nmm_nodisc & @CRLF & _
"SHA1 Checksum: " & $StringSHA1Checksum_nmm_nodisc & @CRLF & @CRLF & _
"+ DMLr" & $StringCurrentDMLRevURL & "_nodisc.elf : " & $URLCurrentDMLRevURL_nodisc & @CRLF & _
"SHA1 Checksum: " & $StringSHA1Checksum_nodisc & @CRLF & @CRLF & _
"+ DMLr" & $StringCurrentDMLRevURL & "_nmm.elf : " & $URLCurrentDMLRevURL_nmm & @CRLF & _
"SHA1 Checksum: " & $StringSHA1Checksum_nmm & @CRLF & @CRLF & _
"+ DMLr" & $StringCurrentDMLRevURL & ".elf : " & $URLCurrentDMLRevURLCheat & @CRLF & _
"SHA1 Checksum: " & $StringSHA1Checksum & @CRLF)
EndFunc ;==>_CurrentDMLRevURL
Func _Get_SHA1Checksum($_Get_SHA1ChecksumURL)
Local $StringSHA1Checksum = ""
FileDelete(@TempDir & "\SHA1ChecksumURL")
Local $hDownload = InetGet($_Get_SHA1ChecksumURL, @TempDir & "\SHA1ChecksumURL", 1, 1) ;Download Header
Do
Sleep(250)
Until InetGetInfo($hDownload, 2)
InetClose($hDownload)
$GetSHA1ChecksumURL = FileRead(@TempDir & "\SHA1ChecksumURL")
FileClose($GetSHA1ChecksumURL)
FileDelete(@TempDir & "\SHA1ChecksumURL") ;Clean
$StringSHA1ChecksumURL = _splitInfo($GetSHA1ChecksumURL, "SHA1 Checksum\: ([^*]*?)What\'s this\?", 1)
$StringSHA1Checksum = _splitInfo($StringSHA1ChecksumURL, "\> ([^*]*?) \