Skip to content

Instantly share code, notes, and snippets.

@Gesugao-san
Created May 27, 2024 15:24
Show Gist options
  • Save Gesugao-san/60f02b5884c67ddbb7fba4dec7fbaf5f to your computer and use it in GitHub Desktop.
Save Gesugao-san/60f02b5884c67ddbb7fba4dec7fbaf5f to your computer and use it in GitHub Desktop.
;Abiotic_Factor_share_all.au3 by
;Создан при помощи ISN AutoIt Studio v. 1.16
;*****************************************
;Make this script high DPI aware
;AutoIt3Wrapper directive for exe files, DllCall for au3/a3x files
#AutoIt3Wrapper_Res_HiDpi=y
If not @Compiled then DllCall("User32.dll", "bool", "SetProcessDPIAware")
Opt("GUIOnEventMode", 1)
Opt("GUIEventOptions", 1)
Opt("MustDeclareVars", 1)
Global $aBaseCoords[2] = [130, 190] ; px
Global $iBaseButtonSize = 90 ; [90, 90] ; px
Global $iBaseButtonCenter = 45 ; px
Global $iRows = 4
Global $iColumns = 8
Global $aShareButtonCoords[2] = [777, 777]
HotKeySet("{ESC}", "Quit")
;WinWait("AbioticFactor-Win64-Shipping.exe")
;Sleep(1000)
;WinActivate("AbioticFactor-Win64-Shipping.exe")
;HotKeySet("{Space}", "ShareAll")
Sleep(1000)
Func ShareAll()
For $y = 1 To $iColumns Step 1
For $x = 1 To $iRows Step 1
MouseClick("primary", 90 + (100 * $x), 90 + (100 * $y));, 1, 5)
;Sleep(100)
MouseClick("primary", 777, 777, 1, 0)
;Sleep(100)
;MouseMove(90 + (100 * $x), 90 + (100 * $y), 0)
Next
Next
Quit()
EndFunc ;==>Quit
ShareAll()
Func Quit()
Exit
EndFunc ;==>Quit
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment