China DOS Union

@echo off&goto start&rem 数字排序

Numbers are in a.txt, one per line

Can sort any integer within 200 digits. (Including negative numbers, positive numbers, 0, and repeated numbers)

Disadvantage: For numbers starting with 0, the leading 0 will be ignored in the result

::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%

:: For a line - by - line number in a.txt, use the next line to read, and do not need the previous line

:: The number before the previous line set str= %random%... must have a space in front

::for /f %%i in (a.txt) do set str=!str! %%i

echo The array before sorting is: %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 The array after sorting is: %ret:~1%

pause

exit

@echo off&setlocal enabledelayedexpansion

set/p str=Enter a number (separated by spaces)

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

)

Originally posted by lxmxn at 2008-4-30 05:25 PM:
So lively, I'll also add one, the shortcoming is that the efficiency is a bit low...

@echo off & Setlocal EnableDelayedExpansion



for /L %%i in (1,1,5) do (

	set skip=.!skip!

	findstr /rc:"^^!ski ... 

Originally posted by huahua0919 at 2008-4-30 18:02:

I didn't understand the moderator's code. Can you explain it?
It seems that negative numbers are not supported for sorting

Originally posted by MLQX at 2008-5-2 11:26 AM:
Thanks.
[ Last edited by MLQX on 2008-5-2 at 12:34 PM ]

Originally posted by zh159 at 2008-4-30 01:51 AM:
Used before, forgot where it came from

@echo off

setlocal enabledelayedexpansion

    set numbers=%random% %random% %random% %random% %random% %random% %random% %random%

    echo 排序前 ... 

Originally posted by plp626 at 2008-4-29 11:59 PM:

if not %1.==. 

Is it an implicit end-of-file mark in a text file? Or is it a mark indicating the beginning or end of a line?

[ Last edited by MLQX on 2008-5-2 at 01:24 PM ]

@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%!

    )

)

Originally posted by zw19750516 at 2008-5-3 22:19:
&&Unexpectedly, a single stone stirs up a thousand waves. I haven't been to the forum for a few days, and this post has become an essence post, and it's so popular. It's really beyond my original expectation. Today, I studied my original code again and have the following...