4 POKE53280,0:POKE53281,0:PRINT"[147]"
5 FOR F=0 TO 15
10 FOR I=0 TO 39
20 POKE 1024+I,42:POKE 55296+I,F
30 NEXT I
40 FOR K=0 TO 960 STEP 40
50 POKE 1024+39+K,42:POKE 55296+39+K,F
60 NEXT K
70 FOR I=39 TO 0 STEP-1
80 POKE 1024+960+I,42:POKE 55296+960+I,F
90 NEXT I
100 FOR K=960 TO 0 STEP-40
110 POKE 1024+K,42:POKE 55296+K,F
120 NEXT K
130 NEXT F
140 GOTO 5