中国DOS联盟

就要过年了,小弟将日历献上.,有更好更方便更简洁的方法请讨论一下.
代码中有不妥之处请大家踊跃批评............
祝:新年快乐,万事如意. 猪年诸事行大运!!
@echo off mode con: lines=12 cols=40 setlocal enabledelayedexpansion for %%a in (一,二,三,四,五,六,日) do ( set /a a+=1 set j!a!=%%a) for %%b in (31,28,31,30,31,30,31,31,30,31,30,31) do ( set /a y+=1 set s!y!=%%b) set /p m=查几月? cls set n=%m% set /a n-=1 for /l %%c in (1,1,%n%) do ( set /a day+=!s%%c!) set b=0 for /l %%d in (1,1,!day!) do ( set /a b+=1 if !b! equ 8 set b=1) if %m% equ 1 set b=7 echo 一 二 三 四 五 六 日 echo. set flag= 一二三四五六日一二三四五六日 for /l %%f in (1 1 13) do ( if "!flag:~%%f,1!"=="!j%b%!" ( if "!j%%f!"=="一" (set /p s= <nul&set zh=6&goto next) if "!j%%f!"=="二" (set /p s= <nul&set zh=5&goto next) if "!j%%f!"=="三" (set /p s= <nul&set zh=4&goto next) if "!j%%f!"=="四" (set /p s= <nul&set zh=3&goto next) if "!j%%f!"=="五" (set /p s= <nul&set zh=2&goto next) if "!j%%f!"=="六" (set /p s= <nul&set zh=1&goto next) if "!j%%f!"=="日" (set /p s=<nul&set zh=7&goto next) )) :next for /l %%e in (1 1 !s%m%!) do ( set /a b+=1 if !b! equ 8 set b=1 if %%e lss 10 (set /p= %%e<nul) else (set /p= %%e<nul) if !fl!==0 (set /a z+=1) if !z!==7 (echo.&set z=0) if %%e==!zh! (echo. set fl=0 ) ) pause>nul

[ Last edited by huzixuan on 2007-2-21 at 10:49 PM ]

加上几几年的就更完美了...

因本人尚处于学飞阶段,还无法实现更复杂的功能,因此还需兄们的帮助才可以完成.

for %%b in (31,28,31,30,31,30,31,31,30,31,30,31) do (


2月一定是28天?

07年的不是吗;) 并且确实想写一个N年通用的,不会呢....

[ Last edited by huzixuan on 2007-2-17 at 01:00 AM ]

set j!a!=%%a

set s!y!=%%b

set /a day+=!s%%c!

for /l %%d in (1,1,!day!) do (
set /a b+=1
if !b! equ 8 set b=1)

以上的几行中的“！”代表什么意思？？？

天那,我可怜的小日历还没有得到更多人的鼓励就已经沉入海底了.....

顶你了

谢谢。.呵呵

感谢 兄的鼓励,特别感谢 redtek 兄,虽然没有露面,但我知道兄一直都是在帮助我们的

set j!a!=%%a
这句不是很明白,不知道LZ可否解释一下

Originally posted by juventusryp at 2007-2-18 08:25 PM:
set j!a!=%%a
这句不是很明白,不知道LZ可否解释一下

在大家的帮助下,终于知道了!!!

setlocal enabledelayedexpansion

set /?

......
考虑到读取一行文本时所遇到的目前扩充的限制时，延迟环境
变量扩充是很有用的，而不是执行的时候。以下例子说明直接
变量扩充的问题:

set VAR=before
if "%VAR%" == "before" (
set VAR=after
if "%VAR%" == "after" @echo If you see this, it worked
)

不会显示消息，因为在读到第一个 IF 语句时，BOTH IF 语句中
的 %VAR% 会被代替；原因是: 它包含 IF 的文体，IF 是一个
复合语句。所以，复合语句中的 IF 实际上是在比较 "before" 和
"after"，这两者永远不会相等。同样，以下这个例子也不会达到
预期效果:

set LIST=
for %i in (*.txt) do set LIST=%LIST% %i
echo %LIST%

原因是，它不会在目前的目录中建立一个文件列表，而只是将
LIST 变量设成找到的最后一个文件。这也是因为 %LIST% 在
FOR 语句被读取时，只被扩充了一次；而且，那时的 LIST 变量
是空的。因此，我们真正执行的 FOR 循环是:

for %i in (*) do set LIST= %i

这个循环继续将 LIST 设成找到的最后一个文件。

延迟环境变量扩充允许您使用一个不同的字符(惊叹号)在执行
时间扩充环境变量。如果延迟的变量扩充被启用，可以将上面
例子写成以下所示，以达到预期效果:

set VAR=before
if "%VAR%" == "before" (
set VAR=after
if "!VAR!" == "after" @echo If you see this, it worked
)

set LIST=
for %i in (*.txt) do set LIST=!LIST! %i
echo %LIST%
......

帮你顶一下

13楼的兄弟 解释的好清楚.我一直都是这么用,但却说不清楚这到底是什么意思呢!

得到斑竹的鼓励 真是一件令人兴奋的事.!