@echo off
cls
:: System Parameter
set xpProgName=DosCalculator
set xpProgVer=1.0.0.1
echo.
title 歡迎使用Taoether編制的小計(jì)算器(DCal.bat) %xpProgName%_V%xpProgVer%
color 1f
rem mode con cols=80 lines=40
echo 歡迎使用Taoether編制的小計(jì)算器(DCal.bat) %xpProgName%_V%xpProgVer%
if /I {%1}=={} goto Main
if /I "%1"=="C" goto Main
if /I "%1"=="H" goto help
if /I "%1"=="V" goto ver
:Ver
echo.
rem 重要聲明：
rem 本程序由陶永利編寫，您可以任意傳播，但請(qǐng)不要?jiǎng)h除以下信息!
rem 如用于商業(yè)用途，請(qǐng)與作者聯(lián)系。
echo Version:
echo ------------------------------
echo Program: %xpProgName%
echo Author: Taoether
echo Version: %xpProgVer%
echo IssueTime: 09:01 2009-2-18
echo UpdateTime: 9:01 2009-6-5
echo Email: taoether@gmail.com
echo HomePage: www.taoyoyo.net
echo ------------------------------
echo.
echo Version Log:
echo -----------------------------------------
echo Ver. Date. Log.
echo -----------------------------------------
echo V1000 20090218 New program issue.
echo V1001 20090605 Add new function: Clear.
echo ...
echo -----------------------------------------
if /I {%1}=={} goto Main
if /I "%1"=="H" goto end
if /I "%1"=="V" goto end
:help
echo.
echo Help:
echo -----------------------------------------
echo 此程序?yàn)橛?jì)算器，輸入計(jì)算表達(dá)式后，返回計(jì)算結(jié)果。
echo.
echo DCal [M]
echo.
echo [M]: 指定運(yùn)行的模式
echo =空，進(jìn)入計(jì)算模式
echo =C，清屏；
echo =H，顯示幫助；
echo =V，顯示版本；
echo.
echo 說明:
echo.
echo 1,在計(jì)算模式下：
echo 直接輸入算式，回車返回計(jì)算結(jié)果；
echo 按E，退出程序；
echo 按H，顯示幫助；
echo 按V，顯示版本；
echo.
echo 2,該計(jì)算器可以實(shí)現(xiàn)簡(jiǎn)單的計(jì)算，以遞減的優(yōu)先權(quán)順序支持下列操作:
echo.
echo () - 分組
echo * / % - 算數(shù)運(yùn)算符
echo + - - 算數(shù)運(yùn)算符
echo ^^ ^>^> - 邏輯移位
echo - 按位“與”
echo ^^ - 按位“異”
echo ^| - 按位“或”
echo = *= /= %= += -= - 賦值
echo ^= ^= ^|= ^^= ^>^>= -二進(jìn)制運(yùn)算賦值
echo , - 表達(dá)式分隔符
echo.
echo 如果您使用任何邏輯或取余操作符， 您需要將表達(dá)式字符串用引號(hào)擴(kuò)起來。
echo 在表達(dá)式中的任何非數(shù)字字符串鍵作為環(huán)境變量名稱，這些環(huán)境變量名稱的值已在使用前轉(zhuǎn)換成數(shù)字。
echo 如果指定了一個(gè)環(huán)境變量名稱，但未在當(dāng)前環(huán)境中定義，那么值將被定為零。
echo 這使您可以使用環(huán)境變量值做計(jì)算而不用鍵入那些 % 符號(hào)來得到它們的值。
echo 如果 SET /A 在命令腳本外的命令行執(zhí)行的，那么它顯示該表達(dá)式的最后值。
echo 該分配的操作符在分配的操作符左邊需要一個(gè)環(huán)境變量名稱。
echo 除十六進(jìn)制有 0x 前綴， 八進(jìn)制有 0 前綴的，數(shù)字值為十進(jìn)位數(shù)字。
echo 因此， 0x12 與 18 和 022 相同。
echo 請(qǐng)注意八進(jìn)制公式可能很容易搞混: 08 和 09 是無(wú)效的數(shù)字，因?yàn)?8 和 9 不是有效的八進(jìn)制位數(shù)。
echo -----------------------------------------
if /I {%1}=={} goto Main
if /I "%1"=="H" goto end
if /I "%1"=="V" goto end
:Main
echo.
echo 進(jìn)入計(jì)算模式: (顯示幫助:請(qǐng)按H；顯示版本:請(qǐng)按V；清屏:請(qǐng)按C；退出:請(qǐng)按E)
echo.
:Calc
set /p input=請(qǐng)輸入表達(dá)式：
if /I "%input%"=="E" goto end
if /I "%input%"=="H" goto help
if /I "%input%"=="V" goto Ver
if /I "%input%"=="C" goto Clear
set /a result=%input%
echo 計(jì)算結(jié)果為：%input%=%result%
echo.
goto Calc
:Clear
cls
if /I {%1}=={} goto Main
if /I "%1"=="H" goto end
if /I "%1"=="V" goto end
:end
echo.
echo 祝您工作順利，心情愉快!
echo.

@echo off
:Calc
set /p input=請(qǐng)輸入表達(dá)式：
set /a result=%input%
echo 計(jì)算結(jié)果為：%input%=%result%
goto Calc

@echo off
:xixi
set /a a=NULL
cls
set x=
set /p x=運(yùn)算式:
set /a a=%x%>>nul
echo 結(jié)果是：%a%
ping -n 5 127.1>nul
goto xixi