home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / games / disk9.d64 / ab31 (.txt) < prev    next >
Commodore BASIC  |  1995-07-31  |  5KB  |  140 lines
  1. 1 POKE45,PEEK(174):POKE46,PEEK(175):CLR
  2. 2 POKE808,230
  3. 5 GOTO100
  4. 10 PRINT"[147]":POKE53280,0:POKE53281,0
  5. 11 PRINT"[154]       DAS GEHEIMNIS DER PYRAMIDEN     "
  6. 12 PRINT"[154]       [163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]     ":RETURN
  7. 13 PRINT"[158]ABENTEUER * SEITE ";S"":RETURN
  8. 20 PRINT""
  9. 21 PRINT"[129]WEITER SPACE[129]    ZURUECK F 1[129]   LADEN F 7"
  10. 22 POKE198,0:WAIT198,1:GETE$
  11. 23 IFE$=CHR$(32)THENZ=1:RETURN
  12. 24 IFE$=CHR$(133)THENZ=0:RETURN
  13. 25 IFE$=CHR$(136)THEN30
  14. 26 GOTO22
  15. 30 GOSUB50:PRINT""
  16. 31 PRINT"WENN DU DEM ORDEN BEITRITTST,"
  17. 32 PRINT"DANN WAEHLE ZIFFER [158] 1 [146]"
  18. 33 PRINT"WENN DU ABLEHNST,"
  19. 34 PRINT"DANN WAEHLE ZIFFER [158] 2 [146]"
  20. 35 PRINT"WENN DU DEN TEXT NOCHMALS LESEN WILLST,"
  21. 36 PRINT"DANN WAEHLE ZIFFER [158] 0 [146]"
  22. 37 POKE198,0:WAIT198,1:GETE$
  23. 38 IFE$="1"THENGOSUB70:LOAD"AB33",8,1
  24. 39 IFE$="2"THENGOSUB70:LOAD"AB34",8,1
  25. 40 IFE$="0"THENGOSUB50:S=1:GOTO101
  26. 41 GOTO37
  27. 50 FORI=4TO24:POKE781,I:SYS59903:NEXT:RETURN
  28. 60 FORI=5TO22:POKE781,I:SYS59903:NEXT:RETURN
  29. 70 PRINT"[147][155]"
  30. 71 PRINT"          [213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]"
  31. 72 PRINT"          [194]                   [194]"
  32. 73 PRINT"          [194] [154]DAS GEHEIMNIS DER[155] [194]"
  33. 74 PRINT"          [194]     [154]PYRAMIDE.[155]     [194]"
  34. 75 PRINT"          [194][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][194]"
  35. 76 PRINT"          [194]                   [194]"
  36. 77 PRINT"          [194]   [158]BITTE WARTEN ![155]  [194]"
  37. 78 PRINT"          [194]                   [194]"
  38. 79 PRINT"          [202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]":RETURN
  39. 90 PRINT"":PRINT"[129]              DRUECK SPACE[129]             "
  40. 91 POKE198,0:WAIT198,1:GETE$
  41. 92 IFE$=CHR$(32)THENRETURN
  42. 93 GOTO91
  43. 100 GOSUB10
  44. 101 GOSUB60:S=1:GOSUB13
  45. 102 PRINT"DU FOLGST MOHAMMED IN EINEN SCHMALEN"
  46. 103 PRINT"TUNNEL.AN EINER BESTIMMTEN STELLE "
  47. 104 PRINT"BLEIBT ER STEHEN UND TASTET UEBER DIE"
  48. 105 PRINT"WAND.EINER DER STEINE GLEITET ZURUECK"
  49. 106 PRINT"UND GIBT EINE NIEDRIGE OEFFNUNG FREI."
  50. 107 PRINT"[129]"CHR$(34)"SCHNELL!"CHR$(34)" MOHAMMED DREHT SICH UM."
  51. 108 PRINT"[129]"CHR$(34)"WIR MUESSEN UNS BEEILEN,BEVOR"
  52. 109 PRINT"JEMAND KOMMT."CHR$(34)
  53. 110 PRINT"ER BETRITT DEN DAHINTERLIEGENDEN"
  54. 111 PRINT"SCHACHT.DER GANG IST SO NIEDRIG,DASS"
  55. 112 PRINT"IHR AUF HAENDEN UND KNIEN KRIECHEN"
  56. 113 PRINT"MUESST.NOCH EINE GANZE WEILE BEWEGT"
  57. 114 PRINT"IHR EUCH LANGSAM VORWAERTS.SCHLIESSLICH"
  58. 115 PRINT"KOMMT IHR IN EINE GROSSE KAMMER.":GOSUB20
  59. 116 IFZ=0THENGOSUB60:GOTO101
  60. 117 GOSUB60:S=2:GOSUB13
  61. 118 PRINT"GENAU IN DER MITTE DES FUSSBODENS BE-"
  62. 119 PRINT"FINDET SICH EIN RUNDES LOCH."
  63. 120 PRINT"[129]"CHR$(34)"DAS NENNEN WIR DEN BRUNNEN DER ALTEN"CHR$(34)
  64. 121 PRINT"ERKLAERT MOHAMMED."
  65. 122 PRINT""CHR$(34)"DU MEINST,MAN KANN WASSER VON DA"
  66. 123 PRINT"UNTEN HOLEN."CHR$(34)
  67. 124 PRINT"[129]"CHR$(34)"ES GIBT VIELE ANDERE DINGE AUSSER"
  68. 125 PRINT"WASSER,DIE MAN AUS EINEM BRUNNEN HOLEN"
  69. 126 PRINT"KANN - WEISHEIT,ZUM BEISPIEL.DIESER   "
  70. 127 PRINT"BRUNNEN IST SEHR TIEF.HIER,WIRF MAL   "
  71. 128 PRINT"DIESE MUENZE HINEIN."CHR$(34)
  72. 129 PRINT"ER REICHT DIR EINE KLEINE MUENZE."
  73. 130 PRINT"SIE IST DREIECKIG UND HAT EIN KUNST-"
  74. 131 PRINT"VOLLES MUSTER IN DER MITTE.DU WIRFST"
  75. 132 PRINT"DIE MUENZE IN DEN BRUNNEN UND BEUGST"
  76. 133 PRINT"DICH VOR.":GOSUB20
  77. 134 IFZ=0THENGOSUB60:GOTO101
  78. 135 GOSUB60:S=3:GOSUB13
  79. 136 PRINT"EINE VOLLE MINUTE HOERST DU GAR NICHTS."
  80. 137 PRINT"DANN VERNIMMST DU EIN SELTSAMES SUMMEN-"
  81. 138 PRINT"EINEN HOHEN MELODISCHEN TON,DER SOWOHL"
  82. 139 PRINT"IM BRUNNEN WIE AUCH IN DEINEM KOPF    "
  83. 140 PRINT"VIBRIERT.DU DREHST DICH NACH MOHAMMED "
  84. 141 PRINT"UM,ABER DER IST PLOETZLICH VERSCHWUNDEN"
  85. 142 PRINT"PLOETZLICH MERKST DU,WIE DU DAS GLEICH-"
  86. 143 PRINT"GEWICHT VERLIERST.DU FAELLST IN DEN   "
  87. 144 PRINT"BRUNNEN."
  88. 145 PRINT"HAT MOHAMMED DICH IN DEN BRUNNEN GE-"
  89. 146 PRINT"STOSSEN? BIST DU AUSGERUTSCHT UND VON"
  90. 147 PRINT"SELBST HINEINGEFALLEN ? DU WEISST ES"
  91. 148 PRINT"NICHT.DU FRAGST DICH,WIE TIEF DU FALLEN"
  92. 149 PRINT"WIRST.DU KANNST IMMER NOCH DAS SUMMEN"
  93. 150 PRINT"HOEREN.ES WIRD LAUTER.":GOSUB20
  94. 151 IFZ=0THENGOSUB60:GOTO117
  95. 152 GOSUB60:S=4:GOSUB13
  96. 153 PRINT"DU FAELLST LANGSAMER.EIN STARKER LUFT-"
  97. 154 PRINT"STOSS VON UNTEN FAENGT DEINEN STURZ AB."
  98. 155 PRINT"DU LANDEST AUF DEINEN FUESSEN UND "
  99. 156 PRINT"BLICKST DICH ERSTAUNT UM.IN EINER ART"
  100. 157 PRINT"AMPHITHEATER STEHST DU AUF EINER PLATT-"
  101. 158 PRINT"FORM.IM KREIS UM DICH HERUM SITZEN NEUN"
  102. 159 PRINT"WEISSGEKLEIDETE GESTALTEN AUF GROSSEN"
  103. 160 PRINT"STEINTHRONEN.EINE DER GESTALTEN,DIE AUF"
  104. 161 PRINT"DEM GROESSTEN THRON SITZT,WINKT DICH  "
  105. 162 PRINT"HERAN."
  106. 163 PRINT"[155]"CHR$(34)"WIR HABEN DICH ERWARTET."CHR$(34)
  107. 164 PRINT""CHR$(34)"WO BIN ICH,"CHR$(34)" WILLST DU WISSEN."
  108. 165 PRINT"[155]"CHR$(34)"DIESE KAMMER IST DER TIEFSTE"
  109. 166 PRINT"PUNKT EINER UMGEKEHRTEN PYRAMIDE,DEM "
  110. 167 PRINT"GENAUEN SPIEGELBILD DER PYRAMIDE UEBER"
  111. 168 PRINT"UNS.DIES IST DIE WAHRE MAGISCHE FORM,"
  112. 169 PRINT"DIE VON DEN ALTEN ENTDECKT WURDE."CHR$(34):GOSUB20
  113. 170 IFZ=0THENGOSUB60:GOTO135
  114. 171 GOSUB60:S=5:GOSUB13
  115. 172 PRINT"[155]"CHR$(34)"JENEN,DIE NICHT ZU UNSEREM ORDEN GE- "
  116. 173 PRINT"HOEREN,IST NUR DIE OBERE HAELFTE     "
  117. 174 PRINT"DIESER FORM UEBER DER ERDE BEKANNT.  "
  118. 175 PRINT"WIR OFFENBAREN DIR DIESES GEHEIMNIS, "
  119. 176 PRINT"WEIL WIR HOFFEN,DASS DU UNSEREM ORDEN"
  120. 177 PRINT"BEITRETEN WIRST.DEIN ONKEL IST EINER"
  121. 178 PRINT"UNSERER EINGEWEIHTEN.ER BEFINDET SICH"
  122. 179 PRINT"IM AUGENBLICK IN GROSSER GEFAHR.WENN"
  123. 180 PRINT"DU EIN MITGLIED UNSERES ORDEN WIRST,"
  124. 181 PRINT"WIRD ES DIR VIEL LEICHTER FALLEN,IHN"
  125. 182 PRINT"ZU FINDEN."CHR$(34)
  126. 183 PRINT""CHR$(34)"WAS MUSS ICH TUN,UM EUREM ORDEN"
  127. 184 PRINT"[155]"CHR$(34)"PSYCHISCHE ENERGIE WIRD OBEN"
  128. 185 PRINT"GESAMMELT UND DANN HIER UNTEN KONZEN-"
  129. 186 PRINT"TRIERT.DIESE ENERGIE WIRD DICH VER-"
  130. 187 PRINT"AENDERN - UND DICH IN DEN ORDEN DES"
  131. 188 PRINT"LICHTS EINFUEHREN."CHR$(34):GOSUB20
  132. 189 IFZ=0THENGOSUB60:GOTO152
  133. 190 GOSUB60:S=6:GOSUB13
  134. 191 PRINT"[155]"CHR$(34)"ABER ICH WARNE DICH !"
  135. 192 PRINT"DEIN LEBEN WIRD NIE MEHR SO SEIN WIE"
  136. 193 PRINT"BISHER.IN ZUKUNFT NMUSS ES DEN KAMPF"
  137. 194 PRINT"GEGEN DIE MAECHTE DER FINSTERNIS    "
  138. 195 PRINT"GEWIDMET SEIN."CHR$(34)
  139. 196 PRINT"DU MUSST DICH NUN ENTSCHEIDEN !":GOSUB90:GOTO30
  140.