[数值计算] [已解决]批处理如何将连续的数字按指定格式进行合并，不连续的数字保持原样？

@echo off & setlocal enabledelayedexpansion
set s=101,102,339,340,341,342,343,592,593,594,595
set n=1
for %%a in (%s%) do (
	if !n!==1 (
	   set k=%%a&set /a n+=1
	) else (
	     if %%a==!j! (
	        set k=!k!-%%a
	     ) else (
	        set k=!k!,%%a
	     )
	)
	set /a j=%%a+1
)
for %%a in (!k!) do (
set l=%%a
set /p=!l:~,4!!l:~-3!,<nul
)
pause
复制代码

@echo off & setlocal enabledelayedexpansion
set s=101,102,339,340,341,342,343,592,593,594,595
for %%i in (%s%) do (
	set /a n+=1,m=n%%2
	if !m!==0 (set sp=-)else set sp=,
	set re=!re!!sp!%%i
)
set s=%re:~1%
echo;%s%
pause
复制代码

@echo off & setlocal enabledelayedexpansion
set s=101,102,339,340,341,342,343,592,593,594,595
for %%i in (%s%) do (
	if not defined end (
		set begin=%%i& set end=%%i
	) else (
		set /a flag=%%i-end-1
		if not !flag!==0 (
			set t=!t!,!begin!-!end!
			set begin=%%i& set end=%%i
		)else set end=%%i
	)
)
set t=%t%,%begin%-%end%
set s=%t:~1%

echo;%s%
pause
复制代码

@echo off & setlocal enabledelayedexpansion
set s=101,102,339,340,341,342,343,592,593,594,595
for %%i in (%s%,shenmegui) do (
	if not defined end (
		set s=& set begin=%%i& set end=%%i
	) else (
		set /a flag=%%i-end-1
		if not !flag!==0 (
			if defined s (
				set s=!s!,!begin!-!end!
			)else set s=!begin!-!end!
			set begin=%%i& set end=%%i
		)else set end=%%i
	)
)
echo;%s%
pause & exit /b
复制代码

@echo off & setlocal enabledelayedexpansion
set s=101,102,339,340,341,342,343,592,593,594,595
for %%i in (1a %s% a) do (
    set /a "1/(%%i-a-1)" && set "str=!str!!a!,%%i-"
    set "a=%%i"
)2>nul
echo;!str:~3,-3!
pause
复制代码

set s=3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20
复制代码

C:>set b=1a

C:>set /a "2-b-1"
0
复制代码

for %%i in (%s% a) do (
... ...
echo;!str:~1,-3!
复制代码