1 forh=.to2:fori=.to3:forj=.to2:r=peek(53266)
2 poke1027+6*j+i*(40+(-1)^r)+240*h+80*(3-i)*int(rnd(1)*2),42:nextj,i,h:goto1