@echo off
set n=0
setlocal enabledelayedexpansion
for /r %%a in (*) do (
call :byte "%%~nxa"
call :xecho "!space!"
set/a n+=1&call :xecho "%%~nxa"
if !n! equ 2 set n=0&call :xecho "↙"
)
del '&pause&exit/b
:xecho
if "%~1"=="↙" (echo.&goto :eof) else set /p=%~1 <nul
goto :eof
:byte
set byte=0
set "space="
echo %~1 >'&for %%a in (') do set byte=%%~za
set/a num=30-byte
for /l %%i in (1 1 %num%) do set "space= !space!"
goto :eof

@echo off
set n=0
setlocal enabledelayedexpansion
for /l %%a in (1 1 500) do (
set ran=!random!
call :byte "!ran!"
call :xecho "!space!"
set/a n+=1&call :xecho "!ran!"
if !n! equ 6 set n=0&call :xecho "↙"
)
del '&pause
exit/b
:xecho
if "%~1"=="↙" (echo.&goto :eof) else set /p=%~1 <nul
goto :eof
:byte
set byte=0
set "space="
echo %~1 >'&for %%a in (') do set byte=%%~za
set/a num=10-byte
for /l %%i in (1 1 %num%) do set "space= !space!"
goto :eof

@echo off
set n=0
setlocal enabledelayedexpansion
for /l %%a in (1 1 500) do (
set ran=!random!
set/a n+=1&call :xecho "!ran!"
if !n! equ 6 set n=0&call :xecho "↙"
)
pause
exit/b
:xecho
if "%~1"=="↙" (echo.&goto :eof) else set /p=%~1        <nul
goto :eof

@echo off
::命令行下对任意十进制整数排序,右对齐输出.
::使用格式：[本文件名] dat.txt
::thanks youxi01
if not exist %1 echo %~nx1 未找到.&exit /b
findstr "[^0-9]" %1 >nul&&echo 警告: %~nx1 内含有 非数字 数据!
setlocal enabledelayedexpansion
if "%2"=="" (
   for /f "tokens=2 delims=#" %%i in ('"%~0" %1 #^|sort') do (
      call :byte "%%i"
      call :xecho "!space!"
      set/a n+=1&call :xecho "%%i"
      if !n! equ 6 set n=0&call :xecho "↙"
   )
             ) else (
    for /f %%i in (%1) do (
       call :wei %%i
       echo !r!#%%i
    )
    goto :eof
                    )
goto :eof

:xecho
if "%~1"=="↙" (echo.&goto :eof) else set /p=%~1 <nul
goto :eof

:byte
set "space="
call :wei %1
set/a num=10-%r%
for /l %%i in (1 1 %num%) do set "space= !space!"
goto :eof

:wei
set r=0
   for /l %%i in (0 1 100) do (
      set "var=%~1"
      set t=!var:~%%i,1!
      if "!t!"=="" goto :eof
      set/a r+=1
   )

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1 1 100) do echo !random!>>dat.txt