########################################################################################
########################################################################################
#+-
#+- Title: PHN GEN v1.0
#+- Author: ...
#+- Category: Phone Tool
#+- Description : Using this script is pretty simple. just follow the steps
#+- and adapt it to your needs. If I wanted to generate a phone number
#+- which is 9 digits long: in the format 001-002-003 and assuming 001 is the
#+- prefix i.e the number which remains constant for all generated numbers,
#+- and I wanted to generate 50 phone humbers and dump them to a file
#+- called test.txt, i would type:
#+- ----------------------------------------------------------------
#+- > How many digits:9
#+- > Enter the prefix:001
#+- > How many numbers should I generate:50
#+- > Name of file to dump numbers to:test
#+- > Also note that the provision for a prefix could be left blank.
#+- > Date Release : ...
#+-
########################################################################################
########################################################################################
@echo off
:asd
cls
mode con:cols=99 lines=30
if not exist phngen md phngen
color a
set tp=PhnGen
title %tp%
set pal=
set pre=
set limit=
set dumpfile=
ECHO ÛÛÛÛÛÛÛÛÛ± ±Û± ÛÛ Û² ±Û ÛÛÛÛÛÛ² ÛÛÛÛÛÛÛÛÛ° ÛÛ °Û±
ECHO ÛÛ°°°° °Û² ±Û± ÛÛ Û² ²Û ±Û²°°°°° ÛÛ °°°°°° ÛÛ °Û±
ECHO ÛÛ Û± ±Û° ÛÛ ÛÛ ±Û ±Û± Û² ÛÛ °Û±
ECHO ÛÛ°°±±°±Û² ±Û° ÛÛ ÛÛÛ²° ±Û °Û± Û² ÛÛÛÛ° Û±
ECHO ÛÛÛÛÛÛÛÛÛ± ±Û²²²²²±ÛÛ Û² ÛÛ² °Û ±Û± ÛÛ±²± ÛÛ ²Û² Û±
ECHO ÛÛ ±ÛÛÛÛÛÛÛÛÛ Û² ±ÛÛÛÛ ±Û± ²ÛÛ²² ÛÛ²Û² ÛÛ ÛÛ²Û±
ECHO ÛÛ ±Û° ÛÛ Û² ²ÛÛ ±Û± ²²²ÛÛ Û² ÛÛ ±ÛÛ±
ECHO ÛÛ ±Û± ÛÛ Û² ±Û ±Û± ÛÛ Û² ÛÛ Û±
ECHO ÛÛ ±Û± ÛÛ ÛÛ ²Û ±Û± ÛÛ ÛÛ ÛÛ °Û±
ECHO ÛÛ ±Û± ÛÛ °Û² ²Û °ÛÛÛÛÛÛ² °ÛÛÛÛÛÛÛÛÛ° ÛÛ °Û±
echo you can type help for further instructions, or exit to exit.
:com
echo ---------------------------------------
set /p pal=How many digits:
if /i "%pal%"=="help" goto :help
if /i "%pal%"=="exit" exit
if "%pal%"=="" echo You Must enter the number of digits! && goto :com
if %pal% LEQ 0 echo Invalid value && goto :com
echo %pal% >%temp%\ml.txt
findstr /b "0 1 2 3 4 5 6 7 8 9" %temp%\ml.txt >nul 2>nul
if not %errorlevel%==0 echo Invalid value&&goto :com
set /p pre=Enter the prefix:
if /i "%pre%"=="" echo no prefix option selected &&set pre=
if /i "%pre%"=="help" goto :help
if /i "%pre%"=="exit" exit
set /p limit=How many numbers should I generate:
if /i "%limit%"=="help" goto :help
if /i "%limit%"=="exit" exit
if /i "%limit%"=="" echo You Must enter the amount of numbers to generate! && goto :com
if %limit% LEQ 0 echo Invalid value && goto :com
set /p dumpfile=Name of file to dump numbers to:
if /i "%dumpfile%"=="help" goto :help
if /i "%dumpfile%"=="exit" exit
if /i "%dumpfile%"=="" echo You Must specify the number dumpfile! && goto :com
set foc=-1
setlocal enabledelayedexpansion
echo !pre!>%temp%\po.txt
for %%? in (%temp%\po.txt) do (
set /a lenpre=%%~z? -2
echo !lenpre! >%temp%\ponnm.txt
)
echo !pal!>%temp%\pon.txt
for %%? in (%temp%\pon.txt) do (
set /a lenpal=%%~z? -2
echo !lenpal! >%temp%\ponn.txt
)
set /a tots=!lenpre!-!pal!
echo !tots! >%temp%\diff.txt
endlocal
set/p diff=<%temp%\diff.txt
set diff=%diff:-=%
set pal=%diff%
:amp
set /a foc=%foc%+1
set ti=0
set lett1=
set lett2=
set lett3=
set lett4=
set lett5=
set lett6=
set lett7=
set lett8=
set lett9=
set lett10=
set lett11=
set lett12=
set lett13=
set lett14=
set lett15=
set lett16=
set lett17=
set lett18=
set lett19=
set lett20=
set lett21=
set lett22=
set lett23=
set lett24=
set lett25=
set lett26=
set lett27=
set lett28=
set lett29=
set lett30=
set lett31=
set lett32=
set lett33=
set lett34=
set lett35=
set lett36=
set lett37=
set lett38=
set lett39=
set lett40=
set lett41=
set lett42=
set lett43=
set lett44=
set lett45=
set lett46=
set lett47=
set lett48=
set lett49=
set lett50=
set lett51=
set lett52=
set lett53=
set lett54=
set lett55=
set lett56=
set lett57=
set lett58=
set lett59=
set lett60=
set lett61=
set lett62=
:random
set /a ti=%ti%+1
set /a nu=%random%%%10
if %nu%==0 set lett%ti%=0
if %nu%==1 set lett%ti%=1
if %nu%==2 set lett%ti%=2
if %nu%==3 set lett%ti%=3
if %nu%==4 set lett%ti%=4
if %nu%==5 set lett%ti%=5
if %nu%==6 set lett%ti%=6
if %nu%==7 set lett%ti%=7
if %nu%==8 set lett%ti%=8
if %nu%==9 set lett%ti%=9
if %ti%==%pal% goto :sick
goto :random
:sick
set whole=%pre%%lett1%%lett2%%lett3%%lett4%%lett5%%lett6%%lett7%%lett8%%lett9%%lett10%%lett11%%lett12%%lett13%%lett14%%lett15%%lett16%%lett17%%lett18%%lett19%%lett20%%lett21%%lett22%%lett23%%lett24%%lett25%%lett26%%lett27%%lett28%%lett29%%lett30%%lett31%%lett32%%lett33%%lett34%%lett35%%lett36%%lett37%%lett38%%lett39%%lett40%%lett41%%lett42%%lett43%%lett44%%lett45%%lett46%%lett47%%lett48%%lett49%%lett50%%lett51%%lett52%%lett53%%lett54%%lett55%%lett56%%lett57%%lett58%%lett59%%lett60%%lett61%%lett61%%lett62%
echo %whole%
echo %whole% >>"phngen\%dumpfile%.txt"
title %tp% %foc% numbers generated
if "%limit%"=="%foc%" goto :fini
goto :amp
:help
echo PnGen help.
echo Using this script is pretty simple. just follow the steps below and adapt it to your needs.
echo if I wanted to generate a phone number which is 9 digits long: in the format 001-002-003
echo and assuming 001 is the prefix i.e the number which remains constant for all generated numbers,
echo and I wanted to generate 50 phone humbers and dump them to a file called test.txt, i would type:
echo ----------------------------------------------------------------
echo How many digits:9
echo Enter the prefix:001
echo How many numbers should I generate:50
echo Name of file to dump numbers to:test
echo also note that the provision for a prefix could be left blank.
echo ----------------------------------------------------------------
pause
goto :asd
:fini
cls
echo PhnGen Report----------
echo Numbers generated:%foc%
echo Numbers dump file:Phngen\%dumpfile%.txt
echo end of Report----------
call "phngen\%dumpfile%.txt"
pause
goto :asd
You are not allowed to view links.
Register or
LoginFuente: Zephomet / el-hacker.com