中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 请教如何防止空字出现

sttacckz
新手上路

积分 6
发帖 2
注册 2007-9-15
状态离线

『楼主』: 请教如何防止空字出现

color 5e
@echo off
echo set aa=蒋忠富>1.bat
echo set aa=施武金>2.bat
echo set aa=石景侨>3.bat
echo set aa=陈俊勇>4.bat
echo set aa=王震超>5.bat
echo set aa=陈炎昆>6.bat
echo set aa=郑鸣群>7.bat
echo set aa=谢启程>8.bat
echo set aa=黄亮>9.bat
echo set aa=许键>10.bat
:pp
cls
echo 输入组队人数8或10
set /p s=
s=s-1
cls
set count=0
@echo on
:loop
set /a num=%random%%%%s%+1
if not defined num%num% (
set num%num%=%num%
set /a count+=1
call %num%.bat
if %num%==    goto pp
echo %num%%aa% >>xx.txt
)
if %count% lss %s% goto loop
if %s%==8 echo 51==天灾军团==== >>xx.txt
if %s%==10 echo 51==天灾军团==== >>xx.txt
del 1.bat
del 2.bat
del 3.bat
del 4.bat
del 5.bat
del 6.bat
del 7.bat
del 8.bat
del 9.bat
del 10.bat
cls
@echo off
setlocal enabledelayedexpansion
set a=0
echo.
echo ***********************
echo ***********************>>DOAT.txt
echo.
echo ====近卫军团====
echo ====近卫军团==== >>DOAT.txt
for /f %%i in (xx.txt) do (
set /a a+=1
set num!a!=%%i
)
set /a b=%a%-1
for /l %%i in (1,1,%b%) do (
set /a var=%%i+1
  for /l %%j in (!var!,1,%a%) do (
  call set var1=%%num%%i%%
  call set var2=%%num%%j%%
  if !var1! lss !var2! (set tmp=!var1!&set num%%i=!var2!&set num%%j=!tmp!)
  )
)
for /l %%i in (1,1,%a%) do call echo %%num%%i%%>>DOAT.txt
for /l %%i in (1,1,%a%) do call echo %%num%%i%%
del xx.txt
echo.
echo ***********************>>DOAT.txt
echo ***********************
echo.

echo=============
echo =任意键退出=
echo=============
pause>nul

[ Last edited by sttacckz on 2007-12-7 at 04:54 AM ]

2007-12-7 04:24