API tools faq
paste
tcl1

[Batch] Batchopolis 3.0.0 build 20

tcl1
May 4th, 2014
282
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 6.43 KB | None | 0 0
raw download clone embed print report
  1. @echo off
  2. cls
  3. title Batchopolis
  4. goto ichk
  5. :ichk
  6. if not exist batchopolisdata goto install
  7. if exist batchopolisdata goto lsmisc
  8. :install
  9. md batchopolisdata
  10. cd batchopolisdata
  11. (
  12. echo e100
  13. echo 0F B6 0E 80 00 E3 2D BF 81 00 B0 20 FC F3 AE 74
  14. echo e110
  15. echo 23 E3 21 8D 75 FF E8 45 00 3C 20 75 3B 86 F2 E8
  16. echo e120
  17. echo 3C 00 86 F2 3C 20 74 04 3C 0D 75 2C 32 FF B4 02
  18. echo e130
  19. echo CD 10 EB 24 32 FF B4 03 CD 10 8A C6 8A CA E8 38
  20. echo e140
  21. echo 00 B2 20 B4 02 CD 21 8A C1 E8 2D 00 B2 0D B4 02
  22. echo e150
  23. echo CD 21 B2 0A B4 02 CD 21 32 C0 B4 4C CD 21 32 E4
  24. echo e160
  25. echo AC 3C 20 74 FB 3C 30 72 0D 3C 39 77 09 2C 30 D5
  26. echo e170
  27. echo 0A 8A E0 AC EB EF 8A F4 C3 D4 0A 05 30 30 8B D0
  28. echo e180
  29. echo 80 FC 30 74 08 86 D6 B4 02 CD 21 8A D6 B4 02 CD
  30. echo e190
  31. echo 21 C3
  32. echo rcx
  33. echo 92
  34. echo w
  35. echo q
  36. ) | debug textpos.com > nul
  37. (
  38. echo e100
  39. echo 0F B6 0E 80 00 E3 4F BF 81 00 B0 20 FC F3 AE 74
  40. echo e110
  41. echo 45 E3 43 8A 45 FF E8 43 00 80 3D 20 74 0E C0 E0
  42. echo e120
  43. echo 04 8A E0 8A 05 E8 34 00 0A C4 47 49 E3 28 32 E4
  44. echo e130
  45. echo 50 B0 22 F2 AE 75 1F E3 1D 8B F7 8B D1 F2 AE 75
  46. echo e140
  47. echo 01 41 2B D1 74 10 8B CA 5B B0 20 B4 09 CD 10 AC
  48. echo e150
  49. echo B4 0E CD 10 E2 F9 32 C0 B4 4C CD 21 3C 61 72 02
  50. echo e160
  51. echo 2C 20 3C 41 72 02 2C 07 2C 30 C3
  52. echo rcx
  53. echo 6b
  54. echo w
  55. echo q
  56. ) | debug colormsg.com > nul
  57. goto nameinput
  58. :nameinput
  59. cls
  60. cd batchopolisdata
  61. color 1F
  62. textpos 0 0 & colormsg 8F "Setup "
  63. textpos 2 0
  64. echo Welcome to the Batchopolis setup!
  65. echo Please enter your name.
  66. echo.
  67. echo Name:
  68. set /p name=
  69. cls
  70. textpos 0 0 & colormsg 8F "Setup "
  71. textpos 2 0
  72. echo We're getting Batchopolis ready for you.
  73. echo Please wait...
  74. echo.
  75. echo :: Save file automatically generated on %date% %time% >> save.bat
  76. echo set name=%name% >> save.bat
  77. echo set /a cash+=10000 >> save.bat
  78. echo Done!
  79. echo Press any key to start playing Batchopolis.
  80. pause >nul
  81. goto lsmisc
  82. :lsmisc
  83. set cash=
  84. set name=
  85. goto loaddata
  86. :loaddata
  87. cd batchopolisdata
  88. call save.bat
  89. goto mainmenu
  90. :mainmenu
  91. cls
  92. color 37
  93. textpos 0 0 & colormsg 8F "Main menu "
  94. textpos 24 0 & colormsg 30 "Batchopolis 3.0.0 build 20"
  95. textpos 25 0 & colormsg 30 "By tcl1 - pastebin.com/u/tcl1"
  96. textpos 2 0
  97. echo [Vehicle management]=================
  98. echo 1) Buy cars
  99. echo [Data management]====================
  100. echo 2) Save game
  101. echo 3) Load game
  102. echo [Misc]===============================
  103. echo 4) What's New
  104. echo [Player]=============================
  105. echo Cash: $%cash%
  106. echo Name: %name%
  107. echo =====================================
  108. choice /c 1234 /n
  109. if %errorlevel%==1 goto buy_cars
  110. if %errorlevel%==2 goto savegame
  111. if %errorlevel%==3 goto loadgame
  112. if %errorlevel%==4 goto whatsnew
  113. :whatsnew
  114. cls
  115. color 3F
  116. textpos 0 0 & colormsg 8F "What's new "
  117. textpos 2 0
  118. echo - Save file auto-loading
  119. echo.
  120. echo Other stuff:
  121. echo.
  122. echo - This is beta 1 of version 3.0!
  123. echo It looks like 2.1.0, but I'm working on a new interface.
  124. echo - Differences between 1.0.1 and 3.0
  125. echo * Multiple colors can be displayed
  126. echo.
  127. echo Press any key to go to the menu
  128. pause >nul
  129. goto mainmenu
  130. :buy_cars
  131. cls
  132. color 3F
  133. textpos 0 0 & colormsg 8F "Buy cars "
  134. textpos 2 0
  135. echo [1. Diversity]
  136. echo [2. Constant]
  137. echo [3. GTX]
  138. echo [4. Bop]
  139. echo [O. Go back to menu]
  140. choice /c 1234O /n
  141. if %errorlevel%==1 goto dealer-diversity
  142. if %errorlevel%==2 goto dealer-constant
  143. if %errorlevel%==3 goto dealer-gtx
  144. if %errorlevel%==4 goto dealer-bop
  145. if %errorlevel%==5 goto mainmenu
  146. :dealer-diversity
  147. cls
  148. textpos 0 0 & colormsg 8F "Diversity Motorsports "
  149. textpos 2 0
  150. echo [1. Diversity CONTEXT '01]
  151. echo [2. Diversity PROGRESS Concept '06]
  152. echo [O. Go back to menu]
  153. choice /c 12O /n
  154. if %errorlevel%==1 goto cars-context
  155. if %errorlevel%==2 goto cars-progress
  156. if %errorlevel%==3 goto mainmenu
  157. :dealer-constant
  158. cls
  159. textpos 0 0 & colormsg 8F "Constant "
  160. textpos 2 0
  161. echo [1. Constant SWIFTER '10]
  162. echo [2. Constant SWIFTER Rally Car '11]
  163. echo [3. Constant MILLENIUM '00]
  164. echo [4. Constant RECORD '94]
  165. echo [O. Go back to menu]
  166. choice /c 1234O /n
  167. if %errorlevel%==1 goto cars-swifter
  168. if %errorlevel%==2 goto cars-swifter-rally
  169. if %errorlevel%==3 goto cars-millenium
  170. if %errorlevel%==4 goto cars-record
  171. if %errorlevel%==5 goto mainmenu
  172. :dealer-gtx
  173. cls
  174. textpos 0 0 & colormsg 8F "GTX "
  175. textpos 2 0
  176. echo [1. GTX MODESTRO Race Car '12]
  177. echo [2. GTX MODESTRO Rally Car '14]
  178. echo [O. Go back to menu]
  179. choice /c 12O /n
  180. if %errorlevel%==1 goto cars-modestro-race
  181. if %errorlevel%==2 goto cars-modestro-rally
  182. if %errorlevel%==3 goto mainmenu
  183. :dealer-bop
  184. cls
  185. textpos 0 0 & colormsg 8F "Bop "
  186. textpos 2 0
  187. echo [1. Bop FURTO Concept '00]
  188. echo [O. Go back to menu]
  189. choice /c 1O /n
  190. if %errorlevel%==1 goto cars-furto-concept
  191. if %errorlevel%==2 goto mainmenu
  192. :savegame
  193. cls
  194. color 4F
  195. textpos 0 0 & colormsg 8F "Save game "
  196. textpos 2 0
  197. echo 1) Save game
  198. echo L) Go back to menu
  199. choice /c 1L /n
  200. if %errorlevel%==1 goto savegame_s
  201. if %errorlevel%==2 goto mainmenu
  202. :savegame_s
  203. cls
  204. color 4F
  205. textpos 0 0 & colormsg 8F "Save game "
  206. textpos 2 0
  207. echo Saving...
  208. echo.
  209. echo [1] Adding time comment
  210. echo :: Saved on %date% %time% >> save.bat
  211. echo [2] Additional save data
  212. echo set /a cash+=%cash% >> save.bat
  213. echo set name=%name% >> save.bat
  214. echo.
  215. echo Done.
  216. echo Press any key to back to the menu.
  217. pause >nul
  218. goto mainmenu
  219. :loadgame
  220. cls
  221. color 3F
  222. textpos 0 0 & colormsg 8F "Load game "
  223. textpos 2 0
  224. echo Loading save file...
  225. call save.bat
  226. echo Done.
  227. echo.
  228. echo Press any key to go to the main menu.
  229. pause >nul
  230. goto mainmenu
  231. :cars-furto-concept
  232.  
  233. :cars-modestro-rally
  234.  
  235. :cars-modestro-race
  236.  
  237. :cars-swifter-rally
  238.  
  239. :cars-swifter
  240.  
  241. :cars-context
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!