5 PRINT"[147]"CHR$(142)CHR$(8)
10 A=0:FORI=0TO9:A=A+PEEK(50240+I):NEXT
20 IFA=1194ANDPEEK(50240)=169THENPOKE50257,16
30 FORI=0TO24:POKE54272+I,0:NEXT
100 S=54272:POKES+24,15:POKES+5,17:POKES+6,232:POKES+4,8
105 DIM F(16),G(16):ZU=0:PU%=10:HY%=10
106 POKE53280,0:POKE53281,6:V=53265
110 POKEV,11:GOSUB8000:POKEV,11:POKE53281,0
111 PRINT"[147][159]"CHR$(14);:PU%=10:TX=0
115 PRINTTAB(10)"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
120 PRINTTAB(10)"[211][213][208][197][210] - [205][197][205][207][210][217] [201][201]"CHR$(13)TAB(10)"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
130 PRINT:PRINT" [194]EI DIESEM [211]PIEL MUESSEN [211]IE ALLE [218]AH-"
140 PRINT:PRINT" LEN  IM  [197]INGABEFELD AUF DEN [215]ERT NEUN"
150 PRINT:PRINT" BEKOMMEN. [202]E  SCHNELLER [211]IE DAS SCHAF-"
160 PRINT:PRINT" FEN, DESTO  MEHR  [208]UNKTE ERHALTEN [211]IE."
170 PRINT:PRINT" [201]M  LINKEN [198]ELD IST DIE [212]ASTATUR-[194]ELE-"
180 PRINT:PRINT" GUNG ZU SEHEN. [215]ENN [211]IE NUN EINE [212]ASTE"
190 PRINT:PRINT" DRUECKEN, DIE  IN  DIESEM  [198]ELD LIEGT,"
200 PRINT:PRINT" ERHOEHEN SICH DIE [215]ERTE DER [200]ORIZONTA-"
201 PRINT:PRINT" LEN UND [214]ERTIKALEN UM EINS."
205 POKEV,27:GOSUB7000:POKEV,11
206 PRINT"[147][159]"TAB(10)"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
207 PRINTTAB(10)"[211][213][208][197][210] - [205][197][205][207][210][217] [201][201]"CHR$(13)TAB(10)"[192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]"
215 PRINT" [193]M  [193]NFANG  DES  [211]PIELES  HABEN [211]IE 10"
220 PRINT" [208]UNKTE, DIE  ALLE  FUENF  [211]EKUNDEN  UM"
225 PRINT" EINS  VERRINGERT  WERDEN. [214]ORHER  ABER"
230 PRINT" MUESSEN  [211]IE DIE [193]NZAHL DER [218]UEGE EIN-"
235 PRINT" GEBEN. [196]IE [218]AHLEN WERDEN DANN DER [218]UG-"
240 PRINT" ANZAHL   ENTSPRECHEND  OFT  GEAENDERT."
245 PRINT" [202]ETZT  HEISST ES, INNERHALB DER GESETZ-";
250 PRINT" TEN [218]UGANZAHL DAS [211]PIEL ZU GEWINNEN."
256 POKEV,27:GOSUB7000:POKEV,11
257 PRINT"[147]":PRINT:PRINT"";CHR$(14)
260 PRINT:PRINT"[211]PIELEN [211]IE:"
262 PRINT:PRINT:PRINT"    [205]IT [218]EIT.............1 "
264 PRINT:PRINT:PRINT"    [207]HNE [218]EIT............0"
266 PRINT"   [194]ITTE WAEHLEN:"
268 POKEV,27
270 GETX$:IFX$=""THEN270
272 IFX$="0"THENFL=1:GOTO299
274 IFX$="1"THENFL=0:GOTO299
276 GOTO270
299 POKEV,11
300 GOSUB1000:X$=""
305 PRINT"":FORI=1TO16:PRINTCHR$(17);:NEXT
310 PRINT"WIEVIEL ZUEGE:[146]":PRINT"              [145][145]";
315 POKEV,27:POKE198,0
316 CU=0:X$="":A1$=" "
320 GETA$:IFLEN(X$)=3THENA$=CHR$(20)
330 IFA$=CHR$(20)ANDLEN(X$)>0THENX$=LEFT$(X$,LEN(X$)-1):PRINT"[157] [157]";:GOSUB7100
340 IFA$=CHR$(13)ANDVAL(X$)>1THENGOSUB380:GOTO385
342 IFA$=CHR$(13)ANDVAL(X$)=1THENPRINT"[157]  [157][157]";:X$=""
344 FORW=1TO250:NEXT
345 IFCU=0ANDLEN(X$)=2THENPRINT"[157]"RIGHT$(X$,1);:CU=1:GOTO360
346 IFCU=0THENPRINT" [157]";:CU=1:GOTO360
347 IFCU=1ANDLEN(X$)=2THENPRINT"[157]";RIGHT$(X$,1);"[146]";:CU=0
348 IFCU=1THENPRINT" [146][157]";:CU=0
360 IFA$=""ORA$=CHR$(20)THEN320
365 IFA$<"0"ORA$>"9"THENGOSUB7070:GOTO320
370 GOSUB7100:X$=X$+A$:PRINTA$;:GOTO320
380 POKES,73:POKES+1,193:POKES+4,33
381 FORI=1TO200:NEXT:POKES+4,65:RETURN
385 PRINT:PRINT"BITTE WARTEN !!!"
390 POKEV,11:GOTO2000
1000 ::
1002 PRINT"[147][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]"CHR$(142);
1003 PRINT"[166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
1004 PRINT"[166][166] [176][192][178][192][178][192][178][192][174] [166][166] [176][192][178][192][178][192][178][192][174]";
1005 PRINT" [166][166]          [166][166][166][166] [221]5[221]6[221]7[221]";
1006 PRINT"8[221] [166][166] [221] [221] [221] [221] [221] [166][166] [F1]  ";
1007 PRINT"   [166][166][166][166] [171][192][219][192][219][192][219][192][179] [166][166] [171][192][219][192]";
1008 PRINT"[219][192][219][192][179] [166][166]          [166][166][166][166] [221]T";
1009 PRINT"[221]Y[221]U[221]I[221] [166][166] [221] [221] [221] [221] [221] [166][166]  ";
1010 PRINT"AUF-    [166][166][166][166] [171][192][219][192][209][192][219][192][179] [166][166]";
1011 PRINT" [171][192][219][192][209][192][219][192][179] [166][166]  GEBEN   [166][166]";
1012 PRINT"[166][166] [221]G[221]H[221]J[221]K[221] [166][166] [221] [221] [221] [221] [221]";
1013 PRINT" [166][166]          [166][166][166][166][160][171][192][219][192][219][192][219]";
1014 PRINT"[192][179] [166][166] [171][192][219][192][219][192][219][192][179] [166][166]       ";
1015 PRINT"   [166][166][166][166] [221]V[221]B[221]N[221]M[221] [166][166] [221] [221] ";
1016 PRINT"[221] [221] [221] [166][166] [F7]     [166][166][166][166] [173][192]";
1017 PRINT"[177][192][177][192][177][192][189] [166][166] [173][192][177][192][177][192][177][192][189] [166][166]  ";
1018 PRINT"        [166][166][166][166] TASTATUR  [166][166]";
1019 PRINT" SPIELFELD [166][166]  ZUEGE   [166][166]";
1020 PRINT"[166][166] BELEGUNG  [166][166]          ";
1021 PRINT" [166][166]  ZURUECK [166][166][166][166]        ";
1022 PRINT"   [166][166]           [166][166]       ";
1023 PRINT"   [166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
1024 PRINT"[166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
1025 PRINT"[166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
1026 PRINT"[166][166][166][166][166][166][166][166][166][166][166][166][207][183][183][183][183][183][183][183][183][183][183][183][183]";
1027 PRINT"[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][208][166][166]";
1028 PRINT"[166][166][180][205]       SPACE=PAUSE   ";
1029 PRINT"           [206][170][166][166][166][166][180] [207][183][183][183][183][183]";
1030 PRINT"[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]";
1031 PRINT"[208] [170][166][166][166][166][180] [180] ZUEGE :       ";
1032 PRINT"  GESAMT.      [170] [170][166][166][166][166][180] [180]";
1033 PRINT"                         ";
1034 PRINT"     [170] [170][166][166][166][166][180] [180] ZEIT  :  ";
1035 PRINT"       PUNKTE:      [170] [170][166][166]";
1036 PRINT"[166][166][180] [204][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]";
1037 PRINT"[175][175][175][175][175][175][175][175][175][175][186] [170][166][166][166][166][180][206]      ";
1038 PRINT"                        [160]";
1039 PRINT" [205][170][166][166][166][166][204][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175]";
1040 PRINT"[175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][175][186][166][166][166][166][166][166][166]";
1041 PRINT"[166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166][166]";
1042 PRINT"[166][166][166][166][166][166][166][166][166]";
1043 PRINT"[157]"CHR$(148)"[166]"
1044 RETURN
2000 X=VAL(X$):J=-1:ZU=0
2010 FORI=1TO16:F(I)=9:NEXT
2020 FORB=1TOX
2030 F%=RND(1)*16+1
2040 IFF%>8THENF%=F%-8:GOTO2070
2050 ONF%GOSUB3010,3020,3030,3040,3050,3060,3070,3080
2060 GOTO2080
2070 ONF%GOSUB3090,3100,3110,3120,3130,3140,3150,3160
2080 FORA=1TO16:IFF(A)=0THENF(A)=9
2090 NEXT:NEXT:FORI=1TO16:G(I)=F(I):NEXT:GOSUB1000
2091 PRINT"",,,"[157]"X
2092 L=0:FORI=1TO16:IFF(I)=9THENL=L+1
2093 NEXT:IFL=16THEN6000
2095 TY=INT((X/3)^2*30)
3000 GOSUB4000:GOTO5000
3010 FORI=1TO4:F(I)=F(I)+J:NEXT
3011 F(5)=F(5)+J:F(9)=F(9)+J:F(13)=F(13)+J:RETURN
3020 FORI=1TO4:F(I)=F(I)+J:NEXT
3021 F(6)=F(6)+J:F(10)=F(10)+J:F(14)=F(14)+J:RETURN
3030 FORI=1TO4:F(I)=F(I)+J:NEXT
3031 F(7)=F(7)+J:F(11)=F(11)+J:F(15)=F(15)+J:RETURN
3040 FORI=1TO4:F(I)=F(I)+J:NEXT
3041 F(8)=F(8)+J:F(12)=F(12)+J:F(16)=F(16)+J:RETURN
3050 FORI=5TO8:F(I)=F(I)+J:NEXT
3051 F(1)=F(1)+J:F(9)=F(9)+J:F(13)=F(13)+J:RETURN
3060 FORI=5TO8:F(I)=F(I)+J:NEXT
3061 F(2)=F(2)+J:F(10)=F(10)+J:F(14)=F(14)+J:RETURN
3070 FORI=5TO8:F(I)=F(I)+J:NEXT
3071 F(3)=F(3)+J:F(11)=F(11)+J:F(15)=F(15)+J:RETURN
3080 FORI=5TO8:F(I)=F(I)+J:NEXT
3081 F(4)=F(4)+J:F(12)=F(12)+J:F(16)=F(16)+J:RETURN
3090 FORI=9TO12:F(I)=F(I)+J:NEXT
3091 F(1)=F(1)+J:F(5)=F(5)+J:F(13)=F(13)+J:RETURN
3100 FORI=9TO12:F(I)=F(I)+J:NEXT
3101 F(2)=F(2)+J:F(6)=F(6)+J:F(14)=F(14)+J:RETURN
3110 FORI=9TO12:F(I)=F(I)+J:NEXT
3111 F(3)=F(3)+J:F(7)=F(7)+J:F(15)=F(15)+J:RETURN
3120 FORI=9TO12:F(I)=F(I)+J:NEXT
3121 F(4)=F(4)+J:F(8)=F(8)+J:F(16)=F(16)+J:RETURN
3130 FORI=13TO16:F(I)=F(I)+J:NEXT
3131 F(1)=F(1)+J:F(5)=F(5)+J:F(9)=F(9)+J:RETURN
3140 FORI=13TO16:F(I)=F(I)+J:NEXT
3141 F(2)=F(2)+J:F(6)=F(6)+J:F(10)=F(10)+J:RETURN
3150 FORI=13TO16:F(I)=F(I)+J:NEXT
3151 F(3)=F(3)+J:F(7)=F(7)+J:F(11)=F(11)+J:RETURN
3160 FORI=13TO16:F(I)=F(I)+J:NEXT
3161 F(4)=F(4)+J:F(8)=F(8)+J:F(12)=F(12)+J:RETURN
4000 FORI=97TO103STEP2:POKE1024+I,F(12+(I-95)/2)+48:NEXT
4005 FORI=177TO183STEP2:POKE1024+I,F(8+(I-175)/2)+48:NEXT
4010 FORI=257TO263STEP2:POKE1024+I,F(4+(I-255)/2)+48:NEXT
4015 FORI=337TO343STEP2:POKE1024+I,F(0+(I-335)/2)+48:NEXT
4020 RETURN
5000 POKEV,27:POKE198,0:SU=1
5001 GETA$:SU=1:IFFL=1THENSU=0:GOTO5006
5002 IFTX>50THENSU=2
5005 IFTX>100THENSU=5
5006 IFTM>=5THENPU%=PU%-SU:TM=0
5007 IFPU%<=0THENPU%=0:GOTO6300
5008 PRINT""TAB(14)ZU
5009 PRINTTAB(14)TX"[157] ",,"[157]"PU%"[157] "
5010 IFFL=0THENIFTI$>T$THENTX=TX+1:T$=TI$:TM=TM+1
5011 IFPU%<0THEN6200
5012 IFA$=" "THENGOSUB380:GOTO7400
5014 IFA$=""THEN5001
5016 IFA$="[133]"THENPU%=0:GOSUB380:GOTO6300
5018 IFA$="_"ANDJ<>-1THENJ=-1:ZU=ZU-1:GOTO5110
5020 IFA$="[136]"THENFORI=1TO16:F(I)=G(I):NEXT:ZU=0:GOSUB380:GOSUB4000:GOTO5000
5030 B$="VBNMGHJKTYUI5678"
5040 FORF=1TO16:IFA$=MID$(B$,F,1)THEN5100
5050 NEXT
5060 GOSUB7070:GOTO5001
5100 ZU=ZU+1:TM=0:J=1
5110 POKES,138:POKES+1,58:POKES+4,17
5112 IFFL=1THENPU%=PU%-1
5115 IFF>8THENGOTO5140
5120 ONFGOSUB3010,3020,3030,3040,3050,3060,3070,3080
5130 GOTO5150
5140 ONF-8GOSUB3090,3100,3110,3120,3130,3140,3150,3160
5150 FORA=1TO16:IFF(A)>9THENF(A)=0
5155 IFF(A)<0THENF(A)=9
5160 NEXT:POKES+4,32
5170 L=0:FORI=1TO16:IFF(I)=9THENL=L+1
5180 NEXT:POKEV,27:IFL=16THENGOSUB4000:GOTO6000
5190 GOSUB4000:GOTO5000
6000 PRINT"[145][145][145][145]"TAB(14)ZU
6001 PRINT,"[145][145][145][145]                "
6002 PRINT,"[145][145] WEITER MIT SPACE"
6003 GETX$:IFX$<>" "THEN6003
6009 PRINT"[147]"CHR$(14)
6012 IFFL=1THEN6020
6015 PU%=PU%+ZU*100/TX*((TX>TY)+1.5)*((ZU>X)+1.75)/((ZU<=X)+1.5)
6020 PRINT"  [199]RATULIERE, [211]IE HABEN ES GESCHAFFT !!!"
6030 PRINT"  [214]ERSUCHEN [211]IE ES DOCH NOCH EINMAL."
6040 IFFL=1THENPRINT:PRINT:PRINT"  [211]IE HABEN";PU%;"[208]UNKTE ERREICHT!"
6045 IFFL=1THENPRINT:PRINT:PRINT:PRINT:PRINT"  [215]EITER MIT [212]ASTE ":WAIT198,1:GOTO257
6050 PRINT:PRINT:PRINT"  [202]ETZT MIT"X+1"[214]ERSUCHEN."
6051 IFZU<XTHENGOSUB7200
6052 IFZU=XTHENGOSUB7300
6053 POKES,138:FORI=0TO100STEP3
6054 POKES+1,I:POKES+4,17:FORA=1TO30:NEXT:POKES+4,16:NEXT
6055 PRINT:PRINT"  [211]IE HABEN BIS JETZT"PU%"[208]UNKTE"
6060 X=X+1:J=-1
6070 ZU=0:TX=0
6080 GOSUB7000:POKEV,11:GOTO2010
6200 IFX=1THEN6300:REM                  ---- PUNKTE KLEINER NULL ---------------
6210 PRINT"[147]"CHR$(14)
6220 PRINT"  [204]EIDER HABEN [211]IE DAS [211]PIEL VERLOREN."
6230 PRINT:PRINT"  IHRE [204]EISTUNG NICHT ZUFRIEDEN-"
6240 PRINT:PRINT"  STELLEND IST. [211]IE MUESSEN SCHNELLER"
6250 PRINT:PRINT"  UEBERLEGEN. [203]ONZENTRIEREN [211]IE SICH"
6260 PRINT:PRINT"  ETWAS MEHR AUF DAS [211]PIEL UND LASSEN"
6270 PRINT:PRINT"  [211]IE SICH NICHT ABLENKEN."
6280 PU%=5:J=-1:POKE198,0:GOSUB7000:GOTO2010
6300 PRINT"[147][154]"CHR$(14)
6310 PRINT"  [199][193][205][197][160][207][214][197][210]"
6320 PRINT:PRINT"  [211]IE HABEN"PU%"[208]UNKTE."
6340 IFPU%<HY%THENPRINT"  [203]EIN NEUER [210]EKORD."
6350 IFPU%>=HY%THENHY%=PU%:PRINT"  [197]IN NEUER [210]EKORD."
6360 IFPU%=HY%THENPRINT:PRINT"  [196]AS WILL WAS HEISSEN !!!"
6370 GOSUB7000:GOTO106
7000 PRINT"[156]";
7010 POKE198,0:FORI=1TO75:GETA$
7020 IFI<50THENPRINT"                '[215]'[197][201][212][197][210]           [145]"
7030 IFI>50THENPRINT"                                   [145]"
7040 IFA$=""THENNEXT:GOTO7000
7050 IFA$="W"THEN7100
7060 GOSUB7070:GOTO7000
7070 POKES,1 :POKES+1, 22:POKES+4,33
7080 FORI=1TO200:NEXT:POKES+4,32
7090 RETURN
7100 POKES,138:POKES+1,58:POKES+4,17
7110 FORI=1TO100:NEXT:POKES+4,32
7120 POKE198,0:RETURN
7200 PRINT:PRINT:PRINT"  [211][213][208][197][210] !!!!"CHR$(13)"  [192][192][192][192][192][192][192][192][192][192][192]"
7210 PRINT:PRINT"  [196]AS SIEHT MAN SELTEN, DASS JEMAND DAS"
7220 PRINT:PRINT"  [211]PIEL MIT WENIGER [218]UEGEN ALS ANGEGE-"
7230 PRINT:PRINT"  BEN GEWINNT.  [194]ONUS:   ";:I=50*X:PU%=PU%+I
7250 POKES,138:POKES+1,58:POKES+4,33
7260 FORA=1TO100:NEXT:POKES+4,64
7270 PRINT"[157][157][157] "I"[157] [145]":RETURN
7300 PRINT:PRINT:PRINT"  [211][208][201][212][218][197] !!!"CHR$(13)"  [192][192][192][192][192][192][192][192][192][192]"
7310 PRINT:PRINT"  [200]ERZLICHEN [199]LUECKWUNSCH ! [211]IE HABEN"
7320 PRINT:PRINT"  DIE ANGEGEBENE [211]CHRITTZAHL NICHT"
7330 PRINT:PRINT"  UEBERSCHRITTEN  [194]ONUS:   ";
7340 I=10*X:PU%=PU%+I
7360 GOTO7250
7400 POKE198,0:GOSUB7500
7405 PRINT"";
7410 FORI=1TO50
7420 IFI>30THENPRINT,"                [145]"
7430 IFI<30THENPRINT," SPIEL IN PAUSE [145]"
7440 GETA$:IFA$=" "THEN7470
7450 NEXT
7465 GOTO7410
7470 PRINT,"                   "
7472 PRINT,"[145][145] SPACE=PAUSE"
7480 GOSUB7110:GOSUB4000:GOTO5000
7500 FORI=97TO103STEP2:POKE1024+I,160:GOSUB7520:NEXT
7505 FORI=177TO183STEP2:POKE1024+I,160:GOSUB7520:NEXT
7510 FORI=257TO263STEP2:POKE1024+I,160:GOSUB7520:NEXT
7515 FORI=337TO343STEP2:POKE1024+I,160:GOSUB7520:NEXT:RETURN
7520 POKES,133:POKES+1,6:POKES+4,33
7530 FORA=1TO50:NEXT:POKES+4,65
7540 RETURN
7550 POKEV,11:POKE198,0:WAIT198,1:POKE198,0:GOSUB7070:GOSUB4000:GOTO5000
8000 PRINTCHR$(142)"[147]*******                                ";
8001 PRINT"[146]****[149] [144]     [154][146] [144] [154][146]   [144] [154][146] [144]     [154][146] [144]  ";
8005 PRINT"   [154][146] [144]     [154][146] [159]     *****[144] [146]**[154]  ";
8010 PRINT" [144] [154][146]   [144] [154][146] [144] [154][146]   [144] [154][146] [144] [154][146]   [209][209][144] [146][209][154]  [144] [154][146] ";
8015 PRINT"[159] [209][209][159]  ***[154]  [144][160][160][160][160][160][154][146] [144][160][154][146]   [144][160][154][146] [144][160][160][160]";
8020 PRINT"[160][160][154][146] [144][160][160][160][160][146] [209][144][160][160][160][160][146][209][209][209][209][209][209][159] **[154] *[154] ";
8025 PRINT"    [144][160][154][146] [144][160][154][146]   [144][160][160][160][154][146]     [144][160][146] [209][209][209][209][144][160]";
8030 PRINT"[146][209][209][209][144][160][146][209][209][209][209][209][159]  *[154]  *[144][160][160][160][160][160][154][146] [144][160][160][160][160]";
8035 PRINT"[160][154][146] [144][160][154][146]     [144][160][160][160][160][160][146][209][144][160][146][209][209][209][144][160][146][209][209][209][209][209][159] ";
8040 PRINT"[154] *[154] [149] [154][146] *[154]                [154][206] [154][206]";
8045 PRINT"[209][209][209][209][209][209][209][209][209][209][209][209][209][154]  [159] *[144][160][154][146] [159] [154] [144][160][154][146] [144][160][160]";
8050 PRINT"[160][160][160][154][146] [144][160][154][146]   [144][160][154][146] [144][160][160][160][160][160][154][146][206][144][160][160][160][160][160][154][146] [144][160][146][209][209]";
8055 PRINT"[209][144][160][146][221][159]   *[144][160][160][154][146] [144][160][160][154][146] [144][160][154][146]     [144][160][160][154][146] [144][160][160][154][146][206]";
8060 PRINT"[144][160][154][146] [206] [144][160][154][146] [144][160][154][146] [206] [144][160][154][146][206] [144][160][154][146] [144][160][154][146]   [159]   [144][160][159][146] [144][160]";
8065 PRINT"[154][146] [144][160][154][146] [144][160][160][160][160][154][146]  [144][160][154][146] [144][160][154][146] [144][160][154][146] [144][160][154][146]   [144][160][154][146][206][144][160][160][160][160]";
8070 PRINT"[154][146]   [206][144][160][154][146] [206]   [159]  [144][160][159][146] [154]  [144][160][154][146] [144][160][154][146]     [144][160]";
8075 PRINT"[154][146]   [144][160][154][146][206][144][160][154][146] [206] [144][160][154][146] [144][160][154][146]  [154][206][144][160][154][146][206]  [144][160][154][146]    [159] ";
8080 PRINT"  [144][160][159][146] [154]  [144][160][154][146] [144][160][160][160][160][160][154][146] [144][160][154][146]   [144][160][154][146] [144][160][160][160][160][160]";
8085 PRINT"[154][146][206][144][160][154][146][206]  [144][160][154][146] [206] [144][160][154][146][206][159]  [154] [159] [154]  [156]        ";
8090 PRINT"                         ";
8095 PRINT"  [154][146]  [156] [154] [156][160][154][146] [144]     [154][146]  [144]     [154][146]  [159]   ";
8100 PRINT"  [149][146]  [144]     [154][146][206] [144]     [154][146] [156][160][159][146] [156] [154] [156][160][159][146] [156][160][144] ";
8105 PRINT"[154][146] [144] [152][146]    [144] [154][146] [144] [154][146] [206]  [159] [154][146][206][159][160][154][146]  [206] [144] [154][146][206][144] [154][146]  ";
8110 PRINT"  [144] [154][146][206][144] [156] [154][146] [156][160][159][146] [156] [159] [154] [156][160][154][146] [144] [154][146] [144] [152][146]    [144] [154][146] [144] [154][146] ";
8115 PRINT" [206] [159] [154][146] [159][160][154][146]    [144] [154][146] [144] [154][146] [206]  [144] [154][146] [144] [154][146] [156][160][154][146] [159] [156] ";
8120 PRINT"[159] [154]   [144] [154][146] [144] [152][146]    [144] [154][146] [144] [154][146]    [159] [154][146] [159] [154][146] [206]  ";
8125 PRINT"[144] [154][146][206][144] [154][146]   [206][144] [154][146] [144] [154][146]    [159]  [154]   [144] [154][146] [144] [152][146]   ";
8130 PRINT" [144] [154][146] [144] [154][146] [206] [206][159][160][154][146] [159] [154][146]  [206] [144] [154][146] [144] [154][146] [206]  [144] [154][146] [144] ";
8135 PRINT"[154][146]    [159]  [154]  [144]     [154][146]  [144]     [154][146]  [159]   ";
8140 PRINT"  [154][146]  [144]     [154][146]  [144]     [154][146]    [154][146]     ";
8145 PRINT"          [154][146]       [154][146]        ";
8150 PRINT"[154][146]      [154][146]       [176][192][192][192][192][192][192][192][178][192][192][192]";
8155 PRINT"[192][192][192][192][178][192][192][192][192][192][192][192][178][192][192][192][192][192][192][192][174]    ";
8160 PRINT"   [221]      [160][221]       [221]     ";
8165 PRINT"  [221]       [221]       [221]  VON ";
8170 PRINT" [221]ANDREAS[221] SAND- [221] APRIL ";
8175 PRINT"[221]       [221]  [192][192][192]  [221][160]      [221]";
8180 PRINT"KUEHLER[221] 1985 [160][221]       [221] ";
8185 PRINT"      [221]       [221]       [221]  ";
8190 PRINT"     [221]   [157][157]";CHR$(148)CHR$(148)"  [146]";
8200 POKE198,0:POKEV,27:WAIT198,1:GOSUB7100:RETURN