yangfengoo

是不是每个txt只有一行？

yangfengoo

@echo off&setlocal enabledelayedexpansion
for /f %%a in ('more +18 %~0') do set/a n+=1&set _!n!=%%a
set #=01 02 03 04 05 07 08 09 10 12 13 14 16 17 19 22 23 24 25 26 28 29 30 31 33 34 35 37 38 40 43 44 45 46 47 49 50 51 52 54 55 56 58 59 61
call :lp 0 123456
set #=07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
call :lp 0 234567
set #=06 27 48
call :lp 45 17
goto :eof
:lp
set nn=%1
(for %%a in (!#!) do (
  set _=
  set/p _=<%%a.txt
  set/a nn+=1
  call echo,%%_!nn!%%!_!
  ))>%2.txt
goto :eof
1+2=
1+3=
1+4=
1+5=
1+6=
2+3=
2+4=
2+5=
2+6=
3+4=
3+5=
3+6=
4+5=
4+6=
5+6=
1-2=
1-3=
1-4=
1-5=
1-6=
2-3=
2-4=
2-5=
2-6=
3-4=
3-5=
3-6=
4-5=
4-6=
5-6=
1*2=
1*3=
1*4=
1*5=
1*6=
2*3=
2*4=
2*5=
2*6=
3*4=
3*5=
3*6=
4*5=
4*6=
5*6=
1+2=
1-2=
1*2=
复制代码

yangfengoo

@echo off&setlocal enabledelayedexpansion
md new
for /f %%a in ('more +19 %~0') do set/a n+=1&set _!n!=%%a
set #=01 02 03 04 05 07 08 09 10 12 13 14 16 17 19 22 23 24 25 26 28 29 30 31 33 34 35 37 38 40 43 44 45 46 47 49 50 51 52 54 55 56 58 59 61
call :lp 0 123456
set #=07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63
call :lp 0 234567
set #=06 27 48
call :lp 45 17
goto :eof
:lp
set nn=%1
(for %%a in (!#!) do (
  set _=
  set/p _=<%%a.txt
  set/a nn+=1
  call echo,%%_!nn!%%!_!
  ))>new\%2.txt
goto :eof
1+2=
1+3=
1+4=
1+5=
1+6=
2+3=
2+4=
2+5=
2+6=
3+4=
3+5=
3+6=
4+5=
4+6=
5+6=
1-2=
1-3=
1-4=
1-5=
1-6=
2-3=
2-4=
2-5=
2-6=
3-4=
3-5=
3-6=
4-5=
4-6=
5-6=
1*2=
1*3=
1*4=
1*5=
1*6=
2*3=
2*4=
2*5=
2*6=
3*4=
3*5=
3*6=
4*5=
4*6=
5*6=
1+2=
1-2=
1*2=
复制代码