home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / games / disk9.d64 / ab28 (.txt) < prev    next >
Commodore BASIC  |  1995-07-31  |  4KB  |  96 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)THEN170
  14. 26 GOTO22
  15. 60 FORI=5TO22:POKE781,I:SYS59903:NEXT:RETURN
  16. 70 PRINT"[147][155]"
  17. 71 PRINT"          [213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]"
  18. 72 PRINT"          [194]                   [194]"
  19. 73 PRINT"          [194] [154]DAS GEHEIMNIS DER[155] [194]"
  20. 74 PRINT"          [194]     [154]PYRAMIDE.[155]     [194]"
  21. 75 PRINT"          [194][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][194]"
  22. 76 PRINT"          [194]                   [194]"
  23. 77 PRINT"          [194]   [158]BITTE WARTEN ![155]  [194]"
  24. 78 PRINT"          [194]                   [194]"
  25. 79 PRINT"          [202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]":RETURN
  26. 90 PRINT"":PRINT"[129]              DRUECK SPACE[129]             "
  27. 91 POKE198,0:WAIT198,1:GETE$
  28. 92 IFE$=CHR$(32)THENRETURN
  29. 93 GOTO91
  30. 100 GOSUB10
  31. 101 GOSUB60:S=1:GOSUB13
  32. 102 PRINT"ALS IHR ANSTALTEN MACHT,DIE PLATTFORM"
  33. 103 PRINT"ZU VERLASSEN,GRUESST EUCH DER MANN.[155]"
  34. 104 PRINTCHR$(34)"MEIN NAME IST IMHOTEP.ICH GRUESSE EUCH"
  35. 105 PRINT"AUS DER VERGANGENHEIT."CHR$(34)
  36. 106 PRINT""CHR$(34)"EINEN AUGENBLICK LANG HABE ICH GE-"
  37. 107 PRINT"DACHT,WIR WAEREN IN DER VERGANGENHEIT,"CHR$(34)" SAGST DU."
  38. 108 PRINT"[155]"CHR$(34)"NEIN,ICH BIN WIRKLICH HIER,UND"
  39. 109 PRINT"IHR SEID NICHT IM ALTEN AEGYPTEN.DAS"
  40. 110 PRINT"HIER IST EINE AUFZEICHNUNG-EIN DREI- "
  41. 111 PRINT"DIMENSIONALES HOLOGRAMM.MEIN BILD IST"
  42. 112 PRINT"DARAUF PROGRAMMIERT,AUF PERSOENLICH-"
  43. 113 PRINT"KEITEN,SO WIE IHR ES SEID,ZU REAGIEREN.":GOSUB20
  44. 114 IFZ=0THENGOSUB60:GOTO101
  45. 115 GOSUB60:S=2:GOSUB13
  46. 116 PRINT"[155]"CHR$(34)"OBWOHL IHR MEINEN ARM FUEHLEN KOENNT,"
  47. 117 PRINT"WENN ICH WIE JETZT DEINE HAND BERUEHRE"
  48. 118 PRINT"IST DAS NUR EINE ILLUSION.DAS VERFAHREN"
  49. 119 PRINT"IST ZU KOMPLIZIERT,UM ES EUCH ZU ER-"
  50. 120 PRINT"KLAEREN.EURE NACHKOMMEN WERDEN ES EINES"
  51. 121 PRINT"TAGES BEGREIFEN.[129] "
  52. 122 PRINTCHR$(34)"SIE SIND DIE BERUEHMTESTE GESTALT IN";
  53. 123 PRINT"   DER AEGYPTISCHEN GESCHICHTE,IMHOTEP,"CHR$(34)
  54. 124 PRINT"SAGT HASSAN.[129]"CHR$(34)"SIE WAREN -ODER SIND-DAS"
  55. 125 PRINT"GROESSTE GENIE,DAS JE GELEBT HAT."CHR$(34)
  56. 126 PRINT"[155]"CHR$(34)"ES STIMMT,DASS ICH EURER RASSE"
  57. 127 PRINT"EIN BISSCHEN GEHOLFEN HABE.ICH HABE"
  58. 128 PRINT"EUCH DIE GRUNDLAGEN DES ACKERBAUS,DER"
  59. 129 PRINT"ARCHITEKTUR,DER MATHEMATIK,DER TECHNIK"
  60. 130 PRINT"UND DER MEDIZIN BEIGEBRACHT."CHR$(34):GOSUB20
  61. 131 IFZ=0THENGOSUB60:GOTO101
  62. 132 GOSUB60:S=3:GOSUB13
  63. 133 PRINT"[155]"CHR$(34)"DAS WAR VOR 5000 JAHREN.ABER"
  64. 134 PRINT"ICH WEISS NICHT,OB ES KLUG VON  MIR WAR"
  65. 135 PRINT"DAS WERDE ICH ERST WISSEN,WENN ICH ES "
  66. 136 PRINT"AN DER ZEIT FINDE,ZURUECKZUKOMMEN.EUER"
  67. 137 PRINT"PLANET LIEGT IN MEINEM STUDIENQUADRAN-"
  68. 138 PRINT"TEN,ABER ER IST WEIT DRAUSSEN AM RAND "
  69. 139 PRINT"DER GALAXIS."CHR$(34)
  70. 140 PRINT"NOCH WAEHREND IMHOTEP SPRICHT,SCHEINT"
  71. 141 PRINT"SEIN BILD EIN BISSCHEN ZU VERSCHWIMMEN.[155]"
  72. 142 PRINTCHR$(34)"ICH MOECHTE MICH DAFUER ENTSCHULDIGEN,"
  73. 143 PRINT"DASS UNSERE BEGEGNUNG NUR SO KURZ WAR,"CHR$(34)
  74. 144 PRINT"SAGT IMHOTEP.[155]"CHR$(34)"ICH HOFFE,DASS EURE"
  75. 145 PRINT"ZIVILISATION BLUEHEN UND GEDEIHEN WIRD."
  76. 146 PRINT"EINES TAGES WERDET IHR ODER EURE NACH-"
  77. 147 PRINT"KOMMEN DURCH DIE UNENDLICHKEIT DES    "
  78. 148 PRINT"RAUMS KOMMEN UND MICH BESUCHEN.":GOSUB20
  79. 149 IFZ=0THENGOSUB60:GOTO115
  80. 150 GOSUB60:S=4:GOSUB13
  81. 151 PRINT"DAS BILD BEGINNT ZU VERBLASSEN UND IHR"
  82. 152 PRINT"BEFINDET EUCH WIEDER IM INNERN DER   "
  83. 153 PRINT"PYRAMIDEN-KAMMER.DIE TUER OEFFNET SICH"
  84. 154 PRINT"UND IHR KEHRT AUF DEMSELBEN WEG "
  85. 155 PRINT"ZURUECK AUF DEM IHR GEKOMMEN SEID.[129]"
  86. 156 PRINTCHR$(34)"ICH GLAUBE,WIR SOLLTEN DIESE ENT";
  87. 157 PRINT"DECKUNGFUER UNS BEHALTEN,"CHR$(34)" SAGT ONKEL BRUCE."
  88. 158 PRINT"DU BIST AUCH DIESER MEINUNG.AM NAECHS-"
  89. 159 PRINT"TEN TAG SCHUETTEN DIE ARBEITER DEN"
  90. 160 PRINT"TUNNEL ZU.ALS DU DIE STAETTE VER-"
  91. 161 PRINT"LAESST,KOMMST DU AN DER SPHINX VORBEI."
  92. 162 PRINT"VIELLEICHT BILDEST DU ES DIR NUR EIN,"
  93. 163 PRINT"DASS SIE SAGT:[158]"CHR$(34)"IHR WERDET EINES"
  94. 164 PRINT"TAGES WILLKOMMEN SEIN."CHR$(34):GOSUB90
  95. 170 GOSUB70:LOAD"AB/SCORE",8,1
  96.