[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
盛世繁华

Rank: 1

帖子
28 
积分
56 
技术
0  
捐助
0  
注册时间
2022-8-6 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2023-7-9 13:14 | 只看该作者

[文本处理] 【已解决】求助随机抽取文本的批处理输出ECHO处于关闭状态

需要用批处理程序处理一些txt文本。bat所在目录下有个文本：1.txt、2.txt、3.txt、4.txt、5.txt、6.txt、7.txt、8.txt，每个txt里有很多行文字。bat批处理循环运行100次，每次从1.txt、3.txt、5.txt中的任意2个txt文本中各随机抽取一行文字，从2.txt、4.txt、6.txt、7.txt、8.txt中的任意3个txt文本中各随机抽取一行文字，最后把将所有随机选取到的文字合并成一行输出到output.txt文本中，没循环一次合并的结果都会单独占据一行。因为是循环100次，所以运行结果就是合并100次，那么output.txt里最终得到的是100行合并后的文字。

运行代码后，output.txt里不是合并后的文字，而是100行ECHO 处于关闭状态。求解！

文件夹里的文件如下：
1.txt
2.txt
3.txt
4.txt
5.txt
6.txt
7.txt
8.txt
merge_texts.bat
output.txt

代码如下：
  1. @echo off

  2. setlocal enabledelayedexpansion

  3. 

  4. set "files1=1.txt;3.txt;5.txt"

  5. set "files2=2.txt;4.txt;6.txt;7.txt;8.txt"

  6. set "output=output.txt"

  7. 

  8. REM 清空输出文件

  9. break > "%output%"

  10. 

  11. for /l %%i in (1, 1, 100) do (

  12.     set "result="

  13. 

  14.     REM 随机选取2个txt，每个txt随机选取一行

  15.     for %%j in (%files1%) do (

  16.         set "file=%%j"

  17.         call :ReadRandomLine "!file!" line

  18.         set "result=!result! !line!"

  19.     )

  20.     

  21.     REM 随机选取3个txt，每个txt随机选取一行

  22.     for %%j in (%files2%) do (

  23.         set "file=%%j"

  24.         call :ReadRandomLine "!file!" line

  25.         if !errorlevel! equ 0 (

  26.             set "result=!result! !line!"

  27.         )

  28.     )

  29.     

  30.     REM 输出到文件

  31.     echo !result:~1! >> "%output%"

  32. )

  33. 

  34. echo "合并完成。"

  35. pause

  36. goto :eof

  37. 

  38. :ReadRandomLine

  39. setlocal

  40. set "file=%~1"

  41. set "line="

  42. for /f "usebackq skip=%random% tokens=*" %%k in ("%file%") do (

  43.     endlocal & set "line=%%k" & exit /b 0

  44. )

  45. exit /b 1
复制代码
output.txt内容如下：
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
ECHO 处于关闭状态。
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

dimo

Rank: 1

帖子
44 
积分
74 
技术
2  
捐助
0  
注册时间
2021-9-11 
2楼
发表于 2023-7-9 15:32 | 只看该作者
本帖最后由 dimo 于 2023-7-9 15:41 编辑

最后一个读取随机行的模块，那个random的数太大了，直接给文件所有行都跳过去了。
生成一个行数多一点的初始文件，就能运行了。
  1. echo off

  2. for /l %%i in (1,1,8) do ((for /l %%n in (0,1,40000) do echo %%i) >> %%i.txt)
复制代码
但是用我这八个txt运行后结果，好像跟要求也不太一样。
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1 3 5 2 4 6 7 8
1

评分人数

Hope is a sad thing.
https://nsdimo.gitee.io/

TOP

BingjianREMIX

Rank: 2

帖子
112 
积分
169 
技术
5  
捐助
0  
注册时间
2023-5-12 
3楼
发表于 2023-7-9 17:22 | 只看该作者
本帖最后由 BingjianREMIX 于 2023-7-9 17:23 编辑

把31行改成
  1. >> "%output%" echo !result:~1!
复制代码
试试
QQ 1980286392

TOP

77七

Rank: 6Rank: 6

帖子
1703 
积分
2794 
技术
343  
捐助
50  
注册时间
2022-9-18 
4楼
发表于 2023-7-9 18:23 | 只看该作者 
  1. @echo off

  2. set "files1=1.txt;3.txt;5.txt"

  3. set "files2=2.txt;4.txt;6.txt;7.txt;8.txt"

  4. set "output=output.txt"

  5. 

  6. for /l %%l in (1,1,100) do (

  7. 	setlocal enabledelayedexpansion

  8. 	call :r1 "%files1%" 2

  9. 	for %%d in (!file!) do call :r2 "%%d"

  10. 	endlocal

  11. 	setlocal enabledelayedexpansion

  12. 	call :r1 "%files2%" 3

  13. 	for %%d in (!file!) do call :r2 "%%d"

  14. 	endlocal

  15. 	echo=

  16. )

  17. pause

  18. exit

  19. 

  20. 	:r1

  21. 	for %%a in (%~1) do set #!random!!random!=%%a

  22. 	for /f "tokens=2 delims==" %%a in ('set #') do (

  23. 		set /a n+=1

  24. 		set file=!file! %%a

  25. 		if !n! equ %~2 exit /b

  26. 	)

  27. 

  28. 	:r2

  29. 	setlocal enabledelayedexpansion

  30. 	for /f "useback delims=" %%b in ("%~1") do set _!random!=%%b

  31. 	for /f "tokens=1* delims==" %%b in ('set _') do (

  32. 		set /p=%%c <nul

  33. 		endlocal

  34. 		exit /b

  35. 	)
复制代码
1

评分人数

bat小白，请多指教！谢谢！

TOP

盛世繁华

Rank: 1

帖子
28 
积分
56 
技术
0  
捐助
0  
注册时间
2022-8-6 
5楼
发表于 2023-7-9 23:34 | 只看该作者
回复 2# dimo 是的，输出到原有8个文本了

TOP

盛世繁华

Rank: 1

帖子
28 
积分
56 
技术
0  
捐助
0  
注册时间
2022-8-6 
6楼
发表于 2023-7-9 23:37 | 只看该作者
回复 3# BingjianREMIX 不行

TOP

盛世繁华

Rank: 1

帖子
28 
积分
56 
技术
0  
捐助
0  
注册时间
2022-8-6 
7楼
发表于 2023-7-9 23:42 | 只看该作者
回复 4# 77七 可以正确输出了

TOP

返回列表