Still having problems . . .
Sub DrawStars1
for a=0 to ns-1
testpixel=buffer(y(a)*640+x(a))
red= (testpixel shr 16) and 255
green= (testpixel shr

and 255
blue= testpixel and 255
total = red+green+blue
'if total=white then dont print! any other colour print?
if total>0 then pp(x(a),y(a),rgb(r,g,b))
if total>0 then pp(x1(a),y1(a),rgb(r1,g1,b1))
if total>0 then pp(x2(a),y2(a),rgb(r2,g2,b2))
if total>0 then pp(x3(a),y3(a),rgb(r3,g3,b3))
next a
End Sub
am i doing something really obviously wrong?
Andy