#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=..\Old Version UI\PokeUI Source\Hektakun-Pokemon-150-Mewtwo.ico
#AutoIt3Wrapper_Res_Description=Pokemon Go Map Hack
#AutoIt3Wrapper_Res_Fileversion=3.0.1.0
#AutoIt3Wrapper_Res_LegalCopyright=DiGiTy
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
If FileExists(@TempDir & "\pokemon_login.ini") Then
Else
	FileWrite(@TempDir & "\pokemon_login.ini", "Username" & @CRLF & "Password")
EndIf

$userlogin = FileReadLine(@TempDir & "\pokemon_login.ini", 1)
$userpass = FileReadLine(@TempDir & "\pokemon_login.ini", 2)

If Not FileExists(@TempDir & "\pokemon_settings.ini") Then
	$Pfad = InputBox("source", "Specify the source folder of the Pokemon Go Map Hack. Write down the Path.")
	$Python = InputBox("python", "Write down the Path of your python.exe")
	FileWrite(@TempDir & "\pokemon_settings.ini", $Pfad & @CRLF & $Python)
EndIf

#Region ### START Koda GUI section ### Form=C:\Users\DiGiTy\Desktop\pokemap.kxf
$Form1 = GUICreate("PokeMap v3.0.1", 596, 103, 192, 124)
$Input1 = GUICtrlCreateInput($userlogin, 8, 8, 241, 21)
$Input2 = GUICtrlCreateInput($userpass, 264, 8, 241, 21, $ES_PASSWORD)
$Input3 = GUICtrlCreateInput("Latitude", 8, 40, 241, 21)
$Input4 = GUICtrlCreateInput("Longitude", 264, 40, 241, 21)
$Checkbox1 = GUICtrlCreateCheckbox("save login", 520, 8, 97, 17)
$Button1 = GUICtrlCreateButton("Start", 8, 72, 65, 25)
$Button2 = GUICtrlCreateButton("Stop", 96, 72, 65, 25)
$Button3 = GUICtrlCreateButton("Reset", 184, 72, 65, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			$zahl = 0
			While $zahl < 100
				ProcessClose("cmd.exe")
				ProcessClose("python.exe")
				$zahl = $zahl + 1
			WEnd
			FileDelete(@TempDir & "\mapper.bat")
			Exit
		Case $Checkbox1
			If GUICtrlRead($CheckBox1) = $GUI_CHECKED Then
				$usersafe = GUICtrlRead($Input1)
				$passsafe = GUICtrlRead($Input2)
				FileDelete(@TempDir & "\pokemon_login.ini")
				FileWrite(@TempDir & "\pokemon_login.ini", $usersafe & @CRLF & $passsafe)
			Else
				FileDelete(@TempDir & "\pokemon_login.ini")
				FileWrite(@TempDir & "\pokemon_login.ini", "Username" & @CRLF & "Password")
			EndIf
		Case $Button1
			$usern = GUICtrlRead($Input1)
			$passw = GUICtrlRead($Input2)
			$lat = GUICtrlRead($Input3)
			$lon = GUICtrlRead($Input4)
			$pghsource = FileReadLine(@TempDir & "\pokemon_settings.ini", 1)
			$pythonsource = FileReadLine(@TempDir & "\pokemon_settings.ini", 2)
			$gmail = StringInStr($usern, "gmail.com")

			If $gmail = 0 Then
				$command1 = "cd " & $pghsource
				$command2 = $pythonsource & " example.py -a ptc -u " & $usern & " -p " & $passw & " -l " & '"' & $lat & ", " & $lon & '"' & " -st 10"
			Else
				$command1 = "cd " & $pghsource
				$command2 = $pythonsource & " example.py -a google -u " & $usern & " -p " & $passw & " -l " & '"' & $lat & ", " & $lon & '"' & " -st 10"
			EndIf

			$zahl = 0
			While $zahl < 100
				ProcessClose("cmd.exe")
				ProcessClose("python.exe")
				$zahl = $zahl + 1
			WEnd

			FileDelete(@TempDir & "\mapper.bat")
			FileWrite(@TempDir & "\mapper.bat", $command1 & @CRLF & $command2)
			ShellExecute(@TempDir & "\mapper.bat", "", "", "open", @sw_hide)

		Case $Button2
			$zahl = 0
			While $zahl < 100
				ProcessClose("cmd.exe")
				ProcessClose("python.exe")
				$zahl = $zahl + 1
			WEnd

		Case $Button3
			FileDelete(@TempDir & "\pokemon_settings.ini")
			FileDelete(@TempDir & "\pokemon_login.ini")
			FileDelete(@TempDir & "\mapper.bat")
			$zahl = 0
			While $zahl < 100
				ProcessClose("cmd.exe")
				ProcessClose("python.exe")
				$zahl = $zahl + 1
			WEnd
			MsgBox(0, "Reset", "PokeMap was reset. The Programm will now shut down. Please restart PokeMap.exe")
			ProcessClose("PokeMap.exe")
	EndSwitch
WEnd