10 REM Basicgrundlagen
20 ENT 1,100,5,1
30 MODE 2
40 EVERY 10,1 GOSUB 60   
50 BORDER INT(RND*27):GOTO 50
60 zahl=zahl+1:PRINT zahl;
70 SOUND 1,100,5,7,0,1
80 RETURN
