Brotikasten/BROTCD01.iso/games/dis1013.d64/schatzsuche

Commodore BASIC | 1995-07-31 | 21KB | 823 lines

2 REM PUBLIC DOMAIN
3 REM VON PETER DIEHM
4 REM 1990
10 POKE 53280,0:POKE53281,0:PRINTCHR$(5):PRINT"[147]"
12 GOSUB 1401
13 :
14 REM UNTERPROGRAMM
15 A$(1)=" DU BEWEGST DICH NACH NORDEN"
16 A$(2)=" DU GEHST NACH SUEDEN"
17 A$(3)=" DU LAUEFST NACH WESTEN"
18 A$(4)=" DU ROLLST NACH OSTEN"
19 A$(5)=" DU GRIECHST NACH OBEN"
20 A$(6)=" DU GEHST NACH UNTEN"
21 A$(7)=" DU SCHWIMMST"
22 A$(8)=" DIES IST IM MOMENT UNPASSEND..."
23 A$(9)=" DU GEHST IN DIE BERGE"
24 A$(10)=" DU GEHST IN DEN DSCHUNGEL"
31 RETURN
32 REM KARTE
33 POKE 53280,6:POKE53281,0:PRINTCHR$(5)
34 A$(1)=" DER SCHATZ VON ALTEN NUDGE !"
35 A$(2)=" GEHE VON DER HUETTE AUS "
36 A$(3)=" IN RICHTUNG NORDEN IN DEN"
37 A$(4)=" DSCHUNGEL."
38 A$(5)=" BIS ZU EINER FELSWAND !"
39 A$(6)=" NUN BENUTZE DIE LIANE !"
40 A$(7)=" DANN GEHE NACH WESTEN !"
41 A$(8)=" BIS ZU EINEN HUEGEL !"
42 A$(9)=" DANN NACH SUEDEN BIS ZU EINER ..."
43 A$(10)=" DER REST DER KARTE FEHLT LEIDER !!!"
44 RETURN
45 A$(1)=" KOMMANDOS:GEHE NACH NORDEN,"
46 A$(2)=" SUEDEN,OSTEN,WESTEN,RECHTS,LINKS,"
47 A$(3)=" LESE,OEFFNE,NIMM,GRABE,BENUTZE,RUDERE,"
48 A$(4)=" U.A. NATUERLICH NUR WENN SIE SINNVOLL"
49 A$(5)=" SIND !!!"
50 RETURN
51 REM HALLO
52 PRINT" DU BEFINDEST DICH IN EINEM RUDERBOOT ."
53 PRINT" IRGENDWO AUF DEM OZEAN DU WURDEST
54 [153]" OBFER EINER MEUTERREI !"
55 [153]" IM NORDEN SIEHST DU EINE INSEL.     "
56 [153]" SONST IST UEBERALL WASSER."
57 [153]" ANWEISUNG ":[133] A$
58 [139] A$[178]"HILFE" [167] 67
59 [139] A$[178]"RUDERE NACH NORDEN" [167] 100
60 [139] A$[178]"RUDERE NACH OSTEN" [167] 70
61 [139] A$[178]"RUDERE NACH WESTEN" [167] 70
62 [139] A$[178]"RUDERE NACH SUEDEN" [167] 70
63 [139] A$[178]"RUDERE ZUR INSEL" [167] 100
64 [141] 14
65 [153] A$(8)
66 [137] 57
67 [141] 45
68 [153]A$(1):[153]A$(2):[153]A$(3):[153]A$(4):[153]A$(5)
69 [137] 57
70 [153]"SYS DU RUDERST AUFS MEER HINAUS. "
71 [153]" EIN GANZE ZEIT LANG. "
72 [153]" AM 5 TAG SIEHST DU EIN SCHIFF"
73 [153]" AM HORIZONT."
74 [153]" ES IST EINE SPANISCHES KRIEGSSCHIFF !"
75 [153]" ANWEISUNG ":[133] A$
76 [139] A$[178]"RUDERE ZUM SCHIFF" [167] 86
77 [139] A$[178]"RUDERE NACH OSTEN" [167] 95
78 [139] A$[178]"RUDERE NACH NORDEN" [167] 86
79 [139] A$[178]"RUDERE NACH WESTEN" [167] 95
80 [139] A$[178]"RUDERE NACH SUEDEN" [167] 100
81 [139] A$[178]"HILFE" [167] 83
82 [141] 14
83 [153] A$(8)
84 [141] 45
85 [153] A$(1):[153]A$(2):[153]A$(3):[153]A$(4):[153]A$(5):[137] 75
86 [153]" DU RUDERST AUF DAS SCHIFF ZU."
87 [153]" ALS DU ANGEKOMMEN BIST GEHST DU"
88 [153]" AN BOARD.DER CAPTAIN ERKENNT"
89 [153]" DICH DA DU EIN BEKANNTER PIRAT BIST "
90 [153]" UND BRINGT DICH ALS SKLAVE"
91 [153]" AUF DEN SKLAVENMARKT VON PANNAMA."
92 [153]" SEITDEM HAT MANN NICHTS MEHR VON DIR"
93 [153]" GEHOERT."
94 [137] 185
95 [153]" DU RUDERST ZU DER INSEL."
96 :
97 [137] 105
100 [153]" DU RUDERST ZUR INSEL."
101 [153]" ES HERRSCHT EINE STARKE STROEMUNG."
105 [153]" DU LANDEST MIT DEINEM BOOT   "
106 [153]" AN DER KUESTE."
107 [153]" DU STEHST AM STRAND IM NORDEN SIEHST "
108 [153]" EINE HUETTE. IM WESTEN UND OSTEN "
109 [153]" DSCHUNGEL."
110 [153]" ANWEISUNG ":[133] A$
112 [139] A$[178]"GEHE NACH NORDEN" [167] 200
113 [139] A$[178]"GEHE ZUR HUETTE" [167] 200
114 [139] A$[178]"GEHE NACH OSTEN" [167] 150
115 [139] A$[178]"GEHE NACH WESTEN" [167] 145
116 [139] A$[178]"GEHE NACH SUEDEN" [167] 125
117 [139] A$[178]"HILFE" [167] 121
118 [141] 14
119 [153] A$(8)
120 [137] 110
121 [141] 45
122 [153] A$(1):[153]A$(2):[153]A$(3):[153]A$(4):[153]A$(5)
123 [137] 110
125 [153]" DU STEHST AM ENDE DES STRANDES ."
126 [153]" IM SAND SIEHST DU EIN PAAR"
127 [153]" KREBSE UND MUSCHUELN."
128 [153]" IM WASSER SIEHST DU EIN PAAR "
129 [153]" HAIE !"
130 [153]" ANWEISUNG ":[133] A$
131 [139] A$[178]"GEHE NACH WESTEN" [167] 145
132 [139] A$[178]"GEHE NACH OSTEN" [167] 150
133 [139] A$[178]"GEHE NACH NORDEN" [167] 200
134 [139] A$[178]"GEHE NACH SUEDEN" [167] 140
135 [139] A$[178]"HILFE" [167] 138
136 [141] 14
137 [153]A4(8):[137] 130
138 [141] 45
139 [153] A$(1):[153] A$(2):[153]A$(3):[153]A$(4):[153] A$(5):[137] 130
140 [153]" DU SCHWIMMST AUFS MEER HINAUS."
141 [153]" 5 HAIE KOMMEN AUF DICH ZUGESCHWOMMEN !"
142 [153]" DEN REST KANNST DU DIR JA DENKEN."
143 [137] 185
145 [141] 14
146 [153] A$(3)
147 [137] 155
150 [141] 14
151 [153] A$(4)
152 [141] 155
155 [153]" DU GEHST IN DEN DSCHUNGEL."
156 [153]" ER IST SO DICHT DAS KAUM EIN"
157 [153]" LICHTSTRAHL AUF DEN BODEN FAELLT."
158 [153]" DU LAUEFST AUF EINEM SCHMALEN PFAD ."
159 [153]" DU KOMMST AN EINE WEGGABELUNG."
160 [153]" EIN WEG FUEHRT NACH WESTEN  EIN"
161 [153]" ANDERER NACH NORDEN ."
162 [153]" ANWEISUNG":[133] A$
163 [139] A$[178]"GEHE NACH WESTEN" [167] 200
164 [139] A$[178]"GEHE NACH NORDEN" [167] 175
165 [139] A$[178]"GEHE NACH OSTEN" [167] 107
166 [139] A$[178]"GEHE NACH SUEDEN" [167] 107
167 [139] A$[178]"HILFE" [167] 171
168 [141] 14
169 [153] A$(8)
170 [137] 162
171 [141] 45
172 [153] A$(1):[153]A$(2):[153]A$(3):[153] A$(4):[153]A$(5)
173 [137] 162
175 [141] 14
176 [153] A$(1)
177 [153]" DU KOMMST AN EIN PAAR HUETTEN."
178 [153]" ES IST NIEMAND ZU SEHEN !"
179 [153]" DOCH DA PLOETZLICH ZISCHEN"
180 [153]" EIN PAAR SPEERE UM DICH ."
181 [153]" UND AUS DEM GEBUESCH KOMMEN"
182 [153]" 20 KANNIBALLEN.DEN REST KANNST"
183 [153]" DU DIR JA DENKEN."
185 [153]" NEUES SPIEL BEGINNEN (J/N) ":[133] A$
186 :
187 [139] A$[178]"JA" [176] A$[178]"J" [167] 52
188 :
189 [139] A$[178]"NEIN" [176]A$[178]"N" [167] 195
190 :
191 [141] 14
192 [153] A$(8)
193 [137] 185
195 [153]" TSCHUESS !"
196 [153]" MAERZ 90 !"
197 [158] 64738
200 [153]" DU STEHST VOR EINER HUETTE ."
201 [153]" ANWEISUNG ":[133] A$
202 [139] A$[178]"OEFFNE TUER" [167] 230
203 [139] A$[178]"GEHE NACH SUEDEN" [167] 107
204 [139] A$[178]"GEHE NACH OSTEN" [167] 155
205 [139] A$[178]"GEHE IN HUETTE" [167] 220
206 [139] A$[178]"GEHE IN ALTE HUETTE" [167] 220
207 [139] A$[178]"HILFE" [167] 215
208 [141] 14
209 [153] A$(8)
210 [137] 201
215 [141] 45
216 [153] A$(1):[153]A$(2):[153]A$(3)
217 [153] A$(4):[153]A$(5)
218 [137] 201
219 [143]
220 [153]" DU RENNST GEGEN DIE TUER ."
221 [153]" DU MUSST SIE ERST OEFFNEN."
222 [137] 201
230 [153]" DU OEFFNEST DIE TUER."
231 [153]" ANWEISUNG ":[133] A$
232 [139] A$[178]"GEHE IN HUETTE" [167] 260
233 [139] A$[178]"GEHE NACH NORDEN" [167] 260
234 [139] A$[178]"GEHE NACH OSTEN" [167] 155
235 [139] A$[178]"GEHE NACH SUEDEN" [167] 107
236 [139] A$[178]"HILFE" [167] 240
237 [141] 14
238 [153] A$(8)
239 [137] 231
240 [141] 45
241 [153] A$(1):[153] A$(2):[153]A$(3)
242 [153] A$(4):[153] A$(5)
260 [153]" DU GEHST IN DIE HUETTE DU KOMMST"
261 [153]" IN EINEN LEEREN RAUM DIESER "
262 [153]" HAT EINEN SANDIGEN BODEN."
263 [153]" AN EINER WAND IST EIN SCHILD MIT"
264 [153]" EINER INNSCHRIFT."
265 [153]" ANWEISUNG ":[133] A$
266 [139] A$[178]"LIES INNSCHRIFT" [167] 290
267 [139] A$[178]"LESE" [167] 290
268 [139] A$[178]"LESE SCHILD" [167] 290
269 [139] A$[178]"LESE INNSCHRIFT" [167] 290
270 [139] A$[178]"GEHE NACH OSTEN" [167] 305
271 [139] A$[178]"GEHE NACH SUEDEN" [167] 305
273 [139] A$[178]"HILFE" [167] 280
274 [139] A$[178]"GRABE" [167] 350
275 [141] 14
276 [153] A$(8)
277 [137] 265
280 [141] 45
281 [153] A$(1):[153]A$(2):[153]A$(3):[153] A$(4):[153]A$(5)
282 [137] 265
290 [153]" AUF DEN SCHILD STEHT :"
291 [153]" WER SUCHE DER FINDE !!!"
292 [153]" ANWEISUNG ":[133] A$
293 [139] A$[178]"GRABE" [167] 350
294 [139] A$[178]"GEHE NACH SUEDEN" [167] 305
295 [139] A$[178]"GEHE NACH OSTEN" [167] 305
296 [139] A$[178]"GEHE NACH WESTEN" [167] 305
297 [139] A$[178]"GEHE NACH NORDEN" [167] 305
298 [139] A$[178]"HILFE" [167] 303
299 [139] A$[178]"VERLASSE HUETTE" [167] 305
300 [141] 14
301 [153] A$(8)
302 [137] 292
303 [141] 45
304 [153] A$(1):[153] A$(2):[153] A$(3):[153] A$(4):[153] A$(5):[137] 292
305 [153]" DU STEHST VOR DER HUETTE."
306 [153]" IM WESTEN UND OSTEN IST DSCHUNGEL ."
307 [153]" IM SUEDEN DER STRAND UND"
308 [153]" IM NORDEN EIN PFAD."
309 [153]" RECHTS VON DIR DIE HUETTE."
310 [153]" ANWEISUNG ":[133] A$
311 [139] A$[178]"GEHE NACH SUEDEN" [167] 107
312 [139] A$[178]"GEHE NACH OSTEN" [167] 155
313 [139] A$[178]"GEHE NACH WESTEN" [167] 155
314 [139] A