使用方法

1.在電腦新建文本文檔

2.將下面內容復制進去

3.文件另存為...

復制下面內容

@echo off
color 0a
title 勇者闖地牢V1.0
echo.
echo 【關于開源】右鍵記事本打開就可以修改、拓展此游戲。
echo.
echo 【關于作者】氣人主播：契哥Nooboss
echo.
echo.
pause
::====定義初始變量====
:re
set HPMAX=100
set HP=100
set MPMAX=80
set MP=80
set ATK=16
set DEF=5
set GP=80
set DAY=0
set SP=0
set TAP=3
::====游戲初始化====
:home
cls
set /a DAY=%DAY% 1
set /a HP=%HPMAX%
set /a MP=%MPMAX%
::=====游戲開始====
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
ping/n 2 127.1>nul
echo.
echo 新的一天開始了！
echo.
echo.
echo 1.探索地牢
echo 2.角色屬性
echo.
echo 請輸入：
set /p you=
if %you%==1 goto dilao
if %you%==2 goto my
echo 輸入錯誤！請重新輸入！
pause
set /a DAY=%DAY%-1
goto home
::====探索機制====
:dilao
set /a HP=%HP%-%TAP%
if %HP% leq 0 goto lose
set /a X=%random%%%9 ? 1
if %X% leq 5 goto ai
if %X% leq 7 goto npc
if %X% leq 10 goto loot
::====找到AI敵人====
:ai
cls
set /a AIHP=50 %DAY% %DAY% %DAY% %DAY%
set /a AIATK=9 %DAY% %DAY% %DAY%
set /a AIDEF=3 %DAY% %DAY%
set /a X=%random%%%9 ? 1 %DAY% %DAY%
set /a AISP=30 %X%
set /a YAHP=%ATK%-%AIDEF%
set /a AAHP=%AIATK%-DEF%
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
ping/n 2 127.1>nul
echo.
echo 哥布林出現(xiàn)了！
echo.
echo.
echo 1.戰(zhàn)斗
echo 2.逃跑
echo.
echo 請輸入：
set /p you=
if %you%==1 goto pk
if %you%==2 goto taopao
echo 輸入錯誤！請重新輸入！
pause
goto ai
::====角色屬性====
:my
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
echo.
echo 【攻擊】%ATK% ?【防御】%DEF% ?【SP】%SP%
echo.
echo.
echo 1.體力 10（消耗100點SP）
echo 2.魔法 10（消耗100點SP）
echo 3.攻擊 3（消耗100點SP）
echo 4.防御 3（消耗100點SP）
echo 5.GP 50（消耗30點SP）
echo 0.返回
echo.
echo 請輸入：
set /p you=
if %you%==1 goto uhp
if %you%==2 goto ump
if %you%==3 goto uatk
if %you%==4 goto udef
if %you%==5 goto ugp
if %you%==0 goto back
echo 輸入錯誤！請重新輸入！
pause
goto my
:back
set /a DAY=%DAY%-1
goto home
:uhp
if %SP% geq 100 goto uhp2
echo.
echo SP不足，操作失敗！
pause
goto my
:uhp2
set /a SP=%SP%-100
set /a HPMAX=%HPMAX% 10
set /a HP=%HPMAX%
echo.
echo 操作成功！
pause
goto my
:ump
if %SP% geq 100 goto ump2
echo.
echo SP不足，操作失??！
pause
goto my
:ump2
set /a SP=%SP%-100
set /a MPMAX=%MPMAX% 10
set /a MP=%=%MPMAX%
echo.
echo 操作成功！
pause
goto my
:uatk
if %SP% geq 100 goto uatk2
echo.
echo SP不足，操作失?。?br>pause
goto my
:uatk2
set /a SP=%SP%-100
set /a ATK=%ATK% 3
echo.
echo 操作成功！
pause
goto my
:udef
if %SP% geq 100 goto udef2
echo.
echo SP不足，操作失??！
pause
goto my
:udef2
set /a SP=%SP%-100
set /a DEF=%DEF% 3
echo.
echo 操作成功！
pause
goto my
:ugp
if %SP% geq 30 goto ugp2
echo.
echo SP不足，操作失敗！
pause
goto my
:ugp2
set /a SP=%SP%-30
set /a GP=%GP% 50
echo.
echo 操作成功！
pause
goto my
::====戰(zhàn)斗系統(tǒng)====
:pk
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
echo.
echo ? ? ? ? ? ? ? ?VS
echo.
echo 【戰(zhàn)斗中】哥布林Lv.%DAY% ?【體力】%AIHP%
echo.
echo.
echo.
echo 1.攻擊
echo 2.技能
echo 0.逃跑
echo.
echo 請輸入：
set /p you=
if %you%==1 goto gongji
if %you%==2 goto jineng
if %you%==0 goto taopao
echo 輸入錯誤！請重新輸入！
pause
goto pk
:gongji
set /a AIHP=%AIHP%-%YAHP%
set /a HP=%HP%-%AAHP%
echo.
echo 你攻擊哥布林，對其造成了%YAHP%點傷害。
ping/n 2 127.1>nul
echo.
echo 哥布林攻擊你，對你造成了%AAHP%點傷害。
ping/n 2 127.1>nul
if %AIHP% leq 0 goto win
if %HP% leq 0 goto lose
goto pk
:jineng
echo.
echo 1.重擊（-33MP）
echo.
echo 0.返回
echo.
echo 請輸入：
set /p you=
if %you%==1 goto zhongji
if %you%==0 goto pk
echo 輸入錯誤！請重新輸入！
pause
goto jineng
:zhongji
if %MP% geq 33 goto zhongji2
echo.
echo MP不足，技能使用失??！
pause
goto jineng
:zhongji2
set /a MP=%MP%-33
set /a YAHP=%ATK%*2-%AIDEF%
goto gongji
:taopao
set /a HP=%HP%-%AAHP%
echo.
echo 哥布林攻擊你，對你造成了%AAHP%點傷害。
ping/n 2 127.1>nul
if %HP% leq 0 goto lose
goto dilao
:win
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
echo.
echo 戰(zhàn)斗勝利！你得到了%AISP%SP！
echo.
pause
set /a SP=%SP% %AISP%
goto dilao
:lose
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
echo.
echo 陣亡了！勇士請重新開始！
echo.
pause
goto re
::====找到NPC====
:npc
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
ping/n 2 127.1>nul
echo.
echo 商人出現(xiàn)了！
echo.
echo.
echo 1.對話
echo 2.離開
echo 0.休息
echo.
echo 請輸入：
set /p you=
if %you%==1 goto tk
if %you%==2 goto dilao
if %you%==0 goto home
echo 輸入錯誤！請重新輸入！
pause
goto npc
:tk
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
echo.
echo 商人：以錢換錢啦！
echo.
echo.
echo 1.多蘭劍 ? （體力 10 ?攻擊 3 售價150GP）
echo 2.窮鬼盾 ? （防御 2 ?魔法 5 ?售價180GP）
echo 3.玲瓏心 ? （體力 11 ?魔法 12 ?售價240GP）
echo 4.惡魔鏈 ? （攻擊 50 ?體力-10 ?售價330GP）
echo 0.返回
echo.
echo 請輸入：
set /p you=
if %you%==1 goto duolan
if %you%==2 goto qionggui
if %you%==3 goto linglong
if %you%==4 goto emo
if %you%==0 goto npc
echo 輸入錯誤！請重新輸入！
pause
goto tk
:duolan
if %GP% geq 150 goto duolan2
echo.
echo GP不足，購買失??！
pause
goto tk
:duolan2
set /a GP=%GP%-150
set /a HP=%HP% 10
set /a HPMAX=%HPMAX% 10
set /a ATK=%ATK% 3
echo.
echo 購買成功！
pause
goto tk
:qionggui
if %GP% geq 180 goto qionggui2
echo.
echo GP不足，購買失??！
pause
goto tk
:qionggui2
set /a GP=%GP%-180
set /a DEF=%DEF% 2
set /a MP=%MP% 5
set /a MPMAX=%MPMAX% 5
echo.
echo 購買成功！
pause
goto tk
:linglong
if %GP% geq 240 goto linglong2
echo.
echo GP不足，購買失?。?br>pause
goto tk
:linglong2
set /a GP=%GP%-240
set /a HP=%HP% 10
set /a HPMAX=%HPMAX% 11
set /a MP=%MP% 10
set /a MPMAX=%MPMAX% 12
echo.
echo 購買成功！
pause
goto tk
:emo
if %GP% geq 330 goto emo2
echo.
echo GP不足，購買失??！
pause
goto tk
:emo2
set /a GP=%GP%-330
set /a HP=%HP%-10
set /a HPMAX=%HPMAX%-10
set /a ATK=%ATK% 50
echo.
echo 購買成功！
pause
goto tk
::====找到LOOT====
:loot
cls
set /a X=%random%%%9 ? 1 %DAY% %DAY%
set /a AIGP=15 %X%
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
ping/n 2 127.1>nul
echo.
echo 找到了GP！
echo.
echo.
echo 1.拿走
echo 2.離開
echo 0.休息
echo.
echo 請輸入：
set /p you=
if %you%==1 goto gloot
if %you%==2 goto dilao
if %you%==0 goto home
echo 輸入錯誤！請重新輸入！
pause
goto loot
:gloot
cls
title 勇者闖地牢 ?【體】%HP% ?【魔】%MP% 【GP】%GP% 【Day】%DAY%
echo.
set /a GP=%GP% %AIGP%
echo 你得到了%AIGP%GP！
echo.
pause
goto dilao