[Release] WoW Launcher Creator (für Privatserver)

07/04/2009 02:10 Roggazzz#1
Hi @ all,
heute melde ich mich glaube ich zum ersten mal heute aber egal.
Zum Thema:
Ich werde öfters im icq und co. gefragt ob ich einen guten Launcher Creator kenne. Dazu muss ich immer mit nein antworten also hab ich mich heute mal an einen Dran gesetzt, er ist nicht perfekt aber er tut das was er tun soll.
Leider gibt es einen Nachteil an der ganzen sache, es wird nur der AutoIT Code ausgegeben da das mt dem in .exe umwandeln (noch) nicht so will.

hier eine kleine Anleitung:

1. Alle Vier Felder ausfüllen
2. Code erzeugen lassen
3. Code in Scite Kopieren
4. Code Kompilieren
5. Exe in WoW Ordner stecken
6. Veröffentlichen(Credits nicht Vergessen)

Und hier der Downloadlink: [Only registered and activated users can see links. Click Here To Register...]

Ich hoffe ich habt damit viel Spaß(auch wen er nur den Code ausgibt)
Gruß Roggazzz
P.S. ich hoffe ich ibn im richtigen bereich.
07/04/2009 09:22 halloman#2
ja is der richtige bereich...ich werde nachher mal schauen obes auch von dir ist...wenn man Novos 1 click lädt ist dort ein Creator dabei ich muss schauen ob es der is

sry aber du hast nur 1 Post da ist es ein bisschen dumm
07/04/2009 12:53 Roggazzz#3
falls ihr mir nicht glaubt kann ich gerne den code posten.
achso bevor ich es vergesse neue Version ist da(v0.2).
den Script in Anwendungs converter wird mit version 0.5 kommen
in der neuen version(v0.2) kann man jetzt eigene button farben nehmen.
in v0.3 wird dann noch die hintergrundfarbe hinzugefügt und eine vorschau.
Link: [Only registered and activated users can see links. Click Here To Register...]
Gruß Roggazzz
08/28/2009 21:33 .Crystal#4
der link ist down
08/28/2009 22:15 mHz#5
Someone can translate in english please? ( +thanks )
09/07/2009 19:38 deusmaximus120#6
[Only registered and activated users can see links. Click Here To Register...] Virus test
09/08/2009 15:23 .Crystal#7
Quote:
Originally Posted by deusmaximus120 View Post
[Only registered and activated users can see links. Click Here To Register...] Virus test
hat nix zu sagen
09/08/2009 20:35 TheOwnWay#8
PHP Code:
#include  'IE.au3'
#include 'ButtonConstants.au3'
#include  'EditConstants.au3'
#include  'GUIConstantsEx.au3'
#include  'StaticConstants.au3'
#include  'WindowsConstants.au3'
$embedded = _IECreateEmbedded () ;Das Embedded um die Serverpage anzuzeigen
$serversite = "http://uwcrew.eu/" ;Die Seite zu der $embedded später navigieren soll
$realmlist= "set realmlist logon-uwcrew.eu" ;die Realmlist die geändert werden soll
$accpage="http://wow.uwc-network.eu/accountsystem2.4.3/";Page zur Accounterstellung
$forum="http://board-uwcrew.eu";Der Link zum Forum


#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("WoW Launcher by Roggazzz", 812, 508, 125, 117);Die Form auf der alle Buttons sind
GUISetBkColor(0xC0C0C0,$Form1)
$Enterpage=GUICtrlCreateObj($Embedded, 8, 8, 788, 385);Das Objekt das das $embedded anzeigt
$Button1 = GUICtrlCreateButton("WoW Starten", 344, 402, 83, 33, 0) ;Der Button zum Starten von WoW
GUICtrlSetBkColor(-1, 0x7D8078)
$Checkbox1 = GUICtrlCreateCheckbox("Realmlist ändern", 16, 416, 97, 17);Die Checkbox zum Realmlist ändern


