Random Password

[bigassmuffin]

I have made a tool for this game clled conquer online...

And I realesed this program online so anyone can download, but I hate when like 500 leechers download who dont deserve the bot..So I want on startup to play a random password that you must get right in order to use bot...

Each password would include a simple question like "Sleep(1000) will wait x seconds before continuing the script"

and other simple things like this to prevent PURE NOOBS from using bot..

The reason I want to create a different password each start is so someone cant jsut post the password

I found this on this site

#include <guiconstants.au3>
guicreate("MAIN", 300, 300)
$input_pw = guictrlcreateinput("", 10, 10, 100, 20, $ES_PASSWORD)
guisetstate()

while 1
$msg = guigetmsg()
if $msg = $GUI_EVENT_CLOSE then exit
sleep (100)
wend

[Thatsgreat2345]

check it out

Global $password
While 1
$length = InputBox("Length","How long you want it")
If StringIsDigit($length) Then 
    ExitLoop
Else
    MsgBox(0,"Type in a number","Type in a freaking number")
EndIf
WEnd
For $i = 1 to $length
    $password = $password & Chr(Random(97,122))
Next
MsgBox(0,"Your password is",$password)

Edited June 20, 2006 by thatsgreat2345

[SmOke_N]

Better yet, look what you get when you use the Search Option:

http://www.autoitscript.com/forum/index.ph...Random+Password

[bigassmuffin]

hmmm...maybe I worded this wrong...

I want something like this..(imagin below is actual scipt)

Choose Random Password (1, 2, 3, 4, 5, 6, 7, 8, 9, 1)

1) Gui Create blah blah blah
        GuiCreateLabel (blah blah blah)
        Password = triangle

2) Gui Create blah blah blah
        GuiCreateLabel (blah blah blah)
        Password = square

3) Gui Create blah blah blah
        GuiCreateLabel (blah blah blah)
        Password = rectangle

4) Gui Create blah blah blah
        GuiCreateLabel (blah blah blah)
        Password = circle

and so forth

So I dont want a passwords with random caharacters, I want a password to appear out of the following 10

[Thatsgreat2345]

u just answered the freaking problem urself....

#include <GUIConstants.au3>
Global $pass[4]
$pass[1] = "Circle"
$pass[2] = "Square"
$pass[3] = "Triangle"
$random = Round(Random(1,3),0)
GUICreate("AForm1", 622, 441, 192, 125)
GUICtrlCreateLabel($pass[Ran($random)], 112, 72, 43, 17)
GUISetState(@SW_SHOW)
while 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then
        Exit
    EndIf
    sleep(10)
WEnd
Func Ran($code)
    For $i = 1 to 3
        If $code = $i Then
        Return $i
    EndIf
    Next
EndFunc

Edited June 20, 2006 by thatsgreat2345

[bigassmuffin]

u just answered the freaking problem urself....

#include <GUIConstants.au3>
Global $pass[4]
$pass[1] = "Circle"
$pass[2] = "Square"
$pass[3] = "Triangle"
$random = Round(Random(1,3),0)
GUICreate("AForm1", 622, 441, 192, 125)
GUICtrlCreateLabel($pass[Ran($random)], 112, 72, 43, 17)
GUISetState(@SW_SHOW)
while 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then
        Exit
    EndIf
    sleep(10)
WEnd
Func Ran($code)
    For $i = 1 to 3
        If $code = $i Then
        Return $i
    EndIf
    Next
EndFunc

thankxs, this is perfect!