[特效代码] 【已解决】批处理怎样实现1-10 顺着排 跟倒着排？

panda951

user insert num1:3 (num1代表會出現的數字，num2 代表出現次數 里路 2 = 1 2 1)
user insert num2:10
1
12
123
1231
12312
123123
1231231
12312312
123123123
1231231231
123123123
12312312
1231231
123123
12312
1231
123
12
1

这个代码叫什么....
找不到相关资料......

pcl_test

回复 1# panda951

@echo off
set /p n1=user insert num1:
set /p n2=user insert num2:
set /a r=%n2%-1
set t=0
:main
setlocal enabledelayedexpansion
for /l %%a in (1 1 %n1%) do (
set "s=!s!%%a"
set /a t+=1
)
if !t! geq !n2! (set str=!s!) else goto main
for /l %%a in (1 1 %n2%) do set str=!str:~,%%a! & echo !str! &set str=!s!
for /l %%b in (%r% -1 1) do set str=!str:~,%%b! & echo !str! &set str=!s!
pause
复制代码

luo0527

好难的样子。

panda951

回复 3# luo0527


    我完全不明白这个有神马意义==

panda951

回复 2# pcl_test


    能告诉下他是如何运作吗？有点看不明白

pcl_test

回复 5# panda951
假设有num1:3，num2:4
那么可以看成
1-23123123
12-3123123
123-123123
1231-23123
123-123123
12-3123123
1-23123123
在每行-处截取前面的数

bailong360

@Echo Off
SetLocal EnableDelayedExpansion
Set /P Num1=user insert num1:
Set /P Num2=user insert num2:
For /L %%i In (1 1 %Num2%) Do (
	Set N=0
	For /L %%j In (1 1 %%i) Do (
		If "!N!"=="3" (Set N=1) Else Set /A N+=1
		Set .%%i=!.%%i!!N!
	)
	Echo !.%%i!
)
Set /A Num2-=1
For /L %%i In (%Num2% -1 1) Do Echo !.%%i!
复制代码

我也来一个

cobat

@echo off&setlocal enabledelayedexpansion
set /p n1=user insert num1:
set /p n2=user insert num2:
:loop
for /l %%a in (1,1,%n1%) do set "s=!s!%%a"
if "!s:~%n2%!" equ "" goto :loop
for /l %%a in (1,1,%n2%) do echo !s:~,%%a!
set/a n2-=1&for /l %%a in (!n2!,-1,1) do echo !s:~,%%a!
pause
复制代码

panda951

回复 6# pcl_test


  原来是截取....
感谢你的分享

panda951

回复 7# bailong360


    大哥你的只是到123...

panda951

回复 8# cobat


   感谢你的分享

愤怒的CMD

我也来一个
bailong360 发表于 2015-3-23 23:06

没看出来Num1有什么用。代码可以改成

@Echo Off
SetLocal EnableDelayedExpansion
Set /P Num=user insert Num:
For /L %%i In (1 1 %Num%) Do (
	Set N=0
	For /L %%j In (1 1 %%i) Do (
		If "!N!"=="%Num%" (Set N=1) Else Set /A N+=1
		Set .%%i=!.%%i!!N!
	)
	Echo !.%%i!
)
Set /A Num-=1
For /L %%i In (%Num% -1 1) Do Echo !.%%i!
pause>nul
复制代码

bailong360

回复 12# 愤怒的CMD


    不好意思，代码错了...

@Echo Off 2>nul 3>nul
SetLocal EnableDelayedExpansion
Set /P Num1=user insert num1:
Set /P Num2=user insert num2:
For /L %%i In (1 1 %Num2%) Do Set /A "1/(N-Num1)"&&Set /A N+=1||Set N=1&Set ..=!..!!N!
For /L %%i In (%Num2% -1 -%Num2%) Do For /F "Delims=-" %%j In ("%%i") Do Set /A "1/%%i"&&Echo;!..:~0,-%%j!||Echo !..!
Pause
复制代码