IT你好

加入 |登录

IT你好技术论坛广场IT档案袋 › 查看主题

41

查看

0

回复
返回列表

Administrator

Administrator

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

帖子
297 
精华
积分
1400 
UID
1467 
go

[批处理实例]一个用批处理做的小计算器

1
发表于 2012-1-21 12:06 | 只看该作者 | 倒序看帖 | 打印

本文转载自批处理之家


一个用bat/批处理做的小计算器
---
  这是我自己用bat/批处理做的小计算器,将后附代码直接复制到记事本里保存为.bat格式就可以使用了。
  支持算式,比如输入:12+12/(7-5);但只支持整数计算,不支持小数。
  用处不是很大,技术含量也不是很高,但流程控制还是蛮好的。自认为逻辑和抽象思维还是很强的,也无耻地自恋一下~~
将下列代码复制到记事本,选择另存为,自己命名 后缀.bat 保存类型为所有文件

  1. @echo off
  2. cls
  3. :: System Parameter
  4. set xpProgName=DosCalculator
  5. set xpProgVer=1.0.0.1
  6. echo.
  7. title 欢迎使用Taoether编制的小计算器(DCal.bat) %xpProgName%_V%xpProgVer%
  8. color 1f
  9. rem mode con cols=80 lines=40
  10. echo 欢迎使用Taoether编制的小计算器(DCal.bat) %xpProgName%_V%xpProgVer%
  11. if /I {%1}=={} goto Main
  12. if /I "%1"=="C" goto Main
  13. if /I "%1"=="H" goto help
  14. if /I "%1"=="V" goto ver
  15. :Ver
  16. echo.
  17. rem 重要声明:
  18. rem 本程序由taoether编写,您可以任意传播,但请不要删除以下信息!
  19. rem 如用于商业用途,请与作者联系。
  20. echo Version:
  21. echo ------------------------------
  22. echo    Program: %xpProgName%
  23. echo    Author: Taoether
  24. echo    Version: %xpProgVer%
  25. echo    IssueTime: 09:01 2009-2-18
  26. echo    UpdateTime: 9:01 2009-6-5
  27. echo    Email: taoether@gmail.com
  28. echo    HomePage: www.yoyotao.net
  29. echo ------------------------------
  30. echo.
  31. echo Version Log:
  32. echo -----------------------------------------
  33. echo  Ver.   Date.     Log.
  34. echo -----------------------------------------
  35. echo V1000  20090218  New program issue.
  36. echo V1001  20090605  Add new function: Clear.
  37. echo ...
  38. echo -----------------------------------------
  39. if /I {%1}=={} goto Main
  40. if /I "%1"=="H" goto end
  41. if /I "%1"=="V" goto end
  42. :help
  43. echo.
  44. echo Help:
  45. echo -----------------------------------------
  46. echo 此程序为计算器,输入计算表达式后,返回计算结果。
  47. echo.
  48. echo DCal [M]
  49. echo.
  50. echo      [M]: 指定运行的模式
  51. echo         =空,进入计算模式
  52. echo         =C,清屏;
  53. echo         =H,显示帮助;
  54. echo         =V,显示版本;
  55. echo.
  56. echo 说明:
  57. echo.
  58. echo   1,在计算模式下:
  59. echo       直接输入算式,回车返回计算结果;
  60. echo       按E,退出程序;
  61. echo       按H,显示帮助;
  62. echo       按V,显示版本;
  63. echo.
  64. echo   2,该计算器可以实现简单的计算,以递减的优先权顺序支持下列操作:
  65. echo.
  66. echo     ()                  - 分组
  67. echo     * / %                - 算数运算符
  68. echo     + -                 - 算数运算符
  69. echo     ^<^< ^>^>               - 逻辑移位
  70. echo                         - 按位“与”
  71. echo     ^^                   - 按位“异”
  72. echo     ^|                   - 按位“或”
  73. echo     = *= /= %= += -=     - 赋值
  74. echo     ^&= ^= ^|= ^<^<= ^>^>=     -二进制运算赋值
  75. echo     ,                   - 表达式分隔符
  76. echo.
  77. echo     如果您使用任何逻辑或取余操作符, 您需要将表达式字符串用引号扩起来。
  78. echo     在表达式中的任何非数字字符串键作为环境变量名称,这些环境变量名称的值已在使用前转换成数字。
  79. echo     如果指定了一个环境变量名称,但未在当前环境中定义,那么值将被定为零。
  80. echo     这使您可以使用环境变量值做计算而不用键入那些 % 符号来得到它们的值。
  81. echo     如果 SET /A 在命令脚本外的命令行执行的,那么它显示该表达式的最后值。
  82. echo     该分配的操作符在分配的操作符左边需要一个环境变量名称。
  83. echo     除十六进制有 0x 前缀, 八进制有 0 前缀的,数字值为十进位数字。
  84. echo     因此, 0x12 与 18 和 022 相同。
  85. echo     请注意八进制公式可能很容易搞混: 08 和 09 是无效的数字,因为 8 和 9 不是有效的八进制位数。
  86. echo -----------------------------------------
  87. if /I {%1}=={} goto Main
  88. if /I "%1"=="H" goto end
  89. if /I "%1"=="V" goto end
  90. :Main
  91. echo.
  92. echo 进入计算模式: (显示帮助:请按H;显示版本:请按V;清屏:请按C;退出:请按E)
  93. echo.
  94. :Calc
  95. set /p input=请输入表达式:
  96. if /I "%input%"=="E" goto end
  97. if /I "%input%"=="H" goto help
  98. if /I "%input%"=="V" goto Ver
  99. if /I "%input%"=="C" goto Clear
  100. set /a result=%input%
  101. echo 计算结果为:%input%=%result%
  102. echo.
  103. goto Calc
  104. :Clear
  105. cls
  106. if /I {%1}=={} goto Main
  107. if /I "%1"=="H" goto end
  108. if /I "%1"=="V" goto end
  109. :end
  110. echo.
  111. echo 祝您工作顺利,心情愉快!
  112. echo.
复制代码
谁都不知道今天过去明天会如何,你现在要做的就是善待眼下的这一分钟、这一小时、这一天。

TOP

IT你好技术论坛

GMT+8, 2026-1-13 07:22, Processed in 0.014797 second(s), 13 queries.

Powered by Discuz! X1

© 2001-2010 Comsenz Inc.