Du bist nicht eingeloggt.

WoW-Autologin

B2B-Realm Status

Social Networks
B2B auf Twitter
B2B auf Facebook

Bugtracker

Toruviel

Lehrling

  • »Toruviel« ist der Autor dieses Themas

Beiträge: 14

Registrierungsdatum: 30.08.2010

  • Private Nachricht

1

Dienstag, 14. September 2010, 01:17

WoW-Autologin

Quellcode

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

sName = "Acoount-1"
sPassword = "Passwort"
sPath = "C:\Programme\World of Warcraft\Wow.exe"
iWowStartDelay = 5000


set WshShell = CreateObject("WScript.Shell")

WshShell.Run(Chr(34) & sPath & Chr(34))

WScript.Sleep iWowStartDelay

WshShell.AppActivate "World of Warcraft"

WshShell.SendKeys sName, 1
WshShell.SendKeys "{TAB}", 1
WshShell.SendKeys sPassword, 1
WshShell.SendKeys "{ENTER}", 1


Ein kleines Autologin-Programm für WoW das über Windows Script Host funktioniert (zumindest unter WinXP funktionierts).
Einfach den Text irgendwo als eine Datei mit der Erweiterung .vbs speichern, oben den Accountnamen und Passwort eintragen.
Gegebenfalls den WoW-Pfad und die Zeit, die WoW braucht um sich zu laden (in ms) korrigieren.
Wenn man dann die Datei startet, kommt man gleich zum Charakterbildschirm, ohne Passwort eintippen zu müssen.
Achtung: Wenn jemand die Datei liest, sieht er auch den Passwort! Also nicht auf einem PC benutzen, wo die Geschwister Zugang haben.
Es hat sich bereits 1 registrierter Benutzer bedankt.

Benutzer die sich bedankten:

Mangosniper

Alandor

Fachmann

Beiträge: 175

Registrierungsdatum: 23.08.2010

  • Private Nachricht

2

Dienstag, 14. September 2010, 01:39

schönes script :D

Blessed

Lehrling

Beiträge: 15

Registrierungsdatum: 22.08.2010

Hauptcharakter: qweqweqwe

  • Private Nachricht

3

Dienstag, 14. September 2010, 02:04

Bei mir klappts nicht.
Entweder bin ich zu doof oder es liegt an Vista.

Alandor

Fachmann

Beiträge: 175

Registrierungsdatum: 23.08.2010

  • Private Nachricht

4

Dienstag, 14. September 2010, 08:05

blessed ich habe auch vista.... du musst wow zu erst als admin ausführen damit wow speichern kann auf welcher realm du zocken will xD und dann klappt es ;)

Blessed

Lehrling

Beiträge: 15

Registrierungsdatum: 22.08.2010

Hauptcharakter: qweqweqwe

  • Private Nachricht

5

Dienstag, 14. September 2010, 16:09

Klappt nicht. :s
Wie ist das mit dem .vbs gemeint?
Hab das jetzt als 'AutoLogin.vbs' gespeichert.

Toruviel

Lehrling

  • »Toruviel« ist der Autor dieses Themas

Beiträge: 14

Registrierungsdatum: 30.08.2010

  • Private Nachricht

6

Dienstag, 14. September 2010, 17:07

Zitat von »Blessed«

Klappt nicht. :s
Wie ist das mit dem .vbs gemeint?
Hab das jetzt als 'AutoLogin.vbs' gespeichert.

So ist es auch gemeint. Was passiert den, wenn du die Datei startest?

ChiLLeD

Lehrling

Beiträge: 20

Registrierungsdatum: 15.09.2010

  • Private Nachricht

7

Montag, 4. Oktober 2010, 13:30

sName = "Acoount-1" <------- da dein accountnamen einfügen zb : sName = "Chilled-1"
sPassword = "Passwort" <------- da dein accountapsswort einfügen zb : sName = "orly123"
sPath = "C:\Programme\World of Warcraft\Wow.exe" <----- der pfad eurer wow.exe (habt ihr sicher unter Games oder so installiert)
iWowStartDelay = 5000 (zeit die euer wow zum starten braucht....bei mir locker 20+ sekunden ^^)

beim delay liegt sicher bei den meisten der knackpunkt....da es leider keinen waitactive command gibt kann man dies aber durch ne schleife angehen.

Quellcode

 
1
2
3
4

Do
	wowFound = WshShell.AppActivate("World of Warcraft")
    WScript.Sleep 200
Loop Until wowFound


lösen lässt es sich leider mit wsh nicht da das fenster auf langsamen rechnern wesentlich früher aktiv wird als eingabeempfänglich.

ein script das aber sicher überall funktioniert sieht dann so aus:

Quellcode

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

sName = "DEINACCOUNT"
sPassword = "DEINPASSWORT"
sPath = "DEINPFAD\Wow.exe"
iWowStartDelay = 5000 

set WshShell = CreateObject("WScript.Shell")

WshShell.Run(Chr(34) & sPath & Chr(34))

Do
	wowFound = WshShell.AppActivate("World of Warcraft")
	WScript.Sleep 200
