mirror of
https://github.com/bnowakow/GT7-Scripts.git
synced 2026-01-10 13:16:02 +00:00
640 lines
15 KiB
AutoHotkey
640 lines
15 KiB
AutoHotkey
#NoEnv
|
|
#MaxHotkeysPerInterval 99000000
|
|
#HotkeyInterval 99000000
|
|
#KeyHistory 0
|
|
#Include Lib\Gdip.ahk
|
|
#include Lib\AHK-ViGEm-Bus.ahk
|
|
|
|
ListLines Off
|
|
Process, Priority, , A
|
|
SetBatchLines, -1
|
|
SetKeyDelay, -1, -1
|
|
SetMouseDelay, -1
|
|
SetDefaultMouseSpeed, 0
|
|
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
|
|
|
|
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
|
|
DetectHiddenWindows, On
|
|
#Persistent
|
|
|
|
; --------- Constants
|
|
; Time at turn in seconds and Stablizing control
|
|
t := 220000
|
|
init_delay := 9700
|
|
|
|
MenuDirect := "Right"
|
|
Menu_loops := 6
|
|
menu_s := 1
|
|
box_size := 3
|
|
color_check1 := 0xBBE044
|
|
color_check2 := 0xBBE044
|
|
color_2_delay := 1500
|
|
|
|
color_tyre_overheat := 0xAF0019
|
|
color_acquired_flag := 0x80C2E7
|
|
color_purchase_button := 0xDCDCDC
|
|
tyres_overheating := false
|
|
tyreX := 150
|
|
tyreY := 365
|
|
purchaseX := 442
|
|
purchaseY := 356
|
|
acquiredX := 620
|
|
acquiredY := 268
|
|
|
|
; resolution parameters and pixel search locations
|
|
ps_win_width := 640
|
|
ps_win_height := 360
|
|
pix1x := 458
|
|
pix1y := 114
|
|
pix2x := 607
|
|
pix2y := 319
|
|
tolerance := 20
|
|
bm_delay := 100
|
|
box_size := 2
|
|
|
|
ps_load_time1 := 14000
|
|
ps_load_time2 := 7000
|
|
ps_load_time3 := 8400
|
|
|
|
|
|
; Create a new controller controller
|
|
controller := new ViGEmDS4()
|
|
controller.SubscribeFeedback(Func("OnFeedback"))
|
|
|
|
OnFeedback(largeMotor, smallMotor, lightbarColor){
|
|
;OutputDebug % "AHK| Feedback received - LargeMotor: " largeMotor ", SmallMotor: " smallMotor ", LightBarColor: " lightbarColor
|
|
}
|
|
|
|
|
|
; ---------- Gui Setup -------------
|
|
Gui, -MaximizeBox
|
|
Gui, 2: -MaximizeBox
|
|
Gui, 2: -MinimizeBox
|
|
Gui, Color, c282a36, c6272a4
|
|
Gui, Add, Button, x15 y10 w70 default, Start
|
|
Gui, Add, Button, x15 y40 w70 default gVariableWindow, Variables
|
|
Gui, Add, Button, x15 y70 w70 default gGetColo_p, Stuck Leaderboard
|
|
Gui, Add, Button, x110 y70 w70 default gGetColo_g, Stuck Replay
|
|
Gui, Add, Button, x110 y100 w70 default gBuyCars, Buy Cars
|
|
Gui, Add, Button, x110 y10 w70 default gMenuTest, MenuTest
|
|
Gui, Add, DropDownList, w50 Choose1 vMenuDirect, Right|Left
|
|
Gui, Add, Edit, vMenu_loops w20 x165 y39, 6
|
|
Gui, Font, ce8dfe3 s9 w550 Bold
|
|
Gui, Add, Radio, Group x15 y130 altsubmit Checked gPSystem vSysCheck, PS5
|
|
Gui, Add, Radio, x70 y130 altsubmit gPSystem, PS4
|
|
Gui, Add, Radio, x125 y130 altsubmit gPSystem, PS4 Pro
|
|
;Gui, Add, Radio, Group x15 y130 altsubmit Checked gMenuSel vMenuCheck, Pixel
|
|
;Gui, Add, Radio, x70 y120 altsubmit gMenuSel, Timing
|
|
Gui, Add, Button, x70 y150 w70 default gReset, Reset
|
|
Gui, Font, ce8dfe3 s9 w550 Bold
|
|
|
|
;--------- Gui 2 Setup --------------
|
|
Gui, 2: Color, c535770, c6272a4
|
|
Gui, 2: Font, c11f s9 Bold
|
|
Gui, 2: Add, Text,, Turn Length (time miliseconds)
|
|
Gui, 2: Add, Edit, w70 vA, %t%
|
|
Gui, 2: Add, Text, x100 y90, Color 2 Delay
|
|
Gui, 2: Add, Edit, x100 y110 w40 vD, %color_2_delay%
|
|
|
|
Gui, 2: Add, Button, x20 y170 gSaveVars, Save
|
|
Gui, 2: Add, Button, x100 y170 gVarDef, Defaults
|
|
Gui, Show,w220 h185, GT7 Pan American AFK
|
|
return
|
|
|
|
BuyCars:
|
|
loop {
|
|
carIsAcquired := false
|
|
loop {
|
|
c1 := BitGrab(620, 268, box_size)
|
|
for i, c in c1
|
|
{
|
|
d1 := Distance(c, 0x7B7B7B)
|
|
if (d1 < tolerance ){
|
|
carIsAcquired := true
|
|
break
|
|
}
|
|
}
|
|
|
|
if (carIsAcquired)
|
|
break
|
|
|
|
controller.Dpad.SetState("Right")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 200
|
|
}
|
|
|
|
gosub, PressX
|
|
Sleep, 500
|
|
loop {
|
|
inPurchaseMenu := false
|
|
c1 := BitGrab(purchaseX, purchaseY, box_size)
|
|
for i, c in c1
|
|
{
|
|
d1 := Distance(c, color_purchase_button)
|
|
if (d1 < tolerance ){
|
|
inPurchaseMenu := true
|
|
break
|
|
}
|
|
}
|
|
if (inPurchaseMenu)
|
|
break
|
|
gosub, PressX
|
|
Sleep, 500
|
|
}
|
|
loop, 4 {
|
|
controller.Dpad.SetState("Right")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 200
|
|
}
|
|
loop, 2 {
|
|
gosub, PressX
|
|
Sleep, 500
|
|
}
|
|
carIsAcquired := false
|
|
Sleep, 1500
|
|
loop {
|
|
c1 := BitGrab(acquiredX, acquiredY, box_size)
|
|
for i, c in c1
|
|
{
|
|
d1 := Distance(c, color_acquired_flag)
|
|
if (d1 < tolerance ){
|
|
carIsAcquired := true
|
|
break
|
|
}
|
|
}
|
|
|
|
if (carIsAcquired)
|
|
break
|
|
|
|
gosub, PressX
|
|
}
|
|
Sleep, 1000
|
|
}
|
|
return
|
|
|
|
VariableWindow:
|
|
Gui, 2: Show, w220 h205, Variables
|
|
return
|
|
|
|
SaveVars:
|
|
Gui, 2:Submit
|
|
GuiControlGet, t, 2:, A
|
|
GuiControlGet, color_2_delay, 2:, D
|
|
return
|
|
|
|
VarDef:
|
|
GuiControl, 2:, A, %t%
|
|
GuiControl, 2:, D, %color_2_delay%
|
|
return
|
|
|
|
ButtonStart:
|
|
Gui, Submit, NoHide
|
|
id := ""
|
|
SetKeyDelay, 10
|
|
Process, priority, , High
|
|
gosub, GrabRemotePlay
|
|
if (id = "")
|
|
return
|
|
gosub, PauseLoop
|
|
CoordMode, Pixel, Screen
|
|
CoordMode, ToolTip, Screen
|
|
sleep 1000
|
|
gosub, AFKLoop
|
|
; ---------- Gui Setup End-------------
|
|
|
|
|
|
AFKLoop:
|
|
loop{
|
|
gosub, PressX
|
|
DllCall("Sleep", "UInt", init_delay)
|
|
gosub, Race
|
|
if (tyres_overheating) {
|
|
break
|
|
}
|
|
gosub, Menu
|
|
}
|
|
return
|
|
|
|
PressX:
|
|
; Just for menuing, does not hold X down
|
|
controller.Buttons.Cross.SetState(true)
|
|
DllCall("Sleep", "UInt", 200)
|
|
controller.Buttons.Cross.SetState(false)
|
|
return
|
|
|
|
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 500
|
|
controller.Buttons.Options.SetState(false)
|
|
Sleep, 500
|
|
WinActivate, ahk_id %id%
|
|
Sleep, 500
|
|
controller.Dpad.SetState("Right")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Goto, AFKLoop
|
|
return
|
|
|
|
Race:
|
|
; Hold Acceleration and manage turning
|
|
|
|
controller.Buttons.Cross.SetState(true)
|
|
controller.Buttons.RS.SetState(true)
|
|
DllCall("Sleep", "UInt", 8200)
|
|
SetTimer, CheckTyresOverheating, Off
|
|
SetTimer, CheckTyresOverheating, 1000
|
|
controller.Axes.LX.SetState(65)
|
|
|
|
t0 := A_TickCount
|
|
tf := t0+t
|
|
loop {
|
|
DllCall("Sleep", "UInt", 500)
|
|
} until tyres_overheating || A_TickCount > tf
|
|
|
|
loop {
|
|
if (tyres_overheating) {
|
|
Goto, RetryRace
|
|
return
|
|
}
|
|
SetTimer, CheckTyresOverheating, Off
|
|
break_point := false
|
|
c1 := BitGrab(pix1x, pix1y, box_size)
|
|
for i, c in c1
|
|
{
|
|
d1 := Distance(c, color_check1)
|
|
if (d1 < tolerance ){
|
|
break_point := true
|
|
break
|
|
}
|
|
}
|
|
Sleep, 500
|
|
if (break_point)
|
|
break
|
|
controller.Dpad.SetState("Right")
|
|
Sleep, 140
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 200
|
|
}
|
|
controller.Buttons.Cross.SetState(false)
|
|
controller.Dpad.SetState("None")
|
|
controller.Axes.LX.SetState(50)
|
|
controller.Buttons.RS.SetState(false)
|
|
return
|
|
|
|
Menu:
|
|
gosub, Menu_pixel
|
|
return
|
|
|
|
Menu_pixel:
|
|
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
|
|
gosub, PressX
|
|
sleep %color_2_delay%
|
|
sleep, %bm_delay%
|
|
}
|
|
;ToolTip, Found color 2, 100, 100, Screen
|
|
Sleep, 200
|
|
controller.Buttons.Circle.SetState(true)
|
|
Sleep, 200
|
|
controller.Buttons.Circle.SetState(false)
|
|
Sleep, 200
|
|
controller.Dpad.SetState("Right")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 500
|
|
gosub, PressX
|
|
Sleep, %ps_load_time1%
|
|
gosub, PressX
|
|
Sleep, 1000
|
|
controller.Buttons.Circle.SetState(true)
|
|
Sleep, 200
|
|
controller.Buttons.Circle.SetState(false)
|
|
loop, 2 {
|
|
gosub, PressX
|
|
Sleep, 500
|
|
}
|
|
Sleep, %ps_load_time2%
|
|
controller.Dpad.SetState("Down")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 500
|
|
loop, %menu_loops% {
|
|
controller.Dpad.SetState(MenuDirect)
|
|
Sleep, 125
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 200
|
|
}
|
|
loop, 2{
|
|
gosub, PressX
|
|
Sleep, 1200
|
|
}
|
|
Sleep, %ps_load_time3%
|
|
loop, 2{
|
|
gosub, PressX
|
|
Sleep, 1000
|
|
}
|
|
return
|
|
|
|
loop, 9{
|
|
gosub, PressX
|
|
Sleep, 1700
|
|
}
|
|
Sleep, 2000
|
|
controller.Dpad.SetState("Right")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 500
|
|
gosub, PressX
|
|
Sleep, %ps_load_time1%
|
|
gosub, PressX
|
|
Sleep, 1000
|
|
controller.Buttons.Circle.SetState(true)
|
|
Sleep, 200
|
|
controller.Buttons.Circle.SetState(false)
|
|
loop, 2 {
|
|
gosub, PressX
|
|
Sleep, 500
|
|
}
|
|
Sleep, %ps_load_time2%
|
|
controller.Dpad.SetState("Down")
|
|
Sleep, 200
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 500
|
|
loop, %menu_loops% {
|
|
controller.Dpad.SetState(MenuDirect)
|
|
Sleep, 125
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 400
|
|
}
|
|
loop, 2{
|
|
gosub, PressX
|
|
Sleep, 2000
|
|
}
|
|
Sleep, %ps_load_time3%
|
|
gosub, PressX
|
|
Sleep, 2000
|
|
|
|
|
|
return
|
|
;; General Functions for AHK
|
|
|
|
PixelTuning:
|
|
x_ratio := ps_win_width/640
|
|
y_ratio := ps_win_height/360
|
|
pix1x := Floor(pix1x*x_ratio)
|
|
pix1y := Floor(pix1y*y_ratio)
|
|
pix2x := Floor(pix2x*x_ratio)
|
|
pix2y := Floor(pix2y*y_ratio)
|
|
tyreX := Floor(tyreX*x_ratio)
|
|
tyreY := Floor(tyreY*y_ratio)
|
|
purchaseX := Floor(purchaseX*x_ratio)
|
|
purchaseY := Floor(purchaseY*y_ratio)
|
|
acquiredX := Floor(acquiredX*x_ratio)
|
|
acquiredY := Floor(purchaseY*y_ratio)
|
|
return
|
|
|
|
GrabRemotePlay:
|
|
WinGet, remotePlay_id, List, ahk_exe RemotePlay.exe
|
|
if (remotePlay_id = 0)
|
|
{
|
|
MsgBox, PS4 Remote Play not found
|
|
return
|
|
}
|
|
Loop, %remotePlay_id%
|
|
{
|
|
id := remotePlay_id%A_Index%
|
|
WinGetTitle, title, % "ahk_id " id
|
|
If InStr(title, "PS Remote Play")
|
|
break
|
|
}
|
|
WinGetClass, remotePlay_class, ahk_id %id%
|
|
WinMove, ahk_id %id%,, 0, 0, 640, 360
|
|
ControlFocus,, ahk_class %remotePlay_class%
|
|
WinActivate, ahk_id %id%
|
|
GetClientSize(id, ps_win_width, ps_win_height)
|
|
gosub, PixelTuning
|
|
return
|
|
|
|
RPwind:
|
|
WinGet, remotePlay_id, List, ahk_exe RemotePlay.exe
|
|
if (remotePlay_id = 0)
|
|
{
|
|
MsgBox, PS4 Remote Play not found
|
|
return
|
|
}
|
|
Loop, %remotePlay_id%
|
|
{
|
|
id := remotePlay_id%A_Index%
|
|
WinGetTitle, title, % "ahk_id " id
|
|
If InStr(title, "PS Remote Play")
|
|
break
|
|
}
|
|
WinGetClass, remotePlay_class, ahk_id %id%
|
|
WinMove, ahk_id %id%,, -700, -400, 640, 360
|
|
ControlFocus,, ahk_class %remotePlay_class%
|
|
WinActivate, ahk_id %id%
|
|
return
|
|
|
|
PixelColorSimple(pc_x, pc_y)
|
|
{
|
|
WinGet, remotePlay_id, List, ahk_exe RemotePlay.exe
|
|
if (remotePlay_id = 0)
|
|
{
|
|
MsgBox, PS4 Remote Play not found
|
|
return
|
|
}
|
|
if remotePlay_id
|
|
{
|
|
pc_wID := remotePlay_id[0]
|
|
pc_hDC := DllCall("GetDC", "UInt", pc_wID)
|
|
pc_fmtI := A_FormatInteger
|
|
SetFormat, IntegerFast, Hex
|
|
pc_c := DllCall("GetPixel", "UInt", pc_hDC, "Int", pc_x, "Int", pc_y, "UInt")
|
|
pc_c := pc_c >> 16 & 0xff | pc_c & 0xff00 | (pc_c & 0xff) << 16
|
|
pc_c .= ""
|
|
SetFormat, IntegerFast, %pc_fmtI%
|
|
DllCall("ReleaseDC", "UInt", pc_wID, "UInt", pc_hDC)
|
|
return pc_c
|
|
|
|
}
|
|
}
|
|
|
|
GetClientSize(hWnd, ByRef w := "", ByRef h := "")
|
|
{
|
|
VarSetCapacity(rect, 16)
|
|
DllCall("GetClientRect", "ptr", hWnd, "ptr", &rect)
|
|
w := NumGet(rect, 8, "int")
|
|
h := NumGet(rect, 12, "int")
|
|
}
|
|
|
|
Distance(c1, c2)
|
|
{ ; function by [VxE], return value range = [0, 441.67295593006372]
|
|
return Sqrt((((c1>>16)-(c2>>16))**2)+(((c1>>8&255)-(c2>>8&255))**2)+(((c1&255)-(c1&255))**2))
|
|
}
|
|
|
|
ConvertARGB(ARGB, Convert := 0)
|
|
{
|
|
SetFormat, IntegerFast, Hex
|
|
RGB += ARGB
|
|
RGB := RGB & 0x00FFFFFF
|
|
if (Convert)
|
|
RGB := (RGB & 0xFF000000) | ((RGB & 0xFF0000) >> 16) | (RGB & 0x00FF00) | ((RGB & 0x0000FF) << 16)
|
|
|
|
return RGB
|
|
}
|
|
|
|
MenuTest:
|
|
MsgBox, This will test the number of Left/Right presses at the championship selection menu. `nTry this if you have not finished all cafe menus. `nPress OK to test
|
|
gosub, GrabRemotePlay
|
|
Gui, Submit, NoHide
|
|
loop, %menu_loops% {
|
|
controller.Dpad.SetState(MenuDirect)
|
|
Sleep, 125
|
|
controller.Dpad.SetState("None")
|
|
Sleep, 200
|
|
}
|
|
return
|
|
|
|
BitGrab(x, y, b)
|
|
{
|
|
HWND := WinExist("PS Remote Play")
|
|
pToken := Gdip_Startup()
|
|
pBitmap := Gdip_BitmapFromHWND2(hwnd)
|
|
|
|
pixs := []
|
|
for i in range(-1*b, b+1){
|
|
for j in range(-1*b, b+1){
|
|
pixel := Gdip_GetPixel(pBitmap,x+i,y+j)
|
|
rgb := ConvertARGB( pixel )
|
|
pixs.Push(rgb)
|
|
}
|
|
}
|
|
|
|
Gdip_DisposeImage(pBitmap)
|
|
Gdip_Shutdown(pToken)
|
|
return pixs
|
|
}
|
|
|
|
Gdip_BitmapFromHWND2(hwnd)
|
|
{
|
|
WinGetPos,,, Width, Height, ahk_id %hwnd%
|
|
hbm := CreateDIBSection(Width, Height), hdc := CreateCompatibleDC(), obm := SelectObject(hdc, hbm)
|
|
RegExMatch(A_OsVersion, "\d+", Version)
|
|
PrintWindow(hwnd, hdc, Version >= 8 ? 2 : 0)
|
|
pBitmap := Gdip_CreateBitmapFromHBITMAP(hbm)
|
|
SelectObject(hdc, obm), DeleteObject(hbm), DeleteDC(hdc)
|
|
return pBitmap
|
|
}
|
|
|
|
GetColo_p:
|
|
gosub, GrabRemotePlay
|
|
color_check1 := PixelColorSimple(pix1x, pix1y)
|
|
return
|
|
|
|
GetColo_g:
|
|
gosub, GrabRemotePlay
|
|
color_check2 := PixelColorSimple(pix2x, pix2y)
|
|
return
|
|
|
|
PSystem:
|
|
Gui, Submit, NoHide
|
|
if (SysCheck = 1){
|
|
ps_load_time1 := 14000
|
|
ps_load_time2 := 7000
|
|
ps_load_time3 := 8400
|
|
}
|
|
if (SysCheck = 2){
|
|
ps_load_time1 := 41500
|
|
ps_load_time2 := 12000
|
|
ps_load_time3 := 40000
|
|
}
|
|
if (SysCheck = 3){
|
|
ps_load_time1 := 37000
|
|
ps_load_time2 := 12000
|
|
ps_load_time3 := 32000
|
|
}
|
|
return
|
|
|
|
MenuSel:
|
|
Gui, Submit, NoHide
|
|
if (MenuCheck = 1){
|
|
menu_s := 1
|
|
}
|
|
if (MenuCheck = 2){
|
|
menu_s := 2
|
|
}
|
|
return
|
|
|
|
Reset:
|
|
gosub, PauseLoop
|
|
Reload
|
|
Sleep 1000
|
|
return
|
|
|
|
PauseLoop:
|
|
controller.Buttons.Cross.SetState(false)
|
|
controller.Dpad.SetState("None")
|
|
controller.Buttons.RS.SetState(false)
|
|
controller.Axes.LX.SetState(50)
|
|
return
|
|
|
|
range(start, stop:="", step:=1) {
|
|
static range := { _NewEnum: Func("_RangeNewEnum") }
|
|
if !step
|
|
throw "range(): Parameter 'step' must not be 0 or blank"
|
|
if (stop == "")
|
|
stop := start, start := 0
|
|
; Formula: r[i] := start + step*i ; r = range object, i = 0-based index
|
|
; For a postive 'step', the constraints are i >= 0 and r[i] < stop
|
|
; For a negative 'step', the constraints are i >= 0 and r[i] > stop
|
|
; No result is returned if r[0] does not meet the value constraint
|
|
if (step > 0 ? start < stop : start > stop) ;// start == start + step*0
|
|
return { base: range, start: start, stop: stop, step: step }
|
|
}
|
|
|
|
_RangeNewEnum(r) {
|
|
static enum := { "Next": Func("_RangeEnumNext") }
|
|
return { base: enum, r: r, i: 0 }
|
|
}
|
|
|
|
_RangeEnumNext(enum, ByRef k, ByRef v:="") {
|
|
stop := enum.r.stop, step := enum.r.step
|
|
, k := enum.r.start + step*enum.i
|
|
if (ret := step > 0 ? k < stop : k > stop)
|
|
enum.i += 1
|
|
return ret
|
|
}
|
|
|
|
GuiClose:
|
|
gosub, PauseLoop
|
|
ExitApp
|
|
|
|
^Esc::ExitApp |