[文本处理] [已解决]批处理能做摩斯代码转换吗？

@echo off
Color 3F
Mode con cols=50 lines=10
if not exist 莫斯代码.txt (
    echo.
    echo.
    echo          莫斯代码.TXT 文件缺失
    pause>nul
    exit
)
:begin
cls
echo.
echo.
echo                莫斯代码转换
echo.
echo.
echo     请输入一个英文字母（区分大小写）
set /p input=
if /i "%input%"=="end" (
    echo ***-*-
    pause>nul
    goto begin
)
if /i "%input%"=="start" (
    echo-*-*-
    pause>nul
    goto begin
)
for /f "tokens=2" %%i in ('findstr /b %input% "莫斯代码.txt" ') do (
    echo %%i
)
pause>nul
goto begin
复制代码

@echo off
set /p input=请输入一个英文单词:
for /f "tokens=1,2 delims= " %%a in ('more +7^<%0') do (
  if "%input%"=="%%a" echo "%%a"的摩斯代码是: %%b
) 
pause
exit
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 --**
1 *----
2 **---
3 ***--
4 ****-
5 *****
6 -****
7 --***
8 ---**
9 ----*
0 -----
. *-*-*-
, --**--
: ---***
' *----*
? **--**
- -****-
( -*--*-
) -*--*-
@ *--*-*
— -***-
。 *-*-*-
， --**--
： ---***
| *----*
？ **--**
_ -****-
（ -*--*-
） -*--*-
· *--*-*
end ***-*-
start -*-*-
复制代码