Loop Until wowFound

WScript.Sleep iWowStartDelay

WshShell.SendKeys sName, 1
WshShell.SendKeys "{TAB}", 1
WshShell.SendKeys sPassword, 1
WshShell.SendKeys "{ENTER}", 1


solltet ihr zu lange warten müssen nach game start ändert diesen wert iWowStartDelay = 5000 (1000 = 1sek) nach unten. wenns nicht funktioniert nach oben.
PS: Accountdaten speichern häkchen muss weg sein bei dem script!!!!
Gruß, ChiLLeD

Reborn

Geselle

Beiträge: 81

Registrierungsdatum: 23.08.2010

Hauptcharakter: Reborn

Gilde: Druckwelle

  • Private Nachricht

8

Dienstag, 5. Oktober 2010, 21:00

hier mal für autoit der gleiche script,
hier ändert ihr einfach pw und acc name sowie sleep.
wenn nach dem wow starten nichts passiert=sleep höher setzen. 1000=1 sek
ihr müsst euch einfach autoit downloaden, kostet nichts, installieren, new script, script speichern aufm desktop oder so, da rechtsklickt drauf -->script compilieren


Quellcode

 
1

Run("C:\Euer WoW Pfad...\World of Warcraft\Wow.exe");sleep(10000);clippput("ACCname");send'("Accname");send("{TAB}");clippput("Accname");send("Passwort");send("{ENTER}")

gefühlter hunderster edit: ka warum das mit dem ollen quellcode nicht klappt :( es sollte halt etwa so von den zeilen sein:
bla
;
bla
;
bla
;
bla
;
usw
mfg
vll gehts so:^^

Run("C:\Pfad\Wow.exe")
;
sleep(10000)
;
clipput("ACCname")
;
send("Accname")
;
send("{TAB}")
;
clipput("ACCmame")
;
send("Passwort")
;
send("{ENTER}")

Dieser Beitrag wurde bereits 8 mal editiert, zuletzt von »Reborn« (6. Oktober 2010, 17:49)

ChiLLeD

Lehrling

Beiträge: 20

Registrierungsdatum: 15.09.2010

  • Private Nachricht

9

Mittwoch, 6. Oktober 2010, 00:43

fehleranfälliger als das wsh script...wenn du schon au3 script postest mach es wenigstens mit winwaitactive.
btw jede zeile als code posten = fail :P
Gruß, ChiLLeD

Toruviel

Lehrling

  • »Toruviel« ist der Autor dieses Themas

Beiträge: 14

Registrierungsdatum: 30.08.2010

  • Private Nachricht

10

Mittwoch, 6. Oktober 2010, 07:32

Na dann ihr AutoItler. Die Funktion WinWaitActive bringt an dieser Stelle relativ wenig, da das WoW-Fenster erscheint, bevor sein Inhalt geladen wird, d.h. bevor man ihrgendwas eingeben kann. In dem Sinne: PixelCheckSum sei mit euch. Das WoW-Logo in der linken oberen Ecke ändert sich nicht, der Bereich eignet sich durchaus für die Nutzung der genannten Funktion.
Übrigens, wer will, kann zur Eingabe der Daten

Quellcode

 
1

ControlSend($hWnd, '', '', $sName & '{TAB}' & $sPassword & '{ENTER}')
benutzen. Mir war an dieser Stelle die WSH-Funktion lieber, die gibt den Text sofort ein, anstatt zu buchstabieren.

Quellcode

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36

#NoTrayIcon

Local $sName = 'lalala-1'
Local $sPassword = 'qwertü'
Local $sPath = 'C:\Programme\World of Warcraft\Wow.exe'
Local $iMaxStartDelay = 15000

Local $iPixelCheacksum = 4155611440
Local $iCoordsLeft = 64
Local $iCoordsTop = 64
Local $iCoordsRight = 271
Local $iCoordsBottom = 111

Local $hWnd, $oWSShell, $aWinList
Local $iTimer = TimerInit()
Local $iPid = Run($sPath)


Do
	If TimerDiff($iTimer) > $iMaxStartDelay Then Exit
	If Not $hWnd Then
		$aWinList = WinList('World of Warcraft')
		If Not IsArray($aWinList) Or UBound($aWinList, 0) <> 2 Or $aWinList[0][0] <= 0 Then ContinueLoop
		For $i = 1 To $aWinList[0][0] Step +1
			If WinGetProcess($aWinList[$i][1]) = $iPid Then
				$hWnd = $aWinList[$i][1]
				ExitLoop
			EndIf
		Next
	ElseIf Not WinActive($hWnd) Then
		WinActivate($hWnd)
	EndIf
Until $hWnd And WinActive($hWnd) And PixelChecksum($iCoordsLeft, $iCoordsTop, $iCoordsRight, $iCoordsBottom, 1, $hWnd, 1) = $iPixelCheacksum

$oWSShell = ObjCreate('WScript.Shell')
$oWSShell.SendKeys($sName & '{TAB}' & $sPassword & '{ENTER}')

Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »Toruviel« (6. Oktober 2010, 07:38)