$Checkbox2 = GUICtrlCreateCheckbox("Cache Löschen", 16, 440, 97, 17);Die Checkbox zum Cache löschen
$Button2 = GUICtrlCreateButton("Zurückpatchen", 128, 424, 89, 25, 0);Der Zurückpatchen Button
GUICtrlSetBkColor(-1, 0x7D8078)
$Group1 = GUICtrlCreateGroup("Einstellungen", 8, 400, 225, 73);Das Feld das die Einstellungen umgibt
$Button3 = GUICtrlCreateButton("Account erstellen", 648, 432, 91, 17, 0);Der Accpage Button
GUICtrlSetBkColor(-1, 0x7D8078)
$Button4 = GUICtrlCreateButton("Serverpage", 648, 416, 91, 17, 0);der Serverpage button
GUICtrlSetBkColor(-1, 0x7D8078)
$Button5 = GUICtrlCreateButton("Forum", 648, 448, 91, 17, 0);Der Forum Button
GUICtrlSetBkColor(-1, 0x7D8078)
$Group2 = GUICtrlCreateGroup("Besuchbare Seiten", 608, 400, 169, 73);Die Gruppe dieser Drei obrigen buttons
$M1 = GUICtrlCreateMenu("Extras");Das Menu Extras
$M1_1 = GUICtrlCreateMenuItem("Aktuelle Realmlist",$M1);Das Item Mit der Realmlist ufnktion
$M1_2 = GUICtrlCreateMenuItem("Cache Checker",$M1);Das Item mit der Cache funktion#
$M1_3 = GUICtrlCreateMenuItem("Verknüpfung auf dem Desktop erstellen",$M1);Das Item mit der Cache funktion
$M1_4 = GUICtrlCreateMenuItem("WoW Ordner Öffnen",$M1);Das Item mit der Cache funktion
$Label1 = GUICtrlCreateLabel("Launcher Pfad:", 356, 438, 74, 17)
$Input1 = GUICtrlCreateInput(@ScriptFullPath, 250, 454, 301, 21,$ES_READONLY)
If FileExists(@ScriptDir&"\WoW.exe") Then
    GuiCtrlSetData($Input1,@ScriptDir&"\WoW.exe")
ElseIf FileExists(@ScriptDir&"\WoW.exe") = 0 Then
    GuiCtrlSetData($Input1,"WoW.exe wurde nicht Gefunden")
    
    EndIF
GUISetState(@SW_SHOW)
_IENavigate ($Embedded, $serversite) ;Der Navigieren Befehl
#EndRegion ### END Koda GUI section ###

