10 IFFL=0THENFL=1:LOAD"BOULDERCHARS",8,1
20 POKE53272,PEEK(53272)AND240OR13
30 GOSUB3100
40 GOTO30
3100 POKE53280,0:POKE53281,0:POKE646,1:POKE198,0
3110 PRINT"[147]WAS  BEZEICHNUNG   TASTE"
3120 PRINT"[152] [193]   STEIN           0"
3130 PRINT"[156] [194]   DIAMANT         1"
3140 PRINT"[159] [195]   MAGIC MILL      2"
3150 PRINT"[159] [196]   MAUER           3"
3160 PRINT"[149] [197]   RAND            4"
3170 PRINT"[159] [198]   WUCHSMAUER      5"
3180 PRINT" [199]   MANN            6"
3190 PRINT"[129] [200]   ERDE/SAND       7"
3195 PRINT"    (SPACE)"
3196 WAIT198,1:POKE198,0
3197 PRINT"[147]WAS  BEZEICHNUNG   TASTE"
3200 PRINT" [201]   MONSTER1        8"
3210 PRINT" [202]   MONSTER2        9"
3220 PRINT" [203]   GRUENE SAEURE   A"
3230 PRINT" [203]   BLAUE SAEURE    B"
3240 PRINT" [205]   OUT VERSTECKT   C"
3250 PRINT" [206]   OUT NORMAL      D"
3260 PRINT" [207]   START/IN        E"
3270 PRINT"[144] [208]   LEERFELD        F"
3280 PRINT"    (SPACE)"
3290 GETA$:IFA$=""THEN3290
3300 RETURN