;Script made by Demonblood
;Date made: 10-10-2014
;Modified and fixed by Sahilu 21/10/2014



#Include, LibreriaGP.ahk
;#Include lib/functions.ahk

MsgBox, 64, Lucky Egg Hunter, Welcome to Lucky Egg Hunter by Demonblood and Sahilu`n`nPress continue to start

;-----VARIABLE INITATION
bot_status=-1 ;CHECKS IF WALKING RIGHT OR LEFT
bot_step=0	;RECORDS THE CURRENT STEP OF THE BOT
bot_loop=3
time_minutes=0
time_seconds=0
gui_status:="Waiting 5 seconds" ;Current status
gui_count=0
var_pause_r=0
var_pause_l=0
pause_r=0
pause_l=0
fight_opt=0 ;Should the bot fight, run, or catch

;-----------------------------------
pokebot_init()

;-------------------------------START OF USER INTERFACE INITATION

;-----BASIC INITIATION
#Singleinstance, Force
Gui, Font, c000000  s18 Q5 , Century Gothic
Gui +LastFound +AlwaysOnTop +ToolWindow

;-----ADD IMAGES
Gui, Add, Picture, x0 y0 w160 h200 vGUI_BG, lib/carn_images/gui_bg.png
Gui, Add, Picture, x150 y2 w8 h8 gEXIT BackgroundTrans, lib/carn_images/button_x.png

;-----HANDLES TEXT
Gui, Add, Text, x46 y42 BackgroundTrans vT1, 00:00
Gui, Add, Text, x0 y140 w80 +Center BackgroundTrans vgui_battles, %gui_count%
Gui, Add, Text, x112 y140 BackgroundTrans vgui_step , %pause_r%
Gui, Font, c000000  s8 Q5 , Century Gothic
Gui, Add, Text, x0 y183 w160 +Center BackgroundTrans gMOVE, Lucky Egg Hunter
Gui, Font, c000000  s12 Q5 , Century Gothic
Gui, Add, Text, x10 y96 w140 +Center BackgroundTrans vgui_status, Initiating
Gui, Font, c48bcf8  s9 Q5 , Century Gothic
Gui, Add, Text, x40 y6 BackgroundTrans  gMOVE, Demonblood

;-----HANDLE WINDOWS
WinSet, TransColor, EEAA99
Gui -Caption
Gui, Show, w160 h200 x0 y0, Lucky Egg Hunter

;-----BEGINS SEQUENCE
gosub GUIBATTLESUPDATE
gosub GUISTATUSUPDATE
gosub UPDATE
SetTimer, UPDATE, 1000
SetTimer, GUISTATUSUPDATE, 250
SetTimer, GUIBATTLESUPDATE, 2500
SetTimer, GUISTEPUPDATE, 300

;-------------------------------END OF USER INTERFACE INITATIONgui_status:="STARTING in 5 Sec"
Sleep 5000
gui_status:="Waiting 5sec"
gosub ENABLEREPEL
return

ENABLEREPEL:
gui_status:="Toggeling Repel!"
{
repel()
sleep 100
}
sleep 300
gosub WALK
return


WALK:
gui_status:="Entering Safari!"
{
walk_up_fast(1)
Loop, 9
{
sleep 2000
send_yes()
}
sleep 2000
}
sleep 300
gosub WALKPATCH
return

WALKPATCH:
gui_status:="Walking to Chansey's!"
{
walk_up_fast(9)
sleep 100
walk_right_fast(6)
sleep 100
walk_up_fast(2)
sleep 800
send_yes()
sleep 2000
send_yes()
sleep 2000
send_yes()
sleep 100
sleep 2000
walk_up_fast(1)
sleep 250
walk_up_fast(5)
sleep 250
walk_left_fast(6)
sleep 250
walk_up_fast(15)
sleep 500
}
sleep 300
gosub EABLEBIKE
return


EABLEBIKE:
gui_status:="Taking Bike!"
{
	toggle_bike()
	sleep 100
	}
