Hi Leute, ich habe derweil 2 Skripts:
Das ist mein Launcher
[autoit]#include <GUIConstantsEx.au3>
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Timmy\Desktop\Autoit\WoW-Starter.kxf
$WoW = GUICreate("World of Warcraft Auto Starter / Login © Rubberducky 2008", 633, 447, 194, 128)
GUISetIcon("D:\World of Warcraft\Wow.exe")
GUISetCursor(3)
GUISetBkColor(0x000000)
$Headline = GUICtrlCreateLabel("World of Warcraft Game Starter and Auto Login", 24, 24, 583, 39)
GUICtrlSetFont(-1, 18, 800, 0, "Comic Sans MS")
GUICtrlSetColor(-1, 0x8022)
$Startandlogin = GUICtrlCreateButton("Start and Login", 16, 400, 177, 33, 0)
GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x8022)
$Onlylogin = GUICtrlCreateButton("Only Login", 227, 400, 177, 36, 0)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Exit = GUICtrlCreateButton("Exit", 448, 400, 177, 33, 0)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x8022)
$Label1 = GUICtrlCreateLabel("Accountname:", 16, 184, 186, 36)
GUICtrlSetFont(-1, 20, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x8022)
$Label2 = GUICtrlCreateLabel("Password:", 72, 246, 126, 33)
GUICtrlSetFont(-1, 19, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x8022)
$wowexecutable = (wow.exe)
$1 = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Accountname")
$2 = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Password")
GUICtrlCreateInput($2, 201, 248, 281, 21)
GUICtrlCreateInput($1, 201, 193, 281, 21)
$Label3 = GUICtrlCreateLabel("Charslot:", 88, 299, 108, 33)
GUICtrlSetFont(-1, 19, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x8022)
GUISetState(@SW_SHOW)
GUICtrlCreatePic("background.jpg", 1, 1, 663, 447)
#EndRegion ### END Koda GUI section ###
$wowpath = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', 'Installpath')
$wowexe = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', 'Exedatei')
$Account = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Accountname")
$Password = RegRead('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Password")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Exit
Exit
Case $Startandlogin
ShellExecute($wowexe)
WinActivate("World of Warcraft")
Sleep(7000)
Send("{LCTRL}")
Send("{A}")
Send("{BS}")
Send($Account)
Send("{TAB}")
Send($Password)
Send("{ENTER}")
Sleep(4000)
Case $Onlylogin
WinActivate("World of Warcraft")
Sleep(7000)
Send("{LCTRL}")
Send("{A}")
Send("{BS}")
Send($Account)
Send("{TAB}")
Send($Password)
Send("{ENTER}")
Sleep(1000)
EndSwitch
WEnd
Das ist meine reg-write exe:
[autoit]#include <GUIConstantsEx.au3>
$1 = InputBox("Accountname!", "Please insert the Accountname. Bitte geben sie den Accountnamen ein.", "")
$2 = InputBox("Password:!", "Please insert the Password. Bitte geben sie das Passwort ein.", "")
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Accountname", "REG_SZ", $1)
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Password", "REG_SZ", $2)
RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Blizzard Entertainment\World of Warcraft', "Exedatei", "REG_SZ", $3)
Nun frage ich euch: Ich brauch für meinen Launcher (Quellcode1) einen Befehl, der die $wowpath nimmt. Die ist bei mir:
D:\World of Warcraft 2.3.3\
ZU diesem $wowpath soll noch die datei: wow.exe angehängt werden. Sodass ich nicht immer den Pfad sagen soll, sondern das Tool sich die Daten aus der Reg zieht. Nun soll das 2te Tool auch diesen Pfad ($wowpath\wow.exe) in die Reg schreiben, nur weiß ich nicht, wie ich die $wowpath vorne einfügen kann, sodass es auf jedne User angepasst wird.
