- @echo off
- for /f "tokens=1-6" %%i in (千字文.txt) do call set words=%%words%%%%i%%j%%k%%l%%m%%n&call set wordsCopy=%%words%%
- echo %words%>tempTxt.txt
- for %%p in (tempTxt.txt) do set /a number=(%%~zp-2)/2&call echo 1.该文共计%%number%%个汉字。
- pause>nul
-
- echo 2.检查是否有重复的字
- set bool=no
- :loop
- set word=%words:~0,1%
- set words=囧%words:~1%囧
- for /f "delims=%word% tokens=1,2" %%a in ("%words%") do if "%%b" neq "" echo 发现重复的汉字:%word%。&set bool=yes
- for /f "delims=囧" %%p in ("%words%") do set words=%%p
- if "%words%" neq "囧囧" goto loop
- if "%bool%"=="no" echo 没有重复的汉子。
- pause>nul
-
- echo 3.倒序输出
- set /a group=%number%/4
- for /l %%k in (1,1,%group%) do call echo %%wordsCopy:~-4%%&call set wordsCopy=%%wordsCopy:~0,-4%%
- echo 干完活啦!&pause>nul
复制代码
|