Here i have a simple program that makes 3 lots of really random numbers.
Code: Select all
@echo off
rem ------------------------------------------------
rem component of project not to be used seperately.
rem ------------------------------------------------
rem 36x10 hex components
rem [Default 30000, 1] [Max 30000, 1]
rem start value
set numst=1
rem end value
set numen=36
set count=0
:clock
rem internal clock
if %count%==0 set count=1&goto ranumpasshorizantal
if %count%==1 set count=2&goto ranumpasshorizantal
if %count%==2 set count=3&goto ranumpasshorizantal
:ranumpasshorizantal
SET /A ranumche=%RANDOM% * %numen% / 32768 + %numst%&echo +1
SET /A ranum=%RANDOM% * %numen% / 32768 + %numst%&echo +1
if %ranumche%==%ranum% goto ranumpasshorizantal
:ranumpasshorizantal1
SET /A ranumche1=%RANDOM% * %numen% / 32768 + %numst%&echo +1
SET /A ranum1=%RANDOM% * %numen% / 32768 + %numst%&echo +1
if %ranumche1%==%ranum1% goto ranumpasshorizantal1
if %ranum1%==%ranum% goto ranumpasshorizantal
echo %ranum%>>horizontal.hextmp
echo (%count%)
if %count%==3 goto horizontalmapok
goto clock
:horizontalmapok
set count=0
echo.
type horizontal.hextmp
del horizontal.hextmp
pause>nul
The console looks something like this:
The file horizontal.hextmp looks something like this:
Have a good day