# Tiny Password Generator

"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789" !mask
@mask len ToDbl !mask_len

"Enter length of password you want to make: " print readln ToDbl !pws_len
"Enter the amount of passwords to create: " print readln ToDbl !amount
sCrlf print

1 !x

outer:
 0 !count
 
 #inner loop to make the password
 make_pws:
   @count 1 + !count
   0 @mask_len rnd !r
   @mask @r ToDbl 1 mid print
   @count @pws_len <
  jmpnz make_pws

 #Put a break line between each password.
 sCrlf Print

 @x 1 + !x
 @amount @x >=
jmpnz outer

Exit

