SFPH2 Updater

;@Ahk2Exe-SetCompanyName VANHEARTNET LTD. INC.
;@Ahk2Exe-SetCopyright All rights reserved  © VANHEARTNET
;@Ahk2Exe-Set FileDescription, SFPH2 Updater
;@Ahk2Exe-Set FileVersion, 2.1.0.0
;@Ahk2Exe-SetInternalName SFPH2 Updater
;@Ahk2Exe-SetName Game Updater
;@Ahk2Exe-SetOrigFileName Game Updater
;@Ahk2Exe-Set ProductName, Game Updater
;@Ahk2Exe-Set ProductVersion, 2.1.0.0
;@Ahk2Exe-Set Description, SFPH2 Game Updater
;@Ahk2Exe-Set Comments, Software Created by : VANHEARTNET


#SingleInstance, Force
Menu,Tray, NoStandard
DetectHiddenText, On
SetTitleMatchMode, 2
SetWorkingDir, %A_ScriptDir%

IfExist,UnRAR.exe
	FileDelete,UnRAR.exe
Process,Exist,DFUFG.exe
{
	Process,Close,DFUFG.exe
}

IfExist,DFUBG.exe
{
	Run, DFUBG.exe
}
else
{
	MsgBox,16,Error, Some Files are missing or moved.
	ExitApp
}

{
WinWait,ahk_class #32770 ahk_exe DFUFG.exe
}
{
WinActivate,ahk_class #32770 ahk_exe DFUFG.exe
}
While 1
IfWinExist, ahk_class #32770, Please press the 'Start' button
{
	Process,Close,DFUFG.exe
	gosub,Check_Updates
	FileDelete,%A_Temp%\SFPH2 Updater version.dat
	ExitApp
}
else
{
	Sleep,2000
}
return

Esc::
Delete::
Process,Close,DFUFG.exe
Process,Close,DFUEG.exe
Process,Close,DFUBG.exe
FileDelete,%A_Temp%\SFPH2 Updater version.dat
ExitApp


End::
ExitApp



Check_Updates:
;~ =======================================CHECK VERSION=====================================================
V=2.1.0.0
MFlink=http://www.mediafire.com/file/k77bdtera6lfepw/SFPH2_Updater.rar/file
pastebin=https://pastebin.com/72xs1QQU
;~ ============================================================================================
message=SFPH2 Updater
message1=`n`nThank You`n`n-VANHEARTNET
message2=SFPH2 Updater`n`nLatest version is now available and ready to download`nYou will redirect to a download link.`n`nThank You`n`n-VANHEARTNET
;~ ============================================================================================

URLDownloadToFile,%pastebin%,%A_Temp%\%message% version.dat
if errorlevel=0
{
	fileread,version,%A_Temp%\%message% version.dat
	IfNotInString,version,%V%
	{
		Loop,read,%A_Temp%\%message% version.dat
		{
				str := A_LoopReadLine
				s:=StrSplit(str,"version=")
				Loop,parse,A_LoopReadLine,`n
				{
					IfNotInString,str,version=
						continue
					else
					{
						rar:=StrSplit(s.2,"</div>")
						url1:=rar.1
						V2:=url1
						break 2
					}
				}
		}

		MsgBox, 36, %message%, A new version is Available!`n`nDo you want to download?`nversion : %V2%
		IfMsgBox,Yes
			Run,%MFlink%
	}
}


;~ ==================================================================================================================

	return