home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Brotikasten
/
BROTCD01.iso
/
games
/
dis1893.d64
/
189
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
1995-07-31
|
2KB
|
48 lines
1 POKE50050,1:POKE50051,8:POKE50052,9
2 PRINT"[147][159][206]ACHDEM [196]U EIN PAAR [211]CHRITTE INS "
3 PRINT"[196]UNKLE GETAPPT BIST, FASST [196]ICH EIN [193]RM "
4 PRINT"AN.[196]U BEKOMMST EINEN FURCHTBAREN "
5 PRINT"[211]CHRECK.[196]U TASTEST [196]ICH NACH VORNE.[196]EINE"
6 PRINT"[200]AENDE WUEHLEN DURCH LANGES [200]AAR. "
7 PRINT"[208]SST, ZISCHT EINE [198]RAUENSTIMME. "
8 PRINT"[215]ER BIST [196]U ? "
9 PRINT"[198]RAG MICH NICHT.[201]CH BIN DIE [193]NSTANDSDAME"
10 PRINT"VON DENEN DA HINTEN IM [193]UTO.[196]IE SIND "
11 PRINT"JETZT BESCHAEFTIGT, UND ICH MUSS MICH "
12 PRINT"HIER HERUMDRUECKEN. "
13 PRINT" >[215]EITER MIT [212]ASTENDRUCK<"
14 POKE198,0:WAIT198,1
15 PRINT"[147][193]BER OHNE MICH HAETTE MEINE [211]CHWESTER "
16 PRINT"SICH NICHT LOSEISEN KOENNEN.[203]OMM MIT. "
17 PRINT"[211]IE ZIEHT [196]ICH SANFT AM [200]EMDSAERMEL "
18 PRINT"WEITER AUF EINE [204]ICHTUNG ZU. "
19 PRINT" "
20 PRINT" "
21 PRINT" "
22 PRINT" "
23 PRINT" "
24 PRINT" "
25 PRINT" "
26 PRINT" >[215]EITER MIT [212]ASTENDRUCK<"
27 POKE198,0:WAIT198,1
28 PRINT"[147][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";
29 PRINT"[221][151] [197]NTSCHEIDUNGSMOEGLICHKEIT : [221]";
30 PRINT"[171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]";
31 PRINT"[221][152] [211]PIELSITUATION 15 [221]";
32 PRINT"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
33 PRINT" [196]U HAST KEINE [197]NTSCHEIDUNGS- "
34 PRINT" MOEGLICHKEIT.[214]ON HIER AUS GIBT'S NUR "
35 PRINT" EINE MOEGLICHE [198]ORTSETZUNG ! "
36 PRINT" >[215]EITER MIT [212]ASTENDRUCK<"
37 POKE198,0:WAIT198,1:GETA$
38 IFA$=""THEN41
39 A$="257":POKE50053,1:POKE50054,9:POKE50055,0
40 GOTO42
41 A$="256"
42 Q=PEEK(50100)
43 W=Q+50100
44 IFPEEK(W)=200THENW=W+1:POKE50100,Q+1:GOTO44
45 E=PEEK(W):POKEW,E+1
46 PRINT"[147][144]LOAD";CHR$(34);A$;CHR$(34);",8":PRINT"RUN"
47 POKE631,13:POKE632,13:POKE633,13:POKE198,3