gt5autobspec.ahk

SetTimer, Raceprogressrefresh, 1000
loop, 6
	Dracecount%A_index% = 0
Racecount = 0
Lastrace = 0
ChangeOil = 0
Oilfrequency = 7
Racestooilchange = 7
Racelength = 0
Currentdriver = Driver N/A
Currentstatus = Waiting
Racestatus = Waiting
Rlengthminute = 30

win1 = Nokia-N900:0.0

DetectHiddenWindows on
SetControlDelay -1
Gui, Font, S10 CDefault, Verdana
Gui, Add, Text, x10 y10 w190 h20 vCstat, Status %Cstat%
Gui, Add, Text, x10 y40 w190 h20 vRstat, Race Status %Rstat%
Gui, Add, Text, x10 y70 w190 h20 vCdriver, Current Driver %Cdriver%
Gui, Add, Text, x10 y100 w120 h20 , Race Length:
Gui, Add, Edit, x10 y125 w40 h20 vRlengthminute
Gui, Add, Text, x55 y125 w80 h20 , Minutes
Gui, Add, GroupBox, x10 y160 w165 h150 , Select Drivers - Count
Gui, Add, CheckBox, x20 y185 w75 h20 vDriver1, Driver 1
Gui, Add, Text, x120 y185 w50 h20 vDRcount1, %Dracecount1%
Gui, Add, CheckBox, x20 y205 w75 h20 vDriver2, Driver 2
Gui, Add, Text, x120 y205 w50 h20 vDRcount2, %Dracecount2%
Gui, Add, CheckBox, x20 y225 w75 h20 vDriver3, Driver 3
Gui, Add, Text, x120 y225 w50 h20 vDRcount3, %Dracecount3%
Gui, Add, CheckBox, x20 y245 w75 h20 vDriver4, Driver 4
Gui, Add, Text, x120 y245 w50 h20 vDRcount4, %Dracecount4%
Gui, Add, CheckBox, x20 y265 w75 h20 vDriver5, Driver 5
Gui, Add, Text, x120 y265 w50 h20 vDRcount5, %Dracecount5%
Gui, Add, CheckBox, x20 y285 w75 h20 vDriver6, Driver 6
Gui, Add, Text, x120 y285 w50 h20 vDRcount6, %Dracecount6%
Gui, Add, Button, x30 y320 w156 h30 vSavesettings, Save
Gui, Add, Text, x10 y360 w100 h20 , Race Count:
Gui, Add, Text, x115 y360 w50 h20 vRcount, %Racecount%
Gui, Add, Text, x10 y385 w100 h20 , Time left:
Gui, Add, Text, x112 y385 w45 h20 vRtimeleft, %Racetimeleft%
Gui, Add, Progress, x10 y415 w196 h20 vRprogress, 0
Gui, Add, Button, x10 y450 w86 h30 vStartR, Start
Gui, Add, Button, x106 y450 w100 h30 vLastR, Last Race
Gui, Font, S7 CDefault, Verdana
Gui, Font, underline
Gui, Add, Text, x30 y485 w156 h20 cBlue gLaunchUN, By Steve of Uselessninjas.com
Gui, Show, h506 w216, GT5 Auto B-Spec
return

GuiClose:
	ExitApp

LaunchUN:
	Run www.uselessninjas.com
	return

Raceloop: 
	loop
	{
		;driver 1
		if Driver1 > 0
			RaceDriver(1)
		if Driver2 > 0
			RaceDriver(2)
		;driver 3
		if Driver3 > 0
			RaceDriver(3)
		;driver 4
		if Driver4 > 0
			RaceDriver(4)
		;driver 5
		if Driver5 > 0
			RaceDriver(5)
		;driver 6
		if Driver6 > 0
			RaceDriver(6)
		;Change oil
		if (Changeoil = 1 Racestooilchange = 0 lastrace = 0)
		{
			gosub ps3circle ; o ; exit event
			sleep 2000
			gosub ps3circle ; o ; exit series
			sleep 2000
			gosub ps3circle ; o ; select return to home
			sleep 1000
			gosub ps3cross ; x ; go home
			sleep 10000
			gosub ps3down ; d ; down
			sleep 2000
			gosub ps3down ; d ; down
			sleep 2000
			gosub ps3left ; l ; left
			sleep 2000
			gosub ps3cross ; x ;select gt auto
			sleep 10000
			gosub ps3right ; r ;
			sleep 2000
			gosub ps3cross ; x
			sleep 5000
			gosub ps3cross ; x ;start oil change
			sleep 23000
			gosub ps3cross ; x ;leave
			sleep 5000
			gosub ps3circle ; o ; leave
			sleep 2000
			gosub ps3cross ; x ;leave
			Racestooilchange = %Oilfrequency%
			sleep 17000
			;return to event
			gosub ps3up ; u ;up
			sleep 2000
			gosub ps3up ; u ;up
			sleep 2000
			gosub ps3cross ; x
			sleep 5000
			gosub ps3up ; u ;up
			sleep 2000
			gosub ps3up ; u ;up
			sleep 2000
			gosub ps3cross ; x
			sleep 6000
			gosub ps3right ; r ;
			sleep 2000
			gosub ps3down ; d ; down
			sleep 2000
			gosub ps3down ; d ; down
			sleep 2000
			gosub ps3cross ; x ; select event
			sleep 5000
		}
                   	
	 
		}
	return

