【原创】简易体彩29选7摇号器

hitme · *此帖于 2005-05-23 09:26:36 被 hitme 编辑. .*

闲的慌，没有￥还是不出门了，变个妖术消磨时光

代码:

@echo off
:start

setlocal ENABLEDELAYEDEXPANSION

:loop

del tmp.txt 2>nul
for /l %%i in (1,1,7) do (
		

		echo %random% >nul
      		set /a m%%i=!random:~-1!+1
		set /a m%%i=!m%%i!/4
		set /a m%%i=!m%%i:~0,1!

		echo %random% >nul
		set /a n%%i=!random:~-1!

		if !m%%i!!n%%i!==00 goto:loop 
		findstr /m "!m%%i!!n%%i!" tmp.txt 2>nul >nul && goto :loop
		echo !m%%i!!n%%i!>>tmp.txt
				
)

endlocal

setlocal ENABLEDELAYEDEXPANSION
for /f %%i in ('sort tmp.txt') do (
		set n=%%i
		set m=!m! !n!
)

del tmp.txt
cls
echo.
echo.￥100000000000000000000000000000000000000000.00
echo.
echo. Hitme,29选7必中,号码是 !m!
echo.
echo.￥100000000000000000000000000000000000000000.00
echo.


set /p x=保留号码至num.txt[y/n]
if /i [%x%]==[y] (echo !m!>>num.txt && endlocal && goto :start) else (endlocal && goto :start)