obnova:
Version := 1.1
{
Http := ComObjCreate("WinHttp.WinHttpRequest.5.1"), Http.Option(6) := 0
Http.Open("GET", "dudunka/12(https://github.com/dudunka/12/blob/master/README.md)")
Http.Send(), Text := Http.ResponseText
New := RegExReplace(Text, "i).*?Version\s*(\d+)\s*", "$1")
If (New < Version)
goto obnovinet
Return
MsgBox, % 4+32+256, CheckUpdate AutoMedic for Arizona RP, Есть новая версия, обновить скрипт??
IfMsgBox, No
Return
Run, Dima Prokipets(https://vk.com/dima232_pro)
ExitApp
}
return
obnovinet:
MsgBox,0, AHK By Alex for Arizona RP, Обновлений нет!`nНа данный момент версия %Version% актуальна.`nПриятной игры :)
return
Svernyt:
TrayTip, AHK by Alex Agesilay, Вы успешно свернули скрипт! :)
gui minimize
goto obnova
return