以下是小尾寒羊预产期计算.bat的全部代码大家复制就好了
由于计算预产期有些烦恼
所以决定编写一份自动计算的批处理
让大家告别手算烦恼
希望能带来一点帮助
如果你喜欢就请你大喊一声楼主我爱你！！
@echo off
color a
mode con: cols=80 lines=25
title 小YY-小尾寒羊预产期计算
setlocal enabledelayedexpansion
:again
set dayde=
set dayde0=
set dayde1=
set yearde=
set remainder=
set dayno=
set yearno=
set dayno0=
set dayno1=
set dayoc=
set yearoc=
set dayoc0=
set dayoc1=
set daytwo0=
set daytwo1=
set daytwo=
set yeartwo=
set day=
set day0=
set day1=
set yea=
set cmonth=
set month=
set yearth=
set dayth=
set dayth0=
set dayth1=
set yearap=
set dayap=
set dayap0=
set dayap1=
set yearma=
set dayma=
set dayma0=
set dayma1=
set yearju=
set dayju=
set dayju0=
set dayju1=
set yearjul=
set dayjul=
set dayjul0=
set dayjul1=
set yearau=
set dayau=
set dayau0=
set dayau1=
set yearse=
set dayse=
set dayse0=
set dayse1=
set choices=
set d=
echo ------------------------批处理编写人CC可以X的YY---------------------------
echo.
echo.
echo ----------1根据发情日期计算预产期----------------------
echo ----------2退出批处理程序------------------------------
echo.
echo.
echo.
echo.
set /p choices=请输入要执行的操作并按回车键:
if "%choices%" equ "1" (goto start)
if not "%choices%" equ "1" (exit)
:start
cls
echo --------------------输入发情时间-------------------------
echo.
echo 若要计算xxxx年的1月1日请不要输入成xxxx-01-01否则系统将会当做8进制数来计算
echo.
set /p d=请输入母羊的发情日期后按回车(格式xxxx-xx-xx例如:2012-12-12):
for /f "usebackq tokens=1,2,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yea=%%i
set /a year0=%%i%%4
set /a month=%%j
set /a day=%%k
)
for /l %%x in (1,1,9) do (if "%%x" equ "!month!" (goto start1))
if "!month!" gtr "12" goto again
:start1
if "!year0!" equ "0" (goto lyear) else (goto cyear)
:lyear
if "!month!" EQU "1" (goto one)
if "!month!" EQU "2" (goto two)
if "!month!" EQU "3" (goto three)
if "!month!" equ "4" (goto april)
if "!month!" equ "5" (goto may)
if "!month!" equ "7" (goto jun)
if "!month!" equ "8" (goto august)
if "!month!" equ "9" (goto september)
if "!month!" equ "10" (goto october)
if "!month!" equ "11" (goto nov)
if "!month!" equ "12" (goto december)
:one
if "!day!" EQU "1" (echo 您的羊将在!yea!-05-26至!yea!-05-31日之间分娩
)
if "!day!" EQU "2" (goto lone2)
)
if "!day!" EQU "3" (goto lone3
)
if "!day!" EQU "4" (
echo 您的羊将在!yea!-05-29至!yea!-06-03日之间分娩
)
if "!day!" EQU "5" (
echo 您的羊将在!yea!-05-30至!yea!-06-04日之间分娩
)
if "!day!" EQU "6" (
echo 您的羊将在!yea!-05-31至!yea!-06-05日之间分娩
)
if "!day!" EQU "7" (
echo 您的羊将在!yea!-06-01至!yea!-06-06日之间分娩
)
set /a day0=!day!-6
set /a day1=!day!-1
if "!day!" equ "8" (echo 您的羊将在!yea!-06-02至!yea!-06-07日之间分娩)
if "!day!" equ "9" (echo 您的羊将在!yea!-06-03至!yea!-06-08日之间分娩)
if "!day!" equ "10" (echo 您的羊将在!yea!-06-04至!yea!-06-09日之间分娩)
if "!day!" gtr "10" (if "!day!" leq "31" (echo 您的羊将在!yea!-06-!day0!至!yea!-06-!day1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:two
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yeartwo=%%i
set /a daytwo=%%j
)
if "!daytwo!" EQU "1" (
echo 您的羊将在!yeartwo!-06.26至!yeartwo!-07-01日之间分娩)
if "!daytwo!" equ "2" (
goto ltwo2)
if "!daytwo!" equ "3" (
goto ltwo3)
if "!daytwo!" equ "4" (
echo 您的羊将在!yeartwo!-06.29至!yeartwo!-07.04日之间分娩)
if "!daytwo!" equ "5" (
echo 您的羊将在!yeartwo!-06.30至!yeartwo!-07.05日之间分娩)
if "!daytwo!" equ "6" (echo 您的羊将在!yeartwo!-07.01至!yeartwo!-07.06日之间分娩)
if "!daytwo!" equ "7" (echo 您的羊将在!yeartwo!-07.02至!yeartwo!-07.07日之间分娩)
if "!daytwo!" equ "8" (echo 您的羊将在!yeartwo!-07.03至!yeartwo!-07.08日之间分娩)
if "!daytwo!" equ "9" (echo 您的羊将在!yeartwo!-07.04至!yeartwo!-07.09日之间分娩)
set /a daytwo0=!daytwo!-5
set /a daytwo1=!daytwo!
if "!daytwo!" geq "10" (if "!daytwo!" leq "29" (echo 您的羊将在!yeartwo!-07.!daytwo0!至!yeartwo!-07.!daytwo1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:three
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearth=%%i
set /a dayth=%%j
)
if "!dayth!" equ "1" (echo 您的羊将在!yearth!-7.25至!yearth!-7.30日之间分娩)
if "!dayth!" equ "2" (goto lthree2)
if "!dayth!" equ "3" (goto lthree3)
if "!dayth!" equ "4" (echo 您的羊将在!yearth!-7.28至!yearth!-8.2日之间分娩)
if "!dayth!" equ "5" (echo 您的羊将在!yearth!-7.29至!yearth!-8.3日之间分娩)
if "!dayth!" equ "6" (echo 您的羊将在!yearth!-7.30至!yearth!-8.4日之间分娩)
if "!dayth!" equ "7" (echo 您的羊将在!yearth!-7.31至!yearth!-8.5日之间分娩)
if "!dayth!" equ "8" (echo 您的羊将在!yearth!-8.1至!yearth!-8.6日之间分娩)
if "!dayth!" equ "9" (echo 您的羊将在!yearth!-8.2至!yearth!-8.7日之间分娩)
set /a dayth0=!dayth!-7
set /a dayth1=!dayth!-2
if "!dayth!" geq "10" (if "!dayth!" leq "31" (echo 您的羊将在!yearth!-08.!dayth0!至!yearth!-08.!dayth1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:april
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearap=%%i
set /a dayap=%%j
)
if "!dayap!" equ "1" (echo 您的羊将在!yearap!-8.25至!yearap!-8.30日之间分娩)
if "!dayap!" equ "2" (goto lapril2)
if "!dayap!" equ "3" (goto lapril3)
if "!dayap!" equ "4" (echo 您的羊将在!yearap!-8.28至!yearap!-9.2日之间分娩)
if "!dayap!" equ "5" (echo 您的羊将在!yearap!-8.29至!yearap!-9.3日之间分娩)
if "!dayap!" equ "6" (echo 您的羊将在!yearap!-8.30至!yearap!-9.4日之间分娩)
if "!dayap!" equ "7" (echo 您的羊将在!yearap!-8.31至!yearap!-9.5日之间分娩)
if "!dayap!" equ "8" (echo 您的羊将在!yearap!-9.1至!yearap!-9.6日之间分娩)
if "!dayap!" equ "9" (echo 您的羊将在!yearap!-9.2至!yearap!-9.7日之间分娩)
set /a dayap0=!dayap!-7
set /a dayap1=!dayap!-2
if "!dayap!" geq "10" (if "!dayap!" leq "30" (echo 您的羊将在!yearap!-9.!dayap0!至!yearap!-9.!dayap1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:may
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearma=%%i
set /a dayma=%%j
)
if "!dayma!" equ "1" (echo 您的羊将在!yearma!-9.24至!yearma!-9.29日之间分娩)
if "!dayma!" equ "2" (goto lmay2)
if "!dayma!" equ "3" (goto lmay3)
if "!dayma!" equ "4" (echo 您的羊将在!yearma!-9.27至!yearma!-10.2日之间分娩)
if "!dayma!" equ "5" (echo 您的羊将在!yearma!-9.28至!yearma!-10.3日之间分娩)
if "!dayma!" equ "6" (echo 您的羊将在!yearma!-9.29至!yearma!-10.4日之间分娩)
if "!dayma!" equ "7" (echo 您的羊将在!yearma!-9.30至!yearma!-10.5日之间分娩)
if "!dayma!" equ "8" (echo 您的羊将在!yearma!-10.1至!yearma!-10.6日之间分娩)
if "!dayma!" equ "9" (echo 您的羊将在!yearma!-10.2至!yearma!-10.7日之间分娩)
set /a dayma0=!dayma!-7
set /a dayma1=!dayma!-2
if "!dayma!" geq "10" (if "!dayma!" leq "31" (echo 您的羊将在!yearma!-10.!dayma0!至!yearma!-10.!dayma1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:jun
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearju=%%i
set /a dayju=%%j)
if "!dayju!" equ "1" (echo 您的羊将在!yearju!-10.25至!yearju!-10.30日之间分娩)
if "!dayju!" equ "2" (goto ljun2)
if "!dayju!" equ "3" (goto ljun3)
if "!dayju!" equ "4" (echo 您的羊将在!yearju!-10.28至!yearju!-11.2日之间分娩)
if "!dayju!" equ "5" (echo 您的羊将在!yearju!-10.29至!yearju!-11.3日之间分娩)
if "!dayju!" equ "6" (echo 您的羊将在!yearju!-10.30至!yearju!-11.4日之间分娩)
if "!dayju!" equ "7" (echo 您的羊将在!yearju!-10.31至!yearju!-11.5日之间分娩)
if "!dayju!" equ "8" (echo 您的羊将在!yearju!-11.1至!yearju!-11.6日之间分娩)
if "!dayju!" equ "9" (echo 您的羊将在!yearju!-11.2至!yearju!-11.7日之间分娩)
set /a dayju0=!dayju!-7
set /a dayju1=!dayju!-2
if "!dayju!" geq "10" (if "!dayju!" leq "30" (echo 您的羊将在!yearju!-11.!dayju0!至!yearju!-11.!dayju1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:july
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearjul=%%i
set /a dayjul=%%j)
if "!dayjul!" equ "1" (echo 您的羊将在!yearjul!-11.25至!yearjul!-11.30日之间分娩)
if "!dayjul!" equ "2" (goto ljuly2)
if "!dayjul!" equ "3" (goto ljuly3)
if "!dayjul!" equ "4" (echo 您的羊将在!yearjul!-11.28至!yearjul!-12.2日之间分娩)
if "!dayjul!" equ "5" (echo 您的羊将在!yearjul!-11.29至!yearjul!-12.3日之间分娩)
if "!dayjul!" equ "6" (echo 您的羊将在!yearjul!-11.30至!yearjul!-12.4日之间分娩)
if "!dayjul!" equ "7" (echo 您的羊将在!yearjul!-11.31至!yearjul!-12.5日之间分娩)
if "!dayjul!" equ "8" (echo 您的羊将在!yearjul!-12.1至!yearjul!-12.6日之间分娩)
if "!dayjul!" equ "9" (echo 您的羊将在!yearjul!-12.2至!yearjul!-12.7日之间分娩)
set /a dayjul0=!dayjul!-7
set /a dayjul1=!dayjul!-2
if "!dayjul!" geq "10" (if "!dayjul!" leq "31" (echo 您的羊将在!yearjul!-12.!dayjul0!至!yearjul!-12.!dayjul1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:august
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearau=%%i
set /a dayau=%%j)
if "!dayau!" equ "1" (echo 您的羊将在!yearau!-12.25至!yearau!-12.30日之间分娩)
if "!dayau!" equ "2" (goto laugust2)
set /a nextyear=yearau+1
if "!dayau!" equ "3" (goto laugust3)
if "!dayau!" equ "4" (echo 您的羊将在!yearau!-12.28至!nextyear!-1.2日之间分娩)
if "!dayau!" equ "5" (echo 您的羊将在!yearau!-12.29至!nextyear!-1.3日之间分娩)
if "!dayau!" equ "6" (echo 您的羊将在!yearau!-12.30至!nextyear!-1.4日之间分娩)
if "!dayau!" equ "7" (echo 您的羊将在!yearau!-12.31至!nextyear!-1.5日之间分娩)
if "!dayau!" equ "8" (echo 您的羊将在!nextyear!-1.1至!nextyear!-1.6日之间分娩)
if "!dayau!" equ "9" (echo 您的羊将在!nextyear!-1.2至!nextyear!-1.7日之间分娩)
set /a dayau0=!dayau!-7
set /a dayau1=!dayau!-2
if "!dayau!" gtr "10" (if "!dayau!" leq "31" (echo 您的羊将在!nextyear!-1.!dayau0!至!nextyear!-1.!dayau1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:september
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearse=%%i+1
set /a dayse=%%j)
if "!dayse!" equ "1" (echo 您的羊将在!yearse!-1.25至!yearse!-1.30日之间分娩)
if "!dayse!" equ "2" (goto lseptember2)
if "!dayse!" equ "3" (goto lseptember3)
if "!dayse!" equ "4" (echo 您的羊将在!yearse!-1.28至!yearse!-2.2日之间分娩)
if "!dayse!" equ "5" (echo 您的羊将在!yearse!-1.29至!yearse!-2.3日之间分娩)
if "!dayse!" equ "6" (echo 您的羊将在!yearse!-1.30至!yearse!-2.4日之间分娩)
if "!dayse!" equ "7" (echo 您的羊将在!yearse!-1.31至!yearse!-2.5日之间分娩)
if "!dayse!" equ "8" (echo 您的羊将在!yearse!-2.1至!yearse!-2.6日之间分娩)
if "!dayse!" equ "9" (echo 您的羊将在!yearse!-2.2至!yearse!-2.7日之间分娩)
set /a dayse0=dayse-7
set /a dayse1=dayse-2
if "!dayse!" geq "10" (if "!dayse!" leq "30" (echo 您的羊将在!yearse!-2.!dayse0!至!yearse!-2.!dayse1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:october
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearoc=%%i+1
set /a dayoc=%%j)
if "!dayoc!" equ "1" (echo 您的羊将在!yearoc!-2.24至!yearoc!-3.1日之间分娩)
if "!dayoc!" equ "2" (goto loctober2)
if "!dayoc!" equ "3" (goto loctober3)
if "!dayoc!" equ "4" (echo 您的羊将在!yearoc!-2.27至!yearoc!-3.4日之间分娩)
if "!dayoc!" equ "5" (echo 您的羊将在!yearoc!-2.28至!yearoc!-3.5日之间分娩)
if "!dayoc!" equ "6" (echo 您的羊将在!yearoc!-3.1至!yearoc!-3.6日之间分娩)
if "!dayoc!" equ "7" (echo 您的羊将在!yearoc!-3.2至!yearoc!-3.7日之间分娩)
if "!dayoc!" equ "8" (echo 您的羊将在!yearoc!-3.3至!yearoc!-3.8日之间分娩)
if "!dayoc!" equ "9" (echo 您的羊将在!yearoc!-3.4至!yearoc!-3.9日之间分娩)
set /a dayoc0=!dayoc!-5
set /a dayoc1=!dayoc!
if "!dayoc!" geq "10" (if "!dayoc!" leq "31" (echo 您的羊将在!yearoc!-3.!dayoc0!至!yearoc!-3.!dayoc1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:nov
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearno=%%i+1
set /a dayno=%%j)
if "!dayno!" equ "1" (echo 您的羊将在!yearno!-3.27至!yearno!-4.1日之间分娩)
if "!dayno!" equ "2" (goto lnov2)
if "!dayno!" equ "3" (goto lnov3)
if "!dayno!" equ "4" (echo 您的羊将在!yearno!-3.30至!yearno!-4.4日之间分娩)
if "!dayno!" equ "5" (echo 您的羊将在!yearno!-3.31至!yearno!-4.5日之间分娩)
if "!dayno!" equ "6" (echo 您的羊将在!yearno!-4.1至!yearno!-4.6日之间分娩)
if "!dayno!" equ "7" (echo 您的羊将在!yearno!-4.2至!yearno!-4.7日之间分娩)
if "!dayno!" equ "8" (echo 您的羊将在!yearno!-4.3至!yearno!-4.8日之间分娩)
if "!dayno!" equ "9" (echo 您的羊将在!yearno!-4.4至!yearno!-4.9日之间分娩)
set /a dayno0=!dayno!-5
set /a dayno1=!dayno!
if "!dayno!" geq "10" (if "!dayno!" leq "30" (echo 您的羊将在!yearno!-4.!dayno0!至!yearno!-4.!dayno1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:december
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearde=%%i+1
set /a dayde=%%j)
if "!dayde!" equ "1" (echo 您的羊将在!yearde!-4.26至!yearde!-5.1日之间分娩)
if "!dayde!" equ "2" (goto ldecember2)
if "!dayde!" equ "3" (goto ldecember3)
if "!dayde!" equ "4" (echo 您的羊将在!yearde!-4.29至!yearde!-5.4日之间分娩)
if "!dayde!" equ "5" (echo 您的羊将在!yearde!-4.30至!yearde!-5.5日之间分娩)
if "!dayde!" equ "6" (echo 您的羊将在!yearde!-5.1至!yearde!-5.6日之间分娩)
if "!dayde!" equ "7" (echo 您的羊将在!yearde!-5.2至!yearde!-5.7日之间分娩)
if "!dayde!" equ "8" (echo 您的羊将在!yearde!-5.3至!yearde!-5.8日之间分娩)
if "!dayde!" equ "9" (echo 您的羊将在!yearde!-5.4至!yearde!-5.9日之间分娩)
set /a dayde0=!dayde!-5
set /a dayde1=!dayde!
if "!dayde!" geq "10" (if "!dayde!" leq "31" (echo 您的羊将在!yearde!-5.!dayde0!至!yearde!-5.!dayde1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:cyear
set yea=
set cmonth=
set day=
for /f "usebackq tokens=1,2,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yea=%%i
set /a cmonth=%%j
set /a day=%%k
)
if "!cmonth!" equ "1" (goto january)
if "!cmonth!" equ "2" (goto february)
if "!cmonth!" equ "3" (goto three)
if "!cmonth!" equ "4" (goto april)
if "!cmonth!" equ "5" (goto may)
if "!cmonth!" equ "7" (goto jun)
if "!cmonth!" equ "8" (goto august)
if "!cmonth!" equ "9" (goto september)
if "!cmonth!" equ "10" (goto ten)
if "!cmonth!" equ "11" (goto eleven)
if "!cmonth!" equ "12" (goto twelve)
:january
if "!day!" EQU "1" (echo 您的羊将在!yea!-05-27至!yea!-06-01日之间分娩
)
if "!day!" EQU "2" (goto cjanuary2
)
if "!day!" EQU "3" (goto cjanuary3
)
if "!day!" EQU "4" (echo 您的羊将在!yea!-05-30至!yea!-06-04日之间分娩
)
if "!day!" EQU "5" (echo 您的羊将在!yea!-05-31至!yea!-06-05日之间分娩
)
if "!day!" EQU "6" (echo 您的羊将在!yea!-06-01至!yea!-06-06日之间分娩
)
if "!day!" EQU "7" (echo 您的羊将在!yea!-06-02至!yea!-06-07日之间分娩
)
set /a day0=!day!-5
set /a day1=!day!
if "!day!" equ "8" (echo 您的羊将在!yea!-06-03至!yea!-06-08日之间分娩)
if "!day!" equ "9" (echo 您的羊将在!yea!-06-04至!yea!-06-09日之间分娩)
if "!day!" gtr "10" (if "!day!" leq "31" (echo 您的羊将在!yea!-06-!day0!至!yea!-06-!day1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:february
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yeartwo=%%i
set /a daytwo=%%j
)
if "!daytwo!" EQU "1" (
echo 您的羊将在!yeartwo!-06.27至!yeartwo!-07.02日之间分娩)
if "!daytwo!" equ "2" (goto cfebruary2
)
if "!daytwo!" equ "3" (goto cfebruary3
)
if "!daytwo!" equ "4" (echo 您的羊将在!yeartwo!-06.30至!yeartwo!-07.05日之间分娩
)
if "!daytwo!" equ "5" (echo 您的羊将在!yeartwo!-07.01至!yeartwo!-07.06日之间分娩
)
if "!daytwo!" equ "6" (echo 您的羊将在!yeartwo!-07.02至!yeartwo!-07.07日之间分娩)
if "!daytwo!" equ "7" (echo 您的羊将在!yeartwo!-07.03至!yeartwo!-07.08日之间分娩)
if "!daytwo!" equ "8" (echo 您的羊将在!yeartwo!-07.04至!yeartwo!-07.09日之间分娩)
if "!daytwo!" equ "9" (echo 您的羊将在!yeartwo!-07.05至!yeartwo!-07.10日之间分娩)
set /a daytwo0=!daytwo!-4
set /a daytwo1=!daytwo!+1
if "!daytwo!" geq "10" (if "!daytwo!" leq "28" (echo 您的羊将在!yeartwo!-07.!daytwo0!至!yeartwo!-07.!daytwo1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:ten
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearoc=%%i+1
set /a dayoc=%%j
set /a remainder=!yearoc!%%4)
if "!remainder!" neq "0" (goto october) else (goto cten)
:cten
if "!dayoc!" equ "1" (echo 您的羊将在!yearoc!-2.24至!yearoc!-2.29日之间分娩)
if "!dayoc!" equ "2" (goto ccten2)
if "!dayoc!" equ "3" (goto ccten3)
if "!dayoc!" equ "4" (echo 您的羊将在!yearoc!-2.27至!yearoc!-3.3日之间分娩)
if "!dayoc!" equ "5" (echo 您的羊将在!yearoc!-2.28至!yearoc!-3.4日之间分娩)
if "!dayoc!" equ "6" (echo 您的羊将在!yearoc!-2.29至!yearoc!-3.5日之间分娩)
if "!dayoc!" equ "7" (echo 您的羊将在!yearoc!-3.1至!yearoc!-3.6日之间分娩)
if "!dayoc!" equ "8" (echo 您的羊将在!yearoc!-3.2至!yearoc!-3.7日之间分娩)
if "!dayoc!" equ "9" (echo 您的羊将在!yearoc!-3.3至!yearoc!-3.8日之间分娩)
set /a dayoc0=!dayoc!-6
set /a dayoc1=!dayoc!-1
if "!dayoc!" geq "10" (if "!dayoc!" leq "31" (echo 您的羊将在!yearoc!-3.!dayoc0!至!yearoc!-3.!dayoc1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:eleven
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearno=%%i+1
set /a dayno=%%j
set /a remainder=!yearno!%%4)
if "!remainder!" neq "0" (goto nov) else (goto celeven)
:celeven
if "!dayno!" equ "1" (echo 您的羊将在!yearno!-3.26至!yearno!-3.31日之间分娩)
if "!dayno!" equ "2" (goto cceleven2)
if "!dayno!" equ "3" (goto cceleven3)
if "!dayno!" equ "4" (echo 您的羊将在!yearno!-3.29至!yearno!-4.3日之间分娩)
if "!dayno!" equ "5" (echo 您的羊将在!yearno!-3.30至!yearno!-4.4日之间分娩)
if "!dayno!" equ "6" (echo 您的羊将在!yearno!-3.31至!yearno!-4.5日之间分娩)
if "!dayno!" equ "7" (echo 您的羊将在!yearno!-4.1至!yearno!-4.6日之间分娩)
if "!dayno!" equ "8" (echo 您的羊将在!yearno!-4.2至!yearno!-4.7日之间分娩)
if "!dayno!" equ "9" (echo 您的羊将在!yearno!-4.3至!yearno!-4.8日之间分娩)
set /a dayno0=!dayno!-6
set /a dayno1=!dayno!-1
if "!dayno!" geq "10" (if "!dayno!" leq "30" (echo 您的羊将在!yearno!-4.!dayno0!至!yearno!-4.!dayno1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:twelve
for /f "usebackq tokens=1,3 delims=-" %%i in (`"echo !d!"`) do (
set /a yearde=%%i+1
set /a dayde=%%j
set /a remainder=!yearde!%%4
)
if "!remainder!" equ "0" (goto ctwelve) else (goto december)
:ctwelve
if "!dayde!" equ "1" (echo 您的羊将在!yearde!-4.25至!yearde!-4.30日之间分娩)
if "!dayde!" equ "2" (goto cctwelve2)
if "!dayde!" equ "3" (goto cctwelve3)
if "!dayde!" equ "4" (echo 您的羊将在!yearde!-4.28至!yearde!-5.3日之间分娩)
if "!dayde!" equ "5" (echo 您的羊将在!yearde!-4.29至!yearde!-5.4日之间分娩)
if "!dayde!" equ "6" (echo 您的羊将在!yearde!-4.30至!yearde!-5.5日之间分娩)
if "!dayde!" equ "7" (echo 您的羊将在!yearde!-5.1至!yearde!-5.6日之间分娩)
if "!dayde!" equ "8" (echo 您的羊将在!yearde!-5.2至!yearde!-5.7日之间分娩)
if "!dayde!" equ "9" (echo 您的羊将在!yearde!-5.3至!yearde!-5.8日之间分娩)
set /a dayde0=!dayde!-6
set /a dayde1=!dayde!-1
if "!dayde!" geq "10" (if "!dayde!" leq "31" (echo 您的羊将在!yearde!-5.!dayde0!至!yearde!-5.!dayde1!日之间分娩))
echo 按任意键返回主菜单
pause >nul
cls
goto again
:lone2
echo 您的羊将在!yea!-05-27至!yea!-06-01日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lone3
echo 您的羊将在!yea!-05-28至!yea!-06-02日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ltwo2
echo 您的羊将在!yeartwo!-06.27至!yeartwo!-07.02日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ltwo3
echo 您的羊将在!yeartwo!-06.28至!yeartwo!-07.03日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lthree2
echo 您的羊将在!yearth!-7.26至!yearth!-7.31日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lthree3
echo 您的羊将在!yearth!-7.27至!yearth!-8.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lapril2
echo 您的羊将在!yearap!-8.26至!yearap!-8.31日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lapril3
echo 您的羊将在!yearap!-8.27至!yearap!-9.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lmay2
echo 您的羊将在!yearma!-9.25至!yearma!-9.30日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lmay3
echo 您的羊将在!yearma!-9.26至!yearma!-10.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ljun2
echo 您的羊将在!yearju!-10.27至!yearju!-11.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ljun3
echo 您的羊将在!yearju!-10.28至!yearju!-11.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ljuly2
echo 您的羊将在!yearjul!-11.26至!yearjul!-11.31日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ljuly3
echo 您的羊将在!yearjul!-11.27至!yearjul!-12.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:laugust2
echo 您的羊将在!yearau!-12.26至!yearau!-12.31日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:laugust3
echo 您的羊将在!yearau!-12.27至!nextyear!-1.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lseptember2
echo 您的羊将在!yearse!-1.26至!yearse!-1.31日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lseptember3
echo 您的羊将在!yearse!-1.27至!yearse!-2.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:loctober2
echo 您的羊将在!yearoc!-2.25至!yearoc!-3.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:loctober3
echo 您的羊将在!yearoc!-2.26至!yearoc!-3.3日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lnov2
echo 您的羊将在!yearno!-3.28至!yearno!-4.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:lnov3
echo 您的羊将在!yearno!-3.29至!yearno!-4.3日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ldecember2
echo 您的羊将在!yearde!-4.27至!yearde!-5.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ldecember3
echo 您的羊将在!yearde!-4.28至!yearde!-5.3日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cjanuary2
echo 您的羊将在!yea!-05-28至!yea!-06-02日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cjanuary3
echo 您的羊将在!yea!-05-29至!yea!-06-03日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cfebruary2
echo 您的羊将在!yeatwo!-06.28至!yeatwo!-07.03日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cfebruary3
echo 您的羊将在!yeatwo!-06.29至!yeatwo!-07.04日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ccten2
echo 您的羊将在!yearoc!-2.25至!yearoc!-3.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:ccten3
echo 您的羊将在!yearoc!-2.26至!yearoc!-3.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cceleven2
echo 您的羊将在!yearno!-3.27至!yearno!-4.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cceleven3
echo 您的羊将在!yearno!-3.28至!yearno!-4.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cctwelve2
echo 您的羊将在!yearde!-4.26至!yearde!-5.1日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again
:cctwelve3
echo 您的羊将在!yearde!-4.27至!yearde!-5.2日之间分娩
echo 按任意键返回主菜单
pause >nul
goto again