Grüße!
Ich mal wieder...
In meinen Script hab ich vor kurzem nun die meisten Variablen in ein paar Arrays zusammengefasst.
Speichern und Abruf (_ArrayDisplay()) funktioniert ohne Probleme, aber sobald ich den Wert des Array in ein Label des GUIs hinzufüge kommt der besagte Fehler
subscript used with non-array variable
Google und Forumssuche haben zwar was informatives zurückgegeben, aber nichts was zur Problemlösung beitragen könnte.
Hoffe jemand findet meinen Fehler, welcher vermutlich ein Anfängerfehler ist... ![]()
Hier die Deklaration inkl. Datenabruf und Speicherung...
Spoiler anzeigen
Global $LoLFixit_Launcher = GUICreate("LoL- Get it fixed! Launcher", 345, 136, 496, 308)
GUISetFont(10, 400, 0, "Microsoft Sans Serif")
$L_wait = GUICtrlCreateLabel("Bitte einen Moment Geduld.", 16, 16, 167, 20)
$L_primary = GUICtrlCreateLabel("Das Fixing-Tool für League of Legends wird gestartet.", 16, 40, 320, 20)
$Bar_status = GUICtrlCreateProgress(16, 104, 313, 14)
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0xFFFBF0)
GUICtrlSetTip(-1, "status")
;Global $B_exit = GUICtrlCreateButton("Abbrechen", 280, 98, 83, 25, 0)
$Bar_label = GUICtrlCreateLabel("Status", 18, 80, 310, 19)
GUICtrlSetFont(-1, 9, 800, 0, "Microsoft Sans Serif")
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEclick")
GUISetState(@SW_SHOW)
_GetInfos()
GUIDelete($LoLFixit_Launcher)
While 1
Sleep(1000)
WEnd
; # Launcher: GUI Ende #
Func _GetInfos()
; # Launcher: Start #
GUICtrlSetData($Bar_status, 1)
GUICtrlSetData($Bar_label, "Starte Informationssammlung")
Sleep(1000)
Global $Hardware[13], $System[11], $GameData[9]
Global $Dump, $Dump2
#cs
Global $DirEU, $DirUS, $Dir, $Dir2, $DirFault, $rescdir ; => für LoL Verzeichnisse
Global $inetcfg ; => Internet Explorer registry value
Global $OS, $OS1, $OSarch, $OSinstall, $OSinstalltemp, $SP, $User, $PCName, $IP1, $IP2, $admin ; => allgemeine Systemdaten
Global $temp, $name, $objItem ; => sonstiges
Global $S_CPUName, $S_CPUmax, $S_CPUatm, $S_CPUcores, $S_CPUcoreSUM, $S_RAM, $S_RAMcount, $S_DispRAM, $S_DispTyp, $S_DispDriver, $S_DispDrivertemp, $S_MBoem, $S_MBmodel ; => Hardware Daten
#ce
GUICtrlSetData($Bar_status, ![]()
; # Launcher: read registry values #
GUICtrlSetData($Bar_label, "Lese Daten aus Registrierung [LoL US]")
Sleep(750)
$Dump = StringSplit(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{868EC22E-7E82-4760-9265-3F2E705BF24B}", "InstallLocation"), "\")
$i = 2
$GameData[2] = $Dump[1]
While $i < $Dump[0]
$GameData[2] = $GameData[2] & "\" & $Dump[$i]
GUICtrlSetData($Bar_status, $i + 10)
$i = $i + 1
WEnd
Global $Dump = ""
Global $Dump[20]
GUICtrlSetData($Bar_status, 21)
GUICtrlSetData($Bar_label, "Lese Daten aus Registrierung [LoL EU]")
Sleep(750)
$Dump = StringSplit(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\leagueoflegends\leagueoflegends", "UninstallPath"), "\")
$i = 2
$GameData[1] = $Dump[1]
While $i < $Dump[0]
$GameData[1] = $GameData[1] & "\" & $Dump[$i]
GUICtrlSetData($Bar_status, $i + 30)
$i = $i + 1
WEnd
GUICtrlSetData($Bar_status, $i + 40)
GUICtrlSetData($Bar_label, "Lese Daten aus Registrierung [Internet Explorer]")
Sleep(750)
$System[10] = RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\Current Version\Internet Settings", "GlobalUserOffline")
GUICtrlSetData($Bar_status, $i + 43)
; # Launcher: read environment data #
GUICtrlSetData($Bar_status, $i + 46)
GUICtrlSetData($Bar_label, "Lese Systemdaten [Betriebssystem]")
Sleep(350)
$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$System[2] = @OSArch
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) Then
For $objItem In $colItems
$Dump = StringSplit($objItem.InstallDate, "")
$Dump2 = StringSplit($objItem.Name, "|")
Next
EndIf
$System[1] = $Dump2[1]
$System[4] = $Dump[7] & $Dump[8] & "." & $Dump[5] & $Dump[6] & "." & $Dump[1] & $Dump[2] & $Dump[3] & $Dump[4]
GUICtrlSetData($Bar_status, $i + 49)
GUICtrlSetData($Bar_label, "Lese Systemdaten [Update Status]")
Sleep(350)
$System[3] = @OSServicePack
GUICtrlSetData($Bar_status, $i + 52)
GUICtrlSetData($Bar_label, "Lese Systemdaten [PC-Name & Nutzer]")
Sleep(350)
$System[6] = @ComputerName
$System[5] = @UserName
GUICtrlSetData($Bar_status, $i + 56)
GUICtrlSetData($Bar_label, "Lese Systemdaten [Netzwerk Status]")
Sleep(350)
$System[8] = @IPAddress1
$System[9] = @IPAddress2
GUICtrlSetData($Bar_status, $i + 60)
if IsAdmin() Then
$System[7] = "Ja"
Else
$System[7] = "Nein"
EndIf
; # Launcher: WMI queries to get hardware data #
GUICtrlSetData($Bar_label, "Lese Systemdaten [Hardware]")
$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
GUICtrlSetData($Bar_status, $i + 62)
; RAM
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_PhysicalMemoryArray", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 64)
If IsObj($colItems) Then
For $objItem In $colItems
$Hardware[6] = $objItem.MaxCapacity / 1024 / 1024 & " GB"
$Hardware[7] = $objItem.MemoryDevices
Next
EndIf
; CPU
GUICtrlSetData($Bar_status, $i + 66)
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Processor", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 68)
If IsObj($colItems) Then
For $objItem In $colItems
$Hardware[3] = $objItem.CurrentClockSpeed & " MHz"
$Hardware[2] = $objItem.MaxClockSpeed & " MHz"
$Hardware[1] = $objItem.Name
$Hardware[4] = $objItem.NumberOfCores
$Hardware[5] = $objItem.NumberOfLogicalProcessors
Next
EndIf
; Grafik
GUICtrlSetData($Bar_status, $i + 70)
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_VideoController", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 72)
If IsObj($colItems) then
For $objItem In $colItems
$strAcceleratorCapabilities = $objItem.AcceleratorCapabilities(0)
$Hardware[9] = $objItem.AdapterRAM / 1024 / 1024 & " MB"
$Hardware[8] = $objItem.Caption
$Dump = StringSplit($objItem.DriverDate, "")
Next
Endif
$Hardware[10] = $Dump[5] & $Dump[6] & "." & $Dump[7] & $Dump[8] & "." & $Dump[1] & $Dump[2] & $Dump[3] & $Dump[4]
[/autoit] [autoit][/autoit] [autoit]; Mainboard
GUICtrlSetData($Bar_status, $i + 74)
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_ComputerSystem", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 76)
If IsObj($colItems) Then
For $objItem In $colItems
$Hardware[11] = $objItem.Manufacturer
$Hardware[12] = $objItem.Model
Next
EndIf
GUICtrlSetData($Bar_status, $i + 80)
_ArrayDisplay($Hardware)
[/autoit] [autoit][/autoit] [autoit]; # Launcher: setting variables #
GUICtrlSetData($Bar_label, "Initialisiere Daten")
GUICtrlSetData($Bar_status, 82)
$GameData[7] = "lol.launcher.exe"
Sleep(100)
GUICtrlSetData($Bar_status, 84)
$GameData[6] = 0
Sleep(100)
GUICtrlSetData($Bar_status, 86)
$GameData[4] = @TempDir
Sleep(100)
GUICtrlSetData($Bar_status, 88)
Sleep(100)
GUICtrlSetData($Bar_status, 90)
GUICtrlSetData($Bar_label, "Lade Oberfläche")
Global $Main_B_upcoming, $Laun_B_close, $Laun_B_play, $Laun_B_error, $Shop_B_blank, $Conn_B_analyse, $Info_B_notes, $Win_close, $run_lol
Global $B_EU, $B_US
Sleep(100)
GUICtrlSetData($Bar_status, 92)
Global $OS_label, $SP_label, $install_label, $PCname_label, $User_label, $admin_label, $arch_label ; => SysInfo: Allgemein
GUICtrlSetData($Bar_status, 94)
Global $CPU_typ_label, $CPU_curclock_label, $CPU_maxclock_label, $CPU_cores_label, $CPU_coreSUM_label ; => SysInfo: CPU
Global $GPU_card_label, $GPU_RAM_label, $GPU_DriverDate_label ; => SysInfo: Grafik
GUICtrlSetData($Bar_status, 96)
Global $MB_OEM_label, $MB_model_label, $RAM_amount_label, $RAM_count_label, $SysInfo_B_ExportText, $SysInfo, $SysInfo_Export, $ExportDir, $SysInfo_BarL_status, $File ; => SysInfo: sonstiges
GUICtrlSetData($Bar_status, 98)
GUICtrlSetData($Bar_label, "Starte Programm")
Sleep(500)
GUICtrlSetData($Bar_status, 100)
;MsgBox(64, "Test Box for variables", $OS & @CRLF & $OSinstall)
[/autoit] [autoit][/autoit] [autoit]; # Launcher: verify LoL data #
If $System[3] = "" Then
$System[3] = "kein Servicepack installiert"
EndIf
If $Hardware[11] = "System manufacturer" Then
$Hardware[11] = "Information nicht verfügbar"
EndIf
If $Hardware[12] = "System Product Name" Then
$Hardware[12] = "Information nicht verfügbar"
EndIf
If $GameData[1] = "" And $GameData[2] = "" Then
MsgBox(48, "LoL - Get it fixed!", "Es konnte keine LoL - Installation gefunden werden." & @CRLF & "Nachfolgend bitte den Installationsordner wählen.", 5)
$GameData[3] = FileSelectFolder("Das Installationsverzeichnis konnte nicht automatisch erkannt werden." & @CRLF & "Bitte wähle dein LoL Installationsverzeichnis", "", 2, "C:\programme\")
$GameData[8] = $GameData[3]
main()
ElseIf $GameData[1] <> "" And $GameData[2] <> "" Then
launcher_EUandUS()
EndIf
EndFunc ;==>_GetInfos
Hier das GUI in das die Daten am Ende sollen...
In dem Fall z.B. der Fehler bei
$OS_label = GUICtrlCreateLabel($System[1], 200, 64, 252, 23)
oder
$SP_label = GUICtrlCreateLabel($System[3], 200, 112, 252, 23)
usw.
Spoiler anzeigen
Func SysInfo()
_ArrayDisplay($System)
$SysInfo = GUICreate("Get it fixed! - System Überblick", 511, 838, 616, 96)
GUISetFont(10, 800, 0, "Calibri")
$System = GUICtrlCreateGroup("System", 24, 32, 465, 209)
GUICtrlSetFont(-1, 15, 800, 0, "Calibri")
$OS_prim = GUICtrlCreateLabel("Betriebssystem:", 32, 64, 111, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$OS_label = GUICtrlCreateLabel($System[1], 200, 64, 252, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$SP_prim = GUICtrlCreateLabel("Servicepack:", 32, 112, 89, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$SP_label = GUICtrlCreateLabel($System[3], 200, 112, 252, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$install_prim = GUICtrlCreateLabel("Installationsdatum:", 32, 208, 136, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$install_label = GUICtrlCreateLabel($System[4], 200, 208, 250, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$PCname_prim = GUICtrlCreateLabel("Computername:", 32, 136, 114, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$PCname_label = GUICtrlCreateLabel($System[6], 200, 136, 253, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$User_prim = GUICtrlCreateLabel("Benutzer:", 32, 160, 69, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$User_label = GUICtrlCreateLabel($System[5], 200, 160, 251, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$admin_prim = GUICtrlCreateLabel("administrative Rechte:", 32, 184, 158, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$admin_label = GUICtrlCreateLabel($System[7], 200, 184, 256, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$arch_prim = GUICtrlCreateLabel("Systemarchitektur:", 32, 88, 134, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$arch_label = GUICtrlCreateLabel($System[2], 200, 88, 249, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Hardware = GUICtrlCreateGroup("Hardware", 24, 256, 465, 457)
GUICtrlSetFont(-1, 16, 800, 0, "Calibri")
$CPU = GUICtrlCreateGroup("CPU", 40, 280, 433, 161)
GUICtrlSetFont(-1, 14, 800, 0, "Calibri")
$CPU_typ_prim = GUICtrlCreateLabel("Modell:", 48, 312, 56, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_curclock_prim = GUICtrlCreateLabel("akt. Taktung:", 48, 336, 94, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_maxclock_prim = GUICtrlCreateLabel("max. Taktung:", 48, 360, 100, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_cores = GUICtrlCreateLabel("phys. Kerne:", 48, 384, 88, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_coreSUM = GUICtrlCreateLabel("Kerne ges.:", 48, 408, 78, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_typ_label = GUICtrlCreateLabel($Hardware[1], 200, 312, 259, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_curclock_label = GUICtrlCreateLabel($Hardware[3], 200, 334, 263, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_maxclock_label = GUICtrlCreateLabel($Hardware[2], 200, 360, 267, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_cores_label = GUICtrlCreateLabel($Hardware[4], 200, 384, 258, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_coreSUM_label = GUICtrlCreateLabel($Hardware[5], 200, 408, 265, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Grafik = GUICtrlCreateGroup("Grafik", 40, 448, 433, 113)
GUICtrlSetFont(-1, 14, 800, 0, "Calibri")
$GPU_card_prim = GUICtrlCreateLabel("Karte:", 48, 480, 45, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$GPU_RAM_prim = GUICtrlCreateLabel("Speicher:", 48, 504, 67, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$GPU_DriverDate_prim = GUICtrlCreateLabel("Treiberdatum:", 48, 528, 102, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$GPU_card_label = GUICtrlCreateLabel($Hardware[8], 200, 480, 260, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$GPU_RAM_label = GUICtrlCreateLabel($Hardware[9], 200, 504, 263, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$GPU_DriverDate_label = GUICtrlCreateLabel($Hardware[10], 200, 528, 262, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$misc = GUICtrlCreateGroup("sonstiges", 40, 568, 433, 137)
GUICtrlSetFont(-1, 14, 800, 0, "Calibri")
$MB_oem_prim = GUICtrlCreateLabel("Mainboard OEM:", 48, 600, 121, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$MB_model_prim = GUICtrlCreateLabel("Mainboard Modell:", 48, 624, 136, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$RAM_amount_prim = GUICtrlCreateLabel("Arbeitsspeicher:", 48, 648, 114, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$RAM_count_prim = GUICtrlCreateLabel("Anzahl Module:", 48, 672, 111, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$MB_OEM_label = GUICtrlCreateLabel($Hardware[11], 200, 600, 258, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$MB_model_label = GUICtrlCreateLabel($Hardware[2], 200, 624, 258, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$RAM_amount_label = GUICtrlCreateLabel($Hardware[6], 200, 648, 260, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$RAM_count_label = GUICtrlCreateLabel($Hardware[7], 200, 672, 263, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$SysInfo_Main = GUICtrlCreateLabel("LoL - Get it fixed! Systemübersicht", 113, 8, 301, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
$SysInfo_L_Export = GUICtrlCreateLabel("Alle wichtigen Daten können auch exportiert werden um diese z.B. in", 32, 720, 450, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$SysInfo_L_Export2 = GUICtrlCreateLabel("einem Forum zu posten. Dafür einfach folgenden Button anklicken.", 40, 744, 435, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$SysInfo_B_ExportText = GUICtrlCreateButton("In Textdatei exportieren", 170, 800, 187, 33, 0)
GUICtrlSetOnEvent(-1, "SysInfoExport")
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$SysInfo_Export = GUICtrlCreateProgress(171, 787, 185, 9, $PBS_SMOOTH)
GUICtrlSetState(-1, $GUI_HIDE)
GUICtrlSetLimit(-1, 20, 0)
$SysInfo_BarL_status = GUICtrlCreateLabel("Exportiere Daten . ", 176, 768, 180, 19, $SS_CENTER)
GUICtrlSetState(-1, $GUI_HIDE)
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEclick")
EndFunc ; => SysInfo
Gesamtes Script
Spoiler anzeigen
#RequireAdmin
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=files\symbol.ico
#AutoIt3Wrapper_Compression=4
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
League of Legends - Get it fixed!
Author: Matricus
Version: 1.00
Program Function:
Solve multiple issues with the League of Legends client.
Provides a graphical user interface.
Also provide some nice features to ''scan your PC'' for requirements
or check the connection to the LoL-Servers.
Copyright by Aye Carumba Entertainment Studios
[/autoit] [autoit][/autoit] [autoit]#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <ProgressConstants.au3>
#include <Array.au3>
#include <File.au3>
Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]Global $LoL_EUandUS, $FixIt_Main, $workdir
; _____________________________________________________________________________________________________________
; ### Launcher Beginn###
; # Launcher: Installation der Schriftart Calibri #
FileInstall(".\files\calibri.ttf", @WindowsDir & "\fonts\calibri.ttf")
FileInstall(".\files\calibrib.ttf", @WindowsDir & "\fonts\calibrib.ttf")
FileInstall(".\files\calibriz.ttf", @WindowsDir & "\fonts\calibriz.ttf")
FileInstall(".\files\calibrii.ttf", @WindowsDir & "\fonts\calibrii.ttf")
sleep(500)
FileDelete(@TempDir & "\upcoming.bat")
FileDelete(@TempDir & "\upcoming_DE.txt")
FileDelete(@TempDir & "\launcherfix.vbs")
FileDelete(@TempDir & "\launcherfix.bat")
FileDelete(@TempDir & "\winmtr.exe")
FileDelete(@TempDir & "\trace.bat")
FileDelete(@TempDir & "\changelog.bat")
FileDelete(@TempDir & "\changelog_DE.txt")
; # Launcher: GUI Beginn #
Global $LoLFixit_Launcher = GUICreate("LoL- Get it fixed! Launcher", 345, 136, 496, 308)
GUISetFont(10, 400, 0, "Microsoft Sans Serif")
$L_wait = GUICtrlCreateLabel("Bitte einen Moment Geduld.", 16, 16, 167, 20)
$L_primary = GUICtrlCreateLabel("Das Fixing-Tool für League of Legends wird gestartet.", 16, 40, 320, 20)
$Bar_status = GUICtrlCreateProgress(16, 104, 313, 14)
GUICtrlSetColor(-1, 0x008000)
GUICtrlSetBkColor(-1, 0xFFFBF0)
GUICtrlSetTip(-1, "status")
;Global $B_exit = GUICtrlCreateButton("Abbrechen", 280, 98, 83, 25, 0)
$Bar_label = GUICtrlCreateLabel("Status", 18, 80, 310, 19)
GUICtrlSetFont(-1, 9, 800, 0, "Microsoft Sans Serif")
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEclick")
GUISetState(@SW_SHOW)
_GetInfos()
GUIDelete($LoLFixit_Launcher)
While 1
Sleep(1000)
WEnd
; # Launcher: GUI Ende #
Func _GetInfos()
; # Launcher: Start #
GUICtrlSetData($Bar_status, 1)
GUICtrlSetData($Bar_label, "Starte Informationssammlung")
Sleep(1000)
Global $Hardware[13], $System[11], $GameData[9]
Global $Dump, $Dump2
#cs
Global $DirEU, $DirUS, $Dir, $Dir2, $DirFault, $rescdir ; => für LoL Verzeichnisse
Global $inetcfg ; => Internet Explorer registry value
Global $OS, $OS1, $OSarch, $OSinstall, $OSinstalltemp, $SP, $User, $PCName, $IP1, $IP2, $admin ; => allgemeine Systemdaten
Global $temp, $name, $objItem ; => sonstiges
Global $S_CPUName, $S_CPUmax, $S_CPUatm, $S_CPUcores, $S_CPUcoreSUM, $S_RAM, $S_RAMcount, $S_DispRAM, $S_DispTyp, $S_DispDriver, $S_DispDrivertemp, $S_MBoem, $S_MBmodel ; => Hardware Daten
#ce
GUICtrlSetData($Bar_status, ![]()
; # Launcher: read registry values #
GUICtrlSetData($Bar_label, "Lese Daten aus Registrierung [LoL US]")
Sleep(750)
$Dump = StringSplit(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{868EC22E-7E82-4760-9265-3F2E705BF24B}", "InstallLocation"), "\")
$i = 2
$GameData[2] = $Dump[1]
While $i < $Dump[0]
$GameData[2] = $GameData[2] & "\" & $Dump[$i]
GUICtrlSetData($Bar_status, $i + 10)
$i = $i + 1
WEnd
Global $Dump = ""
Global $Dump[20]
GUICtrlSetData($Bar_status, 21)
GUICtrlSetData($Bar_label, "Lese Daten aus Registrierung [LoL EU]")
Sleep(750)
$Dump = StringSplit(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\leagueoflegends\leagueoflegends", "UninstallPath"), "\")
$i = 2
$GameData[1] = $Dump[1]
While $i < $Dump[0]
$GameData[1] = $GameData[1] & "\" & $Dump[$i]
GUICtrlSetData($Bar_status, $i + 30)
$i = $i + 1
WEnd
GUICtrlSetData($Bar_status, $i + 40)
GUICtrlSetData($Bar_label, "Lese Daten aus Registrierung [Internet Explorer]")
Sleep(750)
$System[10] = RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\Current Version\Internet Settings", "GlobalUserOffline")
GUICtrlSetData($Bar_status, $i + 43)
; # Launcher: read environment data #
GUICtrlSetData($Bar_status, $i + 46)
GUICtrlSetData($Bar_label, "Lese Systemdaten [Betriebssystem]")
Sleep(350)
$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$System[2] = @OSArch
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
If IsObj($colItems) Then
For $objItem In $colItems
$Dump = StringSplit($objItem.InstallDate, "")
$Dump2 = StringSplit($objItem.Name, "|")
Next
EndIf
$System[1] = $Dump2[1]
$System[4] = $Dump[7] & $Dump[8] & "." & $Dump[5] & $Dump[6] & "." & $Dump[1] & $Dump[2] & $Dump[3] & $Dump[4]
GUICtrlSetData($Bar_status, $i + 49)
GUICtrlSetData($Bar_label, "Lese Systemdaten [Update Status]")
Sleep(350)
$System[3] = @OSServicePack
GUICtrlSetData($Bar_status, $i + 52)
GUICtrlSetData($Bar_label, "Lese Systemdaten [PC-Name & Nutzer]")
Sleep(350)
$System[6] = @ComputerName
$System[5] = @UserName
GUICtrlSetData($Bar_status, $i + 56)
GUICtrlSetData($Bar_label, "Lese Systemdaten [Netzwerk Status]")
Sleep(350)
$System[8] = @IPAddress1
$System[9] = @IPAddress2
GUICtrlSetData($Bar_status, $i + 60)
if IsAdmin() Then
$System[7] = "Ja"
Else
$System[7] = "Nein"
EndIf
; # Launcher: WMI queries to get hardware data #
GUICtrlSetData($Bar_label, "Lese Systemdaten [Hardware]")
$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
GUICtrlSetData($Bar_status, $i + 62)
; RAM
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_PhysicalMemoryArray", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 64)
If IsObj($colItems) Then
For $objItem In $colItems
$Hardware[6] = $objItem.MaxCapacity / 1024 / 1024 & " GB"
$Hardware[7] = $objItem.MemoryDevices
Next
EndIf
; CPU
GUICtrlSetData($Bar_status, $i + 66)
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Processor", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 68)
If IsObj($colItems) Then
For $objItem In $colItems
$Hardware[3] = $objItem.CurrentClockSpeed & " MHz"
$Hardware[2] = $objItem.MaxClockSpeed & " MHz"
$Hardware[1] = $objItem.Name
$Hardware[4] = $objItem.NumberOfCores
$Hardware[5] = $objItem.NumberOfLogicalProcessors
Next
EndIf
; Grafik
GUICtrlSetData($Bar_status, $i + 70)
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_VideoController", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 72)
If IsObj($colItems) then
For $objItem In $colItems
$strAcceleratorCapabilities = $objItem.AcceleratorCapabilities(0)
$Hardware[9] = $objItem.AdapterRAM / 1024 / 1024 & " MB"
$Hardware[8] = $objItem.Caption
$Dump = StringSplit($objItem.DriverDate, "")
Next
Endif
$Hardware[10] = $Dump[5] & $Dump[6] & "." & $Dump[7] & $Dump[8] & "." & $Dump[1] & $Dump[2] & $Dump[3] & $Dump[4]
[/autoit] [autoit][/autoit] [autoit]; Mainboard
GUICtrlSetData($Bar_status, $i + 74)
$objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_ComputerSystem", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
GUICtrlSetData($Bar_status, $i + 76)
If IsObj($colItems) Then
For $objItem In $colItems
$Hardware[11] = $objItem.Manufacturer
$Hardware[12] = $objItem.Model
Next
EndIf
GUICtrlSetData($Bar_status, $i + 80)
_ArrayDisplay($Hardware)
[/autoit] [autoit][/autoit] [autoit]; # Launcher: setting variables #
GUICtrlSetData($Bar_label, "Initialisiere Daten")
GUICtrlSetData($Bar_status, 82)
$GameData[7] = "lol.launcher.exe"
Sleep(100)
GUICtrlSetData($Bar_status, 84)
$GameData[6] = 0
Sleep(100)
GUICtrlSetData($Bar_status, 86)
$GameData[4] = @TempDir
Sleep(100)
GUICtrlSetData($Bar_status, 88)
Sleep(100)
GUICtrlSetData($Bar_status, 90)
GUICtrlSetData($Bar_label, "Lade Oberfläche")
Global $Main_B_upcoming, $Laun_B_close, $Laun_B_play, $Laun_B_error, $Shop_B_blank, $Conn_B_analyse, $Info_B_notes, $Win_close, $run_lol
Global $B_EU, $B_US
Sleep(100)
GUICtrlSetData($Bar_status, 92)
Global $OS_label, $SP_label, $install_label, $PCname_label, $User_label, $admin_label, $arch_label ; => SysInfo: Allgemein
GUICtrlSetData($Bar_status, 94)
Global $CPU_typ_label, $CPU_curclock_label, $CPU_maxclock_label, $CPU_cores_label, $CPU_coreSUM_label ; => SysInfo: CPU
Global $GPU_card_label, $GPU_RAM_label, $GPU_DriverDate_label ; => SysInfo: Grafik
GUICtrlSetData($Bar_status, 96)
Global $MB_OEM_label, $MB_model_label, $RAM_amount_label, $RAM_count_label, $SysInfo_B_ExportText, $SysInfo, $SysInfo_Export, $ExportDir, $SysInfo_BarL_status, $File ; => SysInfo: sonstiges
GUICtrlSetData($Bar_status, 98)
GUICtrlSetData($Bar_label, "Starte Programm")
Sleep(500)
GUICtrlSetData($Bar_status, 100)
;MsgBox(64, "Test Box for variables", $OS & @CRLF & $OSinstall)
[/autoit] [autoit][/autoit] [autoit]; # Launcher: verify LoL data #
If $System[3] = "" Then
$System[3] = "kein Servicepack installiert"
EndIf
If $Hardware[11] = "System manufacturer" Then
$Hardware[11] = "Information nicht verfügbar"
EndIf
If $Hardware[12] = "System Product Name" Then
$Hardware[12] = "Information nicht verfügbar"
EndIf
If $GameData[1] = "" And $GameData[2] = "" Then
MsgBox(48, "LoL - Get it fixed!", "Es konnte keine LoL - Installation gefunden werden." & @CRLF & "Nachfolgend bitte den Installationsordner wählen.", 5)
$GameData[3] = FileSelectFolder("Das Installationsverzeichnis konnte nicht automatisch erkannt werden." & @CRLF & "Bitte wähle dein LoL Installationsverzeichnis", "", 2, "C:\programme\")
$GameData[8] = $GameData[3]
main()
ElseIf $GameData[1] <> "" And $GameData[2] <> "" Then
launcher_EUandUS()
EndIf
EndFunc ;==>_GetInfos
;*****************************************************************************
[/autoit] [autoit][/autoit] [autoit]; ### Launcher Ende ###
; _______________________________________________________________________________________________________________
; _______________________________________________________________________________________________________________
; ### Functions Beginn ###
; # Launcher: EU oder US (wenn beide gefunden) #
Func launcher_EUandUS()
Global $LoL_EUandUS = GUICreate("LoL - Get it fixed! Both", 423, 130, 484, 456)
$L_primary = GUICtrlCreateLabel("Es wurde festgestellt das der EU und der US Client installiert ist.", 14, 16, 377, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Microsoft Sans Serif")
$L_sub = GUICtrlCreateLabel("Bitte Client auswählen für den das Programm Fehler beheben soll.", 8, 40, 393, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Microsoft Sans Serif")
Local $B_EU = GUICtrlCreateButton("EU-Client", 72, 72, 107, 41, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Microsoft Sans Serif")
Local $B_US = GUICtrlCreateButton("US-Client", 232, 72, 107, 41, 0)
GUICtrlSetFont(-1, 12, 800, 0, "Microsoft Sans Serif")
GUISetState(@SW_SHOW, $LoL_EUandUS)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEclick")
GUICtrlSetOnEvent($B_EU, "Button_EU")
GUICtrlSetOnEvent($B_US, "Button_US")
EndFunc ;==>launcher_EUandUS
; # misc: geplante Änderungen #
Func upcoming()
FileInstall(".\files\upcoming.bat", @TempDir & "\upcoming.bat")
FileInstall(".\files\upcoming_DE.txt", @TempDir & "\upcoming_DE.txt")
sleep(500)
run(@TempDir & "\upcoming.bat","", @SW_HIDE)
EndFunc ; => main_upcoming
; # Fix: Schließen des Patchers nach Start #
Func Launcher_closing()
;$workdir = $rescdir
$GameData[0] = MsgBox(4, "Patcher Fix", "Es werden einige (temporäre) Dateien auf dem System gelöscht" & @CRLF & @CRLF & "Fortfahren?")
if $GameData[0] = 6 Then
if ProcessExists("lol.launcher.exe") OR ProcessExists("launcher.exe") OR ProcessExists("league of legends.exe") Then
MsgBox(48, "Patcher Fix", "Mindestens 1 Prozess von League of Legends ist noch aktiv." & @CRLF & "Um das Problem beheben zu können müssen alle LoL-Prozesse geschlossen sein." & @CRLF & @CRLF & "In 5 Sekunden werden sie automatisch geschlossen", 6)
ProcessClose("lol.launcher.exe")
ProcessClose("launcher.exe")
ProcessClose("league of legends.exe")
EndIf
FileInstall(".\files\LauncherFix.vbs", @TempDir & "\launcherfix.vbs")
FileInstall(".\files\launcherfix.bat", @TempDir & "\launcherfix.bat")
sleep(1000)
if FileExists(@TempDir & "\launcherfix.vbs") AND FileExists(@TempDir & "\launcherfix.bat") Then
run(@TempDir & "\launcherfix.bat","", @SW_HIDE)
Else
MsgBox(32, "Patcher Fix", "Es ist ein Fehler bei der Ausführung aufgetreten. Starte neuen Versuch", 5)
FileInstall(".\files\LauncherFix.vbs", @TempDir & "\launcherfix.vbs")
FileInstall(".\files\launcherfix.bat", @TempDir & "\launcherfix.bat")
sleep(1000)
if FileExists(@TempDir & "\launcherfix.vbs") AND FileExists(@TempDir & "\launcherfix.bat") Then
run(@TempDir & "\launcherfix.bat","", @SW_HIDE)
Else
MsgBox(16, "Patcher Fix", "Konnte Skript aufgrund eines Fehlers nicht ausführen." & @CRLF & "Bitte diesen Fehler im Forum berichten mit den Systemdaten - Danke!" & @CRLF & @CRLF & "Fehlercode: 2" & @CRLF & "Beschreibung: can not execute launcherfix.vbs")
EndIf
EndIf
MsgBox(64, "Patcher Fix", "Die temporären Dateien von LoL konnten erfolgreich gelöscht werden")
if $GameData[6] = 1 Then
MsgBox(64, "Run LoL", "Ich würde in v1.0 nun das starten: " & $workdir & "\" & $launcher)
EndIf
EndIf
EndFunc ; Launcher_closing
; # Fix: Play-Button nicht aktiv nach Patch #
Func Launcher_play()
;$workdir = $rescdir
$GameData[0] = MsgBox(4, "Spiel-Button Fix", "Es werden die Einstellungen des Internet Explorers zurückgesetzt." & @CRLF & @CRLF & "Fortfahren?")
if $GameData[0] = 6 Then
if ProcessExists("iexplore.exe") Then
MsgBox(64, "Spiel-Button Fix", "Der Internet Explorer ist noch aktiv. Für diesen Fix muss er geschlossen sein." & @CRLF & "Er wird automatisch geschlossen...", 3)
ProcessClose("iexplore.exe")
EndIf
run("control inetcpl.cpl,,6")
BlockInput(1)
WinWaitActive("Eigenschaften von Internet", "Internet Explorer-Einstellungen zurücksetzen")
sleep(500)
send("!z")
WinWaitActive("Internet Explorer-Einstellungen zurücksetzen", "Möchten Sie wirklich alle Internet Explorer-Einstellungen zurücksetzen?")
sleep(300)
send("!p")
sleep(300)
send("!z")
sleep(1000)
WinWaitActive("Internet Explorer-Einstellungen zurücksetzen", "Internet Explorer-Einstellungen werden zurückgesetzt")
sleep(5000)
send("!s")
if WinActive("Internet Explorer-Einstellungen zurücksetzen", "Internet Explorer-Einstellungen werden zurückgesetzt") Then
sleep(5000)
send("!s")
EndIf
BlockInput(0)
MsgBox(64, "IE Zurücksetzung", "Die Einstellungen konnten erfolgreich zurückgesetzt werden.")
sleep(1000)
if $GameData[6] = 1 Then
MsgBox(64, "variablen", "Ich würde in v1.0 nun das starten: " & $GameData[3] & "\" & $GameData[7])
EndIf
EndIf
EndFunc ; Launcher_play
; # Fix: Fehler im Startprogramm #
Func Launcher_error()
MsgBox(64, "launcher error", "This feature will come soon!")
MsgBox(64, "launcher error", "It will do following: " & @CRLF & @CRLF & "- check the install path of LoL" & @CRLF & ">> prompt an information to reinstall the game" & @CRLF & "- install latest Adobe AIR" & @CRLF & "- install .NET Framework 3.5")
EndFunc ; Launcher_error
; # Fix: weiße/schwarze Seite im Shop #
Func Shop_blank()
MsgBox(64, "shop blank", "Dieser Fix ist noch nicht implementiert.")
MsgBox(64, "shop blank", "It will do following: " & @CRLF & @CRLF & "- reset the configuration of Internet Explorer" & @CRLF & "- set https://shop.lol-europe.com as trusted site (to accept scripts)")
EndFunc ; shop_blank
; # helper: Verbindungsanalyse #
Func Connection_trace()
$GameData[0] = MsgBox(4, "Verbindungs Analyse", "Es wird das Programm WinMTR gestartet" & @CRLF & @CRLF & "Fortfahren?")
; => Überprüfung ob Firefox oder Internet Explorer laufen
if $GameData[0] = 6 Then
if ProcessExists("iexplore.exe") Then
$GameData[0] = MsgBox(4, "Verbindungs Analyse", "Der Internet Explorer ist noch aktiv." & @CRLF & "Er kann das Ergebnis verfälschen, z.B. wenn Dateien heruntergeladen werden." & @CRLF & "Soll er geschlossen werden?", 7)
If $GameData[0] = 6 Then
ProcessClose("iexplore.exe")
EndIf
EndIf
if ProcessExists("firefox.exe") Then
$GameData[0] = MsgBox(4, "Verbindungs Analyse", "Der Firefox-Browser ist noch aktiv." & @CRLF & "Er kann das Ergebnis verfälschen, z.B. wenn Dateien heruntergeladen werden." & @CRLF & "Soll er geschlossen werden?", 7)
If $GameData[0] = 6 Then
ProcessClose("firefox.exe")
EndIf
EndIf
; => entpacken von WinMTR
FileInstall(".\files\winmtr.exe", @TempDir & "\winmtr.exe")
; => start von WinMTR inkl. automatische Konfiguration und trace-Beginn
sleep(500)
run(@TempDir & "\winmtr.exe")
WinWaitActive("WinMTR - 0.8")
BlockInput(1)
send("lol-europe.com")
sleep(1000)
send("!O")
WinWaitActive("Options", "- WinMTR - 0.8 -")
send("{del}")
send("{del}")
send("{del}")
send("2.0")
send("!O")
sleep(500)
BlockInput(0)
; => Hinweis auf Auswertungs-Helfer <> Angebot den Trace nach 5 Minuten zu stoppen, ein Log zu erzeugen und den "Helfer" zu starten.
$answer = MsgBox(4, "Verbindungsanalyse", "Um ein genaueres Bild zu bekommen, sollte der Test mindestens 5 Minuten laufen." & @CRLF & "Soll der Test automatisch nach 5 Minuten angehalten werden?" & @CRLF & @CRLF & "Hinweis: Die Auswertung wird nur nach automatischen Abbruch unterstützt.")
if $answer = 6 Then
WinActivate("WinMTR - 0.8","")
send("!S")
sleep(500)
MsgBox(64, "Verbindungsanalyse", "Für die Dauer der Analyse kann das Programm keine anderen Aktionen ausführen." & @CRLF & "Das Hauptfenster wird daher ausgeblendet und nach den 5 Minuten wieder eingeblendet.")
GUISetState(@SW_HIDE, $FixIt_Main)
WinSetOnTop("WinMTR - 0.8","",0)
;$savepath = "C:\Verbindungsanalyse.txt"
sleep(300000)
BlockInput(1)
WinActivate("WinMTR - 0.8")
send("!S")
sleep(2000)
send("!T")
sleep(500)
send($GameData[4] & "\Verbindungsanalyse.txt")
sleep(500)
send("!S")
sleep(500)
GUISetState(@SW_SHOW, $FixIt_Main)
if WinActive("Speichern unter bestätigen") Then ; => sollte bereits eine Log-Datei vorhanden sein hier die Bestätigung zum Überschreiben
send("!J")
EndIf
WinClose("WinMTR - 0.8")
BlockInput(0)
MsgBox(64, "Verbindungsanalyse", "Ablaufverfolgung beendet. Öffne Log...", 5)
FileInstall(".\files\trace.bat", @TempDir & "\trace.bat")
sleep(500)
run( @TempDir & "\trace.bat","", @SW_HIDE)
MsgBox(64, "Verbindungsanalyse", "Speicherort des Logs: %temp%\verbindungsanalyse.txt" & @CRLF & "Starte Auswertungs-Helfer", 5)
sleep(500)
Connection_trace_result()
Else
WinActivate("WinMTR - 0.8","")
send("!S")
EndIf
EndIf
endfunc ; connection_trace
; # helper: Auswertung der Verbindungsanalyse #
Func Connection_trace_result()
MsgBox(64, "Auswertungs-Helfer", "Diese Funktion ist noch nicht implementiert." & @CRLF & "Bis dahin kannst du deine Ergebnisse jedoch im Forum veröffentlichen.")
EndFunc ; => Connection_trace_result
; # misc: Aktualisierungsnotizen #
func Info_notes()
FileInstall(".\files\changelog.bat", @TempDir & "\changelog.bat")
FileInstall(".\files\changelog_DE.txt", @TempDir & "\changelog_DE.txt")
sleep(500)
run(@TempDir & "\changelog.bat","", @SW_HIDE)
EndFunc ; Info_notes
; # misc: Systeminformationen #
Func SysInfo()
_ArrayDisplay($System)
$SysInfo = GUICreate("Get it fixed! - System Überblick", 511, 838, 616, 96)
GUISetFont(10, 800, 0, "Calibri")
$System = GUICtrlCreateGroup("System", 24, 32, 465, 209)
GUICtrlSetFont(-1, 15, 800, 0, "Calibri")
$OS_prim = GUICtrlCreateLabel("Betriebssystem:", 32, 64, 111, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$OS_label = GUICtrlCreateLabel($System[1], 200, 64, 252, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$SP_prim = GUICtrlCreateLabel("Servicepack:", 32, 112, 89, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$SP_label = GUICtrlCreateLabel($System[3], 200, 112, 252, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$install_prim = GUICtrlCreateLabel("Installationsdatum:", 32, 208, 136, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$install_label = GUICtrlCreateLabel($System[4], 200, 208, 250, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$PCname_prim = GUICtrlCreateLabel("Computername:", 32, 136, 114, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$PCname_label = GUICtrlCreateLabel($System[6], 200, 136, 253, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$User_prim = GUICtrlCreateLabel("Benutzer:", 32, 160, 69, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$User_label = GUICtrlCreateLabel($System[5], 200, 160, 251, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$admin_prim = GUICtrlCreateLabel("administrative Rechte:", 32, 184, 158, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$admin_label = GUICtrlCreateLabel($System[7], 200, 184, 256, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$arch_prim = GUICtrlCreateLabel("Systemarchitektur:", 32, 88, 134, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$arch_label = GUICtrlCreateLabel($System[2], 200, 88, 249, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Hardware = GUICtrlCreateGroup("Hardware", 24, 256, 465, 457)
GUICtrlSetFont(-1, 16, 800, 0, "Calibri")
$CPU = GUICtrlCreateGroup("CPU", 40, 280, 433, 161)
GUICtrlSetFont(-1, 14, 800, 0, "Calibri")
$CPU_typ_prim = GUICtrlCreateLabel("Modell:", 48, 312, 56, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_curclock_prim = GUICtrlCreateLabel("akt. Taktung:", 48, 336, 94, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_maxclock_prim = GUICtrlCreateLabel("max. Taktung:", 48, 360, 100, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_cores = GUICtrlCreateLabel("phys. Kerne:", 48, 384, 88, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_coreSUM = GUICtrlCreateLabel("Kerne ges.:", 48, 408, 78, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$CPU_typ_label = GUICtrlCreateLabel($Hardware[1], 200, 312, 259, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_curclock_label = GUICtrlCreateLabel($Hardware[3], 200, 334, 263, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_maxclock_label = GUICtrlCreateLabel($Hardware[2], 200, 360, 267, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_cores_label = GUICtrlCreateLabel($Hardware[4], 200, 384, 258, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$CPU_coreSUM_label = GUICtrlCreateLabel($Hardware[5], 200, 408, 265, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Grafik = GUICtrlCreateGroup("Grafik", 40, 448, 433, 113)
GUICtrlSetFont(-1, 14, 800, 0, "Calibri")
$GPU_card_prim = GUICtrlCreateLabel("Karte:", 48, 480, 45, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$GPU_RAM_prim = GUICtrlCreateLabel("Speicher:", 48, 504, 67, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$GPU_DriverDate_prim = GUICtrlCreateLabel("Treiberdatum:", 48, 528, 102, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$GPU_card_label = GUICtrlCreateLabel($Hardware[8], 200, 480, 260, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$GPU_RAM_label = GUICtrlCreateLabel($Hardware[9], 200, 504, 263, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$GPU_DriverDate_label = GUICtrlCreateLabel($Hardware[10], 200, 528, 262, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
$misc = GUICtrlCreateGroup("sonstiges", 40, 568, 433, 137)
GUICtrlSetFont(-1, 14, 800, 0, "Calibri")
$MB_oem_prim = GUICtrlCreateLabel("Mainboard OEM:", 48, 600, 121, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$MB_model_prim = GUICtrlCreateLabel("Mainboard Modell:", 48, 624, 136, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$RAM_amount_prim = GUICtrlCreateLabel("Arbeitsspeicher:", 48, 648, 114, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$RAM_count_prim = GUICtrlCreateLabel("Anzahl Module:", 48, 672, 111, 23)
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$MB_OEM_label = GUICtrlCreateLabel($Hardware[11], 200, 600, 258, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$MB_model_label = GUICtrlCreateLabel($Hardware[2], 200, 624, 258, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$RAM_amount_label = GUICtrlCreateLabel($Hardware[6], 200, 648, 260, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$RAM_count_label = GUICtrlCreateLabel($Hardware[7], 200, 672, 263, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$SysInfo_Main = GUICtrlCreateLabel("LoL - Get it fixed! Systemübersicht", 113, 8, 301, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
$SysInfo_L_Export = GUICtrlCreateLabel("Alle wichtigen Daten können auch exportiert werden um diese z.B. in", 32, 720, 450, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$SysInfo_L_Export2 = GUICtrlCreateLabel("einem Forum zu posten. Dafür einfach folgenden Button anklicken.", 40, 744, 435, 23)
GUICtrlSetFont(-1, 12, 400, 0, "Calibri")
$SysInfo_B_ExportText = GUICtrlCreateButton("In Textdatei exportieren", 170, 800, 187, 33, 0)
GUICtrlSetOnEvent(-1, "SysInfoExport")
GUICtrlSetFont(-1, 12, 800, 0, "Calibri")
$SysInfo_Export = GUICtrlCreateProgress(171, 787, 185, 9, $PBS_SMOOTH)
GUICtrlSetState(-1, $GUI_HIDE)
GUICtrlSetLimit(-1, 20, 0)
$SysInfo_BarL_status = GUICtrlCreateLabel("Exportiere Daten . ", 176, 768, 180, 19, $SS_CENTER)
GUICtrlSetState(-1, $GUI_HIDE)
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEclick")
EndFunc ; => SysInfo
Func SysExport()
$GameData[0] = FileSelectFolder("Bitte das Zielverzeichnis für den Export auswählen.", "", 2, @MyDocumentsDir)
GUICtrlSetState($SysInfo_Export, $GUI_SHOW)
_FileCreate($GameData[0] & "\SystemInformationen.txt")
GUICtrlSetState($SysInfo_BarL_status, $GUI_SHOW)
GUICtrlSetData($SysInfo_Export, 10)
$Dump = FileOpen($GameData[0] & "\SystemInformationen.txt", 2)
GUICtrlSetData($SysInfo_Export, 20)
GUICtrlSetData($SysInfo_BarL_status, "Exportiere Daten . .")
FileWrite($Dump, "League of Legends - Get it fixed! Tool" & @CRLF & "Systeminformationen" & @CRLF)
GUICtrlSetData($SysInfo_Export, 30)
FileWrite($Dump, "______________________________________" & @CRLF & @CRLF)
GUICtrlSetData($SysInfo_Export, 40)
GUICtrlSetData($SysInfo_BarL_status, "Exportiere Daten . . .")
FileWrite($Dump, "Betriebssystem: " & $System[1] & " - " & $System[2] & @CRLF)
GUICtrlSetData($SysInfo_Export, 50)
FileWrite($Dump, "Servicepack: " & $System[3] & @CRLF)
GUICtrlSetData($SysInfo_Export, 60)
GUICtrlSetData($SysInfo_BarL_status, "Exportiere Daten . ")
;FileWrite($File, "###############################" & @CRLF)
FileWrite($Dump, "CPU Modell: " & $Hardware[1] & @CRLF)
GUICtrlSetData($SysInfo_Export, 70)
FileWrite($Dump, "CPU Taktung: " & $Hardware[4] & "x" & $Hardware[2] & " (aktuell: " & $Hardware[3] & ")" & @CRLF)
GUICtrlSetData($SysInfo_Export, 75)
GUICtrlSetData($SysInfo_BarL_status, "Exportiere Daten . .")
;FileWrite($File, "CPU Kerne: " & $S_CPUcoreSUM & @CRLF)
;FileWrite($File, "###############################" & @CRLF)
FileWrite($Dump, "Grafikkarte: " & $Hardware[8] & @CRLF)
FileWrite($Dump, "Grafikspeicher: " & $Hardware[9] & @CRLF)
FileWrite($Dump, "Treiberdatum: " & $Hardware[10] & @CRLF)
GUICtrlSetData($SysInfo_Export, 80)
;FileWrite($File, "###############################" & @CRLF)
FileWrite($Dump, "Mainboard: " & $Hardware[12] & " (OEM: " & $Hardware[11] & ")" & @CRLF)
FileWrite($Dump, "Arbeitsspeicher: " & $Hardware[6] & " (" & $Hardware[7] & " Modul(e))" &@CRLF)
GUICtrlSetData($SysInfo_Export, 90)
GUICtrlSetData($SysInfo_BarL_status, "Exportiere Daten . . .")
Sleep(500)
FileClose($Dump)
Sleep(500)
_FileCreate(@TempDir & "\SystemInformationen.bat")
GUICtrlSetData($SysInfo_Export, 100)
$Dump = FileOpen(@TempDir & "\SystemInformationen.bat", 2)
sleep(100)
FileWrite($Dump, "start " & $GameData[0] & "\Systeminformationen.txt")
GUICtrlSetData($SysInfo_BarL_status, "Fertig! Öffne Exportdatei")
FileClose($Dump)
Run(@TempDir & "\SystemInformationen.bat")
GUICtrlSetData($SysInfo_BarL_status, "Datei geöffnet!")
GUICtrlSetState($SysInfo_Export, $GUI_HIDE)
Sleep(3000)
GUICtrlSetState($SysInfo_BarL_status, $GUI_HIDE)
EndFunc
; ### Functions Ende ###
; _______________________________________________________________________________________________________
; _______________________________________________________________________________________________________
; ### Beginn Haupt-Interface ###
[/autoit] [autoit][/autoit] [autoit]Func Main()
If WinExists("LoL - Get it fixed! Both") Then
GUIDelete($LoL_EUandUS)
EndIf
; => Plausibilitätsprüfung ob $workdir mit Daten gefüllt ist, ggf. setzen der Variable mit EU/US-Pfad
If $GameData[3] = "" Then
If $GameData[1] <> "" Then
$GameData[3] = $GameData[1]
ElseIf $GameData[2] <> "" Then
$GameData[3] = $GameData[2]
EndIf
EndIf
If $GameData[8] = "" Then
$GameData[8] = $GameData[3]
EndIf
; => Zuweisung der korrekten Betriebssystemarchitektur-strings anhand der Daten
If $System[2] = "X86" Then
$System[2] = "32 bit"
ElseIf $System[2] = "X64" Then
$System[2] = "64 bit"
EndIf
; # GUI Start #
$FixIt_Main = GUICreate("LoL - Get it fixed!", 433, 355, 646, 248)
GUISetIcon("D:\005.ico")
GUISetFont(11, 400, 0, "Calibri")
$Fix_TabCon = GUICtrlCreateTab(8, 8, 420, 312)
GUICtrlSetFont(-1, 10, 800, 0, "Calibri")
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
; => Tab: Willkommen
$T_welcome = GUICtrlCreateTabItem("Willkommen")
$Welcome_Headline = GUICtrlCreateLabel("Willkommen!", 56, 49, 122, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
GUICtrlSetColor(-1, 0x008000)
$Welcome_L_intro1 = GUICtrlCreateLabel("Dieses Programm wird dich bei der Fehlerbehebung für", 56, 97, 346, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Welcome_L_intro2 = GUICtrlCreateLabel("League of Legends unterstützen.", 56, 121, 205, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Welcome_L_intro3 = GUICtrlCreateLabel("Dafür einfach oben eine der Kategorien wählen.", 56, 145, 301, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Welcome_L_info = GUICtrlCreateLabel("Doch zuvor solltest du einen Abstecher zu den Programm-", 56, 182, 361, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Welcome_L_info2 = GUICtrlCreateLabel("optionen machen um es deinen Bedürfnissen anzupassen.", 56, 206, 364, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Welcome_L_info3 = GUICtrlCreateLabel("Werf' zudem einen Blick auf die neuesten Änderungen.", 56, 230, 346, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Welcome_B_options = GUICtrlCreateButton("Programmoptionen", 64, 269, 139, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "OptionsClick"); => OptionsClick
$Welcome_B_Pnotes = GUICtrlCreateButton("Änderungsnotizen", 232, 269, 139, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "welcome_B_PnotesClick"); => welcome_B_PnotesClick
; => Tab: Allgemein
$T_general = GUICtrlCreateTabItem("Allgemein")
$General_Headline = GUICtrlCreateLabel("Allgemeine Überprüfung", 98, 49, 219, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
GUICtrlSetColor(-1, 0x008000)
$General_L_intro = GUICtrlCreateLabel("In diesem Bereich kannst du deinen Computer überprüfen", 56, 96, 364, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$General_L_intro2 = GUICtrlCreateLabel("lassen ob er alle Vorraussetzungen erfüllt um das Spiel", 56, 122, 342, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$General_L_intro3 = GUICtrlCreateLabel("League of Legends ordnungsgemäß auszuführen.", 56, 149, 305, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$General_L_info = GUICtrlCreateLabel("Die Überprüfung kann einen Moment dauern, da einiges", 56, 184, 352, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$General_L_info2 = GUICtrlCreateLabel("an Daten abgerufen wird. Danach erscheint ein Fenster", 56, 210, 343, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$General_L_info3 = GUICtrlCreateLabel("welches dir die Ergebnisse der Überprüfung anzeigt.", 56, 236, 326, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$General_B_systemcheck = GUICtrlCreateButton("Überprüfung starten", 144, 272, 147, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "General_B_systemcheckClick"); => general_B_systemcheckClick
; => Tab: Startprogramm
$T_launcher = GUICtrlCreateTabItem("Startprogramm")
$launcher_headline = GUICtrlCreateLabel("Probleme im Startprogramm", 90, 49, 251, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
GUICtrlSetColor(-1, 0x008000)
$launcher_L_intro = GUICtrlCreateLabel("Dieser Bereich behandelt die Probleme mit dem LoL-Launcher.", 44, 96, 391, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$launcher_playfixlabel = GUICtrlCreateLabel("Sollte die Spielen-Schaltfläche auch nach einem erfolgreichem", 44, 168, 391, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$launcher_playfixlabel2 = GUICtrlCreateLabel("Patchvorgang grau bleiben, kannst du dies hier beheben lassen.", 44, 192, 397, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$launcher_errorlabel = GUICtrlCreateLabel("Dies behebt den Fehler", 148, 264, 149, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$launcher_errorlabel2 = GUICtrlCreateLabel("''Im Startprogramm ist ein Fehler aufgetreten, bitte neustarten.''", 34, 288, 401, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$launcher_B_playfix = GUICtrlCreateButton("Spielen-Schaltfläche", 144, 132, 139, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "launcher_B_playClick"); => launcher_B_playClick
$launcher_B_error = GUICtrlCreateButton("Startprogramm", 144, 226, 139, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "launcher_B_errorClick"); => launcher_B_errorClick
$launcher_divide = GUICtrlCreateLabel("__________________________________________________", 44, 107, 354, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$launcher_divide2 = GUICtrlCreateLabel("__________________________________________________", 44, 202, 354, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
; => Tab: Verbindung
$T_connection = GUICtrlCreateTabItem("Verbindung")
$connection_headline = GUICtrlCreateLabel("Verbindungsprobleme", 112, 49, 196, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
GUICtrlSetColor(-1, 0x008000)
$connection_L_intro = GUICtrlCreateLabel("Solltest du Verbindungsabbrüche oder starke Verzögerungen", 48, 96, 381, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$connection_L_intro2 = GUICtrlCreateLabel("haben, so kannst du in diesem Bereich eine Analyse des", 48, 121, 349, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$connection_L_intro3 = GUICtrlCreateLabel("Verbindungsaufbaus zu den LoL-Servern durchführen.", 48, 145, 336, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$connection_tracelabel = GUICtrlCreateLabel("Für die Analyse der Verbindung wird das mitgelieferte", 48, 209, 340, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$connection_tracelabel2 = GUICtrlCreateLabel("Programm ''WinMTR'' (Freeware) gestartet.", 48, 235, 270, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$connection_tracehint = GUICtrlCreateLabel("Hinweis:", 48, 184, 58, 22)
GUICtrlSetFont(-1, 11, 800, 4, "Calibri")
$connection_B_trace = GUICtrlCreateButton("Analyse starten", 152, 265, 123, 33, 0)
GUICtrlSetFont(-1, 10, 800, 0, "Microsoft Sans Serif")
GUICtrlSetOnEvent(-1, "ConnectionAnalyseClick"); => ConnectionAnalyseClick
; => Tab: Informationen
$T_informationen = GUICtrlCreateTabItem("Informationen")
$informationen_headline = GUICtrlCreateLabel("League of Legends - Get it fixed!", 48, 49, 285, 30)
GUICtrlSetFont(-1, 16, 800, 4, "Calibri")
GUICtrlSetColor(-1, 0x008000)
$informationen_L_version = GUICtrlCreateLabel("aktuelle Version: 0.9", 48, 89, 131, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$informationen_L_coder = GUICtrlCreateLabel("Programmiert von Matricus", 48, 116, 172, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Informationen_L_hint = GUICtrlCreateLabel("Alle Lösungen basieren auf meinen Erfahrungen - IT-Technik", 48, 161, 376, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Informationen_L_hint2 = GUICtrlCreateLabel("im Allgemeinen, sowie LoL an sich. Einige Lösungen basieren", 48, 185, 379, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$Informationen_L_hint3 = GUICtrlCreateLabel("zudem auf Einträge aus der US Knowledge Base für LoL.", 48, 209, 343, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Calibri")
$informationen_B_UCnotes = GUICtrlCreateButton("kommende Änderungen", 200, 257, 169, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "Info_B_notesClick"); => Info_B_notesClick
$informationen_B_SysInfo = GUICtrlCreateButton("Systemdaten", 56, 257, 107, 33, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "SysInfoClick"); => SysInfoClick
GUICtrlCreateTabItem("")
$B_close = GUICtrlCreateButton("&Beenden", 336, 323, 83, 25, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "CLOSEclick"); => CLOSEclick
$B_options = GUICtrlCreateButton("&Optionen", 16, 323, 83, 25, 0)
GUICtrlSetFont(-1, 11, 800, 0, "Calibri")
GUICtrlSetOnEvent(-1, "OptionsClick"); => OptionsClick
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEclick")
; # GUI Ende #
EndFunc
; ### Ende Haupt-Interface ###
; ___________________________________________________________________________________________________________
; ___________________________________________________________________________________________________________
; ### window events ###
[/autoit] [autoit][/autoit] [autoit]Func CLOSEclick()
If @GUI_WinHandle = $LoLFixit_Launcher Or @GUI_WinHandle = $FixIt_Main Then
Exit
Else
If @GUI_WinHandle = $LoL_EUandUS Then
MsgBox(48, "LoL - Get it fixed!", "Achtung! Du hast keinen Client ausgewählt." & @CRLF & "Das Programm benötigt eine Entscheidung." & @CRLF & "Bitte Programm neustarten und Client auswählen.")
Exit
;WinClose("LoL - Get it fixed! Both")
;GUIDelete($LoL_EUandUS)
;$workdir = $DirEU
;Main()
Else
If @GUI_WinHandle = $SysInfo Then
GUIDelete($SysInfo)
WinClose("Get it fixed! - System Überblick")
WinActivate("LoL - Get it fixed!")
EndIf
EndIf
EndIf
EndFunc
; ##################################
; ## Haupt-Interface ##
Func welcome_B_PnotesClick()
Info_notes()
EndFunc
; ----------------------------------
Func general_B_systemcheckClick()
EndFunc
; ----------------------------------
Func Laun_B_closeClick() ; => Button für Patcher-Fix (sofortiges schließen)
Launcher_closing()
EndFunc
; ----------------------------------
Func launcher_B_errorClick() ; => Button für Client-Fix
Launcher_error()
EndFunc
; ----------------------------------
Func launcher_B_playClick(); => Button für Spiele-Button Fix
Launcher_play()
EndFunc
; ----------------------------------
Func ConnectionAnalyseClick() ; => Button für Modul Verbindungsanalyse mit WinMTR
connection_trace()
EndFunc
; ----------------------------------
Func SysInfoClick() ; => Button für Modul SysInfo
SysInfo()
EndFunc
; ----------------------------------
Func Info_B_notesClick()
upcoming()
EndFunc
; ----------------------------------
Func OptionsClick()
EndFunc
[/autoit] [autoit][/autoit] [autoit]; ## Haupt-Interface ##
; ##################################
; ##################################
; ##Launcher Entscheidung ##
Func Button_EU() ; => Entscheidungsfenster ob EU/US >> Button für EU
$GameData[3] = $GameData[1]
Main()
EndFunc
; ----------------------------------
Func Button_US() ; => Entscheidungsfenster ob EU/US >> Button für US
$GameData[3] = $GameData[2]
Main()
EndFunc
; ##Launcher Entscheidung ##
; ##################################
; ##################################
; ## SysInformationen ##
Func SysInfoExport() ; => Button in Modul SysInfo für Datenexport
SysExport()
EndFunc
; ## SysInformationen ##
; ##################################
; ##################################
; ## Optionen ##
Func Checkbox1Click() ; => Checkbox zum automatischen LoL Start nach Fix in main()
$GameData[5] = GUICtrlRead($run_lol)
if $GameData[5] = $GUI_CHECKED Then
$GameData[6] = 1
Else
$GameData[6] = 0
EndIf
EndFunc
; ## Optionen ##
; ##################################
; ##################################
; ## alte OnEvent's ##
#cs
Func But_BPClick() ; => Button für Shop-Fix
shop_blank()
EndFunc
Func Main_B_upcomingClick(); => Button für geplante Änderungen
main_upcoming()
EndFunc
;Func Button2Click(); => Beenden Button in main()
Exit
EndFunc
Func Info_B_notesClick() ; => Button für Patchnotizen
Info_notes()
EndFunc
#ce
; ## alte OnEvent's ##
; ##################################
fG
Matricus