10 FORT=0TO99 20 FORI=0TO4 40 POKE32768+I*256+T,RND (1)*256 50 NEXTI,T