[数值计算] 双色球幸运抽奖

IF %红球1% LSS 1 GOTO 红球1 
IF %红球1% GTR 33 GOTO 红球1
复制代码

IF "%红球1:~1,1%"=="" SET 红球1=0%红球1%
复制代码

@ECHO %红球6%|FINDSTR /I "%红球1% %红球2% %红球3% %红球4% %红球5%">NUL 2>NUL&&GOTO 红球6
复制代码

@ECHO OFF&COLOR 0E&MODE CON: COLS=60 LINES=3&TITLE 双色球随机抽号，祝君好运!
:红球1
SET 红球1=%RANDOM%
IF %红球1% LSS 1 GOTO 红球1 
IF %红球1% GTR 33 GOTO 红球1
IF "%红球1:~1,1%"=="" SET 红球1=0%红球1%
:红球2
SET 红球2=%RANDOM%
IF %红球2% LSS 1 GOTO 红球2 
IF %红球2% GTR 33 GOTO 红球2
IF "%红球2:~1,1%"=="" SET 红球2=0%红球2%
@ECHO %红球2%|FINDSTR /I "%红球1%">NUL 2>NUL&&GOTO 红球2

:红球3
SET 红球3=%RANDOM%
IF %红球3% LSS 1 GOTO 红球3
IF %红球3% GTR 33 GOTO 红球3
IF "%红球3:~1,1%"=="" SET 红球3=0%红球3%
@ECHO %红球3%|FINDSTR /I "%红球1% %红球2%">NUL 2>NUL&&GOTO 红球3
:红球4
SET 红球4=%RANDOM%
IF %红球4% LSS 1 GOTO 红球4 
IF %红球4% GTR 33 GOTO 红球4
IF "%红球4:~1,1%"=="" SET 红球4=0%红球4%
@ECHO %红球4%|FINDSTR /I "%红球1% %红球2% %红球3%">NUL 2>NUL&&GOTO 红球4
:红球5
SET 红球5=%RANDOM%
IF %红球5% LSS 1 GOTO 红球5 
IF %红球5% GTR 33 GOTO 红球5
IF "%红球5:~1,1%"=="" SET 红球5=0%红球5%
@ECHO %红球5%|FINDSTR /I "%红球1% %红球2% %红球3% %红球4%">NUL 2>NUL&&GOTO 红球5
:红球6
SET 红球6=%RANDOM%
IF %红球6% LSS 1 GOTO 红球6 
IF %红球6% GTR 33 GOTO 红球6
IF "%红球6:~1,1%"=="" SET 红球6=0%红球6%
@ECHO %红球6%|FINDSTR /I "%红球1% %红球2% %红球3% %红球4% %红球5%">NUL 2>NUL&&GOTO 红球6
:蓝球
SET 蓝球=%RANDOM%
IF %蓝球% LSS 1 GOTO 蓝球 
IF %蓝球% GTR 16 GOTO 蓝球
IF "%蓝球:~1,1%"=="" SET 蓝球=0%蓝球%
ECHO 本次双色球【%红球1%，%红球2%，%红球3%，%红球4%，%红球5%，%红球6%，蓝色号码:%蓝球%】祝君好运!&PAUSE>NUL&CLS
GOTO 红球1
复制代码