home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / sigm / vols200 / vol243 / chips.com (.txt) < prev    next >
Encoding:
Turbo Pascal Compiled 8bit CP/M-80 COM  |  1994-07-13  |  23.0 KB  |  256 lines
  1. Copyright (C) 1984 BORLAND Inc
  2. Pseudo TeleVideo 910P
  3. C0000
  4. ^#V#N#F
  5. s#r#q#p
  6.     #^#V
  7. 9^#Vh&
  8. |/g}/o#
  9. T]=o`9y
  10. T9^K#
  11. 8/<oz
  12. T9^K#
  13. oGOW_g
  14. `1pF,
  15. w###6
  16. ##N#F*
  17. Nw#Fw
  18. q#p#6
  19. #w#w#w
  20. TRUEFALSE
  21.     N#F#s#r
  22. N#F#^#V
  23. " C}=(
  24. F+N+++V+^
  25. q#p##
  26. User break
  27. Run-time
  28.  error 
  29. , PC=
  30. Program aborted
  31. IThe scoring and other rules are given below; you will be given your score
  32. &only after the completion of a trip.  
  33. For each new chip you will get !
  34.  points.
  35. For each old chip you will get !
  36.  point.
  37. points.
  38. BFor arriving at Alpha you will get the following number of points:
  39. 1st time ---> !
  40.    2nd time ---> !
  41.    3rd time ---> !
  42.    subsequent times ---> !
  43. #For arriving at Beta you will get  !
  44.  points each time.
  45. #For arriving at Gamma you will get !#
  46.  points each time.
  47. KIf you obtain a complete set of Alpha chips you will be told so and also be
  48. awarded a bonus of !d
  49.  points.
  50. CThere are more rules; when you're ready to read them, hit return.  !
  51. IYou may end your trip and go home.  To do this, answer zero (type 0) when
  52. Iasked for how many chips you want.  You will then be asked if you want to
  53. Igo home.  Any money you have left will be converted to points at the rate
  54.  dollars per point.
  55. MI M P O R T A N T :    If you request too many chips you will be warned about
  56. Hit.  "too many" does not neccessarily mean that you don't have the money
  57. Jthat it would cost to buy the chips.  "too many" just means that you would
  58. Jbe left with less money than a certain minimum amount if permitted to pur-
  59. Gchase the number of chips you requested.  RECEIVING A WARNING SUBTRACTS
  60. :POINTS FROM YOUR SCORE ACCORDING TO THE FORMULA:  (n-1) x !
  61. Hwhere n is the number of warnings you've gotten during the current trip.
  62. Good Luck 
  63. Space Cadet!
  64. Space Captain!
  65. Space Avenger!
  66. You have obtained chip Alpha-*
  67. You now have a second  Alpha-*
  68.  chip.
  69. This gives you a third Alpha-*
  70.  chip.
  71. You now have !u
  72.  Alpha-*
  73.  chips.
  74. You have obtained chip Alpha-*
  75. You now have a second  Alpha-*
  76.  chip.
  77. This gives you a third Alpha-*
  78.  chip.
  79. You now have !u
  80.  Alpha-*
  81.  chips.
  82. You have obtained chip Beta-*
  83. You now have a second  Beta-*
  84.  chip.
  85. This gives you a third Beta-*
  86.  chip.
  87. You now have !q
  88.  Beta-*
  89.  chips.
  90. You have obtained chip Beta-*
  91. You now have a second  Beta-*
  92.  chip.
  93. This gives you a third Beta-*
  94.  chip.
  95. You now have !q
  96.  Beta-*
  97.  chips.
  98. You have obtained chip Gamma-*
  99. You now have a second  Gamma-*
  100.  chip.
  101. This gives you a third Gamma-*
  102.  chip.
  103. You now have !n
  104.  Gamma-*
  105.  chips.
  106. You have obtained chip Gamma-*
  107. You now have a second  Gamma-*
  108.  chip.
  109. This gives you a third Gamma-*
  110.  chip.
  111. You now have !n
  112.  Gamma-*
  113.  chips.
  114. MThis program is a game called "CHIPS."  The main idea is to do some detective
  115. Lwork in order to discover the restrictions and algortihms of the game.  Most
  116. Himportant of all is to EXPERIMENT--purposely trying all sorts of things.
  117. /* * * *  KEEP PAPER AND PENCIL HANDY  * * * * *
  118. /* * * *  EXPERIMENT AND NOTE RESULTS  * * * * *
  119. /* * * *  KEEP TRACK OF YOUR BALANCE   * * * * *
  120. KYOUR MISSION:  Collect all the computer chips you can--preferably different
  121. K               ones.  Try to get a complete set of Alpha chips.  Your score
  122. ?               indicates the degree of success of your mission.
  123. CHINTS:  Try to EXPERIMENT to find out answers to such questions as:
  124. ,        1.)  How many alpha chips are there?
  125. 5        2.)  How much money can I take to start with?
  126. L        3.)  What is the minimum balance I must have after purchasing chips?
  127.         & many others.
  128. 7Please give a name for a file to record this trip--->  
  129. NYou may print or display this file on the terminal after exiting this program.
  130.  Do you want to see the rules?   
  131. OK, Good luck 
  132. Space Cadet!
  133. Space Captain!
  134. Space Avenger!
  135. 7How much money are you going to take with you (between !
  136.  is suggested)?     
  137. Negative money is nonsense!
  138.  You must take at least 1 dollar.
  139. 1I'm sorry, we can't let you take that much money.
  140. BEGINNING BALANCE = *
  141. Welcome to Alpha!
  142. You have visited Alpha *
  143.  times counting this one.
  144. Welcome to Alpha!
  145. You have visited Alpha *
  146.  times counting this one.
  147. It cost you !
  148.  dollars to get here.
  149. It cost you !
  150.  dollars to get here.
  151. (How many chips would you like (they are !
  152.  dollars each)?  
  153. [you asked for *
  154.  chips.]
  155. [you asked for 1 chip.]
  156. 'A negative number of chips is nonsense!
  157. (I'm sorry we don't have that many chips.
  158. (I'm sorry we don't have that many chips.
  159. Do you want to go home?   
  160.  [you said you wanted to go home]
  161. KI'm sorry, we feel that you cannot afford to spend that much money.  Please
  162. Lreevaluate your situation and give us a new request.  If your new request is
  163. Kagain unsuitable, we will take the money that it would cost you but without
  164. giving you the chips.
  165. KI'm sorry, we feel that you cannot afford to spend that much money.  Please
  166. Lreevaluate your situation and give us a new request.  If your new request is
  167. Kagain unsuitable, we will take the money that it would cost you but without
  168. giving you the chips.
  169. "Now, how many chips do you want?  
  170. [you then asked for *
  171.  chips.]
  172. [you then asked for 1 chip.]
  173. 'A negative number of chips is nonsense!
  174. )I'm sorry, we don't have that many chips.
  175. +Do you want to end this trip and go home?  
  176. &[you then said you wanted to go home.]
  177. Welcome to Beta!
  178. Welcome to Beta!
  179. CIt cost you nothing to get here.  Seeing that someone took all your
  180. &money, we will give you one free chip.
  181. CIt cost you nothing to get here.  Seeing that someone took all your
  182. &money, we will give you one free chip.
  183. It cost you *
  184. 5 dollars to get here.  We have taken that, but we are
  185. giving you *
  186. / dollars so that you may continue your journey.
  187. !Meanwhile here is a chip for you.
  188. It cost you *
  189. 5 dollars to get here.  We have taken that, but we are
  190. giving you *
  191. / dollars so that you may continue your journey.
  192. !Meanwhile here is a chip for you.
  193. 9Welcome to Gamma!  It cost you only 1 dollar to get here.
  194. Welcome to Gamma!  It cost you *
  195.  dollars to get here.
  196. 9Welcome to Gamma!  It cost you only 1 dollar to get here.
  197. Welcome to Gamma!  It cost you *
  198.  dollars to get here.
  199. Here is a chip for you.
  200. Here is a chip for you.
  201. CCongratulations, you have obtained a complete set of Alpha chips!!!
  202. You are hereby awarded !d
  203. # bonus points for your achievement.
  204. GFor your information, the probability of obtaining the complete set was
  205. *.  This probability is based on the number
  206. of Alpha chips you got (*
  207. #) and the number of different Alpha
  208. Bchips in the collection.  Your score award, however, didn't depend
  209. on this probability.
  210. CCongratulations, you have obtained a complete set of Alpha chips!!!
  211. You are hereby awarded !d
  212. # bonus points for your achievement.
  213. GFor your information, the probability of obtaining the complete set was
  214. *.  This probability is based on the number
  215. of Alpha chips you got (*
  216. #) and the number of different Alpha
  217. Bchips in the collection.  Your score award, however, didn't depend
  218. on this probability.
  219. DSince you ended your trip, you were entitled to convert any leftover
  220. money to points at the rate of !
  221.  dollars per point.
  222. +These points have been added to your socre.
  223. DSince you ended your trip, you were entitled to convert any leftover
  224. money to points at the rate of !
  225.  dollars per point.
  226. +These points have been added to your socre.
  227. &* * * * *  YOUR SCORE FOR THE TRIP IS *
  228.   * * * * *
  229. &* * * * *  YOUR SCORE FOR THE TRIP IS *
  230.   * * * * *
  231. @You have collected enough chips to be promoted to Space Captain!
  232. @You have collected enough chips to be promoted to Space Captain!
  233. HIn addition to your score award, you have been promoted to Space Avenger
  234. 3for having collected a complete set of Alpha chips.
  235. HIn addition to your score award, you have been promoted to Space Avenger
  236. 3for having collected a complete set of Alpha chips.
  237. AYou have obtained a sufficient number of chips to be promoted to 
  238. Space Captain!
  239. Space Avenger!
  240. AYou have obtained a sufficient number of chips to be promoted to 
  241. Space Captain!
  242. Space Avenger!
  243. BFor your information the probability of you obtaining the complete
  244. set of Alpha chips was 
  245. zero.
  246. @This probability is based on the number of Alpha chips you got (*
  247. :and the number of different Alpha chips in the collection.
  248. BFor your information the probability of you obtaining the complete
  249. set of Alpha chips was 
  250. zero.
  251. @This probability is based on the number of Alpha chips you got (*
  252. :and the number of different Alpha chips in the collection.
  253. 'Would you like to take another trip?   
  254. Goodbye!
  255. 'Would you like to take another trip?   
  256.