@echo off
setlocal ENABLEDELAYEDEXPANSION
mode con cols=54 lines=20
:in
cls
echo  ษออออออออออออออออออออออออออออออออออออออออออออออออออป
echo  บ                                                  บ
echo  บ How many characters long should the password be? บ
echo  บ                                                  บ
echo  ศออออออออออออออออออออออออออออออออออออออออออออออออออผ 
set /p large=
set /a "large=!large!"
if !large! LSS 1 set /a "large=1"
:begin
cls
echo  ษออออออออออออออออออออออออออออออออออออออออออออออออออป
echo( บ                                                  บ
echo  บ                   Randomizing                    บ
echo( บ                                                  บ
echo  ศออออออออออออออออออออออออออออออออออออออออออออออออออผ
echo.
echo  Generating random numbers....
echo.
:start
set /a "number=%random% %% 75+1"
set /a "num2=num+1"

set /a "num=num+1"
set /a "choose!num!=!number!"
set "result="

title !num2! of !large! numbers generated

if !num! EQU !large! (
goto :next
)
goto :start

:next
cls
echo  ษออออออออออออออออออออออออออออออออออออออออออออออออออป
echo( บ                                                  บ
echo  บ                   Randomizing                    บ
echo( บ                                                  บ
echo  ศออออออออออออออออออออออออออออออออออออออออออออออออออผ
echo.
echo  Converting random numbers....
echo.


:end
set /a "nu=nu+1"
title Converted !nu! of !large! numbers
if !choose%nu%!==1 set "choose!nu!=A
if !choose%nu%!==2 set "choose!nu!=B
if !choose%nu%!==3 set "choose!nu!=C
if !choose%nu%!==4 set "choose!nu!=D
if !choose%nu%!==5 set "choose!nu!=E
if !choose%nu%!==6 set "choose!nu!=F
if !choose%nu%!==7 set "choose!nu!=G
if !choose%nu%!==8 set "choose!nu!=H
if !choose%nu%!==9 set "choose!nu!=I
if !choose%nu%!==10 set "choose!nu!=J
if !choose%nu%!==11 set "choose!nu!=K
if !choose%nu%!==12 set "choose!nu!=L
if !choose%nu%!==13 set "choose!nu!=M
if !choose%nu%!==14 set "choose!nu!=N
if !choose%nu%!==15 set "choose!nu!=O
if !choose%nu%!==16 set "choose!nu!=P
if !choose%nu%!==17 set "choose!nu!=Q
if !choose%nu%!==18 set "choose!nu!=R
if !choose%nu%!==19 set "choose!nu!=S
if !choose%nu%!==20 set "choose!nu!=T
if !choose%nu%!==21 set "choose!nu!=U
if !choose%nu%!==22 set "choose!nu!=V
if !choose%nu%!==23 set "choose!nu!=W
if !choose%nu%!==24 set "choose!nu!=X
if !choose%nu%!==25 set "choose!nu!=Y
if !choose%nu%!==26 set "choose!nu!=Z
if !choose%nu%!==27 set "choose!nu!=a
if !choose%nu%!==28 set "choose!nu!=b
if !choose%nu%!==29 set "choose!nu!=c
if !choose%nu%!==30 set "choose!nu!=d
if !choose%nu%!==31 set "choose!nu!=e
if !choose%nu%!==32 set "choose!nu!=f
if !choose%nu%!==33 set "choose!nu!=g
if !choose%nu%!==34 set "choose!nu!=h
if !choose%nu%!==35 set "choose!nu!=i
if !choose%nu%!==36 set "choose!nu!=j
if !choose%nu%!==37 set "choose!nu!=k
if !choose%nu%!==38 set "choose!nu!=l
if !choose%nu%!==39 set "choose!nu!=m
if !choose%nu%!==40 set "choose!nu!=n
if !choose%nu%!==41 set "choose!nu!=o
if !choose%nu%!==42 set "choose!nu!=p
if !choose%nu%!==43 set "choose!nu!=q
if !choose%nu%!==44 set "choose!nu!=r
if !choose%nu%!==45 set "choose!nu!=s
if !choose%nu%!==46 set "choose!nu!=t
if !choose%nu%!==47 set "choose!nu!=u
if !choose%nu%!==48 set "choose!nu!=v
if !choose%nu%!==49 set "choose!nu!=w
if !choose%nu%!==50 set "choose!nu!=x
if !choose%nu%!==51 set "choose!nu!=y
if !choose%nu%!==52 set "choose!nu!=z
if !choose%nu%!==53 set "choose!nu!=0
if !choose%nu%!==54 set "choose!nu!=1
if !choose%nu%!==55 set "choose!nu!=2
if !choose%nu%!==56 set "choose!nu!=3
if !choose%nu%!==57 set "choose!nu!=4
if !choose%nu%!==58 set "choose!nu!=5
if !choose%nu%!==59 set "choose!nu!=6
if !choose%nu%!==60 set "choose!nu!=7
if !choose%nu%!==61 set "choose!nu!=8
if !choose%nu%!==62 set "choose!nu!=9
if !choose%nu%!==63 set "choose!nu!=^!
if !choose%nu%!==64 set "choose!nu!=@
if !choose%nu%!==65 set "choose!nu!=#
if !choose%nu%!==66 set "choose!nu!=$
if !choose%nu%!==67 set "choose!nu!=%%
if !choose%nu%!==68 set "choose!nu!=^^
if !choose%nu%!==69 set "choose!nu!=^&
if !choose%nu%!==70 set "choose!nu!=*
if !choose%nu%!==71 set "choose!nu!=(
if !choose%nu%!==72 set "choose!nu!=)
if !choose%nu%!==73 set "choose!nu!=-
if !choose%nu%!==74 set "choose!nu!=_
if !choose%nu%!==75 set "choose!nu!=+
set "mine=!mine!!choose%nu%!
if !nu! EQU !large! (
cls
mode con cols=54 lines=50
echo  ษออออออออออออออออออออออออออออออออออออออออออออออออออป
echo  บ                                                  บ
echo  บ                Generated Password                บ
echo  บ                                                  บ
echo  ศออออออออออออออออออออออออออออออออออออออออออออออออออผ 
echo(
echo !mine!
echo(
goto :extra
)
goto :end
:extra
Choice /M "Save to file?"
if !ERRORLEVEL! EQU 1 (
goto :label 
) else (
exit /b
)
:label
Choice /M "Give the generated password a label?"
if !ERRORLEVEL! EQU 1 (
goto :name 
) else (
goto :save
)
:name
echo Label name:
set /p "label="
set "label=!label!: "
:save
echo !label!!mine!>> passwords.txt
echo !label!!mine!>> passwords.fil
exit /b
:options
cls
echo 1 Wipe text file
echo 2 Back
Choice /C 12 /N
if !ERRORLEVEL! EQU 1 (
echo Clearing...
echo Clear was locked by administrator
goto :in
)
if !ERRORLEVEL! EQU 2 goto :in