中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-09 20:04
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [已解决]如何判断输入的是中文还是英文? 查看 2,156 回复 27
16 发表于 2008-09-21 07:44 ·  中国 江西 赣州 安远县 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
Originally posted by HAT at 2008-9-20 05:30 AM:
那就用2楼的思路吧
@echo off
setlocal enabledelayedexpansion
set /p "str=请输入:"
set sum=0
:loop
set "char=%str:~0,1%"
for /f "skip=1 delims=:" ...


这个没有用,不管输入什么批处理都会退出

[ Last edited by tireless on 2008-9-20 at 01:33 PM ]
17 发表于 2008-09-21 08:13 ·  中国 江苏 苏州 电信
初级用户
★★
积分 195
发帖 93
注册 2006-10-28 08:20
19年会员
UID 68626
性别 男
状态 离线
归根结底就是findstr的正则太肉
18 发表于 2008-09-21 10:21 ·  中国 广东 广州 电信
银牌会员
★★★
永远的菜鸟
积分 1,335
发帖 574
注册 2007-11-27 12:50
18年会员
UID 103929
性别 男
来自 广西
状态 离线
再试试这个如何?
改一下,支持特殊字符:
@echo off
setlocal enabledelayedexpansion
:bgn
type nul>t_.txt
set "n="&set "count="
set /p str=请输入:
:agn
>>t_.txt echo.!str:~,1!
if not "!str:~1!"=="" (set "str=!str:~1!"&goto :agn)
>>t_.txt echo god
for /f "delims=:" %%a in ('findstr /o .* t_.txt') do (
set /a "n+=1","m=n-1"
set "_!n!=%%a"
if !n! geq 2 (
call set /a "var=%%_!n!%%-%%_!m!%%"
if !var! equ 4 (set /a count+=19) else (set /a count+=10)
)
)
echo %count%
goto :bgn


[ Last edited by moniuming on 2008-9-21 at 10:27 AM ]
19 Re 18 楼 发表于 2008-09-21 10:36 ·  中国 江西 赣州 安远县 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
计算不正确。

床前明月光,疑是地上霜。举头望明月,低头思故乡。 的计算结果是 240。正确的应该是 456。
20 发表于 2008-09-21 11:33 ·  中国 广东 广州 电信
银牌会员
★★★
永远的菜鸟
积分 1,335
发帖 574
注册 2007-11-27 12:50
18年会员
UID 103929
性别 男
来自 广西
状态 离线
@echo off
setlocal enabledelayedexpansion
:bgn
del t_.txt 1>nul 2>nul
set "n="&set "count="
set /p str=请输入:
:agn
set st=!str:~,1!
>>t_.txt echo.!st!
if not "!str:~1!"=="" (set "str=!str:~1!"&goto :agn)
>>t_.txt echo god
for /f "delims=:" %%a in ('findstr /o .* t_.txt') do (
set /a "n+=1","m=n-1"
set "_!n!=%%a"
if !n! geq 2 (
call set /a "var=%%_!n!%%-%%_!m!%%"
if !var! equ 4 (set /a count+=19) else (set /a count+=10)
)
)
echo %count%
goto :bgn


[ Last edited by moniuming on 2008-9-21 at 11:41 AM ]
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
tireless +8 2008-09-21 17:37
21 Re 16楼 发表于 2008-09-21 11:34 ·  中国 重庆 九龙坡区 电信
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
15楼代码的运行结果:
C:\Test>test.bat
请输入:床前明月光,疑是地上霜。举头望明月,低头思故乡。
456

能把你的测试用例和测试结果贴出来看看吗?
22 发表于 2008-09-21 11:44 ·  中国 江西 赣州 安远县 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
额,15 楼的代码有用。计算太慢了,昨晚我以为批处理没有反应,没等结果出来就关掉了...
23 发表于 2008-09-21 11:53 ·  中国 广东 广州 电信
银牌会员
★★★
永远的菜鸟
积分 1,335
发帖 574
注册 2007-11-27 12:50
18年会员
UID 103929
性别 男
来自 广西
状态 离线
经多次测试,20楼的通过各种测试,而且效率还可以,试试?

[ Last edited by moniuming on 2008-9-21 at 11:55 AM ]
24 发表于 2008-09-21 21:29 ·  中国 江西 赣州 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
最后一次整合...

20 楼的代码完全不会出错。我想在原基础上再加上一些命令处理,可是我写的代码有点问题,所以再麻烦下各位,顺便整合在一起。

