[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[特效代码] [分享]自己写的一个批处理石头剪刀布猜拳小游戏如有不足请指出

本帖最后由 pcl_test 于 2016-11-17 05:25 编辑
  1. @echo off
  2. set /a vat=0
  3. :top
  4. color 1a
  5. mode con:cols=50 lines=30
  6. title 剪刀、包袱、锤游戏
  7. echo                  剪刀、包袱、锤游戏
  8. echo.
  9. echo.
  10. echo.
  11. echo.            0代表剪刀、1代表包袱、2代表锤
  12. echo.
  13. echo.
  14. echo.
  15. set /a diannao=%random%%%3
  16. set /p var=请输入并按回车确认:
  17. if "%var%"=="0" goto :a
  18. if "%var%"=="1" goto :b
  19. if "%var%"=="2" goto :C
  20. echo    你输入有误,请重新输入!&ping /n 2 127.1>nul&goto :top
  21. :a
  22. set /a vat+=1
  23. if %diannao%==0 echo.   你剪刀,电脑剪刀,本局和平&goto :e
  24. if %diannao%==1 echo.   你剪刀,电脑包袱,本局你赢&goto :e
  25. if %diannao%==2 echo.   你剪刀,电脑锤,  本局你输&goto :e
  26. :b
  27. set /a vat+=1
  28. if %diannao%==0 echo.   你包袱,电脑剪刀,本局你输&goto :e
  29. if %diannao%==1 echo.   你包袱,电脑包袱,本局和平&goto :e
  30. if %diannao%==2 echo.   你包袱,电脑锤,  本局你赢&goto :e
  31. :c
  32. set /a vat+=1
  33. if %diannao%==0 echo.   你锤, 电脑剪刀,本局你赢&goto :e
  34. if %diannao%==1 echo.   你锤, 电脑包袱,本局你输&goto :e
  35. if %diannao%==2 echo.   你锤, 电脑锤,  本局和平&goto :e
  36. :e
  37. echo.
  38. echo.
  39. echo.   一共对比了%vat%次!&ping /n 3 127.1>nul&goto :top
复制代码
[ 本帖最后由 rogue_1983 于 2010-8-7 15:18 编辑 ]

特别感谢bat-Mfk

在这里特别感谢帮助过我的几个高手,我写这个小游戏费了不少精力,如果没有bat-Mfk以及几个高手的的支持,我的代码会存在缺陷.也许还有很多缺陷,往高手们继续关注并指正.万分感谢!是bathome.net和论坛的高手们让我不断得到了提高,再次鸣谢!

[ 本帖最后由 rogue_1983 于 2010-8-7 15:23 编辑 ]

TOP

返回列表