stars.p8

-- randomly choose item from table
function rndchoice(t)
 return t[flr(rnd(#t))+1]
end

stars = {}
function makestars(n)
 colors={1,5,6,7,13}
 for i=1,n do
  add(stars, {
   x=flr(rnd(128)),
   y=flr(rnd(128)),
   c=rndchoice(colors)
  })
 end
end

function _draw()
  for s in all(stars) do
   if rnd()>0.02 then
    pset(s.x, s.y, s.c)
   end
end