home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Brotikasten
/
BROTCD01.iso
/
games
/
disk9.d64
/
ab41
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-07-31
|
2KB
|
55 lines
1 POKE45,PEEK(174):POKE46,PEEK(175):CLR
2 POKE808,230
5 GOTO100
10 PRINT"[147]":POKE53280,0:POKE53281,0
11 PRINT"[154] DAS GEHEIMNIS DER PYRAMIDEN "
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
13 PRINT"[158]ABENTEUER * SEITE ";S"":RETURN
60 FORI=5TO22:POKE781,I:SYS59903:NEXT:RETURN
70 PRINT"[147][155]"
71 PRINT" [213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][201]"
72 PRINT" [194] [194]"
73 PRINT" [194] [154]DAS GEHEIMNIS DER[155] [194]"
74 PRINT" [194] [154]PYRAMIDE.[155] [194]"
75 PRINT" [194][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][194]"
76 PRINT" [194] [194]"
77 PRINT" [194] [158]BITTE WARTEN ![155] [194]"
78 PRINT" [194] [194]"
79 PRINT" [202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]":RETURN
90 PRINT"":PRINT"[129] DRUECK SPACE[129] "
91 POKE198,0:WAIT198,1:GETE$
92 IFE$=CHR$(32)THENRETURN
93 GOTO91
100 GOSUB10
101 GOSUB60:S=1:GOSUB13
102 PRINT"AHMED GRAEBT IM SAND HERUM,WO IHR"
103 PRINT"WAEHREND DES STURM GEKAUERT HABT.ER"
104 PRINT"FINDET DIE RAUCHBOMBEN,DIE EURE RETTUNG"
105 PRINT"SEIN KOENNEN.AHMED ZUENDED EINE DER "
106 PRINT"BOMBEN.EINE HOHE RAUCHSAEULE STEIGT "
107 PRINT"EMPOR.DIE LETZTE BOMBE WIRD AM SPAETEN"
108 PRINT"NACHMITTAG GEZUENDET.GERADE ALS DER "
109 PRINT"RAUCH VERZIEHT,HOERT IHR DAS BRUMMEN "
110 PRINT"EINES FLUGZEUGS.IHR SEID GERETTET.ALS"
111 PRINT"DU EINSTEIGST,FRAGST DU DICH,WIEVIELE"
112 PRINT"ABENTEUER WOHL NOCH VOR DIR LIEGEN, "
113 PRINT"BEVOR DU WIEDER IN DIE STAATEN ZURUECK-
114 [153]"KEHRST.":[141]90
880 [129]I[178]1[164]8:[153]"LOAD"
881 [153][163]12)" "
882 [153][163]12)" "
883 [153][163]12)"SYS "
884 [153][163]12)"CONT "
885 [153][163]12)" "
886 [130]
887 [153]""
888 [153]" LEIDER HAST DU DIESES ABENTEUER"
889 [153]" NICHT LOESEN KOENNEN."
890 [153]" VERSUCH ES NOCHMALS !!"
891 [153]""
892 [153]"FORABENTEUER BEENDEN F 1FOR NEUER START F 7"
900 [151]198,0:[146]198,1:[161]E$
901 [139]E$[178][199](133)[167][158]64738
902 [139]E$[178][199](136)[167][141]70:[147]"AB1",8,1
903 [137]900