Sign in to follow this  
Followers 0
Gurutz

This is what i have so far.

5 posts in this topic

#1 ·  Posted (edited)

I'm considering a WoW Name Generator. I have over 300+ names. And i am willing to add these to this program.

First what i have is this.

CODE
#include <GUIConstants.au3>

; == GUI generated with Koda ==

$Form1 = GUICreate("Name Generator - WoW", 339, 177, 192, 122)

$Button1 = GUICtrlCreateButton("Generate Name", 80, 96, 169, 33)

GUICtrlSetFont(-1, 8, 800, 0, "Verdana")

GUICtrlCreateLabel("Name will appear here.", 88, 40, 155, 17)

GUICtrlSetFont(-1, 8, 800, 0, "Verdana")

GUICtrlSetColor(-1, 0x000080)

GUICtrlCreateLabel("Created by Janine - Paladin - Wildhammer", 24, 152, 281, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Verdana")

GUISetState(@SW_SHOW)

While 1

$msg = GuiGetMsg()

Select

Case $msg = $GUI_EVENT_CLOSE

ExitLoop

Case Else

;;;;;;;

EndSelect

WEnd

And i need it so that. Everytime the button is pressed i want it to generate a name that i have chosen.

Sorry for being a pain. Tell me where to start by editing the code. And then ill start adding the names.

[thanks for everyones help - that helps :P xxxx]

ps. I forgot to mention. You will be added to the credits.

Edited by Gurutz

Share this post


Link to post
Share on other sites



One direction....

#include <GUIConstants.au3>

$Names = StringSplit("Sam Serial,George Giant,Killer,Mad Man,Frank-enstien,Power boy,He-man,Maniac", ",")

; == GUI generated with Koda ==
$Form1 = GUICreate("Name Generator - WoW", 339, 177, 192, 122)
$Button1 = GUICtrlCreateButton("Generate Name", 80, 96, 169, 33)
GUICtrlSetFont(-1, 8, 800, 0, "Verdana")
$Label = GUICtrlCreateLabel("Name will appear here.", 88, 40, 155, 17, $SS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "Verdana")
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("Created by Janine - Paladin - Wildhammer", 24, 152, 281, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Verdana")
GUISetState(@SW_SHOW)





While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $msg = $Button1
            $Hold = 0
            Do
            $Random = Random(1,$Names[0],1)
            Until $Random <> $Hold
            $Hold = $Random
            GUICtrlSetData($Label, $Names[$Random])
            ;;;;;;;
    EndSelect
WEnd

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

One direction....

#include <GUIConstants.au3>

$Names = StringSplit("Sam Serial,George Giant,Killer,Mad Man,Frank-enstien,Power boy,He-man,Maniac", ",")

; == GUI generated with Koda ==
$Form1 = GUICreate("Name Generator - WoW", 339, 177, 192, 122)
$Button1 = GUICtrlCreateButton("Generate Name", 80, 96, 169, 33)
GUICtrlSetFont(-1, 8, 800, 0, "Verdana")
$Label = GUICtrlCreateLabel("Name will appear here.", 88, 40, 155, 17, $SS_CENTER)
GUICtrlSetFont(-1, 8, 800, 0, "Verdana")
GUICtrlSetColor(-1, 0x000080)
GUICtrlCreateLabel("Created by Janine - Paladin - Wildhammer", 24, 152, 281, 20)
GUICtrlSetFont(-1, 10, 400, 0, "Verdana")
GUISetState(@SW_SHOW)
While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $msg = $Button1
            $Hold = 0
            Do
            $Random = Random(1,$Names[0],1)
            Until $Random <> $Hold
            $Hold = $Random
            GUICtrlSetData($Label, $Names[$Random])
            ;;;;;;;
    EndSelect
WEnd

8)

Wow you reply'd fast man. Thanks for the great script. Ill add you to credit. So from here. All i need to do is EDIT "$Names = StringSplit("Sam Serial,George Giant,Killer,Mad Man,Frank-enstien,Power boy,He-man,Maniac", ",")" and add names and such in there.

Share this post


Link to post
Share on other sites

Welcome....

Merry Christmas!

8)


NEWHeader1.png

Share this post


Link to post
Share on other sites

Idea: store your names into external TXT file (each name on one line) and in your script replace:

$Names = StringSplit("Sam Serial,George Giant,Killer,Mad Man,Frank-enstien,Power boy,He-man,Maniac", ",")oÝ÷ Ù¼ºÚ"µÍÌÍÓ[YÈHÝ[ÔÜ]
[TXY
    ][ÝÛ[YË  ][ÝÊKÔJ

Share this post


Link to post
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
Sign in to follow this  
Followers 0