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