中国DOS联盟

@echo off&goto start&rem 数字排序
a.txt 中为一行一个数字
可以对任何 200 位以内的整数进行排序。（包括负数、正数、0、及重复的数字）
缺点： 对于0开头的数字，结果会忽略首位的0
::by 26933062 2007-11-25
:start
setlocal EnableDelayedExpansion
for /l %%a in (1 1 200) do set lin=0!lin!
for /f %%a in (a.txt) do (
   set "str=%%a"
   if "!str:~0,1!"=="-" (set fus=a&set str=!str:~1!&set zf=_) else set zf=+
   set str=!lin!!str!
   set !zf!!str:~-200! !random!!random!!random!!random!!random!!random!!random!=a
)
if defined fus call :sort _ /r
call :sort +
pause&exit
:sort
for /f "tokens=1,2 delims=_+= " %%a in ('set %1^|sort %2') do (
   for /f "tokens=* delims=0" %%i in ("%%a") do (
      if "%1"=="_" (set fuhao=-) else set "fuhao="
      if "%%i"=="" (echo !fuhao!0) else echo !fuhao!%%i
   )
)
goto :eof

@echo off
setlocal enabledelayedexpansion
set str= %random% %random% -%random% %random% %random% -%random% %random% -%random% %random% %random%
::对于 a.txt 中为一行一个数字采用下一行方式读取，上一行不要
::上一行set str= %random%...的数前面必需要有一个空格
::for /f %%i in (a.txt) do set str=!str! %%i
echo 排序前数组为: %str:~1%

:sort
    set num=m
    for %%i in (%str%) do if %%i lss !num! set num=%%i
    set ret=%ret% %num%
    set str=!str: %num%=!
    if not "%str%" == "" goto sort

echo 排序后数组为: %ret:~1%
pause
exit

@echo off&setlocal enabledelayedexpansion
set/p str=输入数字(用空格隔开)
for %%i in (%str%) do (
    set str=0000000000%%i
    set .!str:~-10! !random!=%%i
)
for /f "tokens=2 delims==" %%i in ('set .') do set/p=%%i <nul
pause>nul

@echo off & Setlocal EnableDelayedExpansion

for /L %%i in (1,1,5) do (
        set skip=.!skip!
        findstr /rc:"^^!skip!$" file.txt|sort
)

@echo off&setlocal enabledelayedexpansion
set "str=101 20 14 13 19 18 16 11 5 -7"
for %%i in (%str%) do call,set var=!var! n%%i
for %%i in (%var%) do set a=%%i&call :lp
echo !var:n=!
pause>nul&goto :eof
:lp
for %%i in (!var!) do (
    set b=%%i
    if !b:~1! lss %a:~1% (
       set var=!var:%a% =!
       set var=!var:%%i=%%i %a%!
    )
)