home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh2x / sh29c.d64 / !anleitung! (.txt) next >
Commodore BASIC  |  1995-03-30  |  8KB  |  236 lines
  1. 100 PRINT"[147]";
  2. 110 IFA=0THENA=1:LOAD"DOC-MAKER.CODE",8,1
  3. 120 SYS828:PRINT"[147]";
  4. 130 PRINT
  5. 140 PRINT" mANKOMANIA, DAS sPIEL UM vERLUSTE"
  6. 150 PRINT
  7. 160 PRINT" dAS  sPIEL  mANKOMANIA IST NUR AUF DEM"
  8. 170 PRINT" c128 LAUFF[HIG !!!!"
  9. 180 PRINT
  10. 190 PRINT" sPIELEN  sIE  GERNE  mONOPOLY? wENN ES"
  11. 200 PRINT" iHNEN  LIEGT,  DANN  SOLLTEN  sIE SICH"
  12. 210 PRINT" EINMAL IN mANKOMANIA VERSUCHEN."
  13. 220 PRINT" vERSCHLEUDERN  sIE iHR gELD. gEBEN sIE"
  14. 230 PRINT" EINE  mILLION  AUF DEM SCHNELLSTEN wEG"
  15. 240 PRINT" AUS.  dAS  IST LEICHT GESAGT, ABER NUR"
  16. 250 PRINT" SCHWER ZU REALISIEREN."
  17. 260 PRINT
  18. 270 PRINT" bIS   ZU  VIER  mITSPIELER  K\NNEN  IN"
  19. 280 PRINT" mANKOMANIA   VERSUCHEN,  EINE  mILLION"
  20. 290 PRINT" SINNLOS         ZU         VERSPIELEN."
  21. 300 PRINT" aKTIENGESCH[FTE,          gL]CKSSPIEL,"
  22. 310 PRINT" sCHENKUNGEN  UND  sPENDEN UNTERST]TZEN"
  23. 320 PRINT" DIESEN  vERSUCH.  aLLERDINGS  KANN MAN"
  24. 330 PRINT" AUCH SEHR VIEL gELD GEWINNEN, SEHR ZUR"
  25. 340 PRINT" fREUDE  DER  mITSPIELER.  dIE  GR\^TEN"
  26. 350 PRINT" gEWINN- UND vERLUSTCHANCEN BIETEN SICH"
  27. 360 PRINT" IN  DEN  eCKEN  DES  sPIELFELDES, DORT"
  28. 370 POKE198,0:WAIT198,1:PRINT"[147]";
  29. 380 PRINT" WARTEN  DIE  b\RSE, DAS aUTORENNEN UND"
  30. 390 PRINT" ZWEI  cASINOS  AUF  DEN  UNGL]CKLICHEN"
  31. 400 PRINT" gEWINNER."
  32. 410 PRINT
  33. 420 PRINT" nACH  DEM  eRSCHEINEN  DES tITELBILDES"
  34. 430 PRINT" WIRD MAN  AUFGEFORDERT, DIE [193]NZAHL DER"
  35. 440 PRINT" mITSPIELER  EINZUGEBEN.  sIND  WENIGER"
  36. 450 PRINT" ALS    VIER    mITSPIELER   VORHANDEN,"
  37. 460 PRINT" ]BERNIMMT  DER cOMPUTER DIE RESTLICHEN"
  38. 470 PRINT" sPIELER.  gEBEN sIE NUN NOCH DIE nAMEN"
  39. 480 PRINT" DER  sPIELER  EIN.  dER  cOMPUTER GIBT"
  40. 490 PRINT" SICH  SELBST  DIE  nAMEN (ZUM bEISPIEL"
  41. 500 PRINT" cOMPUTER 1)."
  42. 510 PRINT
  43. 520 PRINT" nUN   ERSCHEINT   DAS   sPIELFELD.  eS"
  44. 530 PRINT" BESTEHT   AUS   GELBEN   UND   ORANGEN"
  45. 540 PRINT" fELDERN;  IN  DEN  eCKEN BEFINDEN SICH"
  46. 550 PRINT" DIE  gL]CKSSPIELE. iN DER mITTE WERDEN"
  47. 560 PRINT" DER  nAME  DES  sPIELERS, SEIN kAPITAL"
  48. 570 PRINT" UND    DIE    aNZAHL   SEINER   aKTIEN"
  49. 580 PRINT" ANGEZEIGT.  dARUNTER BEFINDET SICH DIE"
  50. 590 PRINT" aNZEIGE DER w]RFEL."
  51. 600 PRINT
  52. 610 PRINT" dR]CKEN  sIE NUN space, UM ZU W]RFELN."
  53. 620 POKE198,0:WAIT198,1:PRINT"[147]";
  54. 630 PRINT" sTEHEN  DIE aUGEN FEST, WIRD DIE fIGUR"
  55. 640 PRINT" ZUM zIELFELD BEWEGT."
  56. 650 PRINT
  57. 660 PRINT" kOMMEN  sIE  AN  EINEM gL]CKSSPIELFELD"
  58. 670 PRINT" VORBEI,  WERDEN  sIE  GEFRAGT,  OB sIE"
  59. 680 PRINT" SPIELEN  WOLLEN.  dER  cOMPUTER TRIFFT"
  60. 690 PRINT" F]R    SICH   NAT]RLICH   SELBST   DIE"
  61. 700 PRINT" eNTSCHEIDUNG, OB ER SPIELT ODER NICHT."
  62. 710 PRINT
  63. 720 PRINT" kOMMEN  sIE  AUF EIN GELBES fELD, GIBT"
  64. 730 PRINT" DER  cOMPUTER EINE mELDUNG AUS UND SIE"
  65. 740 PRINT" VERLIEREN ODER ERHALTEN gELD. mANCHMAL"
  66. 750 PRINT" M]SSEN  sIE  AUCH  EIN  KLEINES  sPIEL"
  67. 760 PRINT" SPIELEN."
  68. 770 PRINT
  69. 780 PRINT" lANDEN  sIE AUF EINEM ORANGEN fELD, SO"
  70. 790 PRINT" WERDEN  sIE AUFGEFORDERT, ZU EINEM DER"
  71. 800 PRINT" gL]CKSSPIELE ZU GEHEN."
  72. 810 PRINT
  73. 820 PRINT" zWEI    GELBE   fELDER   WEISEN   EINE"
  74. 830 PRINT" bESONDERHEIT AUF:"
  75. 840 PRINT
  76. 850 PRINT" 1. [215]]RFLE MIT EINEM [215]]RFEL. [198]]R EINE 6"
  77. 870 POKE198,0:WAIT198,1:PRINT"[147]";
  78. 880 PRINT" BEKOMMST [196]U 10000 [205]ARK."
  79. 890 PRINT" dR]CKEN sIE space, UM ZU W]RFELN."
  80. 900 PRINT" dER cOMPUTER W]RFELT F]R SICH AUTO-"
  81. 910 PRINT" MATISCH. bEI EINER 6 ERHALTEN sIE"
  82. 920 PRINT" 10000 mARK."
  83. 930 PRINT" 2. [214]ERW\HNE EINEN [205]ITSPIELER MIT 5000"
  84. 940 PRINT" [205]ARK."
  85. 950 PRINT" sIE WERDEN GEFRAGT, WER DAS gELD "
  86. 960 PRINT" BEKOMMEN SOLL. nICHT VORHANDENE"
  87. 970 PRINT" nAMEN UND nAMEN VON BANKROTTEN"
  88. 980 PRINT" sPIELERN WERDEN NICHT AKZEPTIERT."
  89. 990 PRINT
  90. 1000 PRINT" wENN  sIE  SICH  ENTSCHIEDEN HABEN EIN"
  91. 1010 PRINT" gL]CKSSPIEL  ZU  SPIELEN ODER NACH DEM"
  92. 1020 PRINT" BETRETEN  EINES  ORANGEN  fELDES  DAZU"
  93. 1030 PRINT" GEZUNGEN   SIND,  HABEN  [211]IE  FOLGENDE"
  94. 1040 PRINT" aUSWAHLM\GLICHKEITEN:"
  95. 1050 PRINT
  96. 1060 PRINT" 1. sPIEL-cASINO"
  97. 1070 PRINT
  98. 1080 PRINT" zUERST   M]SSEN   sIE   AM   aUTOMATEN"
  99. 1090 PRINT" SPIELEN.   dER  eINSATZ  BETR[GT  2000"
  100. 1100 PRINT" mARK.  dR]CKEN sIE space, UM DAS sPIEL"
  101. 1110 PRINT" ZU  sTARTEN. sIND DIE fELDER GEFALLEN,"
  102. 1120 POKE198,0:WAIT198,1:PRINT"[147]";
  103. 1130 PRINT" SO GEWINNEN sIE: "
  104. 1140 PRINT
  105. 1150 PRINT"  50000 [205]ARK BEI 2 GLEICHEN [198]ELDERN"
  106. 1160 PRINT" 150000 mARK BEI 3 GLEICHEN fELDERN"
  107. 1170 PRINT" 300000 mARK BEI 3 dOLLAR-fELDERN"
  108. 1180 PRINT"      0 [205]ARK BEI 3 VERSCHIEDEN [198]ELDERN"
  109. 1190 PRINT
  110. 1200 PRINT" dR]CKEN  sIE  DIE  space-tASTE, UM DAS"
  111. 1210 PRINT" MAGISCHE  rOULETTE  ZU STARTEN. dANACH"
  112. 1220 PRINT" M]SSEN  sIE  SICH  ENTSCHEIDEN, OB sIE"
  113. 1230 PRINT" AUF  zAHL,  dUTZEND  ODER fARBE SETZEN"
  114. 1240 PRINT" WOLLEN."
  115. 1250 PRINT
  116. 1260 PRINT" dANN  W[HLEN  sIE DIE zAHL (0 BIS 36),"
  117. 1270 PRINT" DAS  dUTZEND  (1 BIS 3) ODER DIE fARBE"
  118. 1280 PRINT" (rOT/sCHWARZ)  AUF  WELCHE  sIE SETZEN"
  119. 1290 PRINT" WOLLEN."
  120. 1300 PRINT
  121. 1310 PRINT" dR]CKEN  sIE  DIE  space-tASTE, UM DAS"
  122. 1320 PRINT" rOULETTE   ZU   STARTEN.  eINSATZ  UND"
  123. 1330 PRINT" gEWINNE SIND WIE FOLGT VERTEILT."
  124. 1340 PRINT
  125. 1350 PRINT"             [197]INSATZ         [199]EWINN"
  126. 1360 PRINT" zahl        5000 mARK      150000 mARK"
  127. 1370 POKE198,0:WAIT198,1:PRINT"[147]";
  128. 1380 PRINT" dutzend    20000 mARK      100000 mARK"
  129. 1390 PRINT" farbe      50000 mARK       80000 mARK"
  130. 1400 PRINT
  131. 1410 PRINT" dR]CKEN  sIE  space,  UM DAS cASINO ZU"
  132. 1420 PRINT" VERLASSEN."
  133. 1430 PRINT
  134. 1440 PRINT" 2. aKTIENB\RSE"
  135. 1450 PRINT
  136. 1460 PRINT" dIESE  sPIEL LOHNT SICH NAT]RLICH NUR,"
  137. 1470 PRINT" WENN sIE aKTIEN BESITZEN."
  138. 1480 PRINT
  139. 1490 PRINT" aUF  dRUCK  VON  space  WIRD DAS sPIEL"
  140. 1500 PRINT" GESTARTET.  sTEHT  DER  kURS  FEST, SO"
  141. 1510 PRINT" ENTSCHEIDET SICH, OB sIE GEWONNEN ODER"
  142. 1520 PRINT" VERLOREN HABEN."
  143. 1530 PRINT
  144. 1540 PRINT" fALLENDER kURS  : -15000 mARK PRO "
  145. 1550 PRINT"                   BETROFFENE [193]KTIE"
  146. 1560 PRINT" sTEIGENDER kURS : +15000 mARK PRO"
  147. 1570 PRINT"                   BETROFFENE [193]KTIE"
  148. 1580 PRINT" [200]OCHKONJUNKTUR  : +15000  MARK  PRO"
  149. 1590 PRINT"                   [193]KTIE"
  150. 1600 PRINT
  151. 1610 PRINT" [196]R]CKEN  [211]IE  [211][208][193][195][197],  UM DIE [194]\RSE ZU"
  152. 1620 POKE198,0:WAIT198,1:PRINT"[147]";
  153. 1630 PRINT" VERLASSEN."
  154. 1640 PRINT
  155. 1650 PRINT" 3. b\SE 1"
  156. 1660 PRINT
  157. 1670 PRINT" sIE  HABEN  DIE aUFGABE, MIT 2 w]RFELN"
  158. 1680 PRINT" ZU  W]RFELN.  dR]CKEN  sIE DAZU space,"
  159. 1690 PRINT" WORAUF  DIE  w]RFEL  SICH  IN bEWEGUNG"
  160. 1700 PRINT" SETZEN."
  161. 1710 PRINT
  162. 1720 PRINT" hABEN  sIE  EINE  1 GEWORFEN, BEKOMMEN"
  163. 1730 PRINT" sIE   100000  mARK.  hABEN  sIE  EINEN"
  164. 1740 PRINT" eINERPASCH   GEWORFEN,   BEKOMMEN  sIE"
  165. 1750 PRINT" 300000  mARK.  w]RFELN  sIE  KEINE  1,"
  166. 1760 PRINT" VERLIEREN   sIE   2500  mARK  MAL  DIE"
  167. 1770 PRINT" GESAMTE   aUGENZAHL  UND  K\NNEN  NOCH"
  168. 1780 PRINT" EINMAL W]RFELN."
  169. 1790 PRINT
  170. 1800 PRINT" aUF  dRUCK VON space VERLASSEN sIE DIE"
  171. 1810 PRINT" b|se 1."
  172. 1820 PRINT
  173. 1830 PRINT" 4. aUTORENNEN"
  174. 1840 PRINT
  175. 1850 PRINT" bEIM  aUTORENNEN FAHREN 4 aUTOS UM DIE"
  176. 1860 PRINT" wETTE,       DIE      UNTERSCHIEDLICHE"
  177. 1870 POKE198,0:WAIT198,1:PRINT"[147]";
  178. 1880 PRINT" gEWINNCHANCEN HABEN."
  179. 1890 PRINT
  180. 1900 PRINT" zUERST WERDEN sIE GEFRAGT, AUF WELCHES"
  181. 1910 PRINT" aUTO  sIE  WIEVIEL  SETZEN WOLLEN. dAS"
  182. 1920 PRINT" ERSTE    aUTO    HAT    DIE   H\CHSTEN"
  183. 1930 PRINT" gEWINNCHANCEN,    DAS    VIERTE    DIE"
  184. 1940 PRINT" gERINGSTEN."
  185. 1950 PRINT
  186. 1960 PRINT" dR]CKEN   sIE  DANN  space,  WIRD  DAS"
  187. 1970 PRINT" rENNEN  GESTARTET.  sTEHT  DER  sIEGER"
  188. 1980 PRINT" FEST,  SO WIRD GEPR]FT, OB sIE RICHTIG"
  189. 1990 PRINT" GETIPPT HABEN. wENN DIES DER fALL IST,"
  190. 2000 PRINT" GEWINNEN"
  191. 2010 PRINT" sIE:"
  192. 2020 PRINT
  193. 2030 PRINT" BEI aUTO 1 :    eINSATZ MAL 2"
  194. 2040 PRINT" BEI aUTO 2 :    eINSATZ MAL 3"
  195. 2050 PRINT" BEI aUTO 3 :    eINSATZ MAL 4"
  196. 2060 PRINT" BEI aUTO 4 :    eINSATZ MAL 5"
  197. 2070 PRINT
  198. 2080 PRINT" zUS[TZLICH  ZU  DEN GELBEN UND ORANGEN"
  199. 2090 PRINT" fELDERN   GIBT   ES  NOCH  DIE  BLAUEN"
  200. 2100 PRINT" hOTELFELDER  UND  DIE lOTTERIE. kOMMEN"
  201. 2110 PRINT" sIE AUF EIN hOTELFELD, SO GIBT ES DREI"
  202. 2120 POKE198,0:WAIT198,1:PRINT"[147]";
  203. 2130 PRINT" m\GLICHKEITEN:"
  204. 2140 PRINT
  205. 2150 PRINT" 1.  bESITZEN  sIE  NOCH KEIN hOTEL UND"
  206. 2160 PRINT" IST DAS hOTEL NOCH FREI, SO M]SSEN sIE"
  207. 2170 PRINT" ES F]R DEN ANGEGEBENEN pREIS KAUFEN."
  208. 2180 PRINT
  209. 2190 PRINT" 2. dAS hOTEL IST BEREITS VERKAUFT. sIE"
  210. 2200 PRINT" M]SSEN     DANN     DEN    ANGEGEBENEN"
  211. 2210 PRINT" zIMMERPREIS AN DEN bESITZER ZAHLEN."
  212. 2220 PRINT
  213. 2230 PRINT" 3.  dAS  hOTEL  GEH\RT  iHNEN ODER sIE"
  214. 2240 PRINT" HABEN  EIN ANDERES hOTEL UND DAS hOTEL"
  215. 2250 PRINT" GEH\RT KEINEM, SO BEZAHLEN sIE NICHTS."
  216. 2260 PRINT
  217. 2270 PRINT" kOMMEN sIE AN DEM lOTTERIEFELD VORBEI,"
  218. 2280 PRINT" K\NNEN  sIE  5000 mARK IN DIE lOTTERIE"
  219. 2290 PRINT" EINZAHLEN. dIES IST EBENFALLS AUF ZWEI"
  220. 2300 PRINT" DER  GELBEN  fELDER  M\GLICH. dAS gELD"
  221. 2310 PRINT" AUS DER lOTTERIE BEKOMMT DERJENIGE DER"
  222. 2320 PRINT" AUF DAS lOTTERIEFELD KOMMT."
  223. 2330 PRINT
  224. 2340 PRINT" iST  EIN  sPIELER  BANKROTT,  WIRD EIN"
  225. 2350 PRINT" tUSCH  GESPIELT. eR WIRD AUS DEM sPIEL"
  226. 2360 PRINT" ENTFERNT  UND  SEIN  hOTEL ZUM vERKAUF"
  227. 2370 POKE198,0:WAIT198,1:PRINT"[147]";
  228. 2380 PRINT" FREIGEGEBEN. sIND DREI sPIELER PLEITE,"
  229. 2390 PRINT" GIBT   DER  cOMPUTER  DAS  eNDRESULTAT"
  230. 2400 PRINT" SOWIE  DIE  nAMEN  UND  DIE  zEIT  DER"
  231. 2410 PRINT" [211]PIELER,  BIS  ZUM  [194]ANKROTT, AUF  DEM"
  232. 2420 PRINT" bILDSCHIRM AUS."
  233. 2430 PRINT""
  234. 2440 POKE198,0:WAIT198,1:PRINT"[147]";
  235. 2500 SYS64738
  236.