initial commit

This commit is contained in:
Bartek Dobrowolski-Nowakowski
2022-04-11 12:44:39 +02:00
parent ec68b3688e
commit e0a219a727
41 changed files with 19489 additions and 0 deletions

View File

@@ -0,0 +1,69 @@
GoTo EndChampionshipMenuingDef
Menu:
;ToolTip, Menuing, 100, 100, Screen
loop {
break_point := false
c2 := BitGrab(pix2x, pix2y, box_size)
for i, c in c2
{
d2 := Distance(c, color_check2)
if (d2 < tolerance ){
break_point := true
break
}
}
if (break_point)
break
Press_X()
sleep %color_2_delay%
sleep, %bm_delay%
}
ResetControllerState()
;ToolTip, Found color 2, 100, 100, Screen
Sleep, 200
Press_O()
Sleep, 200
Press_Right()
Sleep, 500
Press_X()
Sleep, %ps_load_time1%
Press_X()
Sleep, 1000
Press_O()
loop, 2 {
Press_X()
Sleep, 500
}
Sleep, %ps_load_time2%
;Conduct Maintenance here.
CheckForOilChange := Mod(A_Index, 29)
CheckForMaintenance := Mod(A_Index, 107)
ifEqual, CheckForOilChange, 0
{
gosub, DoOilChange
}
ifEqual, CheckForMaintenance, 0
{
gosub, DoMaintenance
}
Press_Down()
;Sleep, 500
loop, %menu_loops% {
controller.Dpad.SetState(MenuDirect)
Sleep, 60
controller.Dpad.SetState("None")
Sleep, 60
}
Press_X() ; Choose Pan-American
Sleep, 100 ; load Pan-American menu
Press_X() ; push join
Sleep, 1000 ; to compensate ps_load_time3
Sleep, %ps_load_time3% ; Loadtime Pan-American
Press_X() ; Confirm race 1
Sleep, 500 ; Load race 1 menu, Start will be pushed by race script.
return
EndChampionshipMenuingDef:

View File

@@ -0,0 +1,29 @@
GoTo EndCheckTyresDef
CheckTyresOverheating:
tc := BitGrab(tyreX, tyreY, box_size)
for i, c in tc
{
td := Distance(c, color_tyre_overheat)
if (td < tolerance ){
tyres_overheating := true
break
}
}
return
RetryRace:
Gosub, PauseLoop
Sleep 500
tyres_overheating := false
controller.Buttons.Options.SetState(true)
Sleep 200
controller.Buttons.Options.SetState(false)
Sleep, 500
controller.Dpad.SetState("Right")
Sleep, 200
controller.Dpad.SetState("None")
Goto, AFKLoop
return
EndCheckTyresDef:

View File

@@ -0,0 +1,141 @@
GoTo EndMaintenceDef
;This will do only an oil change. will leave user at race menu to resume.
GtAutoNav:
return
DoOilChange:
Sleep, 1000
Press_O()
Sleep, 2800
loop, 2 {
Press_Right(140)
Sleep, 200
}
Press_Down()
Sleep, 200
loop, 2 {
Press_X()
Sleep, 1000
}
Sleep, 2000
Press_Down(140)
Sleep, 200
loop, 2 {
Press_X()
Sleep, 500
}
Sleep, 7000
Press_X()
Sleep, 500
Press_O()
Sleep, 200
Sleep, 3000
Press_Up(140)
Sleep, 200
Press_Left()
Sleep, 500
Press_Left()
Sleep, 500
Press_X()
Sleep, 4800
return
;This will do complete maintenance on the car including oil, engine and body. will leave user at race menu to resume.
DoMaintenance:
Sleep, 1000
controller.Buttons.Circle.SetState(true)
Sleep, 200
controller.Buttons.Circle.SetState(false)
Sleep, 2800
loop, 2 {
controller.Dpad.SetState("Right")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
}
controller.Dpad.SetState("Down")
Sleep, 200
controller.Dpad.SetState("None")
Sleep, 200
loop, 2 {
gosub, PressX
Sleep, 1000
}
Sleep, 2000
controller.Dpad.SetState("Down")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
loop, 2 {
gosub, PressX
Sleep, 500
}
Sleep, 7000
gosub, PressX
Sleep, 500
controller.Dpad.SetState("Down")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
controller.Dpad.SetState("Down")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
loop, 2 {
gosub, PressX
Sleep, 500
}
Sleep, 7000
gosub, PressX
Sleep, 500
controller.Dpad.SetState("Down")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
controller.Dpad.SetState("Down")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
controller.Dpad.SetState("Down")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
loop, 2 {
gosub, PressX
Sleep, 500
}
Sleep, 8500
gosub, PressX
Sleep, 500
controller.Buttons.Circle.SetState(true)
Sleep, 200
controller.Buttons.Circle.SetState(false)
Sleep, 200
Sleep, 3000
controller.Dpad.SetState("Up")
Sleep, 140
controller.Dpad.SetState("None")
Sleep, 200
controller.Dpad.SetState("Left")
Sleep, 200
controller.Dpad.SetState("None")
Sleep, 500
controller.Dpad.SetState("Left")
Sleep, 200
controller.Dpad.SetState("None")
Sleep, 500
gosub, PressX
Sleep, 4800
return
EndMaintenceDef: