Jump to content

wow realmlist changer


cageman
 Share

Recommended Posts

hi all,

i made a simple program that can chance your realmlist. I use it alot cause i play on multiple servers and i dont want to go the realmlist.wtf in my wow folder and look op what the realmlist was for the other server...

so i made a ini file where you can add more servers and the script can change your realm.

somehow i cant upload my ini file which looks like this:

[realms]
realm1=set realmlist logon.chronic-domination.com
realm2=set realmlist eu.logon.worldofwarcraft.com

name: realm.ini

this ini file needs to be in the same folder as the script.

and my whole source:

#include <GUIConstants.au3>
#include <ComboConstants.au3>
GUICreate("Realmlist", 400,400,100,100)
$open=FileOpen ( "C:\Program Files\World of Warcraft\realmlist.wtf", 0 )
$realm = FileReadLine($open,1)
$mylist=GUICtrlCreateList ("", 75,200,250,97)
GUICtrlSetLimit(-1,200); to limit horizontal scrolling
GUICtrlSetData(-1,$realm)
GUICtrlCreateLabel("current realms",85,180)
$realms=GUICtrlCreateCombo ("", 10,10,250); create first item
$button1 = GuiCtrlCreateButton("Set Realm", 30, 90, 130, 20)
$var = IniReadSection("realm.ini", "realms")
If @error Then 
    MsgBox(4096, "", "Error occurred, probably no INI file.")
Else
Select 
Case $var[0][0]=1
GUICtrlSetData($realms,$var[1][1])
Case $var[0][0]=2 
GUICtrlSetData($realms,$var[1][1])
GUICtrlSetData($realms,$var[2][1])
Case $var[0][0]=3 
GUICtrlSetData($realms,$var[1][1])
GUICtrlSetData($realms,$var[2][1])
GUICtrlSetData($realms,$var[3][1])
Case $var[0][0]=4 
GUICtrlSetData($realms,$var[1][1])
GUICtrlSetData($realms,$var[2][1])
GUICtrlSetData($realms,$var[3][1])
GUICtrlSetData($realms,$var[4][1])
Case $var[0][0]=5 
GUICtrlSetData($realms,$var[1][1])
GUICtrlSetData($realms,$var[2][1])
GUICtrlSetData($realms,$var[3][1])
GUICtrlSetData($realms,$var[4][1])
GUICtrlSetData($realms,$var[5][1])
Case $var[0][0]>5 
    MsgBox(4096, "", "too many realms")
EndSelect
EndIf


GUISetState ()
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $button1
$selected=GUICtrlRead($realms)
$file=FileOpen ( "C:\Program Files\World of Warcraft\realmlist.wtf", 2 )
FileWrite($file, $selected)
GUICtrlSetData($mylist,"")
GUICtrlSetData($mylist,$selected)   
EndSelect
WEnd
FileClose($open)

you can add up to 5 realms and i think thats enough:)

if you have any questions ask them.

wow_realmlist.au3

wow_realmlist.exe

Edited by cageman
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...