中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [原创]*抗灾捐物,支持祖国*
作者:
标题: [原创]*抗灾捐物,支持祖国* 上一主题 | 下一主题
FQ
社区乞丐





积分 -61
发帖 37
注册 2008-4-19
状态 离线
『楼 主』:  [原创]*抗灾捐物,支持祖国*


@echo off&setlocal&title 支持我们伟大的祖国!
mode con: cols=32 lines=5
color 04
echo/&echo\
set "i=          抗灾捐物"
:loop
for /l %%a in (10,1,13) do (
call:fq %%a 0c
<nul,set/p=
)
goto loop
:fq
ping -n 1 127.1 >nul
if %1 equ 10 (<nul,set/p=          )
if %1 equ 11 (<nul,set/p=%i:~0,11%)
if %1 equ 12 (<nul,set/p=%i:~0,12%)
if %1 equ 13 (<nul,set/p=%i:~0,13%)
call,set "u=%%i:~%1,1%%"
>%u%,call,set/p= <nul
findstr /a:%2 .* "%u%?"
if %1 equ 10 (<nul,set/p=%i:~11%)
if %1 equ 11 (<nul,set/p=%i:~12%)
if %1 equ 12 (<nul,set/p=%i:~13%)
del,%u%
希望汶川受灾的人们平安,特此做个小动画,希望大家有钱出钱,有力出力,为了我们的家园,为了我们的祖国,做出自己的一份力量.......

   此帖被 +3 点积分     点击查看详情   
评分人:【 bat-zw 分数: +3  时间:2008-5-19 10:41


2008-5-15 17:39
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
dds
新手上路





积分 6
发帖 3
注册 2007-11-21
状态 离线
『第 2 楼』:  

平安是福团圆是福!祝灾区人民早日重建家园

2008-5-18 21:47
查看资料  发短消息 网志   编辑帖子  回复  引用回复
metoo
初级用户





积分 195
发帖 93
注册 2006-10-28
状态 离线
『第 3 楼』:  

这种批处理不可谓构思不巧妙。。不过感觉背离了批处理的初衷了

2008-5-18 21:52
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bat-zw
金牌会员

永远的学习者


积分 3105
发帖 1276
注册 2008-3-8
状态 离线
『第 4 楼』:  

再怎么样,楼主的一片赤心我完全可以了解,加油了,兄弟!加油了,四川!加油了,中国!



批处理之家新域名:www.bathome.net
2008-5-19 10:40
查看资料  发送邮件  发短消息 网志  OICQ (841615149)  编辑帖子  回复  引用回复
joytuyong1
初级用户





积分 101
发帖 39
注册 2006-11-21
状态 离线
『第 5 楼』:  

call,set "u=%%i:~%1,1%%"
>%u%,call,set/p= <nul
请问一下里面的>%u%,是怎么回事
findstr /a:%2 .* "%u%?"
这个里面的?是什么意思

2008-5-19 11:33
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bat-zw
金牌会员

永远的学习者


积分 3105
发帖 1276
注册 2008-3-8
状态 离线
『第 6 楼』:  



  Quote:
Originally posted by joytuyong1 at 2008-5-19 11:33:
call,set "u=%%i:~%1,1%%"
>%u%,call,set/p= <nul
请问一下里面的>%u%,是怎么回事
findstr /a:%2 .* "%u%?"
这个里面的?是什么意思

通配符,也可以写为*



批处理之家新域名:www.bathome.net
2008-5-19 11:53
查看资料  发送邮件  发短消息 网志  OICQ (841615149)  编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


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



论坛跳转: