netbenton

晕~~回贴后才看到是新手练功区~~~
真的晕了~~~

@echo off&color 2f&setlocal enableDelayedExpansion
set str=123456789ABCDEF

rem 用 #号 代替 *号 处理,
set fh= + - # /

rem 随机取四个数
for /l %%a in (13,-1,10) do (
    set/a a=!random! %% %%a,b=a+1
    for /f "tokens=1,2" %%b in ("!a! !b!") do (
        set/a $%%a=0x!str:~%%b,1!
        set str=!str:~,%%b!!str:~%%c!
    )
)

set num= !$13! !$12! !$11! !$10!

rem 四数组合
for %%a in (!num!) do (
    set nm1=!num: %%a=!
    for %%b in (!nm1!) do (
        set nm2=!nm1: %%b=!
        for %%c in (!nm2!) do (
                set nm3=!nm2: %%c=!

rem 符号组合
for %%1 in (!fh!) do (
    set fh1=!fh: %%1=!
    for %%2 in (!fh1!) do (
        set fh2=!fh1: %%2=!
        for %%3 in (!fh2!) do (
                set fh3=!fh2: %%3=!

     set all=%%a %%2 %%b %%3 %%c !fh3!!nm3!
        rem 把 #号 换成 *后 计算
     set/a ru=!all:#=*! 2>nul
        rem 有结果则显示出来
     if !ru! equ 24 echo;!!all:#=x! = !ru!&set yy=1

)))

)))
if not defined yy echo !num! 四数没有结果

pause
复制代码

[ 本帖最后由 netbenton 于 2010-11-12 19:32 编辑 ]