RaceDriver(drivernum)	
{
	global
	if Lastrace = 1
	{
		GuiControl, Enable, StartR
		GuiControl,, StartR, Start
		GuiControl, Enable, Savesettings
		GuiControl,, Savesettings, Save		
		return
	}
	GuiControl,, Cdriver, Driver: %drivernum%
	GuiControl,, Rstat, Starting
	gosub ps3cross ; x ; 
	GuiControl,, Cstat, Confirming race
	GuiControl,, Cstat, Starting Driver %drivernum%
	sleep 3000
	loop, % drivernum -1
	{
                   GuiControl,, Cstat, Moving right
		gosub ps3right ; r ; select next driver
		sleep 2000
	}
	GuiControl,, Cstat, Confirming driver
	gosub ps3cross ; x ;confirm driver selection
	sleep 2000
	gosub ps3cross ; x ;
	GuiControl,, Cstat, Loading Race			
	sleep 45000 ; loads race
	gosub ps3cross ; x ; 
	GuiControl,, Cstat, Racing
	currentrace = % Racecount + 1
	GuiControl,, Rstat,  In Race: %currentrace%
	GuiControl,, Rstat,  In Race: %currentrace%
	Rstarttime = %A_TickCount%
	sleep % Rlengthminute * 60000 ; race time
	Racetimeleftmin = 0
	GuiControl,, Rtimeleft, %Racetimeleftmin%
	GuiControl,, Rstat, Finished
	Rstarttime = 0
	gosub ps3circle ; wake up
	GuiControl,, Cstat, Waking up
	sleep 5000
	gosub ps3cross ; x ; acknoledge money
	GuiControl,, Cstat, Confirming Cash
    sleep 5000
    gosub ps3cross ; x ; acknoledge XP
	GuiControl,, Cstat, Confirming XP
    sleep 10000
    gosub ps3circle ; o ; exit driver xp
	GuiControl,, Cstat, Moving to  exit
    sleep 5000
	gosub ps3circle ; o ; exit driver xp
	GuiControl,, Cstat, Moving to  exit
    sleep 5000
    gosub ps3cross ; x ; acknoledge driver xp
	GuiControl,, Cstat,  Confirming exit
    sleep 5000
    gosub ps3circle ; o ; uh?
    sleep 2000
	gosub ps3circle ; o ; uh? 2
    sleep 2000
    gosub ps3cross ; x ; exit
	GuiControl,, Cstat, 
    Racecount += 1
	GuiControl,, Rcount, %Racecount%
    Racetogo -= 1
	Dracecount%drivernum% += 1
	GuiControl,, DRcount%drivernum%, % Dracecount%drivernum%
	GuiControl,, Cstat, Sleeping
    sleep 20000
}

ConvertMSToMinSec(ms)
{
	return floor(ms / 1000 / 60) "m " . round(mod(ms / 1000, 60)) "s"
}

ButtonSave:
	GuiControl,, Cstat, Settings saved
	Gui, Submit, NoHide
	Rsettingssaved = 1
	Rlength = % Racelenthminute * 60000
	GuiControl,, Savesettings, Saved
	GuiControl, Disable, Savesettings
	return

ButtonStart:
	if Rlengthminute < 2 
	{
		MsgBox Please input a Race time greater than 3!
		return
	}
	else
	if Rsettingssaved = 0
	{
		MsgBox Please Save settings!
		return
	}
	else
	{
		Lastrace = 0
		GuiControl,, Cstat, Starting Raceloop  
		GuiControl, +range0-%pmax%, Rprogress
		GuiControl,, StartR, Started
		GuiControl, Disable, StartR, 
		GuiControl,, LastR, Last Race
		GuiControl, Enable, LastR
		sleep 2000
		gosub Raceloop
	}
	return

ButtonLastRace:
	Lastrace = 1
	GuiControl,, LastR, Last Race
	GuiControl, Disable, LastR
	return

Raceprogressrefresh:
	Rlength = % Rlengthminute * 60000
	Racetimeleftmin = % (Rlength - (A_TickCount - Rstarttime)) /60000
	pmax = % Rlengthminute * 100
	GuiControl,, Rprogress, % (A_TickCount - Rstarttime) /600
	return

GuiControl,, Rstat,  In Race: %currentrace%
	Rstarttime = %A_TickCount%
	sleep % Rlengthminute * 60000 ; race time
	Racetimeleftmin = 0
	GuiControl,, Rtimeleft, %Racetimeleftmin%
	GuiControl,, Rstat, Finished
	Rstarttime = 0
	gosub ps3circle ; wake up
	GuiControl,, Cstat, Waking up
	sleep 5000

ps3cross: 
	ControlClick, x607 y389, %win1%,,,
	return
ps3circle: 
	ControlClick, x725 y269, %win1%,,,
	return
ps3triangle: 
	ControlClick, x600 y160, %win1%,,,
	return
ps3square: 
	ControlClick, x500 y275, %win1%,,,
	return
ps3up: 
	ControlClick, x210 y139, %win1%,,,
	return
ps3right: 
	ControlClick, x341 y275, %win1%,,,
	return
ps3down: 
	ControlClick, x208 y400, %win1%,,,
	return
ps3left: 
	ControlClick, x85 y266, %win1%,,,
	return
ps3menu: 
	ControlClick, x408 y379, %win1%,,,
	return