中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [已结]逐行逐字阅读文本的批处理，请高手帮忙完善
« [1] [2] [3] » ›
作者:
标题: [已结]逐行逐字阅读文本的批处理，请高手帮忙完善 上一主题 | 下一主题
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『楼 主』:  [已结]逐行逐字阅读文本的批处理，请高手帮忙完善

─────────── 版主提示 ───────────
      21楼 namejm 所写代码是完美解决方案
─────────── 版主提示 ───────────

我做了一个批处理，让它读取文本文件的内容，逐行逐字显示，但我水平太低，无法使它完全按照原文本的格式显示，请高手帮忙。谢谢！

[ Last edited by bjsh on 2007-8-10 at 08:35 AM ]



三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2006-11-19 21:44
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 2 楼』:  

自己顶一下！



三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2006-11-19 22:57
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
redtek
金牌会员





积分 2902
发帖 1147
注册 2006-9-21
状态 离线
『第 3 楼』:  

每次读一行，但你并没有显示完一行后让它换新行的代码～：）
所以全连着显示了～：）

也就是说，你读取了一行文本内容后，
然后分解了这个变量，以便再逐字的显示在屏幕上（白底背景很漂亮～：），
但是，你如何知道你取的那一行显示完了？（知道那一行显示完了就可以再打一个换行符了）。

所以，是不是要主动的取完一行以后在这个变量的最后再加一个“标置结束“的符号以方便判断呢？
如果有一个 if 判断是否此行到了结尾，如果是打一个换行符 echo.
这样的方法在下面贴子的第８楼有示例～：）


详见：　[原创]无奈何签名代码略析
http://www.cn-dos.net/forum/viewthread.php?tid=18838&fpage=1

上面贴子从读文本内容到显示特殊符号的例子都已经非常全面啦～：）

[ Last edited by redtek on 2006-11-19 at 10:27 AM ]



　　　　Redtek，一个永远在网上流浪的人……

_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._
2006-11-19 23:23
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 4 楼』:  

谢谢！正是看了后，才有此想法，试着玩儿的。主要是没有完全消化吸收啊！

[ Last edited by ccwan on 2006-11-19 at 11:36 PM ]



三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2006-11-19 23:26
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
vkill
金牌会员





积分 4103
发帖 1744
注册 2006-1-20
来自 甘肃.临泽
状态 离线
『第 5 楼』:  

呵呵~我喜欢先sed -n 1p 读取行再啄字读取

2006-11-20 07:03
查看资料  发送邮件  访问主页  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 6 楼』:  


　　刚下午写的，因为不支持特殊字符的读取，所以没敢发上来。看见兄弟发这帖子，才发上来，各位高手见笑了。

　　把要读的文件拖放到 ReadTxt.BAT 文件上释放即可。
::_______________________ReadTxt.BAT_______________________

@echo off&setlocal ENABLEDELAYEDEXPANSION
FOR /F "DELIMS=" %%A IN ('type %1') DO (CALL;:__;"%%A")
endlocal&PAUSE&goto :EOF

::显示字符子函数————————————-
:__
        SET A="%1"
        SET B=0
        if "%A%"=="" goto end
        :BEGIN
        IF NOT "!A:~%B%,1!"=="" (
                SET/P=!A:~%B%,1!<NUL
                PING 127.1 -N 1 >NUL
                SET/A B+=1
                GOTO BEGIN
        ) else (
        :end
        echo/&echo\
        )

::_______________________ReadTxt.BAT_______________________

   此帖被 +3 点积分       点击查看详情   
评分人：【 ccwan 】分数： +3  时间：2006-11-25 23:29


2006-11-20 07:53
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
chainliq
高级用户

学无尽止


积分 635
发帖 244
注册 2006-4-15
来自 广西贵港
状态 离线
『第 7 楼』:  

呵呵，我倒是觉得这个挺有意思的，请问如何修个它的显示速度呢？

2006-11-20 08:07
查看资料  发送邮件  访问主页  发短消息 网志  OICQ (86682419)  编辑帖子  回复  引用回复
vkill
金牌会员





积分 4103
发帖 1744
注册 2006-1-20
来自 甘肃.临泽
状态 离线
『第 8 楼』:  

要 echo ,所以特殊字符这个不好处理

2006-11-20 08:09
查看资料  发送邮件  访问主页  发短消息 网志   编辑帖子  回复  引用回复
redtek
金牌会员





积分 2902
发帖 1147
注册 2006-9-21
状态 离线
『第 9 楼』:  

顶～～lxmxn兄的动画阅读很精彩，可以看小说啦～：）



　　　　Redtek，一个永远在网上流浪的人……

_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._
2006-11-20 10:06
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ccwan
金牌会员




积分 2725
发帖 1160
注册 2006-9-23
来自 河北廊坊
状态 离线
『第 10 楼』:  

lxmxn兄确实厉害！佩服并感谢。
这正是我想要得效果，多谢兄的代码！
看看能不能解决特殊字符问题。

[ Last edited by ccwan on 2006-11-21 at 12:30 AM ]



三人行，必有吾师焉。   学然后知不足，教然后知困，然后能自强也。
2006-11-20 21:01
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
hxuan999
中级用户

DOS之日


积分 337
发帖 161
注册 2006-11-4
状态 离线
『第 11 楼』:  

看小说?真是个好主意,正好哪个高手用批处理也做个电子阅读器吧.



for /f %%h in (`echo hxuan`) do for /f %%x in (`echo hxuan`) do if %%h==%%x nul
2006-11-23 07:49
查看资料  发送邮件  发短消息 网志  OICQ (33899867)  编辑帖子  回复  引用回复
redtek
金牌会员





积分 2902
发帖 1147
注册 2006-9-21
状态 离线
『第 12 楼』:  

在PSP游戏机上看电子书多爽啊～：）

[ Last edited by redtek on 2006-11-22 at 10:31 PM ]



　　　　Redtek，一个永远在网上流浪的人……

_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._
2006-11-23 08:46
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
scriptor
银牌会员




积分 1187
发帖 555
注册 2006-12-21
状态 离线
『第 13 楼』:  

好东西啊

有解决我的一个问题了
谢谢了

2007-1-12 12:38
查看资料  发短消息 网志   编辑帖子  回复  引用回复
stormback
新手上路





积分 1
发帖 3
注册 2007-1-17
状态 离线
『第 14 楼』:  

好东西

2007-1-19 05:08
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
liuxin31554155
新手上路





积分 14
发帖 7
注册 2007-1-19
状态 离线
『第 15 楼』:  

不错的东东~

2007-1-19 05:47
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] [3] » ›
请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转:  



[ 联系联盟系统管理团队 - 中国DOS联盟 ]

Sponsored by ifanr Inc | © 2001-2023