Advertisement
Guest User

Untitled

a guest
Jul 19th, 2018
108
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.44 KB | None | 0 0
  1. #include <Array.au3>
  2.  
  3. Local $iPwLength = 20
  4. Local $pw[$iPwLength]
  5. Local $alphabet = StringSplit("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvxyz0123456789", "", 3)
  6.  
  7. $pw[0] = Random(0, 9, 1)
  8. $pw[1] = $alphabet[Random(0, 25, 1)]
  9. $pw[2] = $alphabet[Random(26, 50, 1)]
  10. _ArrayShuffle($alphabet)
  11.  
  12. For $i = 4 to $iPwLength - 1 Step 1
  13.    $pw[$i] = $alphabet[Random(0, 60, 1)]
  14. Next
  15.  
  16. _ArrayShuffle($pw)
  17.  
  18. MsgBox(0, "", _ArrayToString($pw, ''))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement