home *** CD-ROM | disk | FTP | other *** search
/ Brotikasten / BROTCD01.iso / games / disk9.d64 / ab39 (.txt) < prev    next >
Commodore BASIC  |  1995-07-31  |  2KB  |  51 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. 60 FORI=5TO22:POKE781,I:SYS59903:NEXT:RETURN
  9. 70 PRINT"[147][155]"
  10. 71 PRINT"          [213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]"
  11. 72 PRINT"          [194]                   [194]"
  12. 73 PRINT"          [194] [154]DAS GEHEIMNIS DER[155] [194]"
  13. 74 PRINT"          [194]     [154]PYRAMIDE.[155]     [194]"
  14. 75 PRINT"          [194][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][194]"
  15. 76 PRINT"          [194]                   [194]"
  16. 77 PRINT"          [194]   [158]BITTE WARTEN ![155]  [194]"
  17. 78 PRINT"          [194]                   [194]"
  18. 79 PRINT"          [202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]":RETURN
  19. 90 PRINT"":PRINT"[129]              DRUECK SPACE[129]             "
  20. 91 POKE198,0:WAIT198,1:GETE$
  21. 92 IFE$=CHR$(32)THENRETURN
  22. 93 GOTO91
  23. 100 GOSUB10
  24. 101 GOSUB60:S=1:GOSUB13
  25. 102 PRINT"IHR SETZT ALLES AUF EINE KARTE UND"
  26. 103 PRINT"FLIEGT WEITER.AHMED IST EIN GUTER PILOT"
  27. 104 PRINT"DER STURM IST ZIEMLICH HEFTIG.DER MOTOR"
  28. 105 PRINT"BEGINNT ZU STOTTERN - DER LUFTFILTER "
  29. 106 PRINT"IST VOELLIG VERSTOPFT.DANN FAELLT DER"
  30. 107 PRINT"MOTOR GANZ AUS."
  31. 108 PRINT"IHR STUERZT WIE EIN STEIN VOM HIMMEL"
  32. 109 PRINT"UND VERSCHWINDET FUER IMMER IN DEN   "
  33. 110 PRINT"WEITEN DER WUESTE.":GOSUB90
  34. 880 FORI=1TO8:PRINT"[147]"
  35. 881 PRINTTAB(12)"           "
  36. 882 PRINTTAB(12)"      "
  37. 883 PRINTTAB(12)"[158]          "
  38. 884 PRINTTAB(12)"[154]      "
  39. 885 PRINTTAB(12)"          "
  40. 886 NEXT
  41. 887 PRINT""
  42. 888 PRINT"   LEIDER HAST DU DIESES ABENTEUER"
  43. 889 PRINT"   NICHT LOESEN KOENNEN."
  44. 890 PRINT"   VERSUCH ES NOCHM[255][255][255][255]!!"
  45. 891 PRINT""
  46. 892 PRINT"[129]ABENTEUER BEENDEN F 1[129]   NEUER START F 7"
  47. 900 POKE198,0:WAIT198,1:GETE$
  48. 901 IFE$=CHR$(133)THENSYS64738
  49. 902 IFE$=CHR$(136)THENGOSUB70:LOAD"AB1",8,1
  50. 903 GOTO900
  51.