Jump to content

How Do I Stop A Decimal number in Random


Recommended Posts

thick

Dim $word = ""
$R = Int(Random(1, 81521))
msgbox(4096, "", $R )

Int is a little better than Round since it is faster:

$t = TimerInit()
For $c = 1 to 100000
   Int(Random(0,10))
Next
MsgBox(0,'',TimerDiff($t))

$t = TimerInit()
For $c = 1 to 100000
   Round(Random(0,9))
Next
MsgBox(0,'',TimerDiff($t))
Edited by ezzetabi
Link to post
Share on other sites

Well with your help I finished my sad password generator script. I know there are loads of free ones out there etc but it makes me feel better that the one thats gonna be used on the network has something of 'me' in it. :">

; AutoIt Version:  3.00

; Language:        English

; Platform:        WinXP

; Author:          Matt

; Script Function:  Password Generator from words file

$__msgbox = MsgBox(4, 'Password Generator By Matt ', 'This Will Generate A Password For You, Continue?')

if ($__msgbox = 7) Then

  Exit

EndIf

Dim $word = ""

$R = Round(Random(1, 81520))

$word = FileOpen("C:\words.txt", 0)

If $word = -1 Then

  MsgBox(0, "Error", "Unable to open file.")

  Exit

EndIf

SplashTextOn("Password Generator By Matt ", "Thinking Of A Password, Please Wait...", 300, 75)

Sleep(3000)

FileClose($word)

$word = FileReadLine("C:\words.txt", $R)

SplashOff()

MsgBox(64, "Your Generated Password Is:", $word)

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
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...