本帖最后由 77七 于 2023-10-24 10:35 编辑
- @echo off
- rem 批处理和文本全部保存为utf-8编码格式
- chcp 65001 >nul
- cd /d "%~dp0"
- setlocal enabledelayedexpansion
- for /f "useback tokens=1-3 delims=," %%a in ("DuoYinZi.txt") do (
- set b0=%%b
- set b1=!b0:~0,1!
- for %%x in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
- set b1=!b1:%%x=%%x!
- )
- set _%%a=!b1!!b0:~1!
- )
- set n=-1
- (for /f "useback tokens=1-3 delims=," %%a in ("BirdNamePYSX.txt") do (
- set a=%%a
- setlocal
- for %%x in (%%b) do (
- set /a n+=1
- set #!n!=%%x
- )
- for /l %%l in (0,1,!n!) do (
- set t=!a:~%%l,1!
- if defined _!t! (
- call set u=%%_!t!%%
- ) else (
- set u=!#%%l!
- )
- set c=!c!!u:~0,1!
- set "b=!b!!u! "
- )
- echo !a!,!b!,!c!
- endlocal
- ))>BirdNamePYSX_2.txt
- endlocal
- pause
复制代码
|