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

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2021-10-4 13:17 | 只看该作者

[其他] [转载自Dostips] 游戏 劳里的幻想世界

本帖最后由 HOPE2021 于 2021-11-6 12:20 编辑

转自Dostips,经过汉化,作者的技术非常好,侵删.
汉化版下载与原文链接楼:http://www.bathome.net/redirect.php?goto=findpost&pid=247714&ptid=60246
源码第一部分:
  1. @echo off

  2. Rem 来自https://www.dostips.com/forum/viewtopic.php?f=3&t=9848&p=63348

  3. Rem 作者Lauri

  4. chcp 936 > nul

  5. title 劳里的幻想世界

  6. color 03

  7. @goto INSTALL_COLOR

  8. 

  9. :INSTALL_COLOR

  10. echo.

  11. echo.正在加载图形引擎...

  12. (

  13. echo.@echo off

  14. echo.chcp 936 ^> nul

  15. echo.Setlocal EnableDelayedExpansion

  16. echo.REM setlocal enableextensions

  17. echo.set dstdir=c:\tmpColorDirtoDelete

  18. echo.IF EXIST %%dstdir%% goto errExist

  19. echo.@mkdir %%dstdir%%

  20. echo.@cd %%dstdir%%

  21. echo.set count=0

  22. echo.REM DEFINISCO IL CARATTERE BACKSPACE!

  23. echo.set "$Defines=$BS"    & set "$Details=Create $ESC Ascii-0x1B-27, Expansion insensitive"

  24. echo.   for /f "delims=#" %%%%a in ^(

  25. echo.      '"prompt #$H# &echo on &for %%%%b in (1) do rem"'

  26. echo.   ^) do ^(

  27. echo.      set "%%$Defines%%=%%%%a"

  28. echo.      set "%%$Defines%%=!$BS:~0,1!"

  29. echo.   ^)

  30. echo.FOR %%%%a IN ^(%%*^) DO ^(

  31. echo. FOR /F "usebackq delims=# tokens=1,*" %%%%b IN ^('%%%%a'^) DO ^(

  32. echo.    REM echo %%%%b sara' di colore %%%%c

  33. echo.    set /A count=!count!+1

  34. echo.    set nomefile=%%%%b

  35. echo.    IF %%%%c.==. ^(

  36. echo.        set colore=03

  37. echo.    ^) ELSE ^(

  38. echo.    set colore=%%%%c

  39. echo.    ^)

  40. echo.    REM SET /P ".=" %%%%b

  41. echo.    SET /P ".=%%$BS%% " ^<nul ^>%%%%b

  42. echo.    REM echo !count!^>%%%%b

  43. echo.    REM echo FINDSTR /A:%%%%c /C:"!count!" /S "%%%%b"

  44. echo.    REM more %%%%b

  45. echo.    set bin=%%%%b

  46. echo. ^)

  47. echo. REM FINE INNER FOR

  48. echo.    REM echo FINDSTR /A:!colore! /C:"!count!" /S "!nomefile!"

  49. echo.    FINDSTR /A:!colore! /C:" " /S "!nomefile!"

  50. echo.    REM goto end

  51. echo.^)

  52. echo.REM FINE OUTER FOR

  53. echo.echo.

  54. echo.REM ERROR HANDLING

  55. echo.goto chiusura

  56. echo.:errExist

  57. echo.echo 临时目录%%dstdir%%已存在.在继续或更改批处理中的路径之前将其删除.

  58. echo.goto pulizia

  59. echo.:chiusura

  60. echo.:pulizia

  61. echo.cd..

  62. echo.rd /S /Q %%dstdir%%

  63. echo.goto end

  64. echo.:end

  65. ) > color.bat

  66. SetLocal EnableDelayedExpansion

  67. 

  68. :LOAD

  69. 	if EXIST "%UserProFile%\Save.Txt" (

  70. 		echo.

  71. 		echo 发现存档^^!

  72. 		echo.

  73. 		echo 你想加载游戏吗?

  74. 		call color.bat [S]#0c 想 [N]#0c 不想

  75. 		

  76. 		choice /N /C:SN

  77. 		

  78. 		if errorlevel 2 (

  79. 			echo.

  80. 			echo 新的开始.

  81. 			pause >nul

  82. 			

  83. 			goto START

  84. 		)

  85. 		if errorlevel 1 (

  86. 			for /F "usebackq tokens=1-18 delims=," %%G in ("%UserProFile%\Save.Txt") do (

  87. 				set AMBIENTE=%%G

  88. 				set ATT=%%H

  89. 				set DIF=%%I

  90. 				set MAG=%%J

  91. 				set DIF_M=%%K

  92. 				set HP_MAX=%%L

  93. 				set HP=%%M

  94. 				set MAGIE=%%N

  95. 				set LV=%%O

  96. 				set EXP=%%P

  97. 				set END_COMBACT=%%Q

  98. 				set EQUIP_ARM=%%R

  99. 				set EQUIP_CORPO=%%S

  100. 				set EQUIP_ELM=%%T

  101. 				set NAME=%%U

  102. 				set SWT_LOC_A=%%V

  103. 				set GOLD=%%W

  104. 				set STORY=%%X

  105. 				set /a ST_VELENO=0

  106. 				set NAME_EN=

  107. 				set /a HP_LOSE=3

  108. 

  109. 				set /a LOOP_L=0

  110. 				

  111. 				goto LOOP_ECHO_LOAD

  112. 			)

  113. 		)

  114. 	) else (

  115. 		goto START

  116. 	)

  117. 

  118. :SAVE

  119. 	set /a LOOP_S=0

  120. 	

  121. 	goto LOOP_ECHO_SAVE

  122. 		

  123. :LOOP_ECHO_LOAD

  124. 	if %LOOP_L% EQU 0 (

  125. 		cls

  126. 		echo.

  127. 		echo 正在加载 .

  128. 		set /a LOOP_L=%LOOP_L%+1

  129. 		

  130. 		choice /N /C:P /T 1 /D P

  131. 		goto LOOP_ECHO_LOAD

  132. 	)

  133. 				

  134. 	if %LOOP_L% EQU 1 (

  135. 		cls

  136. 		echo.

  137. 		echo 正在加载 . .

  138. 		set /a LOOP_L=%LOOP_L%+1

  139. 		

  140. 		choice /N /C:P /T 1 /D P

  141. 		goto LOOP_ECHO_LOAD

  142. 	)

  143. 	

  144. 	if %LOOP_L% EQU 2 (

  145. 		cls

  146. 		echo.

  147. 		echo 正在加载 . . .

  148. 		set /a LOOP_L=0

  149. 

  150. 		choice /N /C:P /T 1 /D P

  151. 		if errorlevel 1 goto %AMBIENTE%

  152. 	)

  153. 

  154. :LOOP_ECHO_SAVE

  155. 	if %LOOP_S% EQU 0 (

  156. 		cls

  157. 		echo.

  158. 		echo 存档中 .

  159. 		set /a LOOP_S=%LOOP_S%+1

  160. 		choice /N /C:P /T 1 /D P

  161. 		

  162. 		goto LOOP_ECHO_SAVE

  163. 	)

  164. 				

  165. 	if %LOOP_S% EQU 1 (

  166. 		cls

  167. 		echo.

  168. 		echo 存档中 . .

  169. 		set /a LOOP_S=%LOOP_S%+1

  170. 		choice /N /C:P /T 1 /D P

  171. 			

  172. 		goto LOOP_ECHO_SAVE

  173. 	)

  174. 	

  175. 	if %LOOP_S% EQU 2 (

  176. 		cls

  177. 		echo.

  178. 		echo 存档中 . . .

  179. 		set /a LOOP_S=0

  180. 

  181. 		choice /N /C:P /T 2 /D P

  182. 		echo %AMBIENTE%,%ATT%,%DIF%,%MAG%,%DIF_M%,%HP_MAX%,%HP%,%MAGIE%,%LV%,%EXP%,%END_COMBACT%,%EQUIP_ARM%,%EQUIP_CORPO%,%EQUIP_ELM%,%NAME%,%SWT_LOC_A%,%GOLD%,%STORY% > "%UserProFile%\Save.Txt"

  183. 

  184. 		goto %AMBIENTE%

  185. 	)

  186. 	

  187. :START

  188. set /a EQUIP_ARM=0

  189. :: 3= SPADA ATT +3

  190. :: 5= LANCIA ATT +5

  191. :: 7= PUGNALE ATT +7

  192. :: 2= ASTA +2 MAG

  193. :: 4= PISTOLA +4 MAG

  194. :: 8= LONGINUS +8 MAG

  195. 

  196. set /a EQUIP_CORPO=0

  197. :: 1= MAGLIA DIF +1

  198. :: 3= GIUBOTTO DIF+3

  199. :: 8= CORAZZA DIF +8

  200. 

  201. set /a EQUIP_ELM=0

  202. :: 2= CAPPELLO DIF_MAG +2

  203. :: 5= BASCO DIF_MAG +5

  204. :: 7= ELMO DIF_MAG +7

  205. 

  206. set /a ATT=2

  207. set /a DIF=1

  208. set /a MAG=0

  209. set /a DIF_M=0

  210. set /a EXP=0

  211. set /a HP=30

  212. set /a HP_MAX=30

  213. set /a LV=1

  214. 

  215. set /a ST_VELENO=0

  216. :: 1= AVVELENATO

  217. 

  218. set /a HP_LOSE=3

  219. :: HP PERSI PER EFFETTO DEL VELENO

  220. 

  221. set /a END_COMBACT=0

  222. 

  223. set /a MAGIE=0

  224. :: FIRE=1

  225. :: ICE=2

  226. :: ENERGIA=3

  227. :: IDRO=4

  228. :: THUNDER=5

  229. :: ESNA=6

  230. 

  231. set /a SWT_LOC_A=0

  232. :: VARIABILE PER I SOLDI TROVATI NEL MONDO

  233. 

  234. set /a GOLD=0

  235. ::SOLDI DEL GIOCO

  236. 

  237. set /a STORY=0

  238. ::VARIABILE DELLA STORIA

  239. 

  240. set NAME_EN=

  241. 

  242. 

  243. cls

  244. echo.欢迎来到虚拟世界，这里使用了有史以来最好的图形引擎，你的大脑^^!

  245. pause >nul

  246. 

  247. cls

  248. 

  249. call color.bat 选择 [S]#0c 开始或选择 [N]#0c 退出

  250. choice /N /C:SN

  251. 

  252. if errorlevel 2 goto END

  253. if errorlevel 1 goto BEGIN_GAME

  254. 

  255. :BEGIN

  256. 	cls

  257. 	call color.bat 你的房子#0a

  258. 	echo.

  259. 	echo 你是离开房子还是在房间里踱步?

  260. 

  261. 	call color.bat 选择 [A]#0c 离开或选择 [D]#0c 停留

  262. 	choice /N /C:AD

  263. 	

  264. 	if errorlevel 2 goto IN_HOME

  265. 	if errorlevel 1 goto OUT_HOME

  266. 

  267. :BEGIN_GAME

  268. 	echo.

  269. 	set /p NAME=你的名字叫什么? 

  270. 

  271. 	if /i DEFINED NAME (

  272. 		echo.

  273. 		echo %NAME%你好, 你好，欢迎来到劳里的世界^^!

  274. 		echo 你准备好开始你的冒险了吗？

  275. 		call color.bat 按 [Enter键]#0c 开始。

  276. 		pause >nul

  277. 	) else (

  278. 		cls

  279. 		echo 请输入您的姓名^^!

  280. 		pause >nul

  281. 		goto BEGIN_GAME

  282. 	)

  283. 

  284. cls

  285. call color.bat 你的房子#0a 

  286. echo.

  287. echo 嗯，刚刚醒来，马上就发现了一些奇怪的事情...

  288. echo 是啊...太安静了，有点不对劲...

  289. echo 走近前门想做点什么...

  290. echo 是离开房子还是在房间里踱步?

  291. 

  292. 	call color.bat 选择 [A]#0c 离开或选择 [D]#0c 停留

  293. 	choice /N /C:AD

  294. 	

  295. 	if errorlevel 2 goto IN_HOME

  296. 	if errorlevel 1 goto OUT_HOME

  297. 

  298. 	:OUT_HOME

  299. 		cls

  300. 		call color.bat 屋外#0a

  301. 		echo.

  302. 		echo 我听不到任何噪音...

  303. 		echo 我步行时注意到朋友的房子...

  304. 		echo 门开着...

  305. 		echo 决定进去还是继续?

  306. 		

  307. 		call color.bat 选择 [A]#0c 进入或选择 [D]#0c 继续或 [X]#0c 返回

  308. 		choice /N /C:ADX

  309. 		

  310. 		if errorlevel 3 goto BEGIN

  311. 		if errorlevel 2 goto STREET

  312. 		if errorlevel 1 goto FRIEND_HOUSE

  313. 

  314. 	:IN_HOME

  315. 		cls

  316. 		call color.bat 走廊#0a

  317. 		echo.

  318. 		echo 想去哪个房间?

  319. 

  320. 		call color.bat 选择 [A]#0c 去厨房 [D]#0c 去卧室 [G]#0c 去浴室 [J]#0c 客厅

  321. 		choice /N /C:ADGJ

  322. 

  323. 		if errorlevel 4 goto SALA

  324. 		if errorlevel 3 goto BAGNO

  325. 		if errorlevel 2 goto CAMERA

  326. 		if errorlevel 1 goto CUCINA

  327. 

  328. 		:CUCINA

  329. 			cls

  330. 			call color.bat 厨房#0a

  331. 			echo.

  332. 			echo 这里也没有人...电线断了...

  333. 			echo 妈妈一定忘了关上它...

  334. 			echo 回去吧...

  335. 			pause >nul

  336. 			goto BEGIN

  337. 		:CAMERA

  338. 			if %EQUIP_ARM% EQU 0 (

  339. 				cls

  340. 				call color.bat 卧室#0a

  341. 				echo.

  342. 				echo 床没铺好...

  343. 				echo 我检查了壁橱...

  344. 				call color.bat 找到#03 黑桃#0c [ATT#0c +3]#0c

  345. 				set /a EQUIP_ARM=3

  346. 				echo 回去吧...

  347. 				pause >nul

  348. 				goto BEGIN

  349. 			)

  350. 			if %EQUIP_ARM% GEQ 1 (
复制代码
收藏 分享
Why join the navy, if you can be a pirate? - Steve Jobs

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
2楼
发表于 2021-10-4 13:18 | 只看该作者
回复 1# HOPE2021
源码第二部分:
  1. 				cls

  2. 				call color.bat 卧室#0a

  3. 				echo.

  4. 				echo 床没铺好...

  5. 				echo 我检查了壁橱...

  6. 				echo 什么都没有了...

  7. 				echo 回去吧...

  8. 				pause >nul

  9. 				goto BEGIN

  10. 			)

  11. 		:BAGNO

  12. 			cls

  13. 			call color.bat 浴室#0a

  14. 			echo.

  15. 			echo 啊... 我需要好好洗个澡...

  16. 			echo 回去吧...

  17. 			pause >nul

  18. 			goto BEGIN

  19. 		:SALA

  20. 			cls

  21. 			call color.bat 客厅#0a

  22. 			echo.

  23. 			echo 灯亮着... 真奇怪...

  24. 			echo 回去吧...

  25. 			pause >nul

  26. 			goto BEGIN

  27. 

  28. 	:FRIEND_HOUSE

  29. 		if %END_COMBACT% EQU 0 (

  30. 			cls

  31. 			call color.bat 朋友的家#0a

  32. 			echo.

  33. 			echo 这里似乎也没有人...

  34. 			echo 我想我听到了声音...

  35. 			echo 从客厅出来...

  36. 			echo 要做什么，给朋友打电话还是检查房间？

  37. 		

  38. 			call color.bat 选择 [A]#0c 给朋友打电话或选择 [D]#0c 检查房间

  39. 			choice /N /C:AD

  40. 

  41. 			if errorlevel 2 goto ROOM_FRIEND_HOUSE

  42. 			if errorlevel 1 goto VOICE_1

  43. 		) else (

  44. 			cls

  45. 			call color.bat 朋友的家#0a

  46. 			echo.

  47. 			echo 一个死去的僵尸躺在地上...

  48. 			echo 似乎没有什么有趣的事...

  49. 			pause >nul

  50. 			goto OUT_HOME

  51. 		)

  52. 

  53. 		:ROOM_FRIEND_HOUSE

  54. 			cls

  55. 			call color.bat 房间#0a

  56. 			echo.

  57. 			echo 哦，我的天啊，真是太可怕了...

  58. 			echo 我的邻居好像变成了僵尸^^!^^!^^!

  59. 			echo 攻击我^^!^^!^^!

  60. 			echo.

  61. 			pause >nul

  62. 

  63. 				set /a HP_EN=20

  64. 				set /a HP_MAX_EN=20

  65. 				set /a ATT_EN=1

  66. 				set /a DIF_EN=1

  67. 				set /a MAG_EN=0

  68. 				set /a DIF_M_EN=0

  69. 

  70. 				set NAME_EN=僵尸

  71. 				set AMBIENTE=FRIEND_HOUSE

  72. 				set TURNO=COMBACT_1

  73. 				set TURNO_EN=COMBACT_1_ENEMY

  74. 

  75. 				set /a ST_VELENO=0

  76. 

  77. 				set /a EXP_EN=3

  78. 				

  79. 				goto COMBACT_1

  80. 

  81. 	:VOICE_1

  82. 		cls.

  83. 		call color.bat 朋友的家#0a

  84. 		echo.

  85. 		echo 试着打电话给邻居,

  86. 		echo 似乎没有人回答...

  87. 		echo %Name%试着提高声音...

  88. 		echo 有奇怪的吼声... 从房间里传来... 

  89. 		echo 发生了什么?

  90. 

  91. 		call color.bat 是要离开 [A]#0c 还是检查 [D]#0c

  92. 		choice /N /C:AD

  93. 

  94. 		if errorlevel 2 goto ROOM_FRIEND_HOUSE

  95. 		if errorlevel 1 goto OUT_HOME

  96. 		

  97. 	:STREET

  98. 		cls

  99. 		call color.bat 街头#0a

  100. 		echo.

  101. 		echo 你站在十字路口...

  102. 		echo 冷风飒飒... 乌云密布

  103. 		echo 一个指示牌歪歪斜斜... 指着东南西北...

  104. 		echo.

  105. 		echo 该向那儿走?

  106. 		call color.bat [W]#0c 直走 [A]#0c 向左 [D]#0c 向右 [X]#0c 返回

  107. 		

  108. 		choice /N /C:WADX

  109. 

  110. 		if errorlevel 4 goto OUT_HOME

  111. 		if errorlevel 3 goto STREET_E

  112. 		if errorlevel 2 goto STREET_O

  113. 		if errorlevel 1 goto STREET_N

  114. 

  115. 	:STREET_N

  116. 		cls

  117. 		call color.bat 街头#0a

  118. 		echo.

  119. 		call color.bat [W]#0c 继续前行 [X]#0c 打道回府

  120. 

  121. 		choice /N /C:WX

  122. 

  123. 		if errorlevel 2 goto STREET

  124. 		if errorlevel 1 goto STREET_NN

  125. 		

  126. 		:STREET_NN

  127. 			cls

  128. 			call color.bat 街头#0a

  129. 			echo.

  130. 			echo 这条路似乎到此为止...

  131. 			echo 最好回去...

  132. 			pause >nul

  133. 	

  134. 			goto STREET_N

  135. 

  136. 	:STREET_O

  137. 		cls

  138. 		call color.bat 街头#0a

  139. 		echo.

  140. 		echo %Name%看到一座尖塔...

  141. 		call color.bat [W]#0c 直走 [A]#0c 左转 [X]#0c 返回

  142. 

  143. 		choice /N /C:WAX

  144. 

  145. 		if errorlevel 3 goto STREET

  146. 		if errorlevel 2 goto STREET_OS

  147. 		if errorlevel 1 goto STREET_OO

  148. 

  149. 		:STREET_OO

  150. 			cls

  151. 			call color.bat 街头#0a

  152. 			echo.

  153. 			call color.bat [W]#0c 直走 [X]#0c 返回

  154. 

  155. 			choice /N /C:WX

  156. 

  157. 			if errorlevel 2 goto STREET_O

  158. 			if errorlevel 1 goto STREET_OOO

  159. 		

  160. 			:STREET_OOO

  161. 				cls

  162. 				call color.bat 街头#0a

  163. 				echo.

  164. 				echo %Name%看到一座尖塔...

  165. 				call color.bat [W]#0c 直走 [A]#0c 向左走 [D]#0c 向右走 [X]#0c 返回

  166. 

  167. 				choice /N /C:WADX

  168. 

  169. 				if errorlevel 4 goto STREET_OO

  170. 				if errorlevel 3 goto STREET_OOON

  171. 				if errorlevel 2 goto STREET_OOOS

  172. 				if errorlevel 1 goto STREET_OOOO

  173. 				

  174. 				:STREET_OOON

  175. 					cls

  176. 					call color.bat 街头#0a

  177. 					echo.

  178. 					echo 去酒吧，也许是个好主意...

  179. 					echo 进去，我可以喝一杯或者...

  180. 					echo 也许我应该晚一点回去...

  181. 					echo.

  182. 					

  183. 					call color.bat [A]#0c 进去 [D]#0c 返回

  184. 					

  185. 					choice /N /C:AD 

  186. 					

  187. 					if errorlevel 2 goto STREET_OOO

  188. 					if errorlevel 1 goto BAR_1

  189. 					

  190. 				:STREET_OOOO

  191. 					if %SWT_LOC_A% EQU 0 (

  192. 						cls

  193. 						call color.bat 街头#0a

  194. 						echo.

  195. 						echo 嘿，你找到3块金子了^^!

  196. 						set /a GOLD=%GOLD%+3

  197. 						pause >nul

  198. 						

  199. 						set /a SWT_LOC_A=1

  200. 						goto STREET_OOO

  201. 					)

  202. 					

  203. 					if %SWT_LOC_A% EQU 1 (

  204. 						cls

  205. 						call color.bat 街头#0a

  206. 						echo.

  207. 						echo 这里什么也没有... 这条路似乎到此为止...

  208. 						echo 最好回去...

  209. 						pause >nul

  210. 

  211. 						goto STREET_OOO

  212. 					)

  213. 

  214. 				:STREET_OOOS

  215. 					

  216. 					cls

  217. 					call color.bat 街头#0a

  218. 					echo.

  219. 					echo 这条路似乎到此为止...

  220. 			                                echo 最好回去...

  221. 					pause >nul

  222. 

  223. 					goto STREET_OOO

  224. 		:STREET_OS

  225. 			cls

  226. 			call color.bat 街头#0a

  227. 			echo.

  228. 			call color.bat [W]#0c 直走 [X]#0c 返回

  229. 

  230. 			choice /N /C:WX

  231. 

  232. 			if errorlevel 2 goto STREET_O

  233. 			if errorlevel 1 goto STREET_OSS

  234. 

  235. 			:STREET_OSS

  236. 				cls

  237. 				call color.bat 街头#0a

  238. 				echo.

  239. 				echo %Name%找到了一个休息的地方,

  240. 				echo 这里可以恢复精力...

  241. 				set /a HP=%HP_MAX%

  242. 				pause >nul

  243. 

  244. 				echo.

  245. 				call color.bat [D]#0c 向右 [X]#0c 返回

  246. 

  247. 				choice /N /C:DX

  248. 

  249. 				if errorlevel 2 goto STREET_OS

  250. 				if errorlevel 1 goto STREET_OSSO

  251. 

  252. 				:STREET_OSSO

  253. 					cls

  254. 					call color.bat 街头#0a

  255. 					echo.

  256. 					echo %Name%遇到了一个僵尸...

  257. 					echo 它攻击%Name%

  258. 					echo.

  259. 					pause >nul

  260. 

  261. 						set /a HP_EN=25

  262. 						set /a HP_MAX_EN=25

  263. 						set /a ATT_EN=1

  264. 						set /a DIF_EN=2

  265. 						set /a MAG_EN=0

  266. 						set /a DIF_M_EN=0

  267. 

  268. 						set NAME_EN=僵尸

  269. 						set AMBIENTE=STREET_OSS

  270. 						set TURNO=COMBACT_1

  271. 						set TURNO_EN=COMBACT_1_ENEMY

  272. 

  273. 						set /a ST_VELENO=0

  274. 	

  275. 						set /a EXP_EN=7

  276. 				

  277. 						goto COMBACT_1

  278. 

  279. 

  280. 	:STREET_E

  281. 		cls

  282. 		call color.bat 街头#0a

  283. 		echo.

  284. 		echo %Name%看到一座尖塔...

  285. 		call color.bat [A]#0c 向左 [D]#0c 向右 [X]#0c 返回

  286. 

  287. 		choice /N /C:ADX

  288. 

  289. 		if errorlevel 3 goto STREET

  290. 		if errorlevel 2 goto STREET_ES

  291. 		if errorlevel 1 goto STREET_EN

  292. 

  293. 		:STREET_EN

  294. 			cls

  295. 			call color.bat 街头#0a

  296. 			echo.

  297. 			call color.bat [D]#0c 向右 [X]#0c 返回

  298. 

  299. 			choice /N /C:DX

  300. 

  301. 			if errorlevel 2 goto STREET_E

  302. 			if errorlevel 1 goto STREET_ENE

  303. 			

  304. 			:STREET_ENE

  305. 				cls

  306. 				call color.bat 街头#0a

  307. 				echo.

  308. 				call color.bat [W]#0c 直走 [X]#0c 返回

  309. 

  310. 				choice /N /C:WX

  311. 

  312. 				if errorlevel 2 goto STREET_EN

  313. 				if errorlevel 1 goto STREET_ENEE

  314. 				

  315. 				:STREET_ENEE

  316. 					cls

  317. 					call color.bat 街头#0a

  318. 					echo.

  319. 					echo %Name%找到了一个休息的地方,

  320. 					echo 这里可以恢复精力...

  321. 					set /a HP=%HP_MAX%

  322. 					pause >nul

  323. 

  324. 					echo.

  325. 					call color.bat [X]#0c 返回

  326. 

  327. 					choice /N /C:X

  328. 

  329. 					if errorlevel 1 goto STREET_ENE

  330. 				

  331. 		:STREET_ES

  332. 			cls

  333. 			call color.bat 街头#0a

  334. 			echo.

  335. 			echo %Name%看到一座尖塔...

  336. 			call color.bat [W]#0c 直走 [A]#0c 向左 [D]#0c 向右 [X]#0c 返回

  337. 

  338. 			choice /N /C:WADX

  339. 

  340. 			if errorlevel 4 goto STREET_E

  341. 			if errorlevel 3 goto STREET_ESO

  342. 			if errorlevel 2 goto STREET_ESE

  343. 			if errorlevel 1 goto STREET_ESS

  344. 			

  345. 			:STREET_ESO

  346. 				cls

  347. 				call color.bat 街头#0a

  348. 				echo.

  349. 				call color.bat [W]#0c 直走 [X]#0c 返回

  350.  
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
3楼
发表于 2021-10-4 13:19 | 只看该作者
回复 2# HOPE2021
源码第三部分:
  1. 				choice /N /C:WX

  2. 

  3. 				if errorlevel 2 goto STREET_ES

  4. 				if errorlevel 1 goto STREET_ESOO

  5. 		

  6. 			:STREET_ESE

  7. 				cls

  8. 				call color.bat 街头#0a

  9. 				echo.

  10. 				call color.bat [W]#0c 直走 [X]#0c 返回

  11. 

  12. 				choice /N /C:WX

  13. 	

  14. 				if errorlevel 2 goto STREET_ES

  15. 				if errorlevel 1 goto STREET_ESEE

  16. 			

  17. 			:STREET_ESS

  18. 				cls

  19. 				call color.bat 街头#0a

  20. 				echo.

  21. 				call color.bat [A]#0c 向左 [X]#0c 返回

  22. 

  23. 				choice /N /C:AX

  24. 

  25. 				if errorlevel 2 goto STREET_ES

  26. 				if errorlevel 1 goto STREET_ESSE

  27. 			

  28. 				:STREET_ESOO

  29. 					cls

  30. 					call color.bat 街头#0a

  31. 					echo.

  32. 					echo 这条路似乎到此为止...

  33. 					echo 最好回去...

  34. 					pause >nul

  35. 				

  36. 					goto STREET_ESO

  37. 					

  38. 				:STREET_ESEE

  39. 					cls

  40. 					call color.bat COMBATTI#0a

  41. 					echo.

  42. 					echo %Name%遇到了一个僵尸...

  43. 					echo 它攻击%Name%

  44. 					echo.

  45. 					pause >nul

  46. 					

  47. 						set /a HP_EN=25

  48. 						set /a HP_MAX_EN=25

  49. 						set /a ATT_EN=1

  50. 						set /a DIF_EN=2

  51. 						set /a MAG_EN=0

  52. 						set /a DIF_M_EN=0

  53. 

  54. 						set NAME_EN=僵尸

  55. 						set AMBIENTE=STREET_ESE

  56. 						set TURNO=COMBACT_1

  57. 						set TURNO_EN=COMBACT_1_ENEMY

  58. 

  59. 						set /a ST_VELENO=0

  60. 	

  61. 						set /a EXP_EN=7

  62. 				

  63. 						goto COMBACT_1

  64. 				

  65. 				:STREET_ESSE

  66. 					cls

  67. 					call color.bat 街头#0a

  68. 					echo.

  69. 					echo %Name%看到一座尖塔...

  70. 					call color.bat [W]#0c 直走 [D]#0c 向右 [X]#0c 返回

  71. 

  72. 					choice /N /C:WDX

  73. 

  74. 					if errorlevel 3 goto STREET_ESS

  75. 					if errorlevel 2 goto STREET_ESSES

  76. 					if errorlevel 1 goto STREET_ESSEE

  77. 					

  78. 					:STREET_ESSES

  79. 						cls

  80. 						

  81. 						if %STORY% LEQ 0 (

  82. 							call color.bat 街边-森林#0a

  83. 							echo.

  84. 							echo %Name%走进一片森林，听到远处有人声...

  85. 							echo 还是检查一下吧...

  86. 							echo.

  87. 							echo 那是%Name%遇见伴侣的时候...

  88. 							pause >nul

  89. 						

  90. 							goto BOSCO

  91. 						) else (

  92. 							call color.bat 街边-森林#0a

  93. 							echo.

  94. 							echo %Name%已经到达一个森林的入口，想做什么？

  95. 							call color.bat [W]#0c 去森林 [X]#0c 返回

  96. 							choice /N /C:WX

  97. 							

  98. 							if errorlevel 2 goto STREET_ESSE

  99. 							if errorlevel 1 goto BOSCO

  100. 						)

  101. 					

  102. 					:STREET_ESSEE

  103. 						cls

  104. 						call color.bat 街头#0a

  105. 						echo.

  106. 						echo 这条路似乎到此为止...

  107. 					                echo 最好回去...

  108. 						pause >nul

  109. 				

  110. 						goto STREET_ESSE

  111. 						

  112. 	:BOSCO

  113. 		if %STORY% LEQ 0 (

  114. 			cls

  115. 			call color.bat 森林#0a

  116. 			echo.

  117. 			echo 嘿，前面有很多僵尸...

  118. 			echo 这里，可能需要这个...

  119. 			echo 啊，但是后来我听说了一家商店...

  120. 			echo 在那里... 哦，可以买一些必需品...

  121. 			echo.

  122. 			echo 您已获得: 毛衣

  123. 			set /a EQUIP_CORPO=1

  124. 			set /a STORY=%STORY%+1

  125. 			echo.

  126. 			echo 乔瓦尼离开了，呆在森林的你开始做什么？

  127. 			echo 继续前行还是返回?

  128. 			

  129. 			call color.bat [W]#0c 继续向前 [X]#0c 返回

  130. 			choice /N /C:WX

  131. 			

  132. 			if errorlevel 2 goto STREET_ESSES

  133. 			if errorlevel 1 goto BOSCO_1

  134. 		) else (

  135. 			cls

  136. 			call color.bat 森林#0a

  137. 			echo.

  138. 			echo 你在树林里干什么?

  139. 			echo 继续前行或返回?

  140. 			

  141. 			call color.bat [W]#0c 继续前行 [X]#0c 返回

  142. 			choice /N /C:WX

  143. 			

  144. 			if errorlevel 2 goto STREET_ESSES

  145. 			if errorlevel 1 goto BOSCO_1

  146. 		)

  147. 		

  148. 	:BOSCO_1

  149. 		set /a VAR_INC=%RANDOM% %%100

  150. 		

  151. 		if !VAR_INC! GEQ 60 (

  152. 			cls

  153. 			call color.bat 森林-战场#0a

  154. 			echo.

  155. 			echo %Name%遇到一个僵尸，它攻击%Name%...

  156. 			pause >nul

  157. 			

  158. 			set /a HP_EN=40

  159. 			set /a HP_MAX_EN=40

  160. 			set /a ATT_EN=4

  161. 			set /a DIF_EN=5

  162. 			set /a MAG_EN=0

  163. 			set /a DIF_M_EN=0

  164. 

  165. 			set NAME_EN=僵尸1

  166. 			set AMBIENTE=BOSCO

  167. 			set TURNO=COMBACT_1

  168. 			set TURNO_EN=COMBACT_1_ENEMY

  169. 

  170. 			set /a ST_VELENO=0

  171. 

  172. 			set /a EXP_EN=10

  173. 

  174. 			goto COMBACT_1

  175. 		) else (

  176. 			cls

  177. 			call color.bat 森林#0a

  178. 			echo.

  179. 			echo 没有动静... 什么都没有吗?

  180. 			call color.bat [S]#0c 是的 [N]#0c 不是

  181. 

  182. 			choice /N /C:SN

  183. 

  184. 			if errorlevel 2 goto BOSCO

  185. 			if errorlevel 1 goto END

  186. 		)

  187. 

  188. 		if !VAR_INC! GEQ 83 (

  189. 			cls

  190. 			call color.bat 森林-战场#0a

  191. 			echo.

  192. 			echo %Name%遇到两个僵尸，他们攻击%Name%^^!^^!^^!

  193. 			pause >nul

  194. 

  195. 			set /a HP_EN=40

  196. 			set /a HP_MAX_EN=40

  197. 			set /a ATT_EN=4

  198. 			set /a DIF_EN=5

  199. 			set /a MAG_EN=0

  200. 			set /a DIF_M_EN=0

  201. 

  202. 			set /a HP_EN_2=20

  203. 			set /a HP_MAX_EN_2=20

  204. 			set /a ATT_EN_2=3

  205. 			set /a DIF_EN_2=3

  206. 			set /a MAG_EN_2=0

  207. 			set /a DIF_M_EN_2=0

  208. 

  209. 			set NAME_EN=僵尸1

  210. 			set NAME_EN_2=僵尸2

  211. 			set AMBIENTE=BOSCO

  212. 			set TURNO=COMBACT_2

  213. 			set TURNO_EN=COMBACT_2_ENEMY_NO1

  214. 

  215. 			set /a MID_COMBACT=0

  216. 

  217. 			set /a ST_VELENO=0

  218. 

  219. 			set /a EXP_EN=10

  220. 

  221. 			goto COMBACT_2

  222. 		) else (

  223. 			cls

  224. 			call color.bat 森林#0a

  225. 			echo.

  226. 			echo 好像什么动静都没有... 但这是真的吗?

  227. 			call color.bat [S]#0c 是的 [N]#0c 不是

  228. 

  229. 			choice /N /C:SN

  230. 

  231. 			if errorlevel 2 goto BOSCO

  232. 			if errorlevel 1 goto END

  233. 		)

  234. 		

  235. 	:BAR_1

  236. 		set AMBIENTE=BAR_1

  237. 		cls

  238. 	:S_BAR_DOMANDA

  239. 		call color.bat 酒吧#0a

  240. 		echo.

  241. 		echo ---==^> 归 %GOLD% 块金子的人所有 ^<==---

  242. 		echo.

  243. 		echo 欢迎来到这里最特别的酒吧，哈哈 ^^!^^!^^!

  244. 		echo 是啊... 你偶尔也会笑，这对你有好处...

  245. 		echo 回到我们这里，你想要什么？

  246. 		echo 如果你不知道该带什么，你可以写"Chiedi"来问我

  247. 	

  248. 	:S_BAR_DOMANDA_1

  249. 		echo.

  250. 		echo 你的愿望是什么?

  251. 		set /p DOMANDA= 

  252. 		

  253. 		if /i DEFINED DOMANDA (

  254. 			goto S_BAR_MENU

  255. 		) else (

  256. 			echo.

  257. 		                echo 我不明白... 试着键入"Chiedi"

  258. 			pause >nul

  259. 			cls

  260. 			goto S_BAR_DOMANDA

  261. 		)

  262. 	

  263. 	:S_BAR_MENU

  264. 	if /i %DOMANDA%==Chiedi (

  265. 		cls

  266. 		call color.bat BAR#0a

  267. 		echo.

  268. 		echo 菜单:

  269. 		echo.

  270. 		echo    - BEVI    -^> 查看鸡尾酒菜单.

  271. 		echo    - MANGIA  -^> 查看甜品菜单.

  272. 		echo    - SALVA   -^> 保存游戏进度.

  273. 		echo    - ESCI    -^> 离开酒吧.

  274. 		

  275. 		goto S_BAR_DOMANDA_1

  276. 	)

  277. 

  278. 	:MENU_BEVI

  279. 	if /i %DOMANDA%==Bevi (

  280. 		cls

  281. 		call color.bat 菜单#0a

  282. 		echo.

  283. 		echo 菜单:

  284. 		echo.

  285. 		echo.    酒品        价格^(G块金子^)

  286. 		echo.  ------====^>^>^> ^<^<^<====------

  287. 		echo   - Campari              ^(3G^)

  288. 		echo   - Aperol               ^(4G^)

  289. 		echo   - Niente

  290. 		

  291. 		echo.

  292. 		echo 你的愿望是什么[ 键入 Campari 或 Aperol 即可买酒 , 键入 Niente 即可返回 ]?

  293. 		

  294. 		set /p BEVI=

  295. 		goto BEVI

  296. 	)

  297. 		

  298. 	if /i %DOMANDA%==Mangia (

  299. 

  300. 		cls

  301. 		call color.bat 菜单#0a

  302. 		echo.

  303. 		echo 菜单:

  304. 		echo.

  305. 		echo.    甜品        价格^(G块金子^)

  306. 		echo.  ------====^>^>^> ^<^<^<====------

  307. 		echo   - Struffoli            ^(3G^)

  308. 		echo   - Cassata              ^(4G^)

  309. 		echo   - Tiramisu             ^(5G^)

  310. 		echo   - Niente

  311. 		

  312. 		echo.

  313. 		echo 你的愿望是什么[ 键入 Struffoli / Cassata / Tiramisu 即可购买甜品 , 键入 Niente 即可返回 ]?

  314. 		

  315. 		set /p MANGIA=

  316. 		goto MANGIA

  317. 	)

  318. 		

  319. 	if /i %DOMANDA%==Salva (

  320. 		echo.

  321. 		goto SAVE

  322. 	)

  323. 	

  324. 	if /i %DOMANDA%==Esci (

  325. 		echo.

  326. 		echo %Name%离开了酒吧.

  327. 		pause >nul

  328. 		cls

  329. 		goto STREET_OOON

  330. 	)

  331. 		

  332. 	echo.

  333. 	echo 我不明白... 试着键入"Chiedi"

  334. 	pause >nul

  335. 	cls

  336. 	goto S_BAR_DOMANDA

  337. 		

  338. 	:BEVI

  339. 	if /i %BEVI%==Campari (

  340. 		if %GOLD% GEQ 3 (

  341. 			echo 这是你的 !BEVI! 和气泡酒

  342. 			echo 你想要更多吗?

  343. 			pause >nul

  344. 			set /a GOLD=%GOLD%-3

  345. 			goto S_BAR_MENU

  346. 		) else (

  347. 			echo 你没有金子...

  348. 			echo 你想要更多吗?

  349. 			pause >nul

  350. 			goto S_BAR_MENU
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
4楼
发表于 2021-10-4 13:20 | 只看该作者
回复 3# HOPE2021
源码第五部分:
  1. 		)

  2. 	)

  3. 	

  4. 	if /i %BEVI%==Aperol (

  5. 		if %GOLD% GEQ 4 (

  6. 			echo 这是你的Spritz鸡尾酒... 祝你享受威尼斯的夕阳...

  7. 			echo 你想要更多吗?

  8. 			pause >nul

  9. 			set /a GOLD=%GOLD%-4

  10. 			goto S_BAR_MENU

  11. 		) else (

  12. 			echo 你没有金子...

  13. 			echo 你想要更多吗?

  14. 			pause >nul

  15. 			goto S_BAR_MENU

  16. 		)

  17. 	)

  18. 	

  19. 	if /i %BEVI%==Niente (

  20. 		echo 好的

  21. 		pause >nul

  22. 		cls

  23. 		goto S_BAR_DOMANDA

  24. 	)

  25. 	

  26. 	echo.

  27. 	echo 我不明白... 试着键入"Chiedi"

  28. 	pause >nul

  29. 	goto MENU_BEVI

  30. 	

  31. 	:MANGIA

  32. 

  33. 	if /i %MANGIA%==Struffoli (

  34. 		if %GOLD% GEQ 3 (

  35. 			echo 这是你的蜂蜜糖球...

  36. 			echo 你想要更多吗?

  37. 			pause >nul

  38. 			set /a GOLD=%GOLD%-3

  39. 			goto S_BAR_MENU

  40. 		) else (

  41. 			echo 你没有金子...

  42. 			echo 你想要更多吗?

  43. 			pause >nul

  44. 			goto S_BAR_MENU

  45. 		)

  46. 	)

  47. 	

  48. 	if /i %MANGIA%==Aperol (

  49. 		if %GOLD% GEQ 4 (

  50. 			echo 这是你的卡萨塔... 祝你享受西西里的快乐...

  51. 			echo 你想要更多吗?

  52. 			pause >nul

  53. 			set /a GOLD=%GOLD%-4

  54. 			goto S_BAR_MENU

  55. 		) else (

  56. 			echo 你没有金子...

  57. 			echo 你想要更多吗?

  58. 			pause >nul

  59. 			goto S_BAR_MENU

  60. 		)

  61. 	)

  62. 	

  63. 	if /i %MANGIA%==Aperol (

  64. 		if %GOLD% GEQ 5 (

  65. 			echo 这是你的提拉米苏... 祝你享受意大利的美味...

  66. 			echo 你想要更多吗?

  67. 			pause >nul

  68. 			set /a GOLD=%GOLD%-5

  69. 			goto S_BAR_MENU

  70. 		) else (

  71. 			echo 你没有金子...

  72. 			echo 你想要更多吗?

  73. 			pause >nul

  74. 			goto S_BAR_MENU

  75. 		)

  76. 	)

  77. 	

  78. 	if /i %MANGIA%==Niente (

  79. 		echo 好的

  80. 		pause >nul

  81. 		cls

  82. 		goto S_BAR_DOMANDA

  83. 	)

  84. 	

  85. 	echo.

  86. 	echo 我不明白... 试着键入"Chiedi"

  87. 	pause >nul

  88. 	goto MENU_BEVI

  89. 

  90. :MENU_MAGIE

  91. 	if %MAGIE% EQU 1 (

  92. 		echo.

  93. 		echo [火之激情] - 1

  94. 		echo [魔法栏空]

  95. 		echo [魔法栏空]

  96. 		echo [魔法栏空]

  97. 		echo [魔法栏空]

  98. 		echo [魔法栏空]

  99. 		echo [继续战斗] - Q

  100. 		echo.

  101. 		

  102. 		choice /N /C:1Q /M "你想用什么魔法?: "

  103. 		

  104. 		if errorlevel 2 goto %TURNO%

  105. 		if errorlevel 1 goto ER_1

  106. 	)

  107. 

  108. 	if %MAGIE% EQU 2 (

  109. 		echo.

  110. 		echo [火之激情] - 1

  111. 		echo [冰之冷酷] - 2

  112. 		echo [魔法栏空]

  113. 		echo [魔法栏空]

  114. 		echo [魔法栏空]

  115. 		echo [魔法栏空]

  116. 		echo [继续战斗] - Q

  117. 		echo.

  118. 		

  119. 		choice /N /C:12Q /M "你想用什么魔法?: "

  120. 		

  121. 		if errorlevel 3 goto %TURNO%

  122. 		if errorlevel 2 goto ER_2

  123. 		if errorlevel 1 goto ER_1

  124. 	)

  125. 

  126. 	if %MAGIE% EQU 3 (

  127. 		echo.

  128. 		echo [火之激情] - 1

  129. 		echo [冰之冷酷] - 2

  130. 		echo [全力以赴] - 3

  131. 		echo [魔法栏空]

  132. 		echo [魔法栏空]

  133. 		echo [魔法栏空]

  134. 		echo [继续战斗] - Q

  135. 		echo.

  136. 		

  137. 		choice /N /C:123Q /M "你想用什么魔法?: "

  138. 		

  139. 		if errorlevel 4 goto %TURNO%

  140. 		if errorlevel 3 goto ER_3

  141. 		if errorlevel 2 goto ER_2

  142. 		if errorlevel 1 goto ER_1

  143. 	)

  144. 

  145. 	if %MAGIE% EQU 4 (

  146. 		echo.

  147. 		echo [火之激情] - 1

  148. 		echo [冰之冷酷] - 2

  149. 		echo [全力以赴] - 3

  150. 		echo [水之力量] - 4

  151. 		echo [魔法栏空]

  152. 		echo [魔法栏空]

  153. 		echo [继续战斗] - Q

  154. 		echo.

  155. 		

  156. 		choice /N /C:1234Q /M "你想用什么魔法?: "

  157. 		

  158. 		if errorlevel 5 goto %TURNO%

  159. 		if errorlevel 4 goto ER_4

  160. 		if errorlevel 3 goto ER_3

  161. 		if errorlevel 2 goto ER_2

  162. 		if errorlevel 1 goto ER_1

  163. 	)

  164. 

  165. 	if %MAGIE% EQU 5 (

  166. 		echo.

  167. 		echo [火之激情] - 1

  168. 		echo [冰之冷酷] - 2

  169. 		echo [全力以赴] - 3

  170. 		echo [水之力量] - 4

  171. 		echo [电闪雷鸣] - 5

  172. 		echo [魔法栏空]

  173. 		echo [继续战斗] - Q

  174. 		echo.

  175. 		

  176. 		choice /N /C:12345Q /M "你想用什么魔法?: "

  177. 		

  178. 		if errorlevel 6 goto %TURNO%

  179. 		if errorlevel 5 goto ER_5

  180. 		if errorlevel 4 goto ER_4

  181. 		if errorlevel 3 goto ER_3

  182. 		if errorlevel 2 goto ER_2

  183. 		if errorlevel 1 goto ER_1

  184. 	)

  185. 

  186. 	if %MAGIE% EQU 6 (

  187. 		echo.

  188. 		echo [火之激情] - 1

  189. 		echo [冰之冷酷] - 2

  190. 		echo [全力以赴] - 3

  191. 		echo [水之力量] - 4

  192. 		echo [电闪雷鸣] - 5

  193. 		echo [妙手回春] - 6

  194. 		echo [继续战斗] - Q

  195. 		echo.

  196. 		

  197. 		choice /N /C:123456Q /M "你想用什么魔法?: "

  198. 		

  199. 		if errorlevel 7 goto %TURNO%

  200. 		if errorlevel 6 goto ER_6

  201. 		if errorlevel 5 goto ER_5

  202. 		if errorlevel 4 goto ER_4

  203. 		if errorlevel 3 goto ER_3

  204. 		if errorlevel 2 goto ER_2

  205. 		if errorlevel 1 goto ER_1

  206. 	)

  207. 

  208. :ER_1

  209. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  210. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  211. 			

  212. 	echo %Name%使用了火之激情, 攻击力: %DAMAGE_M%

  213. 			

  214. 	if %HP_EN% LEQ 0 (

  215. 		echo %NAME_EN% 已死亡.

  216. 		set /a END_COMBACT=1

  217. 		pause >nul

  218. 		goto CALCOLO_EXP

  219. 	)

  220. 			

  221. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  222. 		echo %NAME_EN% 已死亡.

  223. 		set /a END_COMBACT=1

  224. 		pause >nul

  225. 		goto CALCOLO_EXP

  226. 	) else (

  227. 		pause >nul

  228. 		goto %TURNO_EN%

  229. 	)

  230. 

  231. :ER_2

  232. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  233. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  234. 

  235. 	echo %Name%使用了冰之冷酷, 攻击力: %DAMAGE_M%

  236. 		

  237. 	if %HP_EN% LEQ 0 (

  238. 		echo %NAME_EN% 已死亡.

  239. 		set /a END_COMBACT=1

  240. 		pause >nul

  241. 		goto CALCOLO_EXP

  242. 	)

  243. 			

  244. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  245. 		echo %NAME_EN% 已死亡.

  246. 		set /a END_COMBACT=1

  247. 		pause >nul

  248. 		goto CALCOLO_EXP

  249. 	) else (

  250. 		pause >nul

  251. 		goto %TURNO_EN%

  252. 	)

  253. 

  254. :ER_3

  255. 	set /a HP_RESTORED=%HP%+(%VAR_MAG%+%MAG%)

  256. 

  257. 	if HP_RESTORED GEQ %HP_MAX% (

  258. 		set /a HP=%HP_MAX%

  259. 		echo %Name%已经全部恢复...

  260. 		pause >nul

  261. 		goto %TURNO_EN%

  262. 	) else (

  263. 		set /a HP=%HP_RESTORED%

  264. 		echo %Name%恢复: %HP_RESTORED% HP

  265. 		pause >nul

  266. 		goto %TURNO_EN%

  267. 	)

  268. 

  269. :ER_4

  270. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  271. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  272. 

  273. 	echo %Name%使用了水之力量, 攻击力: %DAMAGE_M%

  274. 	

  275. 	if %HP_EN% LEQ 0 (

  276. 		echo %NAME_EN% 已死亡.

  277. 		set /a END_COMBACT=1

  278. 		pause >nul

  279. 		goto CALCOLO_EXP

  280. 	)

  281. 			

  282. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  283. 		echo %NAME_EN% 已死亡.

  284. 		set /a END_COMBACT=1

  285. 		pause >nul

  286. 		goto CALCOLO_EXP

  287. 	) else (

  288. 		pause >nul

  289. 		goto %TURNO_EN%

  290. 	)

  291. 

  292. :ER_5

  293. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  294. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  295. 

  296. 	echo %Name%使用了电闪雷鸣, 攻击力: %DAMAGE_M%

  297. 	

  298. 	if %HP_EN% LEQ 0 (

  299. 		echo %NAME_EN% 已死亡.

  300. 		set /a END_COMBACT=1

  301. 		pause >nul

  302. 		goto CALCOLO_EXP

  303. 	)

  304. 			

  305. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  306. 		echo %NAME_EN% 已死亡.

  307. 		set /a END_COMBACT=1

  308. 		pause >nul

  309. 		goto CALCOLO_EXP

  310. 	) else (

  311. 		pause >nul

  312. 		goto %TURNO_EN%

  313. 	)

  314. 

  315. :ER_6

  316. 	if %ST_VELENO% EQU 1 (

  317. 		echo 使用妙手回春，你不再中毒了.

  318. 		set /a ST_VELENO=0

  319. 		pause >nul

  320. 		goto %TURNO_EN%

  321. 	) else (

  322. 		echo %Name%无法使用妙手回春..

  323. 		pause >nul

  324. 		goto %TURNO_EN%

  325. 	)

  326. 

  327. :CALCOLO_EXP

  328. 	set /a EXP=%EXP%+%EXP_EN%

  329. 	echo 你赢了: 获得 %EXP_EN% EXP

  330. 	pause >nul

  331. 	

  332. 	if %LV% EQU 1 if %EXP% GEQ 10 (

  333. 		echo.

  334. 		echo 你的经验足够了...

  335. 		echo 升到第 2 级...

  336. 		pause >nul

  337. 		set /a ATT=%ATT%+3

  338. 		set /a DIF=%DIF%+2

  339. 		set /a MAG=%MAG%+0

  340. 		set /a DIF_M=%DIF_M%+1

  341. 		set /a HP_MAX=%HP_MAX%+15

  342. 		set /a HP=%HP_MAX%+15

  343. 		set /a MAGIE=1

  344. 		set /a LV=2

  345. 		

  346. 		goto SAVE

  347. 	) else (

  348. 		goto SAVE

  349. 	)

  350. 	if %LV% LEQ 2 if %EXP% GEQ 30 (
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
5楼
发表于 2021-10-4 13:20 | 只看该作者
回复 4# HOPE2021
源码第六部分:
  1. 		echo.

  2. 		echo 你的经验足够了...

  3. 		echo 升到第 3 级...

  4. 		pause >nul

  5. 		set /a ATT=%ATT%+1

  6. 		set /a DIF=%DIF%+1

  7. 		set /a MAG=%MAG%+2

  8. 		set /a DIF_M=%DIF_M%+1

  9. 		set /a HP_MAX=%HP_MAX%+20

  10. 		set /a HP=%HP_MAX%+20

  11. 		set /a MAGIE=2

  12. 		set /a LV=3

  13. 		

  14. 		goto SAVE

  15. 	) else (

  16. 		goto SAVE

  17. 	)

  18. 	if %LV% LEQ 3 if %EXP% GEQ 50 (

  19. 		echo.

  20. 		echo 你的经验足够了...

  21. 		echo 升到第 4 级...

  22. 		pause >nul

  23. 		set /a ATT=%ATT%+3

  24. 		set /a DIF=%DIF%+2

  25. 		set /a MAG=%MAG%+1

  26. 		set /a DIF_M=%DIF_M%+2

  27. 		set /a HP_MAX=%HP_MAX%+30

  28. 		set /a HP=%HP_MAX%+30

  29. 		set /a MAGIE=3

  30. 		set /a LV=4

  31. 		

  32. 		goto SAVE

  33. 	) else (

  34. 		goto SAVE

  35. 	)

  36. 	if %LV% LEQ 4 if %EXP% GEQ 80 (

  37. 		echo.

  38. 		echo 你的经验足够了...

  39. 		echo 升到第 5 级...

  40. 		pause >nul

  41. 		set /a ATT=%ATT%+1

  42. 		set /a DIF=%DIF%+3

  43. 		set /a MAG=%MAG%+3

  44. 		set /a DIF_M=%DIF_M%+1

  45. 		set /a HP_MAX=%HP_MAX%+34

  46. 		set /a HP=%HP_MAX%+34

  47. 		set /a MAGIE=4

  48. 		set /a LV=5

  49. 		

  50. 		goto SAVE

  51. 	) else (

  52. 		goto SAVE

  53. 	)

  54. 	if %LV% LEQ 5 if %EXP% GEQ 115 (

  55. 		echo.

  56. 		echo 你的经验足够了...

  57. 		echo 升到第 6 级...

  58. 		pause >nul

  59. 		set /a ATT=%ATT%+2

  60. 		set /a DIF=%DIF%+2

  61. 		set /a MAG=%MAG%+2

  62. 		set /a DIF_M=%DIF_M%+2

  63. 		set /a HP_MAX=%HP_MAX%+38

  64. 		set /a HP=%HP_MAX%+38

  65. 		set /a MAGIE=5

  66. 		set /a LV=6

  67. 		

  68. 		goto SAVE

  69. 	) else (

  70. 		goto SAVE

  71. 	)

  72. 	if %LV% LEQ 6 if %EXP% GEQ 150 (

  73. 		echo.

  74. 		echo 你的经验足够了...

  75. 		echo 升到第 7 级...

  76. 		pause >nul

  77. 		set /a ATT=%ATT%+3

  78. 		set /a DIF=%DIF%+4

  79. 		set /a MAG=%MAG%+3

  80. 		set /a DIF_M=%DIF_M%+4

  81. 		set /a HP_MAX=%HP_MAX%+45

  82. 		set /a HP=%HP_MAX%+45

  83. 		set /a MAGIE=6

  84. 		set /a LV=7

  85. 		

  86. 		goto SAVE

  87. 	) else (

  88. 		goto SAVE

  89. 	)

  90. 

  91. :ATTACCA

  92. 	set /a DAMAGE=(%VAR_ATT%+%ATT%+%EQUIP_ARM%)-%DIF_EN%

  93. 	

  94. 	if %COMBACT% EQU 1 (

  95. 		set /a HP_EN=%HP_EN%-%DAMAGE%

  96. 		echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  97. 

  98. 		if !HP_EN! LEQ 0 (

  99. 			echo %NAME_EN% 已死亡...

  100. 			set /a END_COMBACT=1

  101. 			pause >nul

  102. 			goto CALCOLO_EXP

  103. 		)

  104. 			

  105. 		if !DAMAGE! GEQ %HP_MAX_EN% (

  106. 			echo %NAME_EN% 已死亡...

  107. 			set /a END_COMBACT=1

  108. 			pause >nul

  109. 			goto CALCOLO_EXP

  110. 		) else (

  111. 			pause >nul

  112. 			goto %TURNO_EN%

  113. 		)

  114. 	)

  115. 	

  116. 	if %COMBACT% EQU 2 (

  117. 		if %MID_COMBACT% EQU 0 (

  118. 			if %TAG% EQU 1 (

  119. 				set /a HP_EN=%HP_EN%-%DAMAGE%

  120. 				echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  121. 	

  122. 				if !HP_EN! LEQ 0 (

  123. 					echo %NAME_EN% 已死亡...

  124. 					set /a MID_COMBACT=1

  125. 				pause >nul

  126. 					goto COMBACT_2_ENEMY_NO2

  127. 				)

  128. 			

  129. 				if !DAMAGE! GEQ %HP_MAX_EN% (

  130. 					echo %NAME_EN% 已死亡...

  131. 					set /a MID_COMBACT=1

  132. 					pause >nul

  133. 					goto COMBACT_2_ENEMY_NO2

  134. 				) else (

  135. 					pause >nul

  136. 					goto COMBACT_2_ENEMY_NO1

  137. 				)

  138. 			)

  139. 		

  140. 			if %TAG% EQU 2 (

  141. 				set /a HP_EN_2=%HP_EN_2%-%DAMAGE%

  142. 				echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  143. 	

  144. 				if !HP_EN_2! LEQ 0 (

  145. 					echo %NAME_EN_2% 已死亡...

  146. 					set /a MID_COMBACT=2

  147. 					pause >nul

  148. 					goto COMBACT_2_ENEMY_NO1

  149. 				)

  150. 			

  151. 				if !DAMAGE! GEQ %HP_MAX_EN_2% (

  152. 					echo %NAME_EN_2% 已死亡...

  153. 					set /a MID_COMBACT=2

  154. 					pause >nul

  155. 					goto COMBACT_2_ENEMY_NO1

  156. 				) else (

  157. 					pause >nul

  158. 					goto COMBACT_2_ENEMY_NO1

  159. 				)

  160. 			)

  161. 		)

  162. 		

  163. 		if %MID_COMBACT% EQU 1 (

  164. 			set /a HP_EN_2=%HP_EN_2%-%DAMAGE%

  165. 			echo %Name% 攻击了 %NAME_EN_2%, 攻击力: %DAMAGE%

  166. 

  167. 			if !HP_EN_2! LEQ 0 (

  168. 				echo %NAME_EN_2% 已死亡...

  169. 				set /a END_COMBACT=1

  170. 				pause >nul

  171. 				goto CALCOLO_EXP

  172. 			)

  173. 

  174. 			if !DAMAGE! GEQ %HP_MAX_EN_2% (

  175. 				echo %NAME_EN_2% 已死亡...

  176. 				set /a END_COMBACT=1

  177. 				pause >nul

  178. 				goto CALCOLO_EXP

  179. 			) else (

  180. 				pause >nul

  181. 				goto COMBACT_2_ENEMY_NO2

  182. 			)

  183. 		)

  184. 

  185. 		if %MID_COMBACT% EQU 2 (

  186. 			set /a HP_EN=%HP_EN%-%DAMAGE%

  187. 			echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  188. 

  189. 			if !HP_EN! LEQ 0 (

  190. 				echo %NAME_EN% 已死亡...

  191. 				set /a END_COMBACT=1

  192. 				pause >nul

  193. 				goto CALCOLO_EXP

  194. 			)

  195. 

  196. 			if !DAMAGE! GEQ %HP_MAX_EN% (

  197. 				echo %NAME_EN% 已死亡...

  198. 				set /a END_COMBACT=1

  199. 				pause >nul

  200. 				goto CALCOLO_EXP

  201. 			) else (

  202. 				pause >nul

  203. 				goto COMBACT_2_ENEMY_NO1

  204. 			)

  205. 		)

  206. 	)

  207. 

  208. :COMBACT_1

  209. 	set /a FUGA=%RANDOM% %%100

  210. 	set /a VAR_ATT=%RANDOM% %%5

  211. 	set /a VAR_MAG=%RANDOM% %%5

  212. 	set /a ST_DEF=0

  213. 	set /a COMBACT=1

  214. 	

  215. 	cls

  216. 

  217. 	call color.bat 轮到你了#0a

  218. 	echo.

  219. 	echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  220. 	echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  221. 	echo.

  222. 				

  223. 	if %HP% LEQ 0 (

  224. 		echo.

  225. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  226. 		pause >nul

  227. 		goto END

  228. 	)

  229. 

  230. 	if %HP_EN% LEQ 0 (

  231. 		echo %NAME_EN% 已死亡...

  232. 		set /a END_COMBACT=1

  233. 		pause >nul

  234. 		goto CALCOLO_EXP

  235. 	) else (		

  236. 		choice /N /C:ADMF /M "A[攻击] D[防御] M[魔法] F[逃跑]"

  237. 

  238. 		if errorlevel 4 (

  239. 			echo 逃跑...

  240. 			if %FUGA% GEQ 50 (

  241. 				echo %Name%设法逃走了...

  242. 				pause >nul

  243. 				goto %AMBIENTE%

  244. 			) else (

  245. 				echo %Name%无法逃走...

  246. 				pause >nul

  247. 				goto %TURNO_EN%

  248. 			)

  249. 		)

  250. 	

  251. 		if errorlevel 3 (

  252. 			if %MAGIE% EQU 0 (

  253. 				echo %Name%没有任何魔法... 做无用功...

  254. 				pause >nul

  255. 				goto %TURNO%

  256. 			)

  257. 			if %MAGIE% GEQ 1 goto MENU_MAGIE

  258. 		)

  259. 	

  260. 		if errorlevel 2 (

  261. 			echo 防御^^!我挡^^!^^!^^!

  262. 			set /a ST_DEF=1

  263. 			pause >nul

  264. 			goto %TURNO_EN%

  265. 		)

  266. 		

  267. 		if errorlevel 1 goto ATTACCA

  268. 	)

  269. 

  270. :COMBACT_1_ENEMY

  271. 	set /a VELENO=%RANDOM% %%100

  272. 	set /a VAR_DAMAGE=%RANDOM% %%4

  273. 

  274. 	if %ST_DEF% EQU 0 (

  275. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-%DIF%

  276. 	) else (

  277. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-(%DIF%+%EQUIP_CORPO%)

  278. 	)

  279. 	

  280. 	if %DAMAGE_EN% LEQ 0 (

  281. 		set /a DAMAGE_EN=0

  282. 	)

  283. 				

  284. 	cls

  285. 

  286. 	call color.bat %NAME_EN%#0a 回合#0a

  287. 	echo.

  288. 	echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  289. 	echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  290. 	echo.

  291. 	echo %NAME_EN%攻击了%Name%...

  292. 	echo 攻击力: %DAMAGE_EN%

  293. 				

  294. 	set /a HP=%HP%-%DAMAGE_EN%

  295. 				

  296. 	if %HP_EN% LEQ 0 (

  297. 		echo %NAME_EN% 已死亡...

  298. 		set /a END_COMBACT=1

  299. 		pause >nul

  300. 		goto CALCOLO_EXP

  301. 	)

  302. 			

  303. 	if %HP% LEQ 0 (

  304. 		echo.

  305. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  306. 		pause >nul

  307. 		goto END

  308. 	)

  309. 

  310. 	if %DAMAGE_EN% GEQ %HP_MAX% (

  311. 		echo.

  312. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  313. 		pause >nul

  314. 		goto END

  315. 	) else (

  316. 		if %ST_VELENO% EQU 0 (

  317. 			if %VELENO% GEQ 75 (

  318. 				echo.

  319. 				echo %Name%中毒了...

  320. 				echo 损失: %HP_LOSE% HP

  321. 				set /a HP=%HP%-3

  322. 				set /a ST_VELENO=1

  323. 				if %HP% LEQ 0 (

  324. 					echo.

  325. 					echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  326. 					pause >nul

  327. 					goto END

  328. 				) else (

  329. 					pause >nul

  330. 					goto %TURNO%

  331. 				)

  332. 			) else (

  333. 				pause >nul

  334. 				goto %TURNO%

  335. 			)

  336. 		) else (

  337. 			echo 损失: %HP_LOSE% HP

  338. 			set /a HP=%HP%-3

  339. 			if %HP% LEQ 0 (

  340. 				echo.

  341. 				echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  342. 				pause >nul

  343. 				goto END

  344. 			) else (

  345. 				pause >nul

  346. 				goto %TURNO%

  347. 			)

  348. 		)

  349. 	)

  350.  
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
6楼
发表于 2021-10-4 13:21 | 只看该作者
回复 5# HOPE2021
源码第七部分:
  1. :COMBACT_2

  2. 	set /a FUGA=%RANDOM% %%100

  3. 	set /a VAR_ATT=%RANDOM% %%5

  4. 	set /a VAR_MAG=%RANDOM% %%5

  5. 	set /a ST_DEF=0

  6. 	set /a COMBACT=2

  7. 	

  8. 	if %MID_COMBACT% EQU 0 (

  9. 		set TURNO_EN=COMBACT_2_ENEMY_NO1

  10. 	)

  11. 	

  12. 	if %MID_COMBACT% EQU 1 (

  13. 		set TURNO_EN=COMBACT_2_ENEMY_NO2

  14. 	)

  15. 	

  16. 	if %MID_COMBACT% EQU 2 (

  17. 		set TURNO_EN=COMBACT_2_ENEMY_NO1

  18. 	)

  19. 

  20. 	cls

  21. 	call color.bat 轮到你了#0a

  22. 	echo.

  23. 	

  24. 	if %MID_COMBACT% EQU 0 (

  25. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  26. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  27. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  28. 		echo.

  29. 	)

  30. 	

  31. 	if %MID_COMBACT% EQU 1 (

  32. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  33. 		echo "%NAME_EN% -> Morto.

  34. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  35. 		echo.

  36. 	)

  37. 	

  38. 	if %MID_COMBACT% EQU 2 (

  39. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  40. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  41. 		echo "%NAME_EN_2% -> Morto.

  42. 		echo.

  43. 	)

  44. 	

  45. 	if %HP% LEQ 0 (

  46. 		echo.

  47. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  48. 		pause >nul

  49. 		goto END

  50. 	)

  51. 		

  52. 	if %HP_EN% LEQ 0 if %HP_EN_2% LEQ 0 (

  53. 		echo 僵尸死了...你看着，感到莫名的恶心...

  54. 		set /a END_COMBACT=1

  55. 		pause >nul

  56. 		goto CALCOLO_EXP

  57. 	)

  58. 	

  59. 		if %MID_COMBACT% EQU 0 (

  60. 			choice /N /C:12 /M "攻击谁? [1] %NAME_EN%, [2] %NAME_EN_2%"

  61. 			

  62. 			if errorlevel 2 (

  63. 				set /a TAG=2

  64. 				goto FINE_TARGET

  65. 			)

  66. 			

  67. 			if errorlevel 1 (

  68. 				set /a TAG=1

  69. 				goto FINE_TARGET

  70. 			)

  71. 		)

  72. 		

  73. 		if %MID_COMBACT% EQU 1 (

  74. 			set /a TAG=2

  75. 		)

  76. 		

  77. 		if %MID_COMBACT% EQU 2 (

  78. 			set /a TAG=1

  79. 		)

  80. 		

  81. 		:FINE_TARGET

  82. 		echo.

  83. 		choice /N /C:ADMF /M "A[攻击] D[防御] M[魔法] F[逃跑]"

  84. 

  85. 		if errorlevel 4 (

  86. 			echo Tenti la fugga

  87. 			if %FUGA% GEQ 50 (

  88. 				echo %Name%设法逃走了...

  89. 				pause >nul

  90. 				goto %AMBIENTE%

  91. 			) else (

  92. 				echo %Name%无法逃走...

  93. 				pause >nul

  94. 				goto %TURNO_EN%

  95. 			)

  96. 		)

  97. 	

  98. 		if errorlevel 3 (

  99. 			if %MAGIE% EQU 0 (

  100. 				echo %Name%没有任何魔法... 做无用功...

  101. 				pause >nul

  102. 				goto %TURNO%

  103. 			)

  104. 			if %MAGIE% GEQ 1 goto MENU_MAGIE

  105. 		)

  106. 	

  107. 		if errorlevel 2 (

  108. 			echo 防御^^!我挡^^!^^!^^!

  109. 			set /a ST_DEF=1

  110. 			pause >nul

  111. 			goto %TURNO_EN%

  112. 		)

  113. 		

  114. 		if errorlevel 1 goto ATTACCA

  115. 

  116. :COMBACT_2_ENEMY_NO1

  117. 	set /a VELENO=%RANDOM% %%100

  118. 	set /a VAR_DAMAGE=%RANDOM% %%4

  119. 

  120. 	if %ST_DEF% EQU 0 (

  121. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-%DIF%

  122. 	) else (

  123. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-(%DIF%+%EQUIP_CORPO%)

  124. 	)

  125. 	

  126. 	if %DAMAGE_EN% LEQ 0 (

  127. 		set /a DAMAGE_EN=0

  128. 	)

  129. 

  130. 	if %MID_COMBACT% EQU 2 (

  131. 		cls

  132. 		call color.bat %NAME_EN%#0a 回合#0a

  133. 		echo.

  134. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  135. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  136. 		echo "%NAME_EN_2% -> Morto.

  137. 		echo.

  138. 	) else (

  139. 		cls

  140. 		call color.bat %NAME_EN%#0a 回合#0a

  141. 		echo.

  142. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  143. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  144. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  145. 		echo.

  146. 	)

  147. 	

  148. 	echo %NAME_EN%攻击了%Name%...

  149. 	echo 攻击力: %DAMAGE_EN%

  150. 

  151. 	set /a HP=%HP%-%DAMAGE_EN%

  152. 

  153. 	if %MID_COMBACT% EQU 0 (

  154. 		if %HP_EN% LEQ 0 (

  155. 			echo %NAME_EN% 已死亡...

  156. 			set /a MID_COMBACT=1

  157. 			pause >nul

  158. 			goto COMBACT_2_ENEMY_NO2

  159. 		)

  160. 	)

  161. 	

  162. 	if %MID_COMBACT% EQU 2 (

  163. 		if %HP_EN% LEQ 0 (

  164. 			echo %NAME_EN% 已死亡...

  165. 			set /a END_COMBACT=1

  166. 			pause >nul

  167. 			goto CALCOLO_EXP

  168. 		)

  169. 	)

  170. 

  171. 	if %HP% LEQ 0 (

  172. 		echo.

  173. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  174. 		pause >nul

  175. 		goto END

  176. 	)

  177. 

  178. 	if %DAMAGE_EN% GEQ %HP_MAX% (

  179. 		echo.

  180. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  181. 		pause >nul

  182. 		goto END

  183. 	) else (

  184. 		if %ST_VELENO% EQU 0 (

  185. 			if %VELENO% GEQ 75 (

  186. 				echo.

  187. 				echo %Name%中毒了...

  188. 				echo 损失: %HP_LOSE% HP

  189. 				set /a HP=%HP%-3

  190. 				set /a ST_VELENO=1

  191. 				if %HP% LEQ 0 (

  192. 					echo.

  193. 					echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  194. 					pause >nul

  195. 					goto END

  196. 				) else (

  197. 					pause >nul

  198. 					if %MID_COMBACT% EQU 0 (

  199. 						goto COMBACT_2_ENEMY_NO2

  200. 					) else (

  201. 						goto %TURNO%

  202. 					)

  203. 				)

  204. 			) else (

  205. 				pause >nul

  206. 				if %MID_COMBACT% EQU 0 (

  207. 					goto COMBACT_2_ENEMY_NO2

  208. 				) else (

  209. 					goto %TURNO%

  210. 				)

  211. 			)

  212. 		) else (

  213. 			echo 损失: %HP_LOSE% HP

  214. 			set /a HP=%HP%-3

  215. 			if %HP% LEQ 0 (

  216. 				echo.

  217. 				echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  218. 				pause >nul

  219. 				goto END

  220. 			) else (

  221. 				pause >nul

  222. 				if %MID_COMBACT% EQU 0 (

  223. 					goto COMBACT_2_ENEMY_NO2

  224. 				) else (

  225. 					goto %TURNO%

  226. 				)

  227. 			)

  228. 		)

  229. 	)

  230. 

  231. :COMBACT_2_ENEMY_NO2

  232. 	set /a VELENO=%RANDOM% %%100

  233. 	set /a VAR_DAMAGE=%RANDOM% %%4

  234. 

  235. 	if %ST_DEF% EQU 0 (

  236. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-%DIF%

  237. 	) else (

  238. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-(%DIF%+%EQUIP_CORPO%)

  239. 	)

  240. 	

  241. 	if %DAMAGE_EN% LEQ 0 (

  242. 		set /a DAMAGE_EN=0

  243. 	)

  244. 

  245. 	if %MID_COMBACT% EQU 1 (

  246. 		cls

  247. 		call color.bat %NAME_EN_2%#0a 回合#0a

  248. 		echo.

  249. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  250. 		echo "%NAME_EN% -> Morto.

  251. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  252. 		echo.

  253. 	) else (

  254. 		cls

  255. 		call color.bat TURNO#0a %NAME_EN_2%#0a

  256. 		echo.

  257. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  258. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  259. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  260. 		echo.

  261. 	)

  262. 	

  263. 	echo %NAME_EN_2%攻击了%Name%...

  264. 	echo 攻击力: %DAMAGE_EN%

  265. 

  266. 	set /a HP=%HP%-%DAMAGE_EN%

  267. 

  268. 	if %MID_COMBACT% EQU 0 (

  269. 		if %HP_EN_2% LEQ 0 (

  270. 			echo %NAME_EN_2%已死亡...

  271. 			set /a MID_COMBACT=2

  272. 			pause >nul

  273. 			goto COMBACT_2_ENEMY_NO1

  274. 		)

  275. 	)

  276. 	

  277. 	if %MID_COMBACT% EQU 1 (

  278. 		if %HP_EN_2% LEQ 0 (

  279. 			echo %NAME_EN_2%已死亡...

  280. 			set /a END_COMBACT=1

  281. 			pause >nul

  282. 			goto CALCOLO_EXP

  283. 		)

  284. 	)

  285. 

  286. 	if %HP% LEQ 0 (

  287. 		echo.

  288. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  289. 		pause >nul

  290. 		goto END

  291. 	)

  292. 

  293. 	if %DAMAGE_EN% GEQ %HP_MAX% (

  294. 		echo.

  295. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  296. 		pause >nul

  297. 		goto END

  298. 	) else (

  299. 		if %ST_VELENO% EQU 0 (

  300. 			if %VELENO% GEQ 75 (

  301. 				echo.

  302. 				echo %Name%中毒了...

  303. 				echo 损失: %HP_LOSE% HP

  304. 				set /a HP=%HP%-3

  305. 				set /a ST_VELENO=1

  306. 				if %HP% LEQ 0 (

  307. 					echo.

  308. 					echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  309. 					pause >nul

  310. 					goto END

  311. 				) else (

  312. 					pause >nul

  313. 					goto %TURNO%

  314. 				)

  315. 			) else (

  316. 				pause >nul

  317. 				goto %TURNO%

  318. 			)

  319. 		) else (

  320. 			echo 损失: %HP_LOSE% HP

  321. 			set /a HP=%HP%-3

  322. 			if %HP% LEQ 0 (

  323. 				echo.

  324. 				echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  325. 				pause >nul

  326. 				goto END

  327. 			) else (

  328. 				pause >nul

  329. 				goto %TURNO%

  330. 			)

  331. 		)

  332. 	)

  333. 

  334. :END

  335. echo Game Over...

  336. pause >nul

  337. exit
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
7楼
发表于 2021-11-6 11:20 | 只看该作者
新版本!
更新了!
让老版本的Cmd也能拥有Windows10的色调和感觉!
下一楼放代码!
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
8楼
发表于 2021-11-6 11:21 | 只看该作者
新版本源码第一部分(颜色更改的关键!)
  1. @echo off

  2. Rem 来自https://www.dostips.com/forum/viewtopic.php?f=3&t=9848&p=63348

  3. Rem 作者Lauri

  4. chcp 936 > nul

  5. title 劳里的幻想世界

  6. color 03

  7. echo.

  8. echo.正在加载图形引擎...

  9. If "%1"=="" (

  10.   for %%a in (  QuickEdit:00000000

  11.                 CodePage:000003a8

  12.                 ColorTable00:000c0c0c

  13.                 ColorTable01:00da3700

  14.                 ColorTable02:000ea113

  15.                 ColorTable03:00dd963a

  16.                 ColorTable04:001f0fc5

  17.                 ColorTable05:00981788

  18.                 ColorTable06:00009cc1

  19.                 ColorTable07:00cccccc

  20.                 ColorTable08:00767676

  21.                 ColorTable09:00ff783b

  22.                 ColorTable10:000cc616

  23.                 ColorTable11:00d6d661

  24.                 ColorTable12:005648e7

  25.                 ColorTable13:009e00b4

  26.                 ColorTable14:00a5f1f9

  27.                 ColorTable15:00f2f2f2

  28.   ) do For /F "tokens=1,2 delims=:" %%b in ("%%a") do (

  29.     >nul Reg add HKCU\Console\DosBatch_Lauri_Fantasy /v %%b /t reg_dword /d 0x%%c /f

  30.   )

  31.   Start "DosBatch_Lauri_Fantasy" "%ComSpec%" /c "%~s0" 1&Goto:eof

  32. 

  33. ) Else ( >nul reg delete HKCU\Console\DosBatch_Lauri_Fantasy /f )

  34. @goto INSTALL_COLOR

  35. 

  36. :INSTALL_COLOR

  37. (

  38. echo.@echo off

  39. echo.chcp 936 ^> nul

  40. echo.Setlocal EnableDelayedExpansion

  41. echo.REM setlocal enableextensions

  42. echo.set dstdir=C:\tmpColorDirtoDelete

  43. echo.IF EXIST %%dstdir%% goto errExist

  44. echo.@mkdir %%dstdir%%

  45. echo.@cd %%dstdir%%

  46. echo.set count=0

  47. echo.REM DEFINISCO IL CARATTERE BACKSPACE!

  48. echo.set "$Defines=$BS"    & set "$Details=Create $ESC Ascii-0x1B-27, Expansion insensitive"

  49. echo.   for /f "delims=#" %%%%a in ^(

  50. echo.      '"prompt #$H# &echo on &for %%%%b in (1) do rem"'

  51. echo.   ^) do ^(

  52. echo.      set "%%$Defines%%=%%%%a"

  53. echo.      set "%%$Defines%%=!$BS:~0,1!"

  54. echo.   ^)

  55. echo.FOR %%%%a IN ^(%%*^) DO ^(

  56. echo. FOR /F "usebackq delims=# tokens=1,*" %%%%b IN ^('%%%%a'^) DO ^(

  57. echo.    REM echo %%%%b sara' di colore %%%%c

  58. echo.    set /A count=!count!+1

  59. echo.    set nomefile=%%%%b

  60. echo.    IF %%%%c.==. ^(

  61. echo.        set colore=03

  62. echo.    ^) ELSE ^(

  63. echo.    set colore=%%%%c

  64. echo.    ^)

  65. echo.    REM SET /P ".=" %%%%b

  66. echo.    SET /P ".=%%$BS%% " ^<nul ^>%%%%b

  67. echo.    REM echo !count!^>%%%%b

  68. echo.    REM echo FINDSTR /A:%%%%c /C:"!count!" /S "%%%%b"

  69. echo.    REM more %%%%b

  70. echo.    set bin=%%%%b

  71. echo. ^)

  72. echo. REM FINE INNER FOR

  73. echo.    REM echo FINDSTR /A:!colore! /C:"!count!" /S "!nomefile!"

  74. echo.    FINDSTR /A:!colore! /C:" " /S "!nomefile!"

  75. echo.    REM goto end

  76. echo.^)

  77. echo.REM FINE OUTER FOR

  78. echo.echo.

  79. echo.REM ERROR HANDLING

  80. echo.goto chiusura

  81. echo.:errExist

  82. echo.echo 临时目录%%dstdir%%已存在.在继续或更改批处理中的路径之前将其删除.

  83. echo.goto pulizia

  84. echo.:chiusura

  85. echo.:pulizia

  86. echo.cd..

  87. echo.rd /S /Q %%dstdir%%

  88. echo.goto end

  89. echo.:end

  90. ) > color.bat

  91. SetLocal EnableDelayedExpansion

  92. 

  93. :LOAD

  94. 	if EXIST "%UserProFile%\Save.Txt" (

  95. 		echo.

  96. 		echo 发现存档^^!

  97. 		echo.

  98. 		echo 你想加载游戏吗?

  99. 		call color.bat [S]#0c 想 [N]#0c 不想

  100. 		

  101. 		choice /N /C:SN

  102. 		

  103. 		if errorlevel 2 (

  104. 			echo.

  105. 			echo 新的开始.

  106. 			pause >nul

  107. 			

  108. 			goto START

  109. 		)

  110. 		if errorlevel 1 (

  111. 			for /F "usebackq tokens=1-18 delims=," %%G in ("%UserProFile%\Save.Txt") do (

  112. 				set AMBIENTE=%%G

  113. 				set ATT=%%H

  114. 				set DIF=%%I

  115. 				set MAG=%%J

  116. 				set DIF_M=%%K

  117. 				set HP_MAX=%%L

  118. 				set HP=%%M

  119. 				set MAGIE=%%N

  120. 				set LV=%%O

  121. 				set EXP=%%P

  122. 				set END_COMBACT=%%Q

  123. 				set EQUIP_ARM=%%R

  124. 				set EQUIP_CORPO=%%S

  125. 				set EQUIP_ELM=%%T

  126. 				set NAME=%%U

  127. 				set SWT_LOC_A=%%V

  128. 				set GOLD=%%W

  129. 				set STORY=%%X

  130. 				set /a ST_VELENO=0

  131. 				set NAME_EN=

  132. 				set /a HP_LOSE=3

  133. 

  134. 				set /a LOOP_L=0

  135. 				

  136. 				goto LOOP_ECHO_LOAD

  137. 			)

  138. 		)

  139. 	) else (

  140. 		goto START

  141. 	)

  142. 

  143. :SAVE

  144. 	set /a LOOP_S=0

  145. 	

  146. 	goto LOOP_ECHO_SAVE

  147. 		

  148. :LOOP_ECHO_LOAD

  149. 	if %LOOP_L% EQU 0 (

  150. 		cls

  151. 		echo.

  152. 		echo 正在加载 .

  153. 		set /a LOOP_L=%LOOP_L%+1

  154. 		

  155. 		choice /N /C:P /T 0 /D P

  156. 		goto LOOP_ECHO_LOAD

  157. 	)

  158. 				

  159. 	if %LOOP_L% EQU 1 (

  160. 		cls

  161. 		echo.

  162. 		echo 正在加载 . .

  163. 		set /a LOOP_L=%LOOP_L%+1

  164. 		

  165. 		choice /N /C:P /T 0 /D P

  166. 		goto LOOP_ECHO_LOAD

  167. 	)

  168. 	

  169. 	if %LOOP_L% EQU 2 (

  170. 		cls

  171. 		echo.

  172. 		echo 正在加载 . . .

  173. 		set /a LOOP_L=0

  174. 

  175. 		choice /N /C:P /T 0 /D P

  176. 		if errorlevel 1 goto %AMBIENTE%

  177. 	)

  178. 

  179. :LOOP_ECHO_SAVE

  180. 	if %LOOP_S% EQU 0 (

  181. 		cls

  182. 		echo.

  183. 		echo 存档中 .

  184. 		set /a LOOP_S=%LOOP_S%+1

  185. 		choice /N /C:P /T 0 /D P

  186. 		

  187. 		goto LOOP_ECHO_SAVE

  188. 	)

  189. 				

  190. 	if %LOOP_S% EQU 1 (

  191. 		cls

  192. 		echo.

  193. 		echo 存档中 . .

  194. 		set /a LOOP_S=%LOOP_S%+1

  195. 		choice /N /C:P /T 0 /D P

  196. 			

  197. 		goto LOOP_ECHO_SAVE

  198. 	)

  199. 	

  200. 	if %LOOP_S% EQU 2 (

  201. 		cls

  202. 		echo.

  203. 		echo 存档中 . . .

  204. 		set /a LOOP_S=0

  205. 

  206. 		choice /N /C:P /T 0 /D P

  207. 		echo %AMBIENTE%,%ATT%,%DIF%,%MAG%,%DIF_M%,%HP_MAX%,%HP%,%MAGIE%,%LV%,%EXP%,%END_COMBACT%,%EQUIP_ARM%,%EQUIP_CORPO%,%EQUIP_ELM%,%NAME%,%SWT_LOC_A%,%GOLD%,%STORY% > "%UserProFile%\Save.Txt"

  208. 

  209. 		goto %AMBIENTE%

  210. 	)

  211. 	

  212. :START

  213. set /a EQUIP_ARM=0

  214. :: 3= SPADA ATT +3

  215. :: 5= LANCIA ATT +5

  216. :: 7= PUGNALE ATT +7

  217. :: 2= ASTA +2 MAG

  218. :: 4= PISTOLA +4 MAG

  219. :: 8= LONGINUS +8 MAG

  220. 

  221. set /a EQUIP_CORPO=0

  222. :: 1= MAGLIA DIF +1

  223. :: 3= GIUBOTTO DIF+3

  224. :: 8= CORAZZA DIF +8

  225. 

  226. set /a EQUIP_ELM=0

  227. :: 2= CAPPELLO DIF_MAG +2

  228. :: 5= BASCO DIF_MAG +5

  229. :: 7= ELMO DIF_MAG +7

  230. 

  231. set /a ATT=2

  232. set /a DIF=1

  233. set /a MAG=0

  234. set /a DIF_M=0

  235. set /a EXP=0

  236. set /a HP=30

  237. set /a HP_MAX=30

  238. set /a LV=1

  239. 

  240. set /a ST_VELENO=0

  241. :: 1= AVVELENATO

  242. 

  243. set /a HP_LOSE=3

  244. :: HP PERSI PER EFFETTO DEL VELENO

  245. 

  246. set /a END_COMBACT=0

  247. 

  248. set /a MAGIE=0

  249. :: FIRE=1

  250. :: ICE=2

  251. :: ENERGIA=3

  252. :: IDRO=4

  253. :: THUNDER=5

  254. :: ESNA=6

  255. 

  256. set /a SWT_LOC_A=0

  257. :: VARIABILE PER I SOLDI TROVATI NEL MONDO

  258. 

  259. set /a GOLD=0

  260. ::SOLDI DEL GIOCO

  261. 

  262. set /a STORY=0

  263. ::VARIABILE DELLA STORIA

  264. 

  265. set NAME_EN=

  266. 

  267. 

  268. cls

  269. echo.欢迎来到虚拟世界，这里使用了有史以来最好的图形引擎，你的大脑^^!

  270. pause >nul

  271. 

  272. cls

  273. 

  274. call color.bat 选择 [S]#0c 开始或选择 [N]#0c 退出

  275. choice /N /C:SN

  276. 

  277. if errorlevel 2 goto END

  278. if errorlevel 1 goto BEGIN_GAME

  279. 

  280. :BEGIN

  281. 	cls

  282. 	call color.bat 你的房子#0a

  283. 	echo.

  284. 	echo 你是离开房子还是在房间里踱步?

  285. 

  286. 	call color.bat 选择 [A]#0c 离开或选择 [D]#0c 停留

  287. 	choice /N /C:AD

  288. 	

  289. 	if errorlevel 2 goto IN_HOME

  290. 	if errorlevel 1 goto OUT_HOME

  291. 

  292. :BEGIN_GAME

  293. 	echo.

  294. 	set /p NAME=你的名字叫什么? 

  295. 

  296. 	if /i DEFINED NAME (

  297. 		echo.

  298. 		echo %NAME%你好, 你好，欢迎来到劳里的世界^^!

  299. 		echo 你准备好开始你的冒险了吗？

  300. 		call color.bat 按 [Enter键]#0c 开始。

  301. 		pause >nul

  302. 	) else (

  303. 		cls

  304. 		echo 请输入您的姓名^^!

  305. 		pause >nul

  306. 		goto BEGIN_GAME

  307. 	)

  308. 

  309. cls

  310. call color.bat 你的房子#0a 

  311. echo.

  312. echo 嗯，刚刚醒来，马上就发现了一些奇怪的事情...

  313. echo 是啊...太安静了，有点不对劲...

  314. echo 走近前门想做点什么...

  315. echo 是离开房子还是在房间里踱步?

  316. 

  317. 	call color.bat 选择 [A]#0c 离开或选择 [D]#0c 停留

  318. 	choice /N /C:AD

  319. 	

  320. 	if errorlevel 2 goto IN_HOME

  321. 	if errorlevel 1 goto OUT_HOME

  322. 

  323. 	:OUT_HOME

  324. 		cls

  325. 		call color.bat 屋外#0a

  326. 		echo.

  327. 		echo 我听不到任何噪音...

  328. 		echo 我步行时注意到朋友的房子...

  329. 		echo 门开着...

  330. 		echo 决定进去还是继续?

  331. 		

  332. 		call color.bat 选择 [A]#0c 进入或选择 [D]#0c 继续或 [X]#0c 返回

  333. 		choice /N /C:ADX

  334. 		

  335. 		if errorlevel 3 goto BEGIN

  336. 		if errorlevel 2 goto STREET

  337. 		if errorlevel 1 goto FRIEND_HOUSE

  338. 

  339. 	:IN_HOME

  340. 		cls

  341. 		call color.bat 走廊#0a

  342. 		echo.

  343. 		echo 想去哪个房间?

  344. 

  345. 		call color.bat 选择 [A]#0c 去厨房 [D]#0c 去卧室 [G]#0c 去浴室 [J]#0c 客厅

  346. 		choice /N /C:ADGJ

  347. 

  348. 		if errorlevel 4 goto SALA

  349. 		if errorlevel 3 goto BAGNO

  350. 		if errorlevel 2 goto CAMERA
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
9楼
发表于 2021-11-6 11:22 | 只看该作者
新版本源码第二部分
  1. 		if errorlevel 1 goto CUCINA

  2. 

  3. 		:CUCINA

  4. 			cls

  5. 			call color.bat 厨房#0a

  6. 			echo.

  7. 			echo 这里也没有人...电线断了...

  8. 			echo 妈妈一定忘了关上它...

  9. 			echo 回去吧...

  10. 			pause >nul

  11. 			goto BEGIN

  12. 		:CAMERA

  13. 			if %EQUIP_ARM% EQU 0 (

  14. 				cls

  15. 				call color.bat 卧室#0a

  16. 				echo.

  17. 				echo 床没铺好...

  18. 				echo 我检查了壁橱...

  19. 				call color.bat 找到#03 黑桃#0c [ATT#0c +3]#0c

  20. 				set /a EQUIP_ARM=3

  21. 				echo 回去吧...

  22. 				pause >nul

  23. 				goto BEGIN

  24. 			)

  25. 			if %EQUIP_ARM% GEQ 1 (

  26. 				cls

  27. 				call color.bat 卧室#0a

  28. 				echo.

  29. 				echo 床没铺好...

  30. 				echo 我检查了壁橱...

  31. 				echo 什么都没有了...

  32. 				echo 回去吧...

  33. 				pause >nul

  34. 				goto BEGIN

  35. 			)

  36. 		:BAGNO

  37. 			cls

  38. 			call color.bat 浴室#0a

  39. 			echo.

  40. 			echo 啊... 我需要好好洗个澡...

  41. 			echo 回去吧...

  42. 			pause >nul

  43. 			goto BEGIN

  44. 		:SALA

  45. 			cls

  46. 			call color.bat 客厅#0a

  47. 			echo.

  48. 			echo 灯亮着... 真奇怪...

  49. 			echo 回去吧...

  50. 			pause >nul

  51. 			goto BEGIN

  52. 

  53. 	:FRIEND_HOUSE

  54. 		if %END_COMBACT% EQU 0 (

  55. 			cls

  56. 			call color.bat 朋友的家#0a

  57. 			echo.

  58. 			echo 这里似乎也没有人...

  59. 			echo 我想我听到了声音...

  60. 			echo 从客厅出来...

  61. 			echo 要做什么，给朋友打电话还是检查房间？

  62. 		

  63. 			call color.bat 选择 [A]#0c 给朋友打电话或选择 [D]#0c 检查房间

  64. 			choice /N /C:AD

  65. 

  66. 			if errorlevel 2 goto ROOM_FRIEND_HOUSE

  67. 			if errorlevel 1 goto VOICE_1

  68. 		) else (

  69. 			cls

  70. 			call color.bat 朋友的家#0a

  71. 			echo.

  72. 			echo 一个死去的僵尸躺在地上...

  73. 			echo 似乎没有什么有趣的事...

  74. 			pause >nul

  75. 			goto OUT_HOME

  76. 		)

  77. 

  78. 		:ROOM_FRIEND_HOUSE

  79. 			cls

  80. 			call color.bat 房间#0a

  81. 			echo.

  82. 			echo 哦，我的天啊，真是太可怕了...

  83. 			echo 我的邻居好像变成了僵尸^^!^^!^^!

  84. 			echo 攻击我^^!^^!^^!

  85. 			echo.

  86. 			pause >nul

  87. 

  88. 				set /a HP_EN=20

  89. 				set /a HP_MAX_EN=20

  90. 				set /a ATT_EN=1

  91. 				set /a DIF_EN=1

  92. 				set /a MAG_EN=0

  93. 				set /a DIF_M_EN=0

  94. 

  95. 				set NAME_EN=僵尸

  96. 				set AMBIENTE=FRIEND_HOUSE

  97. 				set TURNO=COMBACT_1

  98. 				set TURNO_EN=COMBACT_1_ENEMY

  99. 

  100. 				set /a ST_VELENO=0

  101. 

  102. 				set /a EXP_EN=3

  103. 				

  104. 				goto COMBACT_1

  105. 

  106. 	:VOICE_1

  107. 		cls.

  108. 		call color.bat 朋友的家#0a

  109. 		echo.

  110. 		echo 试着打电话给邻居,

  111. 		echo 似乎没有人回答...

  112. 		echo %Name%试着提高声音...

  113. 		echo 有奇怪的吼声... 从房间里传来... 

  114. 		echo 发生了什么?

  115. 

  116. 		call color.bat 是要离开 [A]#0c 还是检查 [D]#0c

  117. 		choice /N /C:AD

  118. 

  119. 		if errorlevel 2 goto ROOM_FRIEND_HOUSE

  120. 		if errorlevel 1 goto OUT_HOME

  121. 		

  122. 	:STREET

  123. 		cls

  124. 		call color.bat 街头#0a

  125. 		echo.

  126. 		echo 你站在十字路口...

  127. 		echo 冷风飒飒... 乌云密布

  128. 		echo 一个指示牌歪歪斜斜... 指着东南西北...

  129. 		echo.

  130. 		echo 该向那儿走?

  131. 		call color.bat [W]#0c 直走 [A]#0c 向左 [D]#0c 向右 [X]#0c 返回

  132. 		

  133. 		choice /N /C:WADX

  134. 

  135. 		if errorlevel 4 goto OUT_HOME

  136. 		if errorlevel 3 goto STREET_E

  137. 		if errorlevel 2 goto STREET_O

  138. 		if errorlevel 1 goto STREET_N

  139. 

  140. 	:STREET_N

  141. 		cls

  142. 		call color.bat 街头#0a

  143. 		echo.

  144. 		call color.bat [W]#0c 继续前行 [X]#0c 打道回府

  145. 

  146. 		choice /N /C:WX

  147. 

  148. 		if errorlevel 2 goto STREET

  149. 		if errorlevel 1 goto STREET_NN

  150. 		

  151. 		:STREET_NN

  152. 			cls

  153. 			call color.bat 街头#0a

  154. 			echo.

  155. 			echo 这条路似乎到此为止...

  156. 			echo 最好回去...

  157. 			pause >nul

  158. 	

  159. 			goto STREET_N

  160. 

  161. 	:STREET_O

  162. 		cls

  163. 		call color.bat 街头#0a

  164. 		echo.

  165. 		echo %Name%看到一座尖塔...

  166. 		call color.bat [W]#0c 直走 [A]#0c 左转 [X]#0c 返回

  167. 

  168. 		choice /N /C:WAX

  169. 

  170. 		if errorlevel 3 goto STREET

  171. 		if errorlevel 2 goto STREET_OS

  172. 		if errorlevel 1 goto STREET_OO

  173. 

  174. 		:STREET_OO

  175. 			cls

  176. 			call color.bat 街头#0a

  177. 			echo.

  178. 			call color.bat [W]#0c 直走 [X]#0c 返回

  179. 

  180. 			choice /N /C:WX

  181. 

  182. 			if errorlevel 2 goto STREET_O

  183. 			if errorlevel 1 goto STREET_OOO

  184. 		

  185. 			:STREET_OOO

  186. 				cls

  187. 				call color.bat 街头#0a

  188. 				echo.

  189. 				echo %Name%看到一座尖塔...

  190. 				call color.bat [W]#0c 直走 [A]#0c 向左走 [D]#0c 向右走 [X]#0c 返回

  191. 

  192. 				choice /N /C:WADX

  193. 

  194. 				if errorlevel 4 goto STREET_OO

  195. 				if errorlevel 3 goto STREET_OOON

  196. 				if errorlevel 2 goto STREET_OOOS

  197. 				if errorlevel 1 goto STREET_OOOO

  198. 				

  199. 				:STREET_OOON

  200. 					cls

  201. 					call color.bat 街头#0a

  202. 					echo.

  203. 					echo 去酒吧，也许是个好主意...

  204. 					echo 进去，我可以喝一杯或者...

  205. 					echo 也许我应该晚一点回去...

  206. 					echo.

  207. 					

  208. 					call color.bat [A]#0c 进去 [D]#0c 返回

  209. 					

  210. 					choice /N /C:AD 

  211. 					

  212. 					if errorlevel 2 goto STREET_OOO

  213. 					if errorlevel 1 goto BAR_1

  214. 					

  215. 				:STREET_OOOO

  216. 					if %SWT_LOC_A% EQU 0 (

  217. 						cls

  218. 						call color.bat 街头#0a

  219. 						echo.

  220. 						echo 嘿，你找到3块金子了^^!

  221. 						set /a GOLD=%GOLD%+3

  222. 						pause >nul

  223. 						

  224. 						set /a SWT_LOC_A=1

  225. 						goto STREET_OOO

  226. 					)

  227. 					

  228. 					if %SWT_LOC_A% EQU 1 (

  229. 						cls

  230. 						call color.bat 街头#0a

  231. 						echo.

  232. 						echo 这里什么也没有... 这条路似乎到此为止...

  233. 						echo 最好回去...

  234. 						pause >nul

  235. 

  236. 						goto STREET_OOO

  237. 					)

  238. 

  239. 				:STREET_OOOS

  240. 					

  241. 					cls

  242. 					call color.bat 街头#0a

  243. 					echo.

  244. 					echo 这条路似乎到此为止...

  245. 			                                echo 最好回去...

  246. 					pause >nul

  247. 

  248. 					goto STREET_OOO

  249. 		:STREET_OS

  250. 			cls

  251. 			call color.bat 街头#0a

  252. 			echo.

  253. 			call color.bat [W]#0c 直走 [X]#0c 返回

  254. 

  255. 			choice /N /C:WX

  256. 

  257. 			if errorlevel 2 goto STREET_O

  258. 			if errorlevel 1 goto STREET_OSS

  259. 

  260. 			:STREET_OSS

  261. 				cls

  262. 				call color.bat 街头#0a

  263. 				echo.

  264. 				echo %Name%找到了一个休息的地方,

  265. 				echo 这里可以恢复精力...

  266. 				set /a HP=%HP_MAX%

  267. 				pause >nul

  268. 

  269. 				echo.

  270. 				call color.bat [D]#0c 向右 [X]#0c 返回

  271. 

  272. 				choice /N /C:DX

  273. 

  274. 				if errorlevel 2 goto STREET_OS

  275. 				if errorlevel 1 goto STREET_OSSO

  276. 

  277. 				:STREET_OSSO

  278. 					cls

  279. 					call color.bat 街头#0a

  280. 					echo.

  281. 					echo %Name%遇到了一个僵尸...

  282. 					echo 它攻击%Name%

  283. 					echo.

  284. 					pause >nul

  285. 

  286. 						set /a HP_EN=25

  287. 						set /a HP_MAX_EN=25

  288. 						set /a ATT_EN=1

  289. 						set /a DIF_EN=2

  290. 						set /a MAG_EN=0

  291. 						set /a DIF_M_EN=0

  292. 

  293. 						set NAME_EN=僵尸

  294. 						set AMBIENTE=STREET_OSS

  295. 						set TURNO=COMBACT_1

  296. 						set TURNO_EN=COMBACT_1_ENEMY

  297. 

  298. 						set /a ST_VELENO=0

  299. 	

  300. 						set /a EXP_EN=7

  301. 				

  302. 						goto COMBACT_1

  303. 

  304. 

  305. 	:STREET_E

  306. 		cls

  307. 		call color.bat 街头#0a

  308. 		echo.

  309. 		echo %Name%看到一座尖塔...

  310. 		call color.bat [A]#0c 向左 [D]#0c 向右 [X]#0c 返回

  311. 

  312. 		choice /N /C:ADX

  313. 

  314. 		if errorlevel 3 goto STREET

  315. 		if errorlevel 2 goto STREET_ES

  316. 		if errorlevel 1 goto STREET_EN

  317. 

  318. 		:STREET_EN

  319. 			cls

  320. 			call color.bat 街头#0a

  321. 			echo.

  322. 			call color.bat [D]#0c 向右 [X]#0c 返回

  323. 

  324. 			choice /N /C:DX

  325. 

  326. 			if errorlevel 2 goto STREET_E

  327. 			if errorlevel 1 goto STREET_ENE

  328. 			

  329. 			:STREET_ENE

  330. 				cls

  331. 				call color.bat 街头#0a

  332. 				echo.

  333. 				call color.bat [W]#0c 直走 [X]#0c 返回

  334. 

  335. 				choice /N /C:WX

  336. 

  337. 				if errorlevel 2 goto STREET_EN

  338. 				if errorlevel 1 goto STREET_ENEE

  339. 				

  340. 				:STREET_ENEE

  341. 					cls

  342. 					call color.bat 街头#0a

  343. 					echo.

  344. 					echo %Name%找到了一个休息的地方,

  345. 					echo 这里可以恢复精力...

  346. 					set /a HP=%HP_MAX%

  347. 					pause >nul

  348. 

  349. 					echo.

  350. 					call color.bat [X]#0c 返回
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
10楼
发表于 2021-11-6 11:23 | 只看该作者
新版本源码第三部分
  1.  

  2. 					choice /N /C:X

  3. 

  4. 					if errorlevel 1 goto STREET_ENE

  5. 				

  6. 		:STREET_ES

  7. 			cls

  8. 			call color.bat 街头#0a

  9. 			echo.

  10. 			echo %Name%看到一座尖塔...

  11. 			call color.bat [W]#0c 直走 [A]#0c 向左 [D]#0c 向右 [X]#0c 返回

  12. 

  13. 			choice /N /C:WADX

  14. 

  15. 			if errorlevel 4 goto STREET_E

  16. 			if errorlevel 3 goto STREET_ESO

  17. 			if errorlevel 2 goto STREET_ESE

  18. 			if errorlevel 1 goto STREET_ESS

  19. 			

  20. 			:STREET_ESO

  21. 				cls

  22. 				call color.bat 街头#0a

  23. 				echo.

  24. 				call color.bat [W]#0c 直走 [X]#0c 返回

  25. 

  26. 				choice /N /C:WX

  27. 

  28. 				if errorlevel 2 goto STREET_ES

  29. 				if errorlevel 1 goto STREET_ESOO

  30. 		

  31. 			:STREET_ESE

  32. 				cls

  33. 				call color.bat 街头#0a

  34. 				echo.

  35. 				call color.bat [W]#0c 直走 [X]#0c 返回

  36. 

  37. 				choice /N /C:WX

  38. 	

  39. 				if errorlevel 2 goto STREET_ES

  40. 				if errorlevel 1 goto STREET_ESEE

  41. 			

  42. 			:STREET_ESS

  43. 				cls

  44. 				call color.bat 街头#0a

  45. 				echo.

  46. 				call color.bat [A]#0c 向左 [X]#0c 返回

  47. 

  48. 				choice /N /C:AX

  49. 

  50. 				if errorlevel 2 goto STREET_ES

  51. 				if errorlevel 1 goto STREET_ESSE

  52. 			

  53. 				:STREET_ESOO

  54. 					cls

  55. 					call color.bat 街头#0a

  56. 					echo.

  57. 					echo 这条路似乎到此为止...

  58. 					echo 最好回去...

  59. 					pause >nul

  60. 				

  61. 					goto STREET_ESO

  62. 					

  63. 				:STREET_ESEE

  64. 					cls

  65. 					call color.bat COMBATTI#0a

  66. 					echo.

  67. 					echo %Name%遇到了一个僵尸...

  68. 					echo 它攻击%Name%

  69. 					echo.

  70. 					pause >nul

  71. 					

  72. 						set /a HP_EN=25

  73. 						set /a HP_MAX_EN=25

  74. 						set /a ATT_EN=1

  75. 						set /a DIF_EN=2

  76. 						set /a MAG_EN=0

  77. 						set /a DIF_M_EN=0

  78. 

  79. 						set NAME_EN=僵尸

  80. 						set AMBIENTE=STREET_ESE

  81. 						set TURNO=COMBACT_1

  82. 						set TURNO_EN=COMBACT_1_ENEMY

  83. 

  84. 						set /a ST_VELENO=0

  85. 	

  86. 						set /a EXP_EN=7

  87. 				

  88. 						goto COMBACT_1

  89. 				

  90. 				:STREET_ESSE

  91. 					cls

  92. 					call color.bat 街头#0a

  93. 					echo.

  94. 					echo %Name%看到一座尖塔...

  95. 					call color.bat [W]#0c 直走 [D]#0c 向右 [X]#0c 返回

  96. 

  97. 					choice /N /C:WDX

  98. 

  99. 					if errorlevel 3 goto STREET_ESS

  100. 					if errorlevel 2 goto STREET_ESSES

  101. 					if errorlevel 1 goto STREET_ESSEE

  102. 					

  103. 					:STREET_ESSES

  104. 						cls

  105. 						

  106. 						if %STORY% LEQ 0 (

  107. 							call color.bat 街边-森林#0a

  108. 							echo.

  109. 							echo %Name%走进一片森林，听到远处有人声...

  110. 							echo 还是检查一下吧...

  111. 							echo.

  112. 							echo 那是%Name%遇见伴侣的时候...

  113. 							pause >nul

  114. 						

  115. 							goto BOSCO

  116. 						) else (

  117. 							call color.bat 街边-森林#0a

  118. 							echo.

  119. 							echo %Name%已经到达一个森林的入口，想做什么？

  120. 							call color.bat [W]#0c 去森林 [X]#0c 返回

  121. 							choice /N /C:WX

  122. 							

  123. 							if errorlevel 2 goto STREET_ESSE

  124. 							if errorlevel 1 goto BOSCO

  125. 						)

  126. 					

  127. 					:STREET_ESSEE

  128. 						cls

  129. 						call color.bat 街头#0a

  130. 						echo.

  131. 						echo 这条路似乎到此为止...

  132. 					                echo 最好回去...

  133. 						pause >nul

  134. 				

  135. 						goto STREET_ESSE

  136. 						

  137. 	:BOSCO

  138. 		if %STORY% LEQ 0 (

  139. 			cls

  140. 			call color.bat 森林#0a

  141. 			echo.

  142. 			echo 嘿，前面有很多僵尸...

  143. 			echo 这里，可能需要这个...

  144. 			echo 啊，但是后来我听说了一家商店...

  145. 			echo 在那里... 哦，可以买一些必需品...

  146. 			echo.

  147. 			echo 您已获得: 毛衣

  148. 			set /a EQUIP_CORPO=1

  149. 			set /a STORY=%STORY%+1

  150. 			echo.

  151. 			echo 乔瓦尼离开了，呆在森林的你开始做什么？

  152. 			echo 继续前行还是返回?

  153. 			

  154. 			call color.bat [W]#0c 继续向前 [X]#0c 返回

  155. 			choice /N /C:WX

  156. 			

  157. 			if errorlevel 2 goto STREET_ESSES

  158. 			if errorlevel 1 goto BOSCO_1

  159. 		) else (

  160. 			cls

  161. 			call color.bat 森林#0a

  162. 			echo.

  163. 			echo 你在树林里干什么?

  164. 			echo 继续前行或返回?

  165. 			

  166. 			call color.bat [W]#0c 继续前行 [X]#0c 返回

  167. 			choice /N /C:WX

  168. 			

  169. 			if errorlevel 2 goto STREET_ESSES

  170. 			if errorlevel 1 goto BOSCO_1

  171. 		)

  172. 		

  173. 	:BOSCO_1

  174. 		set /a VAR_INC=%RANDOM% %%100

  175. 		

  176. 		if !VAR_INC! GEQ 60 (

  177. 			cls

  178. 			call color.bat 森林-战场#0a

  179. 			echo.

  180. 			echo %Name%遇到一个僵尸，它攻击%Name%...

  181. 			pause >nul

  182. 			

  183. 			set /a HP_EN=40

  184. 			set /a HP_MAX_EN=40

  185. 			set /a ATT_EN=4

  186. 			set /a DIF_EN=5

  187. 			set /a MAG_EN=0

  188. 			set /a DIF_M_EN=0

  189. 

  190. 			set NAME_EN=僵尸1

  191. 			set AMBIENTE=BOSCO

  192. 			set TURNO=COMBACT_1

  193. 			set TURNO_EN=COMBACT_1_ENEMY

  194. 

  195. 			set /a ST_VELENO=0

  196. 

  197. 			set /a EXP_EN=10

  198. 

  199. 			goto COMBACT_1

  200. 		) else (

  201. 			cls

  202. 			call color.bat 森林#0a

  203. 			echo.

  204. 			echo 没有动静... 什么都没有吗?

  205. 			call color.bat [S]#0c 是的 [N]#0c 不是

  206. 

  207. 			choice /N /C:SN

  208. 

  209. 			if errorlevel 2 goto BOSCO

  210. 			if errorlevel 1 goto END

  211. 		)

  212. 

  213. 		if !VAR_INC! GEQ 83 (

  214. 			cls

  215. 			call color.bat 森林-战场#0a

  216. 			echo.

  217. 			echo %Name%遇到两个僵尸，他们攻击%Name%^^!^^!^^!

  218. 			pause >nul

  219. 

  220. 			set /a HP_EN=40

  221. 			set /a HP_MAX_EN=40

  222. 			set /a ATT_EN=4

  223. 			set /a DIF_EN=5

  224. 			set /a MAG_EN=0

  225. 			set /a DIF_M_EN=0

  226. 

  227. 			set /a HP_EN_2=20

  228. 			set /a HP_MAX_EN_2=20

  229. 			set /a ATT_EN_2=3

  230. 			set /a DIF_EN_2=3

  231. 			set /a MAG_EN_2=0

  232. 			set /a DIF_M_EN_2=0

  233. 

  234. 			set NAME_EN=僵尸1

  235. 			set NAME_EN_2=僵尸2

  236. 			set AMBIENTE=BOSCO

  237. 			set TURNO=COMBACT_2

  238. 			set TURNO_EN=COMBACT_2_ENEMY_NO1

  239. 

  240. 			set /a MID_COMBACT=0

  241. 

  242. 			set /a ST_VELENO=0

  243. 

  244. 			set /a EXP_EN=10

  245. 

  246. 			goto COMBACT_2

  247. 		) else (

  248. 			cls

  249. 			call color.bat 森林#0a

  250. 			echo.

  251. 			echo 好像什么动静都没有... 但这是真的吗?

  252. 			call color.bat [S]#0c 是的 [N]#0c 不是

  253. 

  254. 			choice /N /C:SN

  255. 

  256. 			if errorlevel 2 goto BOSCO

  257. 			if errorlevel 1 goto END

  258. 		)

  259. 		

  260. 	:BAR_1

  261. 		set AMBIENTE=BAR_1

  262. 		cls

  263. 	:S_BAR_DOMANDA

  264. 		call color.bat 酒吧#0a

  265. 		echo.

  266. 		echo ---==^> 归 %GOLD% 块金子的人所有 ^<==---

  267. 		echo.

  268. 		echo 欢迎来到这里最特别的酒吧，哈哈 ^^!^^!^^!

  269. 		echo 是啊... 你偶尔也会笑，这对你有好处...

  270. 		echo 回到我们这里，你想要什么？

  271. 		echo 如果你不知道该带什么，你可以写"Chiedi"来问我

  272. 	

  273. 	:S_BAR_DOMANDA_1

  274. 		echo.

  275. 		echo 你的愿望是什么?

  276. 		set /p DOMANDA= 

  277. 		

  278. 		if /i DEFINED DOMANDA (

  279. 			goto S_BAR_MENU

  280. 		) else (

  281. 			echo.

  282. 		                echo 我不明白... 试着键入"Chiedi"

  283. 			pause >nul

  284. 			cls

  285. 			goto S_BAR_DOMANDA

  286. 		)

  287. 	

  288. 	:S_BAR_MENU

  289. 	if /i %DOMANDA%==Chiedi (

  290. 		cls

  291. 		call color.bat BAR#0a

  292. 		echo.

  293. 		echo 菜单:

  294. 		echo.

  295. 		echo    - BEVI    -^> 查看鸡尾酒菜单.

  296. 		echo    - MANGIA  -^> 查看甜品菜单.

  297. 		echo    - SALVA   -^> 保存游戏进度.

  298. 		echo    - ESCI    -^> 离开酒吧.

  299. 		

  300. 		goto S_BAR_DOMANDA_1

  301. 	)

  302. 

  303. 	:MENU_BEVI

  304. 	if /i %DOMANDA%==Bevi (

  305. 		cls

  306. 		call color.bat 菜单#0a

  307. 		echo.

  308. 		echo 菜单:

  309. 		echo.

  310. 		echo.    酒品        价格^(G块金子^)

  311. 		echo.  ------====^>^>^> ^<^<^<====------

  312. 		echo   - Campari              ^(3G^)

  313. 		echo   - Aperol               ^(4G^)

  314. 		echo   - Niente

  315. 		

  316. 		echo.

  317. 		echo 你的愿望是什么[ 键入 Campari 或 Aperol 即可买酒 , 键入 Niente 即可返回 ]?

  318. 		

  319. 		set /p BEVI=

  320. 		goto BEVI

  321. 	)

  322. 		

  323. 	if /i %DOMANDA%==Mangia (

  324. 

  325. 		cls

  326. 		call color.bat 菜单#0a

  327. 		echo.

  328. 		echo 菜单:

  329. 		echo.

  330. 		echo.    甜品        价格^(G块金子^)

  331. 		echo.  ------====^>^>^> ^<^<^<====------

  332. 		echo   - Struffoli            ^(3G^)

  333. 		echo   - Cassata              ^(4G^)

  334. 		echo   - Tiramisu             ^(5G^)

  335. 		echo   - Niente

  336. 		

  337. 		echo.

  338. 		echo 你的愿望是什么[ 键入 Struffoli / Cassata / Tiramisu 即可购买甜品 , 键入 Niente 即可返回 ]?

  339. 		

  340. 		set /p MANGIA=

  341. 		goto MANGIA

  342. 	)

  343. 		

  344. 	if /i %DOMANDA%==Salva (

  345. 		echo.

  346. 		goto SAVE

  347. 	)

  348. 	

  349. 	if /i %DOMANDA%==Esci (

  350. 		echo.
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
11楼
发表于 2021-11-6 11:25 | 只看该作者
本帖最后由 HOPE2021 于 2021-11-6 11:27 编辑

新版本源码第四部分
  1. 		echo %Name%离开了酒吧.

  2. 		pause >nul

  3. 		cls

  4. 		goto STREET_OOON

  5. 	)

  6. 		

  7. 	echo.

  8. 	echo 我不明白... 试着键入"Chiedi"

  9. 	pause >nul

  10. 	cls

  11. 	goto S_BAR_DOMANDA

  12. 		

  13. 	:BEVI

  14. 	if /i %BEVI%==Campari (

  15. 		if %GOLD% GEQ 3 (

  16. 			echo 这是你的 !BEVI! 和气泡酒

  17. 			echo 你想要更多吗?

  18. 			pause >nul

  19. 			set /a GOLD=%GOLD%-3

  20. 			goto S_BAR_MENU

  21. 		) else (

  22. 			echo 你没有金子...

  23. 			echo 你想要更多吗?

  24. 			pause >nul

  25. 			goto S_BAR_MENU

  26. 		)

  27. 	)

  28. 	

  29. 	if /i %BEVI%==Aperol (

  30. 		if %GOLD% GEQ 4 (

  31. 			echo 这是你的Spritz鸡尾酒... 祝你享受威尼斯的夕阳...

  32. 			echo 你想要更多吗?

  33. 			pause >nul

  34. 			set /a GOLD=%GOLD%-4

  35. 			goto S_BAR_MENU

  36. 		) else (

  37. 			echo 你没有金子...

  38. 			echo 你想要更多吗?

  39. 			pause >nul

  40. 			goto S_BAR_MENU

  41. 		)

  42. 	)

  43. 	

  44. 	if /i %BEVI%==Niente (

  45. 		echo 好的

  46. 		pause >nul

  47. 		cls

  48. 		goto S_BAR_DOMANDA

  49. 	)

  50. 	

  51. 	echo.

  52. 	echo 我不明白... 试着键入"Chiedi"

  53. 	pause >nul

  54. 	goto MENU_BEVI

  55. 	

  56. 	:MANGIA

  57. 

  58. 	if /i %MANGIA%==Struffoli (

  59. 		if %GOLD% GEQ 3 (

  60. 			echo 这是你的蜂蜜糖球...

  61. 			echo 你想要更多吗?

  62. 			pause >nul

  63. 			set /a GOLD=%GOLD%-3

  64. 			goto S_BAR_MENU

  65. 		) else (

  66. 			echo 你没有金子...

  67. 			echo 你想要更多吗?

  68. 			pause >nul

  69. 			goto S_BAR_MENU

  70. 		)

  71. 	)

  72. 	

  73. 	if /i %MANGIA%==Aperol (

  74. 		if %GOLD% GEQ 4 (

  75. 			echo 这是你的卡萨塔... 祝你享受西西里的快乐...

  76. 			echo 你想要更多吗?

  77. 			pause >nul

  78. 			set /a GOLD=%GOLD%-4

  79. 			goto S_BAR_MENU

  80. 		) else (

  81. 			echo 你没有金子...

  82. 			echo 你想要更多吗?

  83. 			pause >nul

  84. 			goto S_BAR_MENU

  85. 		)

  86. 	)

  87. 	

  88. 	if /i %MANGIA%==Aperol (

  89. 		if %GOLD% GEQ 5 (

  90. 			echo 这是你的提拉米苏... 祝你享受意大利的美味...

  91. 			echo 你想要更多吗?

  92. 			pause >nul

  93. 			set /a GOLD=%GOLD%-5

  94. 			goto S_BAR_MENU

  95. 		) else (

  96. 			echo 你没有金子...

  97. 			echo 你想要更多吗?

  98. 			pause >nul

  99. 			goto S_BAR_MENU

  100. 		)

  101. 	)

  102. 	

  103. 	if /i %MANGIA%==Niente (

  104. 		echo 好的

  105. 		pause >nul

  106. 		cls

  107. 		goto S_BAR_DOMANDA

  108. 	)

  109. 	

  110. 	echo.

  111. 	echo 我不明白... 试着键入"Chiedi"

  112. 	pause >nul

  113. 	goto MENU_BEVI

  114. 

  115. :MENU_MAGIE

  116. 	if %MAGIE% EQU 1 (

  117. 		echo.

  118. 		echo [火之激情] - 1

  119. 		echo [魔法栏空]

  120. 		echo [魔法栏空]

  121. 		echo [魔法栏空]

  122. 		echo [魔法栏空]

  123. 		echo [魔法栏空]

  124. 		echo [继续战斗] - Q

  125. 		echo.

  126. 		

  127. 		choice /N /C:1Q /M "你想用什么魔法?: "

  128. 		

  129. 		if errorlevel 2 goto %TURNO%

  130. 		if errorlevel 1 goto ER_1

  131. 	)

  132. 

  133. 	if %MAGIE% EQU 2 (

  134. 		echo.

  135. 		echo [火之激情] - 1

  136. 		echo [冰之冷酷] - 2

  137. 		echo [魔法栏空]

  138. 		echo [魔法栏空]

  139. 		echo [魔法栏空]

  140. 		echo [魔法栏空]

  141. 		echo [继续战斗] - Q

  142. 		echo.

  143. 		

  144. 		choice /N /C:12Q /M "你想用什么魔法?: "

  145. 		

  146. 		if errorlevel 3 goto %TURNO%

  147. 		if errorlevel 2 goto ER_2

  148. 		if errorlevel 1 goto ER_1

  149. 	)

  150. 

  151. 	if %MAGIE% EQU 3 (

  152. 		echo.

  153. 		echo [火之激情] - 1

  154. 		echo [冰之冷酷] - 2

  155. 		echo [全力以赴] - 3

  156. 		echo [魔法栏空]

  157. 		echo [魔法栏空]

  158. 		echo [魔法栏空]

  159. 		echo [继续战斗] - Q

  160. 		echo.

  161. 		

  162. 		choice /N /C:123Q /M "你想用什么魔法?: "

  163. 		

  164. 		if errorlevel 4 goto %TURNO%

  165. 		if errorlevel 3 goto ER_3

  166. 		if errorlevel 2 goto ER_2

  167. 		if errorlevel 1 goto ER_1

  168. 	)

  169. 

  170. 	if %MAGIE% EQU 4 (

  171. 		echo.

  172. 		echo [火之激情] - 1

  173. 		echo [冰之冷酷] - 2

  174. 		echo [全力以赴] - 3

  175. 		echo [水之力量] - 4

  176. 		echo [魔法栏空]

  177. 		echo [魔法栏空]

  178. 		echo [继续战斗] - Q

  179. 		echo.

  180. 		

  181. 		choice /N /C:1234Q /M "你想用什么魔法?: "

  182. 		

  183. 		if errorlevel 5 goto %TURNO%

  184. 		if errorlevel 4 goto ER_4

  185. 		if errorlevel 3 goto ER_3

  186. 		if errorlevel 2 goto ER_2

  187. 		if errorlevel 1 goto ER_1

  188. 	)

  189. 

  190. 	if %MAGIE% EQU 5 (

  191. 		echo.

  192. 		echo [火之激情] - 1

  193. 		echo [冰之冷酷] - 2

  194. 		echo [全力以赴] - 3

  195. 		echo [水之力量] - 4

  196. 		echo [电闪雷鸣] - 5

  197. 		echo [魔法栏空]

  198. 		echo [继续战斗] - Q

  199. 		echo.

  200. 		

  201. 		choice /N /C:12345Q /M "你想用什么魔法?: "

  202. 		

  203. 		if errorlevel 6 goto %TURNO%

  204. 		if errorlevel 5 goto ER_5

  205. 		if errorlevel 4 goto ER_4

  206. 		if errorlevel 3 goto ER_3

  207. 		if errorlevel 2 goto ER_2

  208. 		if errorlevel 1 goto ER_1

  209. 	)

  210. 

  211. 	if %MAGIE% EQU 6 (

  212. 		echo.

  213. 		echo [火之激情] - 1

  214. 		echo [冰之冷酷] - 2

  215. 		echo [全力以赴] - 3

  216. 		echo [水之力量] - 4

  217. 		echo [电闪雷鸣] - 5

  218. 		echo [妙手回春] - 6

  219. 		echo [继续战斗] - Q

  220. 		echo.

  221. 		

  222. 		choice /N /C:123456Q /M "你想用什么魔法?: "

  223. 		

  224. 		if errorlevel 7 goto %TURNO%

  225. 		if errorlevel 6 goto ER_6

  226. 		if errorlevel 5 goto ER_5

  227. 		if errorlevel 4 goto ER_4

  228. 		if errorlevel 3 goto ER_3

  229. 		if errorlevel 2 goto ER_2

  230. 		if errorlevel 1 goto ER_1

  231. 	)

  232. 

  233. :ER_1

  234. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  235. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  236. 			

  237. 	echo %Name%使用了火之激情, 攻击力: %DAMAGE_M%

  238. 			

  239. 	if %HP_EN% LEQ 0 (

  240. 		echo %NAME_EN% 已死亡.

  241. 		set /a END_COMBACT=1

  242. 		pause >nul

  243. 		goto CALCOLO_EXP

  244. 	)

  245. 			

  246. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  247. 		echo %NAME_EN% 已死亡.

  248. 		set /a END_COMBACT=1

  249. 		pause >nul

  250. 		goto CALCOLO_EXP

  251. 	) else (

  252. 		pause >nul

  253. 		goto %TURNO_EN%

  254. 	)

  255. 

  256. :ER_2

  257. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  258. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  259. 

  260. 	echo %Name%使用了冰之冷酷, 攻击力: %DAMAGE_M%

  261. 		

  262. 	if %HP_EN% LEQ 0 (

  263. 		echo %NAME_EN% 已死亡.

  264. 		set /a END_COMBACT=1

  265. 		pause >nul

  266. 		goto CALCOLO_EXP

  267. 	)

  268. 			

  269. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  270. 		echo %NAME_EN% 已死亡.

  271. 		set /a END_COMBACT=1

  272. 		pause >nul

  273. 		goto CALCOLO_EXP

  274. 	) else (

  275. 		pause >nul

  276. 		goto %TURNO_EN%

  277. 	)

  278. 

  279. :ER_3

  280. 	set /a HP_RESTORED=%HP%+(%VAR_MAG%+%MAG%)

  281. 

  282. 	if HP_RESTORED GEQ %HP_MAX% (

  283. 		set /a HP=%HP_MAX%

  284. 		echo %Name%已经全部恢复...

  285. 		pause >nul

  286. 		goto %TURNO_EN%

  287. 	) else (

  288. 		set /a HP=%HP_RESTORED%

  289. 		echo %Name%恢复: %HP_RESTORED% HP

  290. 		pause >nul

  291. 		goto %TURNO_EN%

  292. 	)

  293. 

  294. :ER_4

  295. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  296. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  297. 

  298. 	echo %Name%使用了水之力量, 攻击力: %DAMAGE_M%

  299. 	

  300. 	if %HP_EN% LEQ 0 (

  301. 		echo %NAME_EN% 已死亡.

  302. 		set /a END_COMBACT=1

  303. 		pause >nul

  304. 		goto CALCOLO_EXP

  305. 	)

  306. 			

  307. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  308. 		echo %NAME_EN% 已死亡.

  309. 		set /a END_COMBACT=1

  310. 		pause >nul

  311. 		goto CALCOLO_EXP

  312. 	) else (

  313. 		pause >nul

  314. 		goto %TURNO_EN%

  315. 	)

  316. 

  317. :ER_5

  318. 	set /a DAMAGE_M=%VAR_MAG%+%MAG%-%DIF_M_EN%

  319. 	set /a HP_EN=%HP_EN%-%DAMAGE_M%

  320. 

  321. 	echo %Name%使用了电闪雷鸣, 攻击力: %DAMAGE_M%

  322. 	

  323. 	if %HP_EN% LEQ 0 (

  324. 		echo %NAME_EN% 已死亡.

  325. 		set /a END_COMBACT=1

  326. 		pause >nul

  327. 		goto CALCOLO_EXP

  328. 	)

  329. 			

  330. 	if %DAMAGE_M% GEQ %HP_MAX_EN% (

  331. 		echo %NAME_EN% 已死亡.

  332. 		set /a END_COMBACT=1

  333. 		pause >nul

  334. 		goto CALCOLO_EXP

  335. 	) else (

  336. 		pause >nul

  337. 		goto %TURNO_EN%

  338. 	)

  339. 

  340. :ER_6

  341. 	if %ST_VELENO% EQU 1 (

  342. 		echo 使用妙手回春，你不再中毒了.

  343. 		set /a ST_VELENO=0

  344. 		pause >nul

  345. 		goto %TURNO_EN%

  346. 	) else (

  347. 		echo %Name%无法使用妙手回春..

  348. 		pause >nul

  349. 		goto %TURNO_EN%

  350.  
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
12楼
发表于 2021-11-6 11:28 | 只看该作者
新版本源码第五部分
  1. 	)

  2. 

  3. :CALCOLO_EXP

  4. 	set /a EXP=%EXP%+%EXP_EN%

  5. 	echo 你赢了: 获得 %EXP_EN% EXP

  6. 	pause >nul

  7. 	

  8. 	if %LV% EQU 1 if %EXP% GEQ 10 (

  9. 		echo.

  10. 		echo 你的经验足够了...

  11. 		echo 升到第 2 级...

  12. 		pause >nul

  13. 		set /a ATT=%ATT%+3

  14. 		set /a DIF=%DIF%+2

  15. 		set /a MAG=%MAG%+0

  16. 		set /a DIF_M=%DIF_M%+1

  17. 		set /a HP_MAX=%HP_MAX%+15

  18. 		set /a HP=%HP_MAX%+15

  19. 		set /a MAGIE=1

  20. 		set /a LV=2

  21. 		

  22. 		goto SAVE

  23. 	) else (

  24. 		goto SAVE

  25. 	)

  26. 	if %LV% LEQ 2 if %EXP% GEQ 30 (

  27. 		echo.

  28. 		echo 你的经验足够了...

  29. 		echo 升到第 3 级...

  30. 		pause >nul

  31. 		set /a ATT=%ATT%+1

  32. 		set /a DIF=%DIF%+1

  33. 		set /a MAG=%MAG%+2

  34. 		set /a DIF_M=%DIF_M%+1

  35. 		set /a HP_MAX=%HP_MAX%+20

  36. 		set /a HP=%HP_MAX%+20

  37. 		set /a MAGIE=2

  38. 		set /a LV=3

  39. 		

  40. 		goto SAVE

  41. 	) else (

  42. 		goto SAVE

  43. 	)

  44. 	if %LV% LEQ 3 if %EXP% GEQ 50 (

  45. 		echo.

  46. 		echo 你的经验足够了...

  47. 		echo 升到第 4 级...

  48. 		pause >nul

  49. 		set /a ATT=%ATT%+3

  50. 		set /a DIF=%DIF%+2

  51. 		set /a MAG=%MAG%+1

  52. 		set /a DIF_M=%DIF_M%+2

  53. 		set /a HP_MAX=%HP_MAX%+30

  54. 		set /a HP=%HP_MAX%+30

  55. 		set /a MAGIE=3

  56. 		set /a LV=4

  57. 		

  58. 		goto SAVE

  59. 	) else (

  60. 		goto SAVE

  61. 	)

  62. 	if %LV% LEQ 4 if %EXP% GEQ 80 (

  63. 		echo.

  64. 		echo 你的经验足够了...

  65. 		echo 升到第 5 级...

  66. 		pause >nul

  67. 		set /a ATT=%ATT%+1

  68. 		set /a DIF=%DIF%+3

  69. 		set /a MAG=%MAG%+3

  70. 		set /a DIF_M=%DIF_M%+1

  71. 		set /a HP_MAX=%HP_MAX%+34

  72. 		set /a HP=%HP_MAX%+34

  73. 		set /a MAGIE=4

  74. 		set /a LV=5

  75. 		

  76. 		goto SAVE

  77. 	) else (

  78. 		goto SAVE

  79. 	)

  80. 	if %LV% LEQ 5 if %EXP% GEQ 115 (

  81. 		echo.

  82. 		echo 你的经验足够了...

  83. 		echo 升到第 6 级...

  84. 		pause >nul

  85. 		set /a ATT=%ATT%+2

  86. 		set /a DIF=%DIF%+2

  87. 		set /a MAG=%MAG%+2

  88. 		set /a DIF_M=%DIF_M%+2

  89. 		set /a HP_MAX=%HP_MAX%+38

  90. 		set /a HP=%HP_MAX%+38

  91. 		set /a MAGIE=5

  92. 		set /a LV=6

  93. 		

  94. 		goto SAVE

  95. 	) else (

  96. 		goto SAVE

  97. 	)

  98. 	if %LV% LEQ 6 if %EXP% GEQ 150 (

  99. 		echo.

  100. 		echo 你的经验足够了...

  101. 		echo 升到第 7 级...

  102. 		pause >nul

  103. 		set /a ATT=%ATT%+3

  104. 		set /a DIF=%DIF%+4

  105. 		set /a MAG=%MAG%+3

  106. 		set /a DIF_M=%DIF_M%+4

  107. 		set /a HP_MAX=%HP_MAX%+45

  108. 		set /a HP=%HP_MAX%+45

  109. 		set /a MAGIE=6

  110. 		set /a LV=7

  111. 		

  112. 		goto SAVE

  113. 	) else (

  114. 		goto SAVE

  115. 	)

  116. 

  117. :ATTACCA

  118. 	set /a DAMAGE=(%VAR_ATT%+%ATT%+%EQUIP_ARM%)-%DIF_EN%

  119. 	

  120. 	if %COMBACT% EQU 1 (

  121. 		set /a HP_EN=%HP_EN%-%DAMAGE%

  122. 		echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  123. 

  124. 		if !HP_EN! LEQ 0 (

  125. 			echo %NAME_EN% 已死亡...

  126. 			set /a END_COMBACT=1

  127. 			pause >nul

  128. 			goto CALCOLO_EXP

  129. 		)

  130. 			

  131. 		if !DAMAGE! GEQ %HP_MAX_EN% (

  132. 			echo %NAME_EN% 已死亡...

  133. 			set /a END_COMBACT=1

  134. 			pause >nul

  135. 			goto CALCOLO_EXP

  136. 		) else (

  137. 			pause >nul

  138. 			goto %TURNO_EN%

  139. 		)

  140. 	)

  141. 	

  142. 	if %COMBACT% EQU 2 (

  143. 		if %MID_COMBACT% EQU 0 (

  144. 			if %TAG% EQU 1 (

  145. 				set /a HP_EN=%HP_EN%-%DAMAGE%

  146. 				echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  147. 	

  148. 				if !HP_EN! LEQ 0 (

  149. 					echo %NAME_EN% 已死亡...

  150. 					set /a MID_COMBACT=1

  151. 				pause >nul

  152. 					goto COMBACT_2_ENEMY_NO2

  153. 				)

  154. 			

  155. 				if !DAMAGE! GEQ %HP_MAX_EN% (

  156. 					echo %NAME_EN% 已死亡...

  157. 					set /a MID_COMBACT=1

  158. 					pause >nul

  159. 					goto COMBACT_2_ENEMY_NO2

  160. 				) else (

  161. 					pause >nul

  162. 					goto COMBACT_2_ENEMY_NO1

  163. 				)

  164. 			)

  165. 		

  166. 			if %TAG% EQU 2 (

  167. 				set /a HP_EN_2=%HP_EN_2%-%DAMAGE%

  168. 				echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  169. 	

  170. 				if !HP_EN_2! LEQ 0 (

  171. 					echo %NAME_EN_2% 已死亡...

  172. 					set /a MID_COMBACT=2

  173. 					pause >nul

  174. 					goto COMBACT_2_ENEMY_NO1

  175. 				)

  176. 			

  177. 				if !DAMAGE! GEQ %HP_MAX_EN_2% (

  178. 					echo %NAME_EN_2% 已死亡...

  179. 					set /a MID_COMBACT=2

  180. 					pause >nul

  181. 					goto COMBACT_2_ENEMY_NO1

  182. 				) else (

  183. 					pause >nul

  184. 					goto COMBACT_2_ENEMY_NO1

  185. 				)

  186. 			)

  187. 		)

  188. 		

  189. 		if %MID_COMBACT% EQU 1 (

  190. 			set /a HP_EN_2=%HP_EN_2%-%DAMAGE%

  191. 			echo %Name% 攻击了 %NAME_EN_2%, 攻击力: %DAMAGE%

  192. 

  193. 			if !HP_EN_2! LEQ 0 (

  194. 				echo %NAME_EN_2% 已死亡...

  195. 				set /a END_COMBACT=1

  196. 				pause >nul

  197. 				goto CALCOLO_EXP

  198. 			)

  199. 

  200. 			if !DAMAGE! GEQ %HP_MAX_EN_2% (

  201. 				echo %NAME_EN_2% 已死亡...

  202. 				set /a END_COMBACT=1

  203. 				pause >nul

  204. 				goto CALCOLO_EXP

  205. 			) else (

  206. 				pause >nul

  207. 				goto COMBACT_2_ENEMY_NO2

  208. 			)

  209. 		)

  210. 

  211. 		if %MID_COMBACT% EQU 2 (

  212. 			set /a HP_EN=%HP_EN%-%DAMAGE%

  213. 			echo %Name% 攻击了 %NAME_EN%, 攻击力: %DAMAGE%

  214. 

  215. 			if !HP_EN! LEQ 0 (

  216. 				echo %NAME_EN% 已死亡...

  217. 				set /a END_COMBACT=1

  218. 				pause >nul

  219. 				goto CALCOLO_EXP

  220. 			)

  221. 

  222. 			if !DAMAGE! GEQ %HP_MAX_EN% (

  223. 				echo %NAME_EN% 已死亡...

  224. 				set /a END_COMBACT=1

  225. 				pause >nul

  226. 				goto CALCOLO_EXP

  227. 			) else (

  228. 				pause >nul

  229. 				goto COMBACT_2_ENEMY_NO1

  230. 			)

  231. 		)

  232. 	)

  233. 

  234. :COMBACT_1

  235. 	set /a FUGA=%RANDOM% %%100

  236. 	set /a VAR_ATT=%RANDOM% %%5

  237. 	set /a VAR_MAG=%RANDOM% %%5

  238. 	set /a ST_DEF=0

  239. 	set /a COMBACT=1

  240. 	

  241. 	cls

  242. 

  243. 	call color.bat 轮到你了#0a

  244. 	echo.

  245. 	echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  246. 	echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  247. 	echo.

  248. 				

  249. 	if %HP% LEQ 0 (

  250. 		echo.

  251. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  252. 		pause >nul

  253. 		goto END

  254. 	)

  255. 

  256. 	if %HP_EN% LEQ 0 (

  257. 		echo %NAME_EN% 已死亡...

  258. 		set /a END_COMBACT=1

  259. 		pause >nul

  260. 		goto CALCOLO_EXP

  261. 	) else (		

  262. 		choice /N /C:ADMF /M "A[攻击] D[防御] M[魔法] F[逃跑]"

  263. 

  264. 		if errorlevel 4 (

  265. 			echo 逃跑...

  266. 			if %FUGA% GEQ 50 (

  267. 				echo %Name%设法逃走了...

  268. 				pause >nul

  269. 				goto %AMBIENTE%

  270. 			) else (

  271. 				echo %Name%无法逃走...

  272. 				pause >nul

  273. 				goto %TURNO_EN%

  274. 			)

  275. 		)

  276. 	

  277. 		if errorlevel 3 (

  278. 			if %MAGIE% EQU 0 (

  279. 				echo %Name%没有任何魔法... 做无用功...

  280. 				pause >nul

  281. 				goto %TURNO%

  282. 			)

  283. 			if %MAGIE% GEQ 1 goto MENU_MAGIE

  284. 		)

  285. 	

  286. 		if errorlevel 2 (

  287. 			echo 防御^^!我挡^^!^^!^^!

  288. 			set /a ST_DEF=1

  289. 			pause >nul

  290. 			goto %TURNO_EN%

  291. 		)

  292. 		

  293. 		if errorlevel 1 goto ATTACCA

  294. 	)

  295. 

  296. :COMBACT_1_ENEMY

  297. 	set /a VELENO=%RANDOM% %%100

  298. 	set /a VAR_DAMAGE=%RANDOM% %%4

  299. 

  300. 	if %ST_DEF% EQU 0 (

  301. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-%DIF%

  302. 	) else (

  303. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-(%DIF%+%EQUIP_CORPO%)

  304. 	)

  305. 	

  306. 	if %DAMAGE_EN% LEQ 0 (

  307. 		set /a DAMAGE_EN=0

  308. 	)

  309. 				

  310. 	cls

  311. 

  312. 	call color.bat %NAME_EN%#0a 回合#0a

  313. 	echo.

  314. 	echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  315. 	echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  316. 	echo.

  317. 	echo %NAME_EN%攻击了%Name%...

  318. 	echo 攻击力: %DAMAGE_EN%

  319. 				

  320. 	set /a HP=%HP%-%DAMAGE_EN%

  321. 				

  322. 	if %HP_EN% LEQ 0 (

  323. 		echo %NAME_EN% 已死亡...

  324. 		set /a END_COMBACT=1

  325. 		pause >nul

  326. 		goto CALCOLO_EXP

  327. 	)

  328. 			

  329. 	if %HP% LEQ 0 (

  330. 		echo.

  331. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  332. 		pause >nul

  333. 		goto END

  334. 	)

  335. 

  336. 	if %DAMAGE_EN% GEQ %HP_MAX% (

  337. 		echo.

  338. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  339. 		pause >nul

  340. 		goto END

  341. 	) else (

  342. 		if %ST_VELENO% EQU 0 (

  343. 			if %VELENO% GEQ 75 (

  344. 				echo.

  345. 				echo %Name%中毒了...

  346. 				echo 损失: %HP_LOSE% HP

  347. 				set /a HP=%HP%-3

  348. 				set /a ST_VELENO=1

  349. 				if %HP% LEQ 0 (

  350. 					echo.

  351. 					echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

HOPE2021

Rank: 4

帖子
357 
积分
477 
技术
34  
捐助
0  
注册时间
2021-8-8 
13楼
发表于 2021-11-6 11:29 | 只看该作者
新版本源码第六部分
  1. 					pause >nul

  2. 					goto END

  3. 				) else (

  4. 					pause >nul

  5. 					goto %TURNO%

  6. 				)

  7. 			) else (

  8. 				pause >nul

  9. 				goto %TURNO%

  10. 			)

  11. 		) else (

  12. 			echo 损失: %HP_LOSE% HP

  13. 			set /a HP=%HP%-3

  14. 			if %HP% LEQ 0 (

  15. 				echo.

  16. 				echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  17. 				pause >nul

  18. 				goto END

  19. 			) else (

  20. 				pause >nul

  21. 				goto %TURNO%

  22. 			)

  23. 		)

  24. 	)

  25. 

  26. :COMBACT_2

  27. 	set /a FUGA=%RANDOM% %%100

  28. 	set /a VAR_ATT=%RANDOM% %%5

  29. 	set /a VAR_MAG=%RANDOM% %%5

  30. 	set /a ST_DEF=0

  31. 	set /a COMBACT=2

  32. 	

  33. 	if %MID_COMBACT% EQU 0 (

  34. 		set TURNO_EN=COMBACT_2_ENEMY_NO1

  35. 	)

  36. 	

  37. 	if %MID_COMBACT% EQU 1 (

  38. 		set TURNO_EN=COMBACT_2_ENEMY_NO2

  39. 	)

  40. 	

  41. 	if %MID_COMBACT% EQU 2 (

  42. 		set TURNO_EN=COMBACT_2_ENEMY_NO1

  43. 	)

  44. 

  45. 	cls

  46. 	call color.bat 轮到你了#0a

  47. 	echo.

  48. 	

  49. 	if %MID_COMBACT% EQU 0 (

  50. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  51. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  52. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  53. 		echo.

  54. 	)

  55. 	

  56. 	if %MID_COMBACT% EQU 1 (

  57. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  58. 		echo "%NAME_EN% -> Morto.

  59. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  60. 		echo.

  61. 	)

  62. 	

  63. 	if %MID_COMBACT% EQU 2 (

  64. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  65. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  66. 		echo "%NAME_EN_2% -> Morto.

  67. 		echo.

  68. 	)

  69. 	

  70. 	if %HP% LEQ 0 (

  71. 		echo.

  72. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  73. 		pause >nul

  74. 		goto END

  75. 	)

  76. 		

  77. 	if %HP_EN% LEQ 0 if %HP_EN_2% LEQ 0 (

  78. 		echo 僵尸死了...你看着，感到莫名的恶心...

  79. 		set /a END_COMBACT=1

  80. 		pause >nul

  81. 		goto CALCOLO_EXP

  82. 	)

  83. 	

  84. 		if %MID_COMBACT% EQU 0 (

  85. 			choice /N /C:12 /M "攻击谁? [1] %NAME_EN%, [2] %NAME_EN_2%"

  86. 			

  87. 			if errorlevel 2 (

  88. 				set /a TAG=2

  89. 				goto FINE_TARGET

  90. 			)

  91. 			

  92. 			if errorlevel 1 (

  93. 				set /a TAG=1

  94. 				goto FINE_TARGET

  95. 			)

  96. 		)

  97. 		

  98. 		if %MID_COMBACT% EQU 1 (

  99. 			set /a TAG=2

  100. 		)

  101. 		

  102. 		if %MID_COMBACT% EQU 2 (

  103. 			set /a TAG=1

  104. 		)

  105. 		

  106. 		:FINE_TARGET

  107. 		echo.

  108. 		choice /N /C:ADMF /M "A[攻击] D[防御] M[魔法] F[逃跑]"

  109. 

  110. 		if errorlevel 4 (

  111. 			echo Tenti la fugga

  112. 			if %FUGA% GEQ 50 (

  113. 				echo %Name%设法逃走了...

  114. 				pause >nul

  115. 				goto %AMBIENTE%

  116. 			) else (

  117. 				echo %Name%无法逃走...

  118. 				pause >nul

  119. 				goto %TURNO_EN%

  120. 			)

  121. 		)

  122. 	

  123. 		if errorlevel 3 (

  124. 			if %MAGIE% EQU 0 (

  125. 				echo %Name%没有任何魔法... 做无用功...

  126. 				pause >nul

  127. 				goto %TURNO%

  128. 			)

  129. 			if %MAGIE% GEQ 1 goto MENU_MAGIE

  130. 		)

  131. 	

  132. 		if errorlevel 2 (

  133. 			echo 防御^^!我挡^^!^^!^^!

  134. 			set /a ST_DEF=1

  135. 			pause >nul

  136. 			goto %TURNO_EN%

  137. 		)

  138. 		

  139. 		if errorlevel 1 goto ATTACCA

  140. 

  141. :COMBACT_2_ENEMY_NO1

  142. 	set /a VELENO=%RANDOM% %%100

  143. 	set /a VAR_DAMAGE=%RANDOM% %%4

  144. 

  145. 	if %ST_DEF% EQU 0 (

  146. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-%DIF%

  147. 	) else (

  148. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-(%DIF%+%EQUIP_CORPO%)

  149. 	)

  150. 	

  151. 	if %DAMAGE_EN% LEQ 0 (

  152. 		set /a DAMAGE_EN=0

  153. 	)

  154. 

  155. 	if %MID_COMBACT% EQU 2 (

  156. 		cls

  157. 		call color.bat %NAME_EN%#0a 回合#0a

  158. 		echo.

  159. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  160. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  161. 		echo "%NAME_EN_2% -> Morto.

  162. 		echo.

  163. 	) else (

  164. 		cls

  165. 		call color.bat %NAME_EN%#0a 回合#0a

  166. 		echo.

  167. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  168. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  169. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  170. 		echo.

  171. 	)

  172. 	

  173. 	echo %NAME_EN%攻击了%Name%...

  174. 	echo 攻击力: %DAMAGE_EN%

  175. 

  176. 	set /a HP=%HP%-%DAMAGE_EN%

  177. 

  178. 	if %MID_COMBACT% EQU 0 (

  179. 		if %HP_EN% LEQ 0 (

  180. 			echo %NAME_EN% 已死亡...

  181. 			set /a MID_COMBACT=1

  182. 			pause >nul

  183. 			goto COMBACT_2_ENEMY_NO2

  184. 		)

  185. 	)

  186. 	

  187. 	if %MID_COMBACT% EQU 2 (

  188. 		if %HP_EN% LEQ 0 (

  189. 			echo %NAME_EN% 已死亡...

  190. 			set /a END_COMBACT=1

  191. 			pause >nul

  192. 			goto CALCOLO_EXP

  193. 		)

  194. 	)

  195. 

  196. 	if %HP% LEQ 0 (

  197. 		echo.

  198. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  199. 		pause >nul

  200. 		goto END

  201. 	)

  202. 

  203. 	if %DAMAGE_EN% GEQ %HP_MAX% (

  204. 		echo.

  205. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  206. 		pause >nul

  207. 		goto END

  208. 	) else (

  209. 		if %ST_VELENO% EQU 0 (

  210. 			if %VELENO% GEQ 75 (

  211. 				echo.

  212. 				echo %Name%中毒了...

  213. 				echo 损失: %HP_LOSE% HP

  214. 				set /a HP=%HP%-3

  215. 				set /a ST_VELENO=1

  216. 				if %HP% LEQ 0 (

  217. 					echo.

  218. 					echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  219. 					pause >nul

  220. 					goto END

  221. 				) else (

  222. 					pause >nul

  223. 					if %MID_COMBACT% EQU 0 (

  224. 						goto COMBACT_2_ENEMY_NO2

  225. 					) else (

  226. 						goto %TURNO%

  227. 					)

  228. 				)

  229. 			) else (

  230. 				pause >nul

  231. 				if %MID_COMBACT% EQU 0 (

  232. 					goto COMBACT_2_ENEMY_NO2

  233. 				) else (

  234. 					goto %TURNO%

  235. 				)

  236. 			)

  237. 		) else (

  238. 			echo 损失: %HP_LOSE% HP

  239. 			set /a HP=%HP%-3

  240. 			if %HP% LEQ 0 (

  241. 				echo.

  242. 				echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  243. 				pause >nul

  244. 				goto END

  245. 			) else (

  246. 				pause >nul

  247. 				if %MID_COMBACT% EQU 0 (

  248. 					goto COMBACT_2_ENEMY_NO2

  249. 				) else (

  250. 					goto %TURNO%

  251. 				)

  252. 			)

  253. 		)

  254. 	)

  255. 

  256. :COMBACT_2_ENEMY_NO2

  257. 	set /a VELENO=%RANDOM% %%100

  258. 	set /a VAR_DAMAGE=%RANDOM% %%4

  259. 

  260. 	if %ST_DEF% EQU 0 (

  261. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-%DIF%

  262. 	) else (

  263. 		set /a DAMAGE_EN=%VAR_DAMAGE%+%ATT_EN%-(%DIF%+%EQUIP_CORPO%)

  264. 	)

  265. 	

  266. 	if %DAMAGE_EN% LEQ 0 (

  267. 		set /a DAMAGE_EN=0

  268. 	)

  269. 

  270. 	if %MID_COMBACT% EQU 1 (

  271. 		cls

  272. 		call color.bat %NAME_EN_2%#0a 回合#0a

  273. 		echo.

  274. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  275. 		echo "%NAME_EN% -> Morto.

  276. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  277. 		echo.

  278. 	) else (

  279. 		cls

  280. 		call color.bat TURNO#0a %NAME_EN_2%#0a

  281. 		echo.

  282. 		echo "%NAME% -> HP: %HP%/%HP_MAX% | ATT: %ATT% | DIF: %DIF% | MAG: %MAG% | |DIF_M: %DIF_M% | EXP: %EXP% | LV: %LV%"

  283. 		echo "%NAME_EN% -> HP: %HP_EN%/%HP_MAX_EN% | ATT: %ATT_EN% | DIF: %DIF_EN% | MAG: %MAG_EN% | DIF_M: %DIF_M_EN%"

  284. 		echo "%NAME_EN_2% -> HP: %HP_EN_2%/%HP_MAX_EN_2% | ATT: %ATT_EN_2% | DIF: %DIF_EN_2% | MAG: %MAG_EN_2% | DIF_M: %DIF_M_EN_2%"

  285. 		echo.

  286. 	)

  287. 	

  288. 	echo %NAME_EN_2%攻击了%Name%...

  289. 	echo 攻击力: %DAMAGE_EN%

  290. 

  291. 	set /a HP=%HP%-%DAMAGE_EN%

  292. 

  293. 	if %MID_COMBACT% EQU 0 (

  294. 		if %HP_EN_2% LEQ 0 (

  295. 			echo %NAME_EN_2%已死亡...

  296. 			set /a MID_COMBACT=2

  297. 			pause >nul

  298. 			goto COMBACT_2_ENEMY_NO1

  299. 		)

  300. 	)

  301. 	

  302. 	if %MID_COMBACT% EQU 1 (

  303. 		if %HP_EN_2% LEQ 0 (

  304. 			echo %NAME_EN_2%已死亡...

  305. 			set /a END_COMBACT=1

  306. 			pause >nul

  307. 			goto CALCOLO_EXP

  308. 		)

  309. 	)

  310. 

  311. 	if %HP% LEQ 0 (

  312. 		echo.

  313. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  314. 		pause >nul

  315. 		goto END

  316. 	)

  317. 

  318. 	if %DAMAGE_EN% GEQ %HP_MAX% (

  319. 		echo.

  320. 		echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  321. 		pause >nul

  322. 		goto END

  323. 	) else (

  324. 		if %ST_VELENO% EQU 0 (

  325. 			if %VELENO% GEQ 75 (

  326. 				echo.

  327. 				echo %Name%中毒了...

  328. 				echo 损失: %HP_LOSE% HP

  329. 				set /a HP=%HP%-3

  330. 				set /a ST_VELENO=1

  331. 				if %HP% LEQ 0 (

  332. 					echo.

  333. 					echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  334. 					pause >nul

  335. 					goto END

  336. 				) else (

  337. 					pause >nul

  338. 					goto %TURNO%

  339. 				)

  340. 			) else (

  341. 				pause >nul

  342. 				goto %TURNO%

  343. 			)

  344. 		) else (

  345. 			echo 损失: %HP_LOSE% HP

  346. 			set /a HP=%HP%-3

  347. 			if %HP% LEQ 0 (

  348. 				echo.

  349. 				echo %Name%躺在地上... 流血不止... 缓缓地合上了双眼... 再见了... %Name%

  350. 				pause >nul

  351. 				goto END

  352. 			) else (

  353. 				pause >nul

  354. 				goto %TURNO%

  355. 			)

  356. 		)

  357. 	)

  358. 

  359. :END

  360. echo Game Over...

  361. pause >nul

  362. exit
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14786 
积分
45962 
技术
847  
捐助
745  
注册时间
2008-6-9 
14楼
发表于 2021-11-6 12:04 | 只看该作者
回复 2# HOPE2021


    建议把完整代码打包上传到网盘，太长的代码不要这样分开发，不适合他人查看。
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

netbenton

Rank: 8Rank: 8

帖子
675 
积分
3226 
技术
75  
捐助
101  
注册时间
2009-4-10 
15楼
发表于 2021-11-6 12:16 | 只看该作者
还真有人想法跟我一样！我一直梦想用批处理做一个完美的RPG游戏。但楼主转的这个还不能算一个满意的答卷。哈哈，加油！

TOP

12
返回列表