中国DOS联盟

写了个显示时间的bat，大家看看有没有值得改进的地方，有些地方我用for循环没行……

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@echo off
setlocal enabledelayedexpansion
MODE con: COLS=87 LINES=10

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
set h0=．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．
set h1=████．．．．█．████．████．█．．█．████．████．████．████．████．．．．．．
set h2=█．．█．．．．█．．．．█．．．．█．█．．█．█．．．．█．．．．．．．█．█．．█．█．．█．．．．．．
set h3=█．．█．．．．█．．．．█．．．．█．█．．█．█．．．．█．．．．．．．█．█．．█．█．．█．．．█．．
set h4=█．．█．．．．█．████．████．████．████．████．．．．█．████．████．．．．．．
set h5=█．．█．．．．█．█．．．．．．．█．．．．█．．．．█．█．．█．．．．█．█．．█．．．．█．．．█．．
set h6=█．．█．．．．█．█．．．．．．．█．．．．█．．．．█．█．．█．．．．█．█．．█．．．．█．．．．．．
set h7=████．．．．█．████．████．．．．█．████．████．．．．█．████．████．．．．．．
set h8=．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::



set sn=0&set cr=0&set colr=bc2d9ea
:tim
:::::::::::::::::::::颜色设置:::::::::::::::::::::::
set clr=!colr:~%cr%,1!
if !sn!==0 set/a cr+=1
if !cr! equ 7 set cr=0
color !clr!!W7!
:::::::::::::::::::::读取时间:::::::::::::::::::::::
set W0=%time:~0,1%
if "!W0!"=="" set W1=0
set W1=%time:~1,1%
set W2=10
set W3=%time:~3,1%
set W4=%time:~4,1%
set W5=10
set W6=%time:~6,1%
set W7=%time:~7,1%
for /l %%k in (0,1,7) do (set/a hx%%k=!W%%k!*5)
::::::::::::::::::::::::::::::::::::::::::::::::::::
set tme=%time:~0,8%
set dat=%date%
title %dat% 【当前时间：!tme!】 By:zsx
cls
:::::::::::::::::::::::显示:::::::::::::::::::::::::
if !sn!==0 echo ．．．．．．．．．．．．．．．．．^
．．．．．．．．．．．．．．．．．．．．．．．．．．
if !sn!==1 echo.
for /l %%j in (1,1,7) do (
set DW0=!h%%j:~%hx0%,5!
set DW1=!h%%j:~%hx1%,5!
set DW2=!h%%j:~%hx2%,5!
set DW3=!h%%j:~%hx3%,5!
set DW4=!h%%j:~%hx4%,5!
set DW5=!h%%j:~%hx5%,5!
set DW6=!h%%j:~%hx6%,5!
set DW7=!h%%j:~%hx7%,5!
set Hg=．!DW0!!DW1!!DW2!!DW3!!DW4!!DW5!!DW6!!DW7!．．
if !sn!==1 (set Hg=!Hg:．= !)
echo !Hg!)
if !sn!==0 echo ．．．．．．．．．．．．．．．．．^
．．．．．．．．．．．．．．．．．．．．．．．．．．

if !sn!==0 (set sn=1) else (set sn=0)
:::::::::::::::::::::::延时:::::::::::::::::::::::::
:ys
set W=%time:~7,1%
if !W! equ !W7! goto ys
goto tim

根本不值得写，更加不值得改进。

呵呵，版主来泼水了。


就当练练手好了，不过这东西真的没什么实用价值呀。

版主太偏激了,呵呵,这东西是没什么作用,不过楼主挺有心思的!

确实也没什么用，版主的话太打击人了……
哎，其实我是想不到能写点什么有用的，最多也就是删点文件，搞点关机，等等的，最初学这个的时候只不过是为了解开同学的计算机密码（很低级的方式）…… 主要我不是血计算机专业的，又没有太多时间来搞这些……
学单片机编程的时候由于C语言没学好还全靠搞过一些没用的批处理才整得比较顺利……
不过说实在的，我除了用批处理搞过自动复制U盘内容（以前期末老师复习不愿意把他 的关键的复习题目拷给我们…… 后来也没用上……），就再也没搞过对我来说有什么实际意义的批处理了……
其实我是真不知道批处理还能做些什么，对我来说暂时也就是玩玩，还需要各位大哥的指点……

[ Last edited by sanxia2006 on 2010-4-13 at 11:33 ]

批处理不是用来做这些事情的，千万不要误入歧途。可以参考以下别人在做什么：

学习批处理的经历、心得、体会汇总
http://bbs.bathome.net/thread-4509-1-1.html

批处理是什么？能干什么？
http://bbs.bathome.net/thread-20-1-1.html

你用批处理来做什么？
http://bbs.bathome.net/thread-4912-1-1.html

Originally posted by sanxia2006 at 2010-4-13 10:54 AM:
确实也没什么用，版主的话太打击人了……
哎，其实我是想不到能写点什么有用的，最多也就是删点文件，搞点关机，等等的，最初学这个的时 ...

那也不错啊，自动复制U盘的东西，可以考虑做个自动备份工具什么的，或者做个自动识别U盘盘符之类的脚本，做成模块化的东西，要是能提供几个接口就更好了，方便大家以后借鉴。

继续努力，总有一天你的东西会帮上别人的

当是锻炼一下制作方式，以后进军正式的图形吧。
对于别人的说法，想想就好了，然后保持一个积极的心态

如果你是爱好图形的，那么批处理是一个路过吧。
如果你是学习编程的，这是过程中的娱乐，很自然的事情。

[ Last edited by 523066680 on 2010-4-13 at 12:49 ]

恩，很多年以前我也只知道批处理，那时候很感兴趣玩这个，但是后来慢慢的开始了解wmic，VBS，到现在基本都是在win下用VB自己写些简单的程序，在Ubuntu下直接写.sh脚本。觉得基本够用啦。

不过我现在是在学网络，呵呵，很少用的上了。

顶楼主！

正想写个类似的呢！

参考下！！！

把.sh学深入一点吧，再学学Perl，都比搞这些无聊的界面强。
不能把有限的生命浪费在无用的界面上。

谢谢版主:，我现在正学嵌入式…… 没太多时间……
（马上要毕业了，还要做毕业设计,累啊！）
等我以后要学习的时候有空了再看吧，到时候还希望多指教……

Originally posted by 523066680 at 2010-4-13 12:45:
当是锻炼一下制作方式，以后进军正式的图形吧。
对于别人的说法，想想就好了，然后保持一个积极的心态

如果你是爱好图形的，那么批处理是一 ...

谢谢鼓励！其实也就是锻炼一下编程的思维能力……
顺便自娱一下……