1 PRINT"[147]":FORI=1TO10:READS$(I):NEXTI:FORI=1TO10:READS1(I):NEXTI:G=40 2 L=1:GOTO 6 3 Z1=INT(10*RND(1))+1:W=S1(Z1):POKE1957,W:PRINT" PUNKTE:";P;" LEVEL:";L 4 FORI=1TO16:POKE53280,I:NEXTI:IFPEEK(56320)<>111THEN4 5 FORI=1TO200:NEXTI:RETURN 6 PRINT"[147][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198][198]" 7 PRINT"[162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]" 8 PRINT" ZU FINDEN:";S$(Z1):GOSUB3 9 Z2=INT(10*RND(1))+1:N=0:B=S1(Z2):Z3=INT(679*RND(1))+1104:IFL=14THEN17 10 IFY=10THENG=G-2:L=L+1:GOSUB3:IFR2<5THEN17 11 IFY=10THENR2=0:Y=0 12 POKE Z3,B:IFB=WTHENY=Y+1:U=U+1 13 FORI=1TOG:IFPEEK(56320)=111ANDN=0THEN15 14 NEXTI:POKEZ3,96:GOTO9 15 IFB<>WTHENP=P-1:F=F+1:PRINT" PUNKTE:";P;" LEVEL:";L:N=1:GOTO14 16 P=P+1:R=R+1:PRINT" PUNKTE:";P;" LEVEL:";L:N=1:R2=R2+1:GOTO14 17 PRINT"[147] GAME OVER":IFL=14THENPRINT" [147]SIE HABEN GEWONNEN" 18 PRINT" SYMBOLE :";U:PRINT" RICHTIG :";R:PRINT" FALSCH :";F 19 PRINT" INSGESAMT:";P:PRINT" LEVEL :";L-1:END 20 DATA "[169]","[219]","[193]","[211]","[214]","[216]","[218]","[209]","[215]","[223]",105,91,65,83,86,88,90,81,87,95