想在原基础上再进行这些处理:
1、还要显示输入的是什么
2、输入后,首先进行这些判断:
如果:
直接回车,则执行命令
输入的是 /h,则执行命令然后退出
输入的是 /s,则执行命令然后退出
输入的是 /r,则执行命令然后退出
再判断下面的:
是否以 /h 开头,如果是,则截取 /h 后面的字符,然后执行命令
是否以 /s 开头,如果是,则截取 /s 后面的字符,然后执行命令

以下是我修改后的代码:
: 原 20 楼的代码 : 我加上的

@echo off
setlocal enabledelayedexpansion
:bgn
del t_.txt 1>nul 2>nul
set "n="&set "count="
set /p str=请输入:

if not defined str goto 11
If %str%==/h 执行命令 & exit
If %str%==/s 执行命令 & exit
If %str%==/r 执行命令 & exit
if /i "%str:~,2%"=="/h" (
set str=%str:~2%
执行命令
goto settext
)
if /i "%str:~,2%"=="/s" (
set str=%str:~2%
执行命令
)
:settext
set Text=%str%

:agn
set st=!str:~,1!
>>t_.txt echo.!st!
if not "!str:~1!"=="" (set "str=!str:~1!"&goto :agn)
>>t_.txt echo god
for /f "delims=:" %%a in ('findstr /o .* t_.txt') do (
set /a "n+=1","m=n-1"
set "_!n!=%%a"
if !n! geq 2 (
call set /a "var=%%_!n!%%-%%_!m!%%"
if !var! equ 4 (set /a count+=19) else (set /a count+=10)
)
)
echo %count%
echo %text%
goto :bgn

:11
...


测试结果是,有空格就会出错。
(错误不出在别处,就在我添加的那段里运行中断了)

[ Last edited by tireless on 2008-9-21 at 01:53 AM ]
25 发表于 2008-09-21 22:07 ·  中国 四川 成都 电信
中级用户
★★
积分 297
发帖 135
注册 2006-10-21 12:00
19年会员
UID 67627
性别 男
状态 离线
If %str%==/h 执行命令 & exit
...
if /i "%str:~,2%"=="/h"

怎么后面知道加引号,前面为何不加
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
tireless +5 2008-09-22 09:10
26 发表于 2008-09-22 09:11 ·  中国 江西 赣州 安远县 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
怎么后面知道加引号,前面为何不加

加上引号后,输入空格没有问题了。却还有另外的问题:

请输入:(*^__^*) 嘻嘻……
此时不应有 嘻嘻……。

请输入:(**) 嘻嘻
此时不应有 嘻嘻。

请输入:O(∩_∩)O哈哈
此时不应有 O哈哈。

请输入:O(∩_∩)O
此时不应有 O。


是什么原因?

用以下代码做测试:

@echo off
:s
set /p str=请输入:

if not defined str echo 未定义&goto :s
If "%str%"=="/h" echo 执行/h命令&goto :s
If "%str%"=="/s" echo 执行/s命令&goto :s
If "%str%"=="/r" echo 执行/r命令&goto :s
if /i "%str:~,3%"=="/h " (
set str=%str:~3%
echo 执行/h命令
goto showtext
)
if /i "%str:~,3%"=="/s " (
set str=%str:~3%
echo 执行/s命令
)

:showtext
echo %str%
goto s


[ Last edited by tireless on 2008-9-21 at 02:52 PM ]
27 发表于 2008-09-22 11:45 ·  中国 广东 广州 电信
银牌会员
★★★
永远的菜鸟
积分 1,335
发帖 574
注册 2007-11-27 12:50
18年会员
UID 103929
性别 男
来自 广西
状态 离线
试试?

@echo off
Setlocal Enabledelayedexpansion
:s
set "str="
set /p str=请输入:
if not defined str echo 未定义&goto :s
If /i "!str!"=="/h" echo 执行/h命令&goto :s
If /i "!str!"=="/s" echo 执行/s命令&goto :s
If /i "!str!"=="/r" echo 执行/r命令&goto :s
if /i "!str:~,3!"=="/h " (
set "str=!str:~3!"
echo 执行/h命令
goto showtext
)
if /i "!str:~,3!"=="/s " (
set "str=!str:~3!"
echo 执行/s命令
)
:showtext
echo !str!
goto s


[ Last edited by moniuming on 2008-9-22 at 12:03 PM ]
28 re 27 楼 发表于 2008-09-22 12:18 ·  中国 江西 赣州 安远县 电信
银牌会员
★★★★
积分 2,025
发帖 1,122
注册 2007-09-05 20:15
18年会员
UID 96653
性别 男
状态 离线
没问题了。

谢谢大家耐心的帮助。
论坛跳转: