标题: bat数字时钟（大字显示） [打印本页]
作者: sanxia2006 时间: 2010-4-12 14:40 标题: bat数字时钟（大字显示）
写了个显示时间的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
作者: HAT 时间: 2010-4-12 19:22
根本不值得写，更加不值得改进。
作者: exzzz 时间: 2010-4-12 23:58
呵呵，版主来泼水了。
就当练练手好了，不过这东西真的没什么实用价值呀。
作者: kennyfan 时间: 2010-4-13 08:17
版主太偏激了,呵呵,这东西是没什么作用,不过楼主挺有心思的!
作者: sanxia2006 时间: 2010-4-13 10:54
确实也没什么用，版主的话太打击人了……
哎，其实我是想不到能写点什么有用的，最多也就是删点文件，搞点关机，等等的，最初学这个的时候只不过是为了解开同学的计算机密码（很低级的方式）…… 主要我不是血计算机专业的，又没有太多时间来搞这些……
学单片机编程的时候由于C语言没学好还全靠搞过一些没用的批处理才整得比较顺利……
不过说实在的，我除了用批处理搞过自动复制U盘内容（以前期末老师复习不愿意把他 的关键的复习题目拷给我们…… 后来也没用上……），就再也没搞过对我来说有什么实际意义的批处理了……
其实我是真不知道批处理还能做些什么，对我来说暂时也就是玩玩，还需要各位大哥的指点……
[ Last edited by sanxia2006 on 2010-4-13 at 11:33 ]
作者: HAT 时间: 2010-4-13 12:31 标题: Re 5 楼
批处理不是用来做这些事情的，千万不要误入歧途。可以参考以下别人在做什么：
学习批处理的经历、心得、体会汇总
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
作者: exzzz 时间: 2010-4-13 12:32
| Quote: | |
|
那也不错啊，自动复制U盘的东西，可以考虑做个自动备份工具什么的，或者做个自动识别U盘盘符之类的脚本，做成模块化的东西，要是能提供几个接口就更好了，方便大家以后借鉴。
继续努力，总有一天你的东西会帮上别人的
作者: 523066680 时间: 2010-4-13 12:45
当是锻炼一下制作方式，以后进军正式的图形吧。
对于别人的说法，想想就好了，然后保持一个积极的心态
如果你是爱好图形的，那么批处理是一个路过吧。
如果你是学习编程的，这是过程中的娱乐，很自然的事情。
[ Last edited by 523066680 on 2010-4-13 at 12:49 ]
作者: exzzz 时间: 2010-4-13 12:52
恩，很多年以前我也只知道批处理，那时候很感兴趣玩这个，但是后来慢慢的开始了解wmic，VBS，到现在基本都是在win下用VB自己写些简单的程序，在Ubuntu下直接写.sh脚本。觉得基本够用啦。
不过我现在是在学网络，呵呵，很少用的上了。
作者: 125805398 时间: 2010-4-17 14:22 标题: 顶
顶楼主！
正想写个类似的呢！
参考下！！！
作者: HAT 时间: 2010-4-17 18:13 标题: Re 9 楼
把.sh学深入一点吧，再学学Perl，都比搞这些无聊的界面强。
不能把有限的生命浪费在无用的界面上。
作者: sanxia2006 时间: 2010-4-20 11:15
谢谢版主:
，我现在正学嵌入式…… 没太多时间……（马上要毕业了，还要做毕业设计,累啊！）
等我以后要学习的时候有空了再看吧，到时候还希望多指教……
作者: sanxia2006 时间: 2010-4-20 11:24
| Quote: | |
|
谢谢鼓励！其实也就是锻炼一下编程的思维能力……
顺便自娱一下……