1 POKE53280,6:POKE53281,6:PRINT"[147]"
10 D=52:DIMU(D)
20 FORC=1TOD
30 N=INT(D*RND(1))+1
40 IFU(N)=0THENU(N)=1:PRINTN,:NEXT:END
50 GOTO30