While 1 ;Anfang einer Schleife
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $M1_4
            ShellExeCute(@ScriptDir);Öffnet den Ordner in dem Der Launcher vorhanden ist
        Case $M1_3
            FileCreateShortcut(@ScriptFullPath,@DesktopDir&"\WoW Launcher");Erstellt eine Verknüpfung des Launchers auf dem Desktop
        Case $M1_1
            $List=FileRead(@ScriptDir&"\realmlist.wtf");Liest die Realmlist ein
        MsgBox(0,"Realmlist Checker","Ihre Aktuelle Realmlist lautet: "&$List);Gibt die Realmlist die in $List eingelesen wurde aus.
        
    Case $M1_2
        If FileExists(@ScriptDir&"\Cache\") Then
            $MSG=MsgBox(4,"Cache Checker","Der Cache Ordner Existiert.Cache jetzt Löschen?")
            If  $MSG = 6 Then
                DirRemove(@ScriptDir&"\Cache\",1);Löscht den Cache Ordner
                MsgBox(0,"Cache Checker","Löschvorgang erfolgreich durchgeführt")
            EndIf
            ElseIF FileExists(@ScriptDir&"\Cache\") = 0 Then
            MsgBox(0,"Cache Checker","Der Cache Ordner ist nicht vorhanden")
            
                
            EndIF
        Case $Button1 ;Funktionen vom "WoW Starten" button
        If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then ;Überprüft ob die Realmlistchangefunktion geklickt wurde
                FileDelete(@ScriptDir&"\realmlist.wtf");Löscht die Realmlist
                FileWrite(@ScriptDir&"\realmlist.wtf",$realmlist);Trägt die oben eingegeben Realmlist ein
                FileClose(@ScriptDir&"\realmlist.wtf");Schliest die Datei
                ElseIF BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then ;Checkt ob Die Cache Löschen-Funktion angeklickt wurde
                DirRemove(@ScriptDir&"\Cache\",1);Löscht den Cache Ordner
                EndIF
                Run(@ScriptDir&"\WoW.exe") ;Startet WoW
                Exit;Schließt das Skript
            Case $Button2
MsgBox(0,"Fehler","Die Zurückpatchen funktion ist noch nicht Bereit.")    
Case $Button4;Wen Button4 geklickt wird.....
    _IENavigate ($Embedded, $serversite) ;Zur Serverseite Navigieren
Case $Button3 ;Wen Button3 geklickt wird...
    _IENavigate ($Embedded, $accpage) ;Zur Accounterstellen seite Navigieren
    Case $Button5 ;Wen Button5 geklickt wird...
    _IENavigate ($Embedded, $forum) ;Zum Forum Navigieren
                

    EndSwitch
WEnd;Ende Einer Schleife 
auf dem ftp zu lesen.


edit:

das auch:

launcher2.txt
PHP Code:
#include 'C:\Scripts\Include\IE.au3'
#include 'C:\Scripts\Include\ButtonConstants.au3'
#include 'C:\Scripts\Include\EditConstants.au3'
#include 'C:\Scripts\Include\GUIConstantsEx.au3'
#include 'C:\Scripts\Include\StaticConstants.au3'
#include 'C:\Scripts\Include\WindowsConstants.au3'



$embedded = _IECreateEmbedded () ;Das Embedded um die Serverpage anzuzeigen
$serversite = "http://uwcrew.eu/" ;Die Seite zu der $embedded später navigieren soll
$realmlist= "set realmlist logon-uwcrew.eu" ;die Realmlist die geändert werden soll
$accpage="http://wow.uwc-network.eu/accountsystem2.4.3/";Page zur Accounterstellung
$forum="http://board-uwcrew.eu";Der Link zum Forum


#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("WoW Launcher by Roggazzz", 812, 508, 125, 117);Die Form auf der alle Buttons sind
GUISetBkColor(0xC0C0C0,$Form1)
$Enterpage=GUICtrlCreateObj($Embedded, 8, 8, 788, 385);Das Objekt das das $embedded anzeigt
$Button1 = GUICtrlCreateButton("WoW Starten", 344, 402, 83, 33, 0) ;Der Button zum Starten von WoW
GUICtrlSetBkColor(-1, 0x7D8078)
$Checkbox1 = GUICtrlCreateCheckbox("Realmlist ändern", 16, 416, 97, 17);Die Checkbox zum Realmlist ändern


$Checkbox2 = GUICtrlCreateCheckbox("Cache Löschen", 16, 440, 97, 17);Die Checkbox zum Cache löschen
$Button2 = GUICtrlCreateButton("Zurückpatchen", 128, 424, 89, 25, 0);Der Zurückpatchen Button
GUICtrlSetBkColor(-1, 0x7D8078)
$Group1 = GUICtrlCreateGroup("Einstellungen", 8, 400, 225, 73);Das Feld das die Einstellungen umgibt
$Button3 = GUICtrlCreateButton("Account erstellen", 648, 432, 91, 17, 0);Der Accpage Button
GUICtrlSetBkColor(-1, 0x7D8078)
$Button4 = GUICtrlCreateButton("Serverpage", 648, 416, 91, 17, 0);der Serverpage button
GUICtrlSetBkColor(-1, 0x7D8078)
$Button5 = GUICtrlCreateButton("Forum", 648, 448, 91, 17, 0);Der Forum Button
GUICtrlSetBkColor(-1, 0x7D8078)
$Group2 = GUICtrlCreateGroup("Besuchbare Seiten", 608, 400, 169, 73);Die Gruppe dieser Drei obrigen buttons
$M1 = GUICtrlCreateMenu("Extras");Das Menu Extras
$M1_1 = GUICtrlCreateMenuItem("Aktuelle Realmlist",$M1);Das Item Mit der Realmlist ufnktion
$M1_2 = GUICtrlCreateMenuItem("Cache Checker",$M1);Das Item mit der Cache funktion#
$M1_3 = GUICtrlCreateMenuItem("Verknüpfung auf dem Desktop erstellen",$M1);Das Item mit der Cache funktion
$M1_4 = GUICtrlCreateMenuItem("WoW Ordner Öffnen",$M1);Das Item mit der Cache funktion
$Label1 = GUICtrlCreateLabel("Launcher Pfad:", 356, 438, 74, 17)
$Input1 = GUICtrlCreateInput(@ScriptFullPath, 250, 454, 301, 21,$ES_READONLY)
If FileExists(@ScriptDir&"\WoW.exe") Then
    GuiCtrlSetData($Input1,@ScriptDir&"\WoW.exe")
ElseIf FileExists(@ScriptDir&"\WoW.exe") = 0 Then
    GuiCtrlSetData($Input1,"WoW.exe wurde nicht Gefunden")
    
    EndIF
GUISetState(@SW_SHOW)
_IENavigate ($Embedded, $serversite) ;Der Navigieren Befehl
#EndRegion ### END Koda GUI section ###

While 1 ;Anfang einer Schleife
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        case $M1_4
            ShellExeCute(@ScriptDir);Öffnet den Ordner in dem Der Launcher vorhanden ist
        Case $M1_3
            FileCreateShortcut(@ScriptFullPath,@DesktopDir&"\WoW Launcher");Erstellt eine Verknüpfung des Launchers auf dem Desktop
        Case $M1_1
            $List=FileRead(@ScriptDir&"\realmlist.wtf");Liest die Realmlist ein
        MsgBox(0,"Realmlist Checker","Ihre Aktuelle Realmlist lautet: "&$List);Gibt die Realmlist die in $List eingelesen wurde aus.
        
    Case $M1_2
        If FileExists(@ScriptDir&"\Cache\") Then
            $MSG=MsgBox(4,"Cache Checker","Der Cache Ordner Existiert.Cache jetzt Löschen?")
            If  $MSG = 6 Then
                DirRemove(@ScriptDir&"\Cache\",1);Löscht den Cache Ordner
                MsgBox(0,"Cache Checker","Löschvorgang erfolgreich durchgeführt")
            EndIf
            ElseIF FileExists(@ScriptDir&"\Cache\") = 0 Then
            MsgBox(0,"Cache Checker","Der Cache Ordner ist nicht vorhanden")
            
                
            EndIF
        Case $Button1 ;Funktionen vom "WoW Starten" button
        If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then ;Überprüft ob die Realmlistchangefunktion geklickt wurde
                FileDelete(@ScriptDir&"\realmlist.wtf");Löscht die Realmlist
                FileWrite(@ScriptDir&"\realmlist.wtf",$realmlist);Trägt die oben eingegeben Realmlist ein
                FileClose(@ScriptDir&"\realmlist.wtf");Schliest die Datei
                ElseIF BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then ;Checkt ob Die Cache Löschen-Funktion angeklickt wurde
                DirRemove(@ScriptDir&"\Cache\",1);Löscht den Cache Ordner
                EndIF
                Run(@ScriptDir&"\WoW.exe") ;Startet WoW
                Exit;Schließt das Skript
            Case $Button2
MsgBox(0,"Fehler","Die Zurückpatchen funktion ist noch nicht Bereit.")    
Case $Button4;Wen Button4 geklickt wird.....
    _IENavigate ($Embedded, $serversite) ;Zur Serverseite Navigieren
Case $Button3 ;Wen Button3 geklickt wird...
    _IENavigate ($Embedded, $accpage) ;Zur Accounterstellen seite Navigieren
    Case $Button5 ;Wen Button5 geklickt wird...
    _IENavigate ($Embedded, $forum) ;Zum Forum Navigieren
                

    EndSwitch
WEnd;Ende Einer Schleife 
09/05/2010 19:59 nishan23#9
lad ma andere Links hoch die 2 sind down...
10/26/2010 15:17 patrickunderwar#10
pls neuer link danke ^^