1 POKE50050,2:POKE50051,1:POKE50052,6 2 PRINT"[147][159][197]INIGE [218]EIT SPAETER WIRST [196]U ZU EINEM " 3 PRINT"[205]ASKENBALL EINGELADEN.[196]U VERKLEIDEST " 4 PRINT"[196]ICH ALS DRAHTIGER [195]OWBOY. " 5 PRINT"[197]IN WUNDERBAR TRAURIGER [208]IERROT, OFFEN- " 6 PRINT"BAR WEIBLICHEN [199]ESCHLECHTS, TANZT MIT " 7 PRINT"[196]IR.[202]A, NACH DEM [212]ANZ SCHMUST SICH DAS " 8 PRINT"TRAURIGE [199]ESCHOEPF SOGAR AN [196]ICH.[193]UF " 9 PRINT"[198]RAGEN GIBT ES ALLERDINGS KEINE [193]NTWORT." 10 PRINT"[193]LS [196]U SCHLIESSLICH DIE SCHOEN [205]ASKE " 11 PRINT"BITTEST, MIT [196]IR NACH [200]AUSE ZU KOMMEN, " 12 PRINT"GEHT SIE WILLIG MIT.[193]LS [196]U ABER ZU [200]AUSE" 13 PRINT" >[215]EITER MIT [212]ASTENDRUCK<" 14 POKE198,0:WAIT198,1 15 PRINT"[147]MIT IHR AUFS [199]ANZE GEHEN WILLST, LAESST " 16 PRINT"SIE DIE [205]ASKE HERUNTER.[197]S IST [204]OTTE. " 17 PRINT"[215]IE WIRST [196]U SIE NUR LOSWERDEN ? " 18 PRINT" " 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 91 [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,2:POKE50054,0:POKE50055,2 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