@echo off
color 0a
set update=01121558
::[1]打开程序自动更新开奖号的时间由20:00之后改为20:50之后了。
::[2]重写“[1]更新奖号”功能，代码全部重写运行更稳定。
::[3]重写“[4]智能分析”功能，完全修复之前08年奖号不能分析的BUG。
title 体彩排列3/5 制作:clamber E-mail:clian76@163.com update:%update%
set outna=%~nx0
set outna2=%~n0.txt
set outna3=%~n0.vbs
set nujinm=%~dp0
if not exist "%USERPROFILE%\桌面\体彩排列5.url" (
>"%USERPROFILE%\桌面\体彩排列5.url" echo [InternetShortcut]
>>"%USERPROFILE%\桌面\体彩排列5.url" echo URL="%cd%\%outna%"
>>"%USERPROFILE%\桌面\体彩排列5.url" echo IconIndex=166
>>"%USERPROFILE%\桌面\体彩排列5.url" echo IconFile=%windir%\system32\SHELL32.dll
>>"%USERPROFILE%\桌面\体彩排列5.url" echo Modified=F00BA4B792A0C80151
>>"%USERPROFILE%\桌面\体彩排列5.url" echo Hotkey=118
attrib +r "%USERPROFILE%\桌面\体彩排列5.url"
)
::检查是否需要自动转到奖号更新。2050代表时间：20:50
if %time:~0,2%%time:~3,2% GEQ 2050 (if not "%date:~0,11%%time:~0,1%"=="%filetm:~0,12%" goto 1)
:0
cls
set/a lkjh=%date:~,4%-1
call :%lkjh%||echo 开奖数据太陈旧！请输入1更新奖号或输入6更新程序。
echo.
echo [1]更新奖号 [2]查看奖号 [3]搜索指定 [4]智能分析 [5]碰碰运气 [6]更新程序
echo ──────────────────────────────────────
echo [d]删除投注 [v]查看投注 [h]帮助信息 [Q]联系作者 [b]彩票代购 [o]网页输出
echo.
set/p jianghao= 请选择操作:
if "%jianghao%"=="1" goto 1
if "%jianghao%"=="2" call :kjhaoma >"%nujinm%排列5开奖结果.txt"&start %SystemRoot%\system32\notepad.exe "%nujinm%排列5开奖结果.txt"&goto 0
if "%jianghao%"=="3" set 显一次=&goto 3
if "%jianghao%"=="4" echo 不同历史期数会得到不同的分析结果，选对历史期数对分析很重要!结果仅供参考!&echo.&goto 4
if "%jianghao%"=="5" goto 5
if "%jianghao%"=="6" goto 6
if /i "%jianghao%"=="h" goto h
if /i "%jianghao%"=="o" goto o
if /i "%jianghao%"=="v" start notepad "%nujinm%投注结果.txt"&goto 0
if /i "%jianghao%"=="b" start "" "%ProgramFiles%\Internet Explorer\IEXPLORE.EXE" "http://tools.ecp888.com/tel/login.asp"&goto 0
if /i "%jianghao%"=="q" start "" "tencent://message/?uin=282959030&Site=http://www.axyz.cn&Menu=yes">nul &goto 0
if /i "%jianghao:~0,1%"=="q" start "" "tencent://message/?uin=%jianghao:~1%&Site=http://www.axyz.cn&Menu=yes">nul &goto 0
if /i "%jianghao%"=="d" del/q/f "%nujinm%查找结果.txt"&del/q/f "%nujinm%投注结果.txt" 2>nul &goto 0
find "第[ %kjqs% ]期预备投注" "%nujinm%投注结果.txt">nul 2>nul||echo.>>"%nujinm%投注结果.txt"&&echo 第[ %kjqs% ]期预备投注>>"%nujinm%投注结果.txt"
for %%a in ("%jianghao: =" "%") do echo/%%~a>>"%nujinm%投注结果.txt"
start notepad "%nujinm%投注结果.txt"&goto 0
goto 0
:1
echo 正在更新开奖数据，请稍候。。。
ping -n 2 www.baidu.com>nul||(cls&echo 网络不通，请检查网络！&pause&goto 0)
call :%lkjh%>"%nujinm%排列5开奖结果.txt"
for /f "tokens=1 delims=:" %%i in ('findstr "路:" "%nujinm%排列5开奖结果.txt"') do (set beend=%%i)
set/a beend=%date:~0,2%%beend%+1
(echo Set oDOM = WScript.GetObject^(WScript.Arguments^(0^)^)
echo do until oDOM.readyState = "complete"
echo WScript.sleep 200
echo loop
echo WScript.echo oDOM.documentElement.outerText)>"%nujinm%%outna3%"
cscript //NoLogo /e:vbscript "%nujinm%%outna3%" "http://www.178cpw.com/qqmini/pl5_dj.asp">"%temp%\pl5_dj.txt"
find "%beend%" "%temp%\pl5_dj.txt">nul 2>nul && (
for /f "tokens=2 delims=：" %%i in ('findstr /b "开奖号码" "%temp%\pl5_dj.txt"') do (set kjhm2=%%i&&call :kjjieguo)
echo.&echo 更新完成！&echo ─────────────
findstr /b "开奖" "%temp%\pl5_dj.txt"
del/f/q "%nujinm%%outna3%" 2>nul&del/f/q "%temp%\pl5_dj.txt" 2>nul
echo ─────────────&echo 按任意键返回。。。&pause>nul
goto 0
)
cscript //NoLogo /e:vbscript "%nujinm%%outna3%" "http://www2.17mcp.com/info/t_p5/p5kj.aspx">"%temp%\p5kj.txt"
set/a beend2=%beend%-2
:1-1
findstr /b "%beend:~2%" "%temp%\p5kj.txt">nul 2>nul||(
findstr /b "%beend2:~2%" "%temp%\p5kj.txt">nul 2>nul||cls&&echo 奖号数据库太陈旧！将用更新程序来更新开奖数据。&&goto 6
cls&echo.&echo 已是最新数据库！不需要更新。按任意键返回。。。
del/f/q "%nujinm%%outna3%"&del/f/q "%temp%\p5kj.txt"&del/q/f "%temp%\pl5_dj.txt"
pause>nul&goto 0)
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('findstr "." "%temp%\p5kj.txt"') do (
set kjhm=%%i
if "!beend:~2!"=="!kjhm:~0,5!" (set kjhm2=!kjhm:~5,5!&&call :kjjieguo&set/a beend+=1)
)
find "!beend!" "!temp!\pl5_dj.txt">nul 2>nul&&(for /f "tokens=2 delims=：" %%i in ('findstr /b "开奖号码" "!temp!\pl5_dj.txt"') do (set kjhm2=%%i&&call :kjjieguo))
endlocal
if "%date:~5,2%"=="01" (
findstr /b ":%date:~0,4%" "%nujinm%%outna%">nul 2>nul||echo :%date:~0,4%>>"%nujinm%%outna%"
findstr /b /c:"echo %date:~2,2%001:" "%nujinm%%outna%"||set beend=%date:~0,4%001&&goto 1-1)
del/f/q "%nujinm%%outna3%"&del/f/q "%temp%\p5kj.txt"&del/q/f "%temp%\pl5_dj.txt"
cls&echo.&echo 更新完成！按任意键返回。。。
pause>nul
goto 0
:3
if "%显一次%"=="" (
echo.
echo 【搜索字符前加字母:┬[ n ]只在开奖结果中搜索┬[ f ]只在分析结果中搜索】
echo 【不加字母搜索全部 └[ t ]只在开奖期数中搜索┘[ . ]通配符代表任意字符】
set 显一次=1
)
echo.
set jhcssz=2*
set/p jianghao= 请输入搜索字符:
if "%jianghao%"=="0" goto 0
if "%jianghao%"=="1" goto 1
if "%jianghao%"=="2" call :kjhaoma >"%nujinm%排列5开奖结果.txt"&start %SystemRoot%\system32\notepad.exe "%nujinm%排列5开奖结果.txt"&goto 0
if "%jianghao%"=="3" set 显一次=&goto 3
if "%jianghao%"=="4" echo 不同历史期数会得到不同的分析结果，选对历史期数对分析很重要!结果仅供参考!&echo.&goto 4
if "%jianghao%"=="5" goto 5
if /i "%jianghao%"=="h" goto h
if /i "%jianghao%"=="o" goto o
if /i "%jianghao%"=="v" start notepad "%nujinm%投注结果.txt"&goto 0
if /i "%jianghao%"=="b" start "" "%ProgramFiles%\Internet Explorer\IEXPLORE.EXE" "http://tools.ecp888.com/tel/login.asp"&goto 0
if /i "%jianghao%"=="q" start "" "tencent://message/?uin=282959030&Site=http://www.axyz.cn&Menu=yes">nul &goto 0
if /i "%jianghao:~0,1%"=="q" start "" "tencent://message/?uin=%jianghao:~1%&Site=http://www.axyz.cn&Menu=yes">nul &goto 0
if /i "%jianghao%"=="d" del/q/f "%nujinm%查找结果.txt"&del/q/f "%nujinm%投注结果.txt" 2>nul &goto 0
if /i "%jianghao:~0,1%"=="n" set jianghao=%jianghao:~1%&&set jhcssz=3,3
if /i "%jianghao:~0,1%"=="t" set jianghao=%jianghao:~1%&&set jhcssz=2,2
if /i "%jianghao:~0,1%"=="f" set jianghao=%jianghao:~1%&&set jhcssz=4*
if exist "%nujinm%temp.txt" del "%nujinm%temp.txt"
echo %date% %time:~0,5% (排列5开奖公告中查找"%jianghao%")>"%nujinm%查找结果.txt"
echo ++++++++++++++++++++++++++++++++++++++++++++++++++++++++>>"%nujinm%查找结果.txt"
echo 期号 奖号 顺序 单双 012路 大小 P3-跨 P3和值 P5-跨 P5和值>>"%nujinm%查找结果.txt"
for /f "tokens=%jhcssz% delims= " %%i in ('findstr "单双" "%nujinm%%outna%"') do (echo %%i %%j>>"%nujinm%temp.txt")
findstr /I /R /C:"%jianghao%" "%nujinm%temp.txt">"%nujinm%temp2.txt"
set czjjh=0
for /f "tokens=1 delims=:" %%i in ('findstr /b /n . "%nujinm%temp2.txt"') do (set czjjh=%%i)
for /f "tokens=1,2* delims=echo" %%i in ('findstr /r /g:"%nujinm%temp2.txt" "%nujinm%%outna%"') do (echo %%i>>"%nujinm%查找结果.txt")
echo.>>"%nujinm%查找结果.txt"
echo 共找到%czjjh%条与"%jianghao%"相符的结果>>"%nujinm%查找结果.txt"
echo ───────end───────>>"%nujinm%查找结果.txt"
start %SystemRoot%\system32\notepad.exe "%nujinm%查找结果.txt"
del "%nujinm%temp.txt"
del "%nujinm%temp2.txt"
goto 3
:4
set lishiqs=0
set/p lishiqs= 分析的历史期数?(0返回) :
echo %lishiqs%|findstr "^[0-9]*$">nul||echo 必需是纯数字！&& goto 4
if "%lishiqs%"=="0" goto 0
if "%lishiqs%"=="1" goto 1
if "%lishiqs%"=="2" call :kjhaoma >"%nujinm%排列5开奖结果.txt"&start %SystemRoot%\system32\notepad.exe "%nujinm%排列5开奖结果.txt"&goto 4
if "%lishiqs%"=="3" set 显一次=&goto 3
if "%lishiqs%"=="4" goto 4
if "%lishiqs%"=="5" goto 5
if "%lishiqs%"=="6" goto 6
if exist znfx.txt del znfx.txt
call :kjhaoma >"%nujinm%排列5开奖结果.txt"
for /f "tokens=1 delims=:" %%i in ('findstr /b /n "%date:~2,2%" "%nujinm%排列5开奖结果.txt"') do (set beend=%%i)
set/a znfx=%beend%-%lishiqs%
set/a znfxlh=%date:~0,4%-1
for /f "tokens=1,2,3 delims=:" %%i in ('findstr /b /n "%znfxlh:~2,2% %date:~2,2%" "%nujinm%排列5开奖结果.txt"') do (if %%i GTR %znfx% echo %%k>>znfx.txt)
setlocal enabledelayedexpansion
for /l %%a in (0 1 9) do set /a 百位%%a=0,十位%%a=0,个位%%a=0
for /f "tokens=1 delims= " %%a in (znfx.txt) do (set str=%%a&set /a 百位!str:~0,1!+=1,十位!str:~1,1!+=1,个位!str:~2,1!+=1)
for %%i in (百位 十位 个位) do (
set "m=!%%i0!"
for /l %%a in (0 1 9) do if !%%i%%a! leq !m! set m=!%%i%%a!
for /l %%a in (0 1 9) do if !%%i%%a! equ !m! set %%i=!%%i! %%a
if "%%i"=="百位" set baiwei=!%%i!
if "%%i"=="十位" set siwei=!%%i!
if "%%i"=="个位" set gewei=!%%i!
)
echo.
echo 推荐号(组选): !baiwei! / !siwei! / !gewei!&echo.
endlocal
del/q/f znfx.txt
goto 4
:5
echo %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1% %RANDOM:~1,1%%RANDOM:~1,1%%RANDOM:~1,1%
pause>nul
goto 0
:6
echo.&echo 正在检查更新，请稍候。。。
ping -n 2 http://7979.qrqr.net>nul||(cls&echo 不能连接到更新服务器！请检查网络或重试。&pause&goto 0)
(echo Set oDOM = WScript.GetObject^(WScript.Arguments^(0^)^)
echo do until oDOM.readyState = "complete"
echo WScript.sleep 200
echo loop
echo WScript.echo oDOM.documentElement.outerText)>"%nujinm%%outna3%"
cscript //NoLogo /e:vbscript "%nujinm%%outna3%" "http://7979.qrqr.net\tcpl35.htm">"%nujinm%%outna2%"
del/f/q "%nujinm%%outna3%"
for /f "tokens=2 delims==" %%i in ('findstr /c:"set update=" "%nujinm%%outna2%"') do (
cls&echo.&echo 当前版本号: %update%
if "%update%"=="%%i" echo.&echo 当前已是最新版本！不需要更新。按任意键返回。。。&del/f/q "%nujinm%%outna2%"&pause>nul&goto 0
echo.&echo 找到新版本: %%i&echo.
echo ────── 更新内容 ────────────────────
findstr /b "::[" "%nujinm%%outna2%" 2>nul
echo ───────────────────────────────
echo 按任意键开始更新程序。。。&pause>nul
move /y "%nujinm%%outna2%" "%nujinm%%outna%"&&"%nujinm%%outna%"
goto :eof
)
:h
cls
echo 帮助信息:
echo.&echo [1]、输入1更新开奖结果到最新期。
echo.&echo [2]、查看所有开奖结果,从发行彩票第一期起到最新一期。
echo.&echo [3]、在所有开奖结果中查找指定字符。可指定只搜索期数、奖号、分析、或全部。
echo.&echo [4]、分析最近可能出的号码，主要是冷号分析，供参考。
echo.&echo [5]、随机选出10注随机P3数字，供筛选投注。
echo.&echo [6]、更新程序。如果程序有新版出现，用此功能更新程序。
echo.&echo [d]、删除查找结果和所有选好的投注号码。
echo.&echo [v]、查看本期您输入的预备投注号码。
echo.&echo 选号方法:输入选好的待投注号码,以空格隔开,如463 112 098 22234,然后回车。
echo.&echo [q]、与我联系。如果Q后面加QQ号码，则与指定QQ聊天。如: q282959030
echo.&echo [b]、彩票网上代购：这是我在买的代购平台，用户可以自行修改自己的代购平台地址。
echo.&echo [o]、网页输出:将指定年份的开奖分析输出到网页打开。 （本程序快捷键为[ F7 ]）
pause>nul&goto 0
:o
set opyear=:
echo 请输入年号的后两位数字，如2008年就输入08。默认为%date:~2,2%年。
set/p opyear= 哪一年的数据?(0返回) :
if "%opyear%"==":" set opyear=%date:~2,2%
if "%opyear%"=="0" goto 0
if "%opyear%"=="1" goto 1
if "%opyear%"=="2" call :kjhaoma >"%nujinm%排列5开奖结果.txt"&start %SystemRoot%\system32\notepad.exe "%nujinm%排列5开奖结果.txt"&goto o
if "%opyear%"=="3" set 显一次=&goto 3
if "%opyear%"=="4" goto 4
if "%opyear%"=="5" goto 5
if "%opyear%"=="6" goto 6
if /i "%opyear%"=="h" goto h
if /i "%opyear%"=="o" goto o
if /i "%opyear%"=="v" start notepad "%nujinm%投注结果.txt"&goto o
if /i "%opyear%"=="b" start "" "%ProgramFiles%\Internet Explorer\IEXPLORE.EXE" "http://tools.ecp888.com/tel/login.asp"&goto o
if /i "%opyear%"=="q" start "" "tencent://message/?uin=282959030&Site=http://www.axyz.cn&Menu=yes">nul &goto o
if /i "%opyear%"=="d" del/q/f "%nujinm%查找结果.txt"&del/q/f "%nujinm%投注结果.txt" 2>nul &goto o
echo.&echo 正在输出到网页，请稍候。。。
call :kjhaoma >"%nujinm%排列5开奖结果.txt"
>"%nujinm%开奖结果.hta" (
echo ^<html^>
echo ^<head^>
echo ^<title^>中国体育彩票体彩排列3排列5中奖号码列表^(%date:~0,2%%opyear%^) by:clamber E-mail:282959030@qq.com^</title^>
echo ^</head^>
echo ^<link type="text/css" rel="stylesheet" href="http://www.zjlottery.com/resource/css.txt"^>
echo ^<body bgcolor="#F5F5F5"^>
echo ^<font size=4^>^<center^>^<b^>中国体育彩票体彩排列3排列5中奖号码列表^</b^>^</font^>^</center^>
echo ^<tr^>^<td colspan="2"^>
echo ^<table border=1 cellspacing=0 cellpadding=0^>
echo ^<tr bgcolor='#D0DCE0'^>
echo ^<td align="center" rowspan=2 width=80^>期号^</td^>
echo ^<td align="center" rowspan=2 width=90^>开奖结果^</td^>
echo ^<td align="center" rowspan=2 width=80^>大小^</td^>
echo ^<td align="center" rowspan=2 width=80^>单双^</td^>
echo ^<td align="center" rowspan=2 width=90^>数字排序^</td^>
echo ^<td align="center" colspan=2^>021路^<br^>021趋势^</td^>
echo ^<td align="center" colspan=2^>组三/组六^<br^>P5对子数^</td^>
echo ^<td align="center" colspan=2^>跨度值^</td^>
echo ^<td align="center" colspan=2^>P3和值^</td^>
echo ^<td align="center" colspan=2^>P5和值^</td^>
echo ^</tr^>
echo ^<tr bgcolor='#D0DCE0'^>
echo ^<td align="center"^>趋势^</td^>^<td align="center"^>021路^</td^>
echo ^<td align="center"^>类型^</td^>^<td align="center"^>对子数^</td^>
echo ^<td align="center"^>P3跨^</td^>^<td align="center"^>P5跨^</td^>
echo ^<td align="center"^>和尾^</td^>^<td align="center"^>P5和值^</td^>
echo ^<td align="center"^>和尾^</td^>^<td align="center"^>P5和值^</td^>
echo ^</tr^>)
setlocal enabledelayedexpansion
for /f "tokens=1-10 delims=:" %%a in ('findstr /b "!opyear!" "!nujinm!排列5开奖结果.txt"') do (
if "!ccolor:~-3,1!"=="2" (set ccolor=^<tr height=20 bgcolor='#D0DCE0'^>) else (set ccolor=^<tr height=20^>)
for /f "tokens=1-18 delims= " %%a in ('echo %%a %%b %%c %%d %%e %%f %%g %%h %%i %%j') do (
set nuqs=%%g
set kuaz3=%%k
if "!kuaz3:~0,1!"=="0" set kuaz3=㈥
if "!kuaz3:~0,1!"=="1" set kuaz3=③
if "!kuaz3:~0,1!"=="A" set kuaz3=豹
set kuaz5=%%o
set hzbn=%%n
set hzbr=%%r
echo !ccolor!^<td align=center^>^<a href="http://result.lottery.gov.cn/pailie5/pl5_%%a.html"^>%%a^</a^>^</td^>^<td align=center bgcolor='#D6DFF7'^>%%b^</td^>^<td align=center^>%%j^</td^>^<td align=center bgcolor='#D6DFF7'^>%%f^</td^>^<td align=center^>%%d^</td^>^<td align=center bgcolor='#D6DFF7'^>!nuqs:~0,1!^</td^>^<td align=center^>%%h^</td^>^<td align=center bgcolor='#D6DFF7'^>!kuaz3!^</td^>^<td align=center^>!kuaz5:~0,1!^</td^>^<td align=center bgcolor='#D6DFF7'^>%%l^</td^>^<td align=center^>%%p^</td^>^<td align=center bgcolor='#D6DFF7'^>!hzbn:~-1,1!^</td^>^<td align=center^>!hzbn!^</td^>^<td align=center bgcolor='#D6DFF7'^>!hzbr:~-1,1!^</td^>^<td align=center^>!hzbr!^</td^>^</tr^>>>"%nujinm%开奖结果.hta"
)
)
endlocal
echo ^</table^>>>"%nujinm%开奖结果.hta"
echo ^</td^>^</tr^>>>"%nujinm%开奖结果.hta"
echo ^<a href=tencent://message/?uin=282959030^>^<img border="0" SRC=http://wpa.qq.com/pa?p=1:282959030:6 alt="有问题点这里和我联系"^>^</a^>>>"%nujinm%开奖结果.hta"
echo ^<font size="-1"^> E-mail:clian76@163.com by:clamber^</font^>>>"%nujinm%开奖结果.hta"
echo ^</body^>>>"%nujinm%开奖结果.hta"
echo ^</html^>>>"%nujinm%开奖结果.hta"
start "" "%nujinm%开奖结果.hta"
goto 0
:kjjieguo
set/a hezi=%kjhm2:~0,1%+%kjhm2:~1,1%+%kjhm2:~2,1%
set/a hezi5=%kjhm2:~0,1%+%kjhm2:~1,1%+%kjhm2:~2,1%+%kjhm2:~3,1%+%kjhm2:~4,1%
set/a mod1=%kjhm2:~0,1%%%2
set/a mod2=%kjhm2:~1,1%%%2
set/a mod3=%kjhm2:~2,1%%%2
set/a nus1=%kjhm2:~0,1%%%3
set/a nus2=%kjhm2:~1,1%%%3
set/a nus3=%kjhm2:~2,1%%%3
if %hezi% LSS 10 set hezi=-%hezi%
if %hezi5% LSS 10 set hezi5=-%hezi5%
if %kjhm2:~0,1% GEQ 5 (set dx1=D) else (set dx1=X)
if %kjhm2:~1,1% GEQ 5 (set dx2=D) else (set dx2=X)
if %kjhm2:~2,1% GEQ 5 (set dx3=D) else (set dx3=X)
if %mod1% equ 0 (set ds1=S) else (set ds1=D)
if %mod2% equ 0 (set ds2=S) else (set ds2=D)
if %mod3% equ 0 (set ds3=S) else (set ds3=D)
setlocal enabledelayedexpansion
set runos=&set nos3=&set nos5=
for /f %%k in ('^(echo %kjhm2:~0,1%^&echo.%kjhm2:~1,1%^&echo.%kjhm2:~2,1%^)^|sort') do (set nos3=!nos3!%%k)
for /f %%k in ('^(echo %kjhm2:~0,1%^&echo.%kjhm2:~1,1%^&echo.%kjhm2:~2,1%^&echo.%kjhm2:~3,1%^&echo.%kjhm2:~4,1%^)^|sort') do (set nos5=!nos5!%%k)
set nos=!nos5!
set/a nos3=!nos3:~-1,1!-!nos3:~0,1!
set/a nos5=!nos5:~-1,1!-!nos5:~0,1!
for %%r in (%nus1%%nus2%%nus3% %kjhm2:~0,3% %kjhm2%) do (
set ru=0&set a=
for /l %%r in (0,1,9) do set num%%r=0
call set number=%%%r
set v=!number!
set nu=
for /l %%r in (1,1,20) do (if defined v (call set "a=!v:~0,1!"&call set "v=!v:~1!"&set /a num!a!+=1))
for /l %%r in (0,1,9) do (set /a ru=num%%r/2+ru&if !num%%r! gtr 1 set nu=!nu!%%r)
set/a runos+=1
if "!runos!"=="1" set p021=!ru!!nu!&if "!p021:~0,1!"=="0" set p021=0-
if "!runos!"=="2" set p3no=!ru!!nu!&if "!kjhm2:~0,3!"=="!kjhm2:~1,2!!kjhm2:~0,1!" set p3no=A
if "!runos!"=="3" set p5no=!ru!!nu!
)
echo echo %beend:~2%: %kjhm2% 顺序:%nos% 单双:%ds1%%ds2%%ds3% %p021:~1%路:%nus1%%nus2%%nus3% 大小:%dx1%%dx2%%dx3% %p3no:~0,1%跨:%nos3% %hezi:~-1,1%和值:%hezi% %p5no:~0,1%跨:%nos5% %hezi5:~-1,1%和值:%hezi5%>>"%nujinm%%outna%"
endlocal
goto :eof
:kjhaoma
echo 期号 奖号 顺序 单双 012路 大小 P3-跨 P3和值 P5-跨 P5和值
echo 04001: 92882 顺序:22889 单双:DSS 2路:022 大小:DXD 0跨:7 9和值:19 2跨:7 9和值:29
echo 04002: 17387 顺序:13778 单双:DDD 1路:110 大小:XDX 0跨:6 1和值:11 1跨:7 6和值:26
echo 04003: 18328 顺序:12388 单双:DSD -路:120 大小:XDX 0跨:7 2和值:12 1跨:7 2和值:22
echo 04004: 43248 顺序:23448 单双:SDS -路:102 大小:XXX 0跨:2 9和值:-9 1跨:6 1和值:21
echo 04005: 54159 顺序:14559 单双:DSD 1路:211 大小:DXX 0跨:4 0和值:10 1跨:8 4和值:24
echo 04006: 26225 顺序:22256 单双:SSS 2路:202 大小:XDX 1跨:4 0和值:10 1跨:4 7和值:17
echo 04007: 30745 顺序:03457 单双:DSD 0路:001 大小:XXD 0跨:7 0和值:10 0跨:7 9和值:19
echo 04008: 22699 顺序:22699 单双:SSS 2路:220 大小:XXD 1跨:4 0和值:10 2跨:7 8和值:28
echo 04009: 41809 顺序:01489 单双:SDS 1路:112 大小:XXD 0跨:7 3和值:13 0跨:9 2和值:22
echo 04010: 27464 顺序:24467 单双:SDS 1路:211 大小:XDX 0跨:5 3和值:13 1跨:5 3和值:23
echo 04011: 36416 顺序:13466 单双:DSS 0路:001 大小:XDX 0跨:3 3和值:13 1跨:5 0和值:20
echo 04012: 30564 顺序:03456 单双:DSD 0路:002 大小:XXD 0跨:5 8和值:-8 0跨:6 8和值:18
echo 04013: 03232 顺序:02233 单双:SDS 0路:002 大小:XXX 0跨:3 5和值:-5 2跨:3 0和值:10
echo 04014: 35919 顺序:13599 单双:DDD 0路:020 大小:XDD 0跨:6 7和值:17 1跨:8 7和值:27
echo 04015: 59872 顺序:25789 单双:DDS 2路:202 大小:DDD 0跨:4 2和值:22 0跨:7 1和值:31
echo 04016: 44517 顺序:14457 单双:SSD 1路:112 大小:XXD 1跨:1 3和值:13 1跨:6 1和值:21
echo 04017: 19318 顺序:11389 单双:DDD 0路:100 大小:XDX 0跨:8 3和值:13 1跨:8 2和值:22
echo 04018: 12998 顺序:12899 单双:DSD -路:120 大小:XXD 0跨:8 2和值:12 1跨:8 9和值:29
echo 04019: 71140 顺序:01147 单双:DDD 1路:111 大小:DXX 1跨:6 9和值:-9 1跨:7 3和值:13
echo 04020: 10931 顺序:01139 单双:DSD 0路:100 大小:XXD 0跨:9 0和值:10 1跨:9 4和值:14
echo 04021: 39386 顺序:33689 单双:DDD 0路:000 大小:XDX 1跨:6 5和值:15 1跨:6 9和值:29
echo 04022: 59190 顺序:01599 单双:DDD -路:201 大小:DDX 0跨:8 5和值:15 1跨:9 4和值:24
echo 04023: 87197 顺序:17789 单双:SDD 1路:211 大小:DDX 0跨:7 6和值:16 1跨:8 2和值:32
echo 04024: 88679 顺序:67889 单双:SSS 2路:220 大小:DDD 1跨:2 2和值:22 1跨:3 8和值:38
echo 04025: 61868 顺序:16688 单双:SDS -路:012 大小:DXD 0跨:7 5和值:15 2跨:7 9和值:29
echo 04026: 62173 顺序:12367 单双:SSD -路:021 大小:DXX 0跨:5 9和值:-9 0跨:6 9和值:19
echo 04027: 36339 顺序:33369 单双:DSD 0路:000 大小:XDX 1跨:3 2和值:12 1跨:6 4和值:24
echo 04028: 07519 顺序:01579 单双:SDD -路:012 大小:XDD 0跨:7 2和值:12 0跨:9 2和值:22
echo 04029: 25615 顺序:12556 单双:SDS 2路:220 大小:XDD 0跨:4 3和值:13 1跨:5 9和值:19
echo 04030: 12060 顺序:00126 单双:DSS -路:120 大小:XXX 0跨:2 3和值:-3 1跨:6 9和值:-9
echo 04031: 36210 顺序:01236 单双:DSS 0路:002 大小:XDX 0跨:4 1和值:11 0跨:6 2和值:12
echo 04032: 37870 顺序:03778 单双:DDS -路:012 大小:XDD 0跨:5 8和值:18 1跨:8 5和值:25
echo 04033: 50502 顺序:00255 单双:DSD 2路:202 大小:DXD 1跨:5 0和值:10 2跨:5 2和值:12
echo 04034: 99528 顺序:25899 单双:DDD 0路:002 大小:DDD 1跨:4 3和值:23 1跨:7 3和值:33
echo 04035: 37480 顺序:03478 单双:DDS 1路:011 大小:XDX 0跨:4 4和值:14 0跨:8 2和值:22
echo 04036: 00904 顺序:00049 单双:SSD 0路:000 大小:XXD 1跨:9 9和值:-9 1跨:9 3和值:13
echo 04037: 32595 顺序:23559 单双:DSD 2路:022 大小:XXD 0跨:3 0和值:10 1跨:7 4和值:24
echo 04038: 42533 顺序:23345 单双:SSD 2路:122 大小:XXD 0跨:3 1和值:11 1跨:3 7和值:17
echo 04039: 80212 顺序:01228 单双:SSS 2路:202 大小:DXX 0跨:8 0和值:10 1跨:8 3和值:13
echo 04040: 56641 顺序:14566 单双:DSS 0路:200 大小:DDD 1跨:1 7和值:17 1跨:5 2和值:22
echo 04041: 81405 顺序:01458 单双:SDS 1路:211 大小:DXX 0跨:7 3和值:13 0跨:8 8和值:18
echo 04042: 78024 顺序:02478 单双:DSS -路:120 大小:DDX 0跨:8 5和值:15 0跨:8 1和值:21
echo 04043: 70432 顺序:02347 单双:DSS 1路:101 大小:DXX 0跨:7 1和值:11 0跨:7 6和值:16
echo 04044: 38212 顺序:12238 单双:DSS 2路:022 大小:XDX 0跨:6 3和值:13 1跨:7 6和值:16
:2005
echo 05001: 05497 顺序:04579 单双:SDS -路:021 大小:XDX 0跨:5 9和值:-9 0跨:9 5和值:25
echo 05002: 36614 顺序:13466 单双:DSS 0路:000 大小:XDD 1跨:3 5和值:15 1跨:5 0和值:20
echo 05003: 43132 顺序:12334 单双:SDD 1路:101 大小:XXX 0跨:3 8和值:-8 1跨:3 3和值:13
echo 05004: 67476 顺序:46677 单双:SDS 1路:011 大小:DDX 0跨:3 7和值:17 2跨:3 0和值:30
echo 05005: 29955 顺序:25599 单双:SDD 0路:200 大小:XDD 1跨:7 0和值:20 2跨:7 0和值:30
