如题
比如 “123” 生成 “321”
要求： 自动转换并生成目标文本。路径可以在系统盘符下！
谢谢！
比如 “123” 生成 “321”
要求： 自动转换并生成目标文本。路径可以在系统盘符下！
谢谢！
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [求助]如何生成文本的反序！
楼 主
[求助]如何生成文本的反序！
发表于 2006-10-06 10:42 · 中国 河南 信阳 联通
第 2 楼
发表于 2006-10-06 11:48 · 中国 湖北 荆门 电信
@echo off
set str=
set var=
call :sort "123456789"
echo %ret%
call :sort "abcdefg"
echo %ret%
pause
goto :eof
:sort
set "str=%~1"
set "var=%str:~0,1%%var%"
set "ret=%var%"
set "flag=%str:~1%"
if defined flag call :sort "%flag%"
set str= && set var=
goto :eof由于批处理的特性，它依然无法处理诸如"%之类的部分特殊字符。如果专门为了那几个特殊去写代码处理将会降低极大的效率。所以不建议用批处理来处理高要求的字符工作。
第 3 楼
发表于 2006-10-06 11:51 · 中国 广东 佛山 广东睿江科技有限公司
试试下面的代码：
呵呵，发完这个帖子才发现3742668已经抢先一步。defined的用法比较新鲜。
后来发现不用在字符串的结尾设置结束符号，修改之后的代码能处理更多的字符。
[ Last edited by namejm on 2006-10-8 at 09:57 ]
@echo off
:: 反序列出文本的每行内容
:: 不能处理的字符：
:: 管道符号：|
:: 重定向符号：<、>
:: 连接符号：&
:: 脱字符号：^
:: 其他符号：?、*、)、"
for /f "delims=" %%i in (test.txt) do (
set str=%%i
set var=
call :intercept
)
start test_.txt
goto :eof
:intercept
if not "%str%"=="" (
set var=%str:~0,1%%var%
set str=%str:~1%
goto intercept
) else (
>> test_.txt echo %var%
)
goto :eof
呵呵，发完这个帖子才发现3742668已经抢先一步。defined的用法比较新鲜。
后来发现不用在字符串的结尾设置结束符号，修改之后的代码能处理更多的字符。
[ Last edited by namejm on 2006-10-8 at 09:57 ]
尺有所短，寸有所长，学好CMD没商量。
考虑问题复杂化，解决问题简洁化。
考虑问题复杂化，解决问题简洁化。
第 4 楼
发表于 2006-10-06 21:19 · 中国 河南 信阳 联通
谢谢 楼上2位
祝各位中秋节好!
祝各位中秋节好!
第 5 楼
发表于 2006-10-07 04:01 · 中国 贵州 贵阳 电信
太不可思议了，不过不知道代码的具体含义，先收了！！！
第 6 楼
发表于 2006-10-07 07:36 · 中国 甘肃 兰州 电信
namejm 兄的容易看懂点
第 7 楼
发表于 2006-10-08 05:30 · 中国 四川 成都 教育网
bat+vbs
[ Last edited by electronixtar on 2006-10-8 at 05:34 ]
@echo off
echo WScript.echo StrReverse(WScript.Arguments(0)) >$tmp.vbs
cscript //noLogo $tmp.vbs %1
del $tmp.vbs
[ Last edited by electronixtar on 2006-10-8 at 05:34 ]
C:\>BLOG http://initiative.yo2.cn/
C:\>hh.exe ntcmds.chm::/ntcmds.htm
C:\>cmd /cstart /MIN "" iexplore "about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>"
第 8 楼
发表于 2007-02-02 19:07 · 美国 北达科他州立大学
sed "/\n/!G;s/\(.\)\(.*\n\)/&\2\1/;//D;s/.//" test.txt
第 9 楼
发表于 2007-02-03 01:53 · 中国 辽宁 本溪 联通
WScript.echo StrReverse(WScript.Arguments(0))
第 10 楼
这个也行吧！就是低级点
发表于 2007-05-07 13:27 · 中国 河北 秦皇岛 电信
@echo off&setlocal enabledelayedexpansion
for /l %%c in (9,-1,0) do (
set /a var=1234567890
set/p=!var:~%%c,1!<nul>>1.txt
)
这个是我这个菜鸟写的，上面几位大哥的看的不是太懂！以后多多学习
for /l %%c in (9,-1,0) do (
set /a var=1234567890
set/p=!var:~%%c,1!<nul>>1.txt
)
这个是我这个菜鸟写的，上面几位大哥的看的不是太懂！以后多多学习
第 11 楼
用gawk试试
发表于 2007-05-07 17:26 · 中国 湖北 武汉 电信
本人的gawk是GNU awk 3.1.5版本的。
echo abcdefg|gawk "BEGIN{FS=\"\"}{for(i=NF;i>0;i--)printf($i)}"
第 12 楼
发表于 2007-05-08 14:10 · 中国 陕西 西安 电信
VBS一个函数就搞定了。
论坛跳转: