Login to Emu or Blizz server on the fly...

[darkninja]

Hi! I havnt posted much so i decided to contribute a bit.

I was sick and tired of having to edit the realmlist.wtf file everytime i wanted to play on an emu server, so i decided to create an autoit program that will change the realmlist.wtf to the server of your choice and if you want to play on a Blizz server again select the Blizz button and will switch back, both buttons launch WoW after the realmlist has been edited!

Heres the code:

#include <GuiConstants.au3>
#include <File.au3>

GuiCreate("WoW Realm Selector", 329, 74,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
GuiSetIcon("C:\Program Files\World of Warcraft\wow.exe", 0)

$Button_1 = GuiCtrlCreateButton("Emulation WoW", 10, 10, 150, 50)
$Button_2 = GuiCtrlCreateButton("Original WoW", 180, 10, 140, 50)

GuiSetState()

Do
	$msg = GUIGetMsg()

	Select
		Case $msg= $Button_1
			MsgBox(0,"Thank You!", "You have chosen to play in the -[Ninja]-Pwnage Server!")
			_FileWriteToLine("C:\Program Files\World of Warcraft\realmlist.wtf", 1, "set realmlist ninjafunserv.ath.cx", 1)
			Sleep(3000)
			Run("C:\Program Files\World of Warcraft\wow.exe")
		Case $msg= $Button_2
			MsgBox(0,"Thank You!", "You have chosen to play in the Blizz Server!")
			_FileWriteToLine("C:\Program Files\World of Warcraft\realmlist.wtf", 1, "set realmlist us.logon.worldofwarcraft.com", 1)
			Sleep(3000)
			Run("C:\Program Files\World of Warcraft\wow.exe")
	EndSelect
Until $msg = $GUI_EVENT_CLOSE or $msg = $Button_1 or $msg = $Button_2

I hope you enjoy this code, as of now the Emu server button is conifured to connect to my server, simply edit the Red text to the server name of your choice! If you do not have autoit and dont want it ask me and i will compile the source with the selected emu server address of your choice!





-----)(Please leave the copyright text intact)(-----
This post is copyright by the user posting it and MMOwned.com - World of Warcraft Exploits,Hacks, Bots and Guides, where it was posted. You may not copy or reproduce this information on any other site without written permission from both the poster and MMOwned.com

[issacobra]

thx +rep for this

[darkninja]

Np! i think ima go get a sig now... lol

[ub3rst4r]

http://www.wowstatus.net/wowfe.php

[darkninja]

http://www.wowstatus.net/wowfe.php

Yes i am aware of that program, i just wanted a simple 1 button program. but i could see why you would use that if you connect to more than 1 emu server... but i dont *shrugs*

[Fenarth]

gr8 job m8 =) crEatE morE

[darkninja]

gr8 job m8 =) crEatE morE

thx very much, this bolsters my will to post more! btw i love your sig!

[Obanooba]

Awsome m8 Im sick and tired of having to edit the realmlist.wtf too :P Getting more lazy then I am by doing it :P

[Glynbeard]

sweet script man i know how you feel with always having to change it lol.

[darkninja]

sweet script man i know how you feel with always having to change it lol.

Yah ty for the rep, editing the realmlist just got unbearable so i finally put my mind to making this lol. I hadnt used autoit in several weeks so i had to get jumpstarted! lol

[Beastslayer]

nice post, but first of all... dont change your font color to blue... you make things easier by posting this program, but not when i have to highlight your font to read it. im lazy... when it comes to computers..
kthx

im about to edit the script so that you won't have the change the priver server data, and it will prompt you to set the directory of your world of warcraft folder. ill post it up when im done. (30 mins)

okay here's the new script

#include <GuiConstants.au3>
#include <File.au3>

If Not FileExists("C:\temp\Realmlist.ini") Then
    MsgBox(0, "Configuration not setup or saved file was deleted", "Please set this up, make sure it is ALL correct, or this will not work properly.")
    $1 = InputBox("Directory", "What is the directory for your blizzard server wow file?")
    $2 = InputBox("Directory", "What is the directory for your blizzard server realmlist.wtf?")
    $3 = InputBox("Directory", "What is the directory for your private server wow file?")
    $4 = InputBox("Directory", "What is the directory for your private server realmlist.wtf?")
    $5 = InputBox("Realmlist", "What is the realmlist.wtf info for your private server?")
    IniWrite("C:\Temp\Realmlist.ini", "blizz", "wow file", $1)
    IniWrite("C:\Temp\Realmlist.ini", "blizz", "realmlist.wtf", $2)
    IniWrite("C:\Temp\Realmlist.ini", "private server", "wow file", $3)
    IniWrite("C:\Temp\Realmlist.ini", "private server", "realmlist.wtf", $4)
    IniWrite("C:\Temp\Realmlist.ini", "private server", "name",  $5)
    Else
    If Not IsDeclared("iMsgBoxAnswer") Then Dim $iMsgBoxAnswer
    $iMsgBoxAnswer = MsgBox(36, "Settings", "Use same settings as before?")
    Select
        Case $iMsgBoxAnswer = 6 ;Yes
            $1 = IniRead("C:\Temp\Realmlist.ini","blizz","wow file","")
            $2 = IniRead("C:\Temp\Realmlist.ini", "blizz", "realmlist.wtf","")
            $3 = IniRead("C:\Temp\Realmlist.ini", "private server", "wow file","")
            $4 = IniRead("C:\Temp\Realmlist.ini", "private server", "realmlist.wtf","")
            $5 = IniRead("C:\Temp\Realmlist.ini", "private server", "name","")
        Case $iMsgBoxAnswer = 7 ;No
        $1 = InputBox("Directory", "What is the directory for your blizzard server wow file?")
        $2 = InputBox("Directory", "What is the directory for your blizzard server realmlist.wtf?")
        $3 = InputBox("Directory", "What is the directory for your private server wow file?")
        $4 = InputBox("Directory", "What is the directory for your private server realmlist.wtf?")
        $5 = InputBox("Realmlist", "What is the realmlist.wtf info for your private server?")
    IniWrite("C:\Temp\Realmlist.ini", "blizz", "wow file", $1)
    IniWrite("C:\Temp\Realmlist.ini", "blizz", "realmlist.wtf", $2)
    IniWrite("C:\Temp\Realmlist.ini", "private server", "wow file", $3)
    IniWrite("C:\Temp\Realmlist.ini", "private server", "realmlist.wtf", $4)
    IniWrite("C:\Temp\Realmlist.ini", "private server", "name",  $5)
    EndSelect
EndIf



GuiCreate("WoW Realm Selector", 329, 74,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
GuiSetIcon($1, 0)

$Button_1 = GuiCtrlCreateButton("Emulation WoW", 10, 10, 150, 50)
$Button_2 = GuiCtrlCreateButton("Original WoW", 180, 10, 140, 50)

GuiSetState()

Do
    $msg = GUIGetMsg()

    Select
        Case $msg= $Button_1
            MsgBox(0,"Thank You!", "You have chosen to play your Private Server!")
            _FileWriteToLine($4, 1, $5, 1)
            Sleep(3000)
            Run($3)
        Case $msg= $Button_2
            MsgBox(0,"Thank You!", "You have chosen to play in the Blizz Server!")
            _FileWriteToLine($2, 1, "set realmlist us.logon.worldofwarcraft.com", 1)
            Sleep(3000)
            Run($1)
    EndSelect
Until $msg = $GUI_EVENT_CLOSE or $msg = $Button_1 or $msg = $Button_2

the .exe is attached to this post.

[darkninja]

Well beastslayer i thank you for the contribution, you gave me an idea. I will update this when i get home so you can select your wow folder from a drop down menu to make easier access possible, maybe try and set it to where you just type in your server address instead of needing the set realmist in the input box... As i like your script i feel i can prob make a better one, thank you for trying and giving me an idea!

[Matt]

http://www.virustotal.com/vt/en/resu...ad65c4e980af59
use at your own risk.. i dont know why autoit is getting false positives on certain virus scans.

[darkninja]

lol that is the main reason i dont post the exe of my script's cause ppl always start to bomb them sayin its a virus... not that im saying that about u matt, but i know, auto-it is frustrating when it comes to viruses...

[richardsonc]

how do i use this? :P