home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / games / disk9.d64 / ab33 (.txt) < prev    next >
Commodore BASIC  |  1995-07-31  |  3KB  |  75 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)THEN150
  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""CHR$(34)"WENN ES MIR HILFT,ONKEL BRUCE ZU"
  33. 103 PRINT"RETTEN,TRETE ICH EUREM ORDEN BEI."CHR$(34)
  34. 104 PRINT"SAGST DU."
  35. 105 PRINT"[155]"CHR$(34)"DANN STELL DICH AUF DAS DREIECK"
  36. 106 PRINT"AUF DEM BODEN VOR DIR."CHR$(34)
  37. 107 PRINT"DU SCHAUST AUF DEN BODEN,SELTSAM - DAS"
  38. 108 PRINT"DREIECK HAT DAS GLEICHE MUSTER WIE DIE"
  39. 109 PRINT"MUENZE,NUR IST ES VIEL GROESSER.ALS DU"
  40. 110 PRINT"VORTRITTST,DURCHSTROEMT DICH EINE     "
  41. 111 PRINT"ENERGIE,UND EIN INTENSIVES LICHT      "
  42. 112 PRINT"HUELLT DEINEN KOERPER EIN.PLOETZLICH"
  43. 113 PRINT"WIRST DU VON EINEM WIRBELWIND GEPACKT"
  44. 114 PRINT"UND SCHIESST SENKRECHT NACH OBEN DURCH"
  45. 115 PRINT"DIE PYRAMIDE.":GOSUB20
  46. 116 IFZ=0THENGOSUB60:GOTO101
  47. 117 GOSUB60:S=2:GOSUB13
  48. 118 PRINT"ALS DU HINUNTERSCHAUST,SIEHST DU DIE"
  49. 119 PRINT"PYRAMIDE UNTER DIR ZURUECKWEICHEN.IHRE"
  50. 120 PRINT"SPITZE HAT SICH IN EIN RIESIGES AUGE  "
  51. 121 PRINT"VERWANDELT,DAS LICHTSTRAHLEN IN ALLE  "
  52. 122 PRINT"RICHTUNGEN WIRFT.DAZWISCHEN SCHIMMERN "
  53. 123 PRINT"STREIFEN VON LEUCHTENDER FARBE.ALS DU"
  54. 124 PRINT"DICH AUF DAS AUGE DER PYRAMIDE KONZEN-"
  55. 125 PRINT"TRIERST,SCHEINT SICH DEIN KOERPER AUF-"
  56. 126 PRINT"ZULOESEN.DU SELBST WIRST DAS AUGE -ALL-"
  57. 127 PRINT"SEHEND,ALLWISSEND.DEIN GEIST DEHNT SICH"
  58. 128 PRINT"AUS,UM DAS UNIVERSUM ZU ERFASSEN."
  59. 129 PRINT"DIE GANZEN GEHEIMNISSE DES LEBENS"
  60. 130 PRINT"SIND DIR JETZT VERSTAENDLICH.DANN"
  61. 131 PRINT"KEHREN DEIN GEIST UND DEIN KOERPER ZUR"
  62. 132 PRINT"ERDE ZURUECK UND DU WEISST,WO ONKEL   "
  63. 133 PRINT"BRUCE FESTGEHALTEN WIRD.":GOSUB20
  64. 134 IFZ=0THENGOSUB60:GOTO101
  65. 135 GOSUB60:S=3:GOSUB13:PRINT"MIT DEINEN NEUEN FAEHIGKEITEN NIMMST DU"
  66. 136 PRINT"TELEPATHISCHEN KONTAKT MIT DEINEM ONKEL"
  67. 137 PRINT"AUF.SPAETER IST DIE POLIZEI VOLLKOMMEN"
  68. 138 PRINT"FASSUNGSLOS,ALS DU SIE DIREKT ZUM VER-"
  69. 139 PRINT"STECK DER ASSASSINEN IN EINEM DER ALTEN"
  70. 140 PRINT"VIERTEL VON KAIRO FUEHREN KANNST."
  71. 141 PRINT"VON JETZT AN WIRST DU,DANK DEINER"
  72. 142 PRINT"FAEHIGKEITEN,EIN VOELLIG NEUES LEBEN"
  73. 143 PRINT"VOLLER FREUDE UND ABENTEUER FUEHREN.":GOSUB90
  74. 150 GOSUB70:LOAD"AB/SCORE",8,1
  75.