home *** CD-ROM | disk | FTP | other *** search
/ Media Share 13 / mediashare_13.zip / mediashare_13 / ZIPPED / GAMES / PLANMAP2.ZIP / MSIM.BAT < prev    next >
DOS Batch File  |  1994-01-10  |  3KB  |  179 lines
  1. @ECHO OFF
  2. REM PlanMap II Multi-ship battle multi simulation batch file.
  3. REM A.M. van den Bos, January 1994. Version 2.02.
  4.  
  5. IF EXIST PLANETS.EXE GOTO LABEL1
  6. ECHO Error: The default directory must be your VGA Planets directory.
  7. PAUSE
  8. GOTO EXIT
  9.  
  10. :LABEL1
  11. IF EXIST sim\base\GEN.HST GOTO LABEL2
  12. ECHO                        PlanMap II Battle Simulation
  13. ECHO:
  14. ECHO This batch file must be runned from MS Windows and requires MS DOS 6.
  15. ECHO Simulation directories SIM and SIM\BASE will be created.
  16. ECHO MASTER.EXE will be runned to setup the SIM\BASE directory.
  17. ECHO Select 'wandering tribes' and the default races.
  18. PAUSE
  19. MD SIM
  20. MD SIM\BASE
  21. ECHO y | DEL SIM\BASE >NUL
  22. MASTER SIM\BASE
  23.  
  24. :LABEL2
  25. ECHO y | DEL SIM >NUL
  26. DEL MSIM.LOG >NUL
  27. CLS
  28. XCOPY SIM\BASE SIM >NUL
  29. ECHO                      PlanMap II Battle Simulation
  30. ECHO:
  31. ECHO Press Alt-TAB to switch to MS Windows. Run PlanMap, set the HOST-directory to
  32. ECHO SIM and enter the PlanMap HOST-mode. Select and save the desired ships and
  33. ECHO return to this bath file (Alt-TAB). Be aware of the friendly codes, the IDs
  34. ECHO and race advantages. Be sure about the HOST version and the HOST options.
  35. ECHO Remove ships that don't participate.
  36. ECHO:
  37. PAUSE
  38. ECHO:
  39. ECHO Running 100 simulations, please wait.
  40.  
  41.  
  42. REM Run 100 simulations
  43.  
  44. CALL MSIM0
  45. CALL MSIM0
  46. CALL MSIM0
  47. CALL MSIM0
  48. CALL MSIM0
  49. CALL MSIM0
  50. CALL MSIM0
  51. CALL MSIM0
  52. CALL MSIM0
  53. CALL MSIM0
  54. ECHO 10
  55.  
  56. CALL MSIM0
  57. CALL MSIM0
  58. CALL MSIM0
  59. CALL MSIM0
  60. CALL MSIM0
  61. CALL MSIM0
  62. CALL MSIM0
  63. CALL MSIM0
  64. CALL MSIM0
  65. CALL MSIM0
  66. ECHO 20
  67.  
  68. CALL MSIM0
  69. CALL MSIM0
  70. CALL MSIM0
  71. CALL MSIM0
  72. CALL MSIM0
  73. CALL MSIM0
  74. CALL MSIM0
  75. CALL MSIM0
  76. CALL MSIM0
  77. CALL MSIM0
  78. ECHO 30
  79.  
  80. CALL MSIM0
  81. CALL MSIM0
  82. CALL MSIM0
  83. CALL MSIM0
  84. CALL MSIM0
  85. CALL MSIM0
  86. CALL MSIM0
  87. CALL MSIM0
  88. CALL MSIM0
  89. CALL MSIM0
  90. ECHO 40
  91.  
  92. CALL MSIM0
  93. CALL MSIM0
  94. CALL MSIM0
  95. CALL MSIM0
  96. CALL MSIM0
  97. CALL MSIM0
  98. CALL MSIM0
  99. CALL MSIM0
  100. CALL MSIM0
  101. CALL MSIM0
  102. ECHO 50
  103.  
  104. CALL MSIM0
  105. CALL MSIM0
  106. CALL MSIM0
  107. CALL MSIM0
  108. CALL MSIM0
  109. CALL MSIM0
  110. CALL MSIM0
  111. CALL MSIM0
  112. CALL MSIM0
  113. CALL MSIM0
  114. ECHO 60
  115.  
  116. CALL MSIM0
  117. CALL MSIM0
  118. CALL MSIM0
  119. CALL MSIM0
  120. CALL MSIM0
  121. CALL MSIM0
  122. CALL MSIM0
  123. CALL MSIM0
  124. CALL MSIM0
  125. CALL MSIM0
  126. ECHO 70
  127.  
  128. CALL MSIM0
  129. CALL MSIM0
  130. CALL MSIM0
  131. CALL MSIM0
  132. CALL MSIM0
  133. CALL MSIM0
  134. CALL MSIM0
  135. CALL MSIM0
  136. CALL MSIM0
  137. CALL MSIM0
  138. ECHO 80
  139.  
  140. CALL MSIM0
  141. CALL MSIM0
  142. CALL MSIM0
  143. CALL MSIM0
  144. CALL MSIM0
  145. CALL MSIM0
  146. CALL MSIM0
  147. CALL MSIM0
  148. CALL MSIM0
  149. CALL MSIM0
  150. ECHO 90
  151.  
  152. CALL MSIM0
  153. CALL MSIM0
  154. CALL MSIM0
  155. CALL MSIM0
  156. CALL MSIM0
  157. CALL MSIM0
  158. CALL MSIM0
  159. CALL MSIM0
  160. CALL MSIM0
  161. CALL MSIM0
  162. ECHO 100
  163.  
  164. ECHO Sorting MSIM.LOG ....
  165. SORT <MSIM.LOG >MSIM.TMP
  166. IF ERRORLEVEL 1 GOTO SORTERROR
  167. DEL  MSIM.LOG >NUL
  168. REN  MSIM.TMP MSIM.LOG >NUL
  169. :SORTERROR
  170. ECHO:
  171. ECHO:
  172. ECHO 100 simulations have been performed. Each line of file MSIM.BAT lists the
  173. ECHO the remaining ships after the battle. Use DOS command FIND /C "IDn" MSIM.LOG
  174. ECHO to display the chance that ship with ID number n survives.
  175. ECHO:
  176. PAUSE
  177.  
  178. :EXIT
  179.