mirror of
https://github.com/Andre-Bzk/FocusFix.git
synced 2026-11-15 09:33:14 +01:00
22 lines
777 B
Plaintext
22 lines
777 B
Plaintext
Set WshShell = CreateObject("WScript.Shell")
|
|
|
|
' Prozessname aus dem ersten Argument (Steam %command%) extrahieren
|
|
Dim exePath, fso, exeName
|
|
Set fso = CreateObject("Scripting.FileSystemObject")
|
|
exePath = WScript.Arguments(0)
|
|
exeName = fso.GetBaseName(exePath)
|
|
|
|
' FocusFix Script unsichtbar starten (pythonw = kein Konsolenfenster)
|
|
WshShell.Run """C:\Projekte\Steam_backgroud_fix\.venv\Scripts\pythonw.exe"" ""C:\Projekte\Steam_backgroud_fix\focusfix.py"" --process """ & exeName & """", 0, False
|
|
|
|
' Spiel starten: alle Argumente (= Steam %command%) zusammensetzen und ausführen
|
|
Dim gameCmd, i
|
|
gameCmd = ""
|
|
For i = 0 To WScript.Arguments.Count - 1
|
|
gameCmd = gameCmd & """" & WScript.Arguments(i) & """ "
|
|
Next
|
|
|
|
If gameCmd <> "" Then
|
|
WshShell.Run gameCmd, 1, False
|
|
End If
|