[ 新手练习 5 ] 批处理随机显示星期几

wxcute

一周有七天
周一　周二　周三　周四　周五　周六　周日

利用随机数随机显示一天，开始可以用阿拉伯数字，但最终显示时要用汉字 ^_^

答对题均加分，以第一个分高。

参考：[ 一日一教学 ] 随机数的应用
http://bbs.bathome.net/thread-2563-1-1.html

上一题：[ 新手习题 4 ] 循环十秒倒计时
http://bbs.bathome.net/thread-2494-1-1.html
下一题：[ 新手习题 6 ] 添加汉字行号
http://bbs.bathome.net/thread-2569-1-1.html

所发代码若不止一行，请用code标签把代码部分括起来。

Q: 如何用code把代码扩起来？
A: http://bbs.bathome.net/thread-404-1-1.html

akiraakito

@echo off
set /a day=%random% %% 7
if %day%==0 echo 星期日
if %day%==1 echo 星期一
if %day%==2 echo 星期二
if %day%==3 echo 星期三
if %day%==4 echo 星期四
if %day%==5 echo 星期五
if %day%==6 echo 星期六
pause>nul
复制代码

应该是最好懂的代码了...

随风

确实是最好懂的，但也是最。。。。。

BBCC

@echo off
set "code=周一 周二 周三 周四 周五 周六 周日"
:main
set /a strRan=%random%%%7+1
for /f "tokens=%strRan% delims=, " %%a in ("%code%") do (echo %%a)
pause>nul
goto :main
复制代码

BBCC

一开始被LZ的中文空格搞晕了...

wxcute

回 5 楼：习惯用全角空格来对齐 ^_^

大家试试不用 for

随风

确实，不用for显得更直接，新手都来试试。。

hlzj88

::按一下变一个
@echo off
set /a n=%random% %% 7+1
if %n%==1 echo 今天周一
if %n%==2 echo 今天周二
if %n%==3 echo 今天周三
if %n%==4 echo 今天周四
if %n%==5 echo 今天周五
if %n%==6 echo 今天周六，休息，看望家人
if %n%==7 echo 今天周日，明天上班，抓紧休息
pause>nul
%0
复制代码

更喜欢BBCC的代码，差一大截啊

[ 本帖最后由 hlzj88 于 2008-11-16 22:28 编辑 ]

随风

你这个和2楼的有区别吗？
给大家个提示，充分利用变量的截取。

hlzj88

@echo off
set var=周一周二周三周四周五周六周日
set /a n=%random% %% 7+1
if %n% lss 2 echo %var:~0,2%
if %n%==2 echo %var:~2,2%
if %n%==3 echo %var:~4,2%
if %n%==4 echo %var:~6,2%
if %n%==5 echo %var:~8,2%
if %n%==6 echo %var:~-4,2%
if %n% gtr 6 echo %var:~-2,2%
pause>nul
%0
复制代码

想高一点，高不了啊，算是对上面8楼的修改吧

[ 本帖最后由 hlzj88 于 2008-11-16 23:38 编辑 ]

wxcute

多谢　随风　兄帮忙照看帖子。

大家不用拼命想，偶尔想到了再来回答也行。

nomyself

@echo off
set /a n=%random% %% 7
if %n%==0 echo 今天是星期一
if %n%==1  echo 今天是星期二
if %n%==2 echo 今天是星期三
if %n%==3 echo 今天是星期四
if %n%==4 echo 今天是星期五
if %n%==5 echo 今天是星期六
if %n%==6 echo 今天是星期天
ping -n 2 127.1>nul>nul
%0
复制代码

BBCC

@echo off&setlocal enabledelayedexpansion
:main
set "code=周一周二周三周四周五周六周日"&set /a strRan=%random%%%12+1&set /a strRan2=!strRan!%%2
if "!strRan2!" equ "0" (set strPrint=!code:~-%strRan%,2!&echo. !strPrint!&pause&goto :main ) else (goto :main)
复制代码

貌似不显示周一？

wxcute

%random%%%12+1
用
%random%%%14
就好了。

一周可是有 7 天阿，12 / 2 怎么也只有 6 天阿！

还可再简化。

lhjoanna

呵，wxcute兄指的是这个吧？

@echo off
set "str=一二三四五六日"
set /a num=%random%%%7
call echo 星期%%str:~%num%,1%%
pause>nul
复制代码