sleep 300
gosub FINDCHAN
return


	FINDCHAN:
	gui_status:="Searching For Chansey's!"
	Loop{

		If detect_repel()=1{
			detect_repel()
			No()
		}

		if detect_pa_message()=1{
		detect_pa_message()
        Loop, 3 {
		Si()
		sleep 1500
	    }
		goto ENABLEREPEL
		return
		}

		walk_right_fast(6)(2)
		if detect_battle()=1
			{
				gosub FIGHTINIT
				Continue
			}


				walk_left_fast(6)(3)
				if detect_battle()=1
			{
				gosub FIGHTINIT
				Continue
			}
		}
	        return

				FIGHTINIT:

        if detect_battle()=1`
			{
		gui_status=1
		pause_r=1
		gui_status:="Entering battle..."
		sleep 1200
		if detect_safariball()=1	;VERIFY THAT THE FIGHT BUTTON HAS APPEARED
		{
			gui_status:="Fight button detected"
			gosub FIGHT
		}
		else
		{
			gosub FIGHTINIT
		}
	}
	return

	FIGHT:
{
gui_status:="Fighting"

fight_opt=0

if detect_chansey()=1
{
	throw_bait()
	fight_opt=1
}

if detect_shiny()=1
{
	throw_bait()
	fight_opt=1
}

if fight_opt=0 ;----Run Away
{
	Huir() ;GET PAST FIGHT SCREEN
	sleep 400
}

if fight_opt=1 ;---- Capture!
{
	gui_status:="Catching"
    throw_safariball()
}
}
sleep 300
gosub QUIT
Return

QUIT:

if detect_battle()=0
	{
	bot_step=%bot_step2%
	pause_r=0
	gui_count+=1 ;UPDATES BATTLE STATUS
	gui_status=1
	gui_status:="Exiting battle..."
	gosub FINDCHAN
	}
	else	;CHECK AGAIN TO SEE IF THE BATTLE IS STILL GOING
	{
		gosub FIGHT
	}
	sleep 300
	gosub WALK
return


;-------------------------------START OF USER INTERFACE CONTROL

GUISTATUSUPDATE:

GuiControl,, gui_status, %gui_status%
Return


GUIBATTLESUPDATE:
GuiControl,, gui_battles, %gui_count%
Return

GUISTEPUPDATE:
GuiControl,, gui_step, %bot_step%
Return

UPDATE:

 if (time_seconds<60)
 {
 time_seconds+=1
 }
 else
 {
 time_seconds=0
 time_minutes+=1
 }

 if time_seconds<10    ;ADD AN EXTRA ZERO WHEN NEEDED TO SECONDS DISPLAY
 {
     if time_minutes<10    ;ADD AN EXTRA ZERO WHEN NEEDED TO MINUTES DISPLAY
     {
      GuiControl,, T1, % "0" time_minutes ":0" time_seconds
     }
     else
     {
      GuiControl,, T1, % time_minutes ":0" time_seconds
     }
 }
 else
 {
     if time_minutes<10    ;ADD AN EXTRA ZERO WHEN NEEDED TO MINUTES DISPLAY
     {
      GuiControl,, T1, % "0" time_minutes ":" time_seconds
     }
     else
     {
      GuiControl,, T1, % time_minutes ":" time_seconds
     }
 }

Return

MOVE:
Gui +Caption
Gui, Show, w160 h200 x0 y0, Lucky Egg Hunter
sleep 7500
Gui -Caption
Return

Esc::
gosub EXIT
Return

GuiClose:
gosub EXIT
Return

BS::
	{
	Send {Left Up}
	Send {Right Up}
	Send {Down Up}
	Send {Up Up}
	Pause, Toggle, 1
	}
Return

EXIT:
Send {Left Up}
Send {Right Up}
Send {Down Up}
Send {Up Up}
ExitApp
Return

;-------------------------------END OF USER INTERFACE CONTROL