function main( x, y, p )

  local w = bs_width()
  if w < 5 then
    w = 5
  end

  if not firstDraw then
    local distance = bs_distance( lastDrawX - x, lastDrawY - y )
    if distance < w/2 then
      return 0
    end
  end

  local i
  for i = 0,10 do
    local r,g,b = bs_forebg( math.random() )
    local dx = x + bs_grand( 0, 0.4 ) * w
    local dy = y + bs_grand( 0, 0.4 ) * w
    local rnd = 0.3 + math.random()*0.7

    bs_ellipse( dx,dy, rnd*w/4, rnd*w/4, 0, r,g,b, 255 )
  end

  lastDrawX = x
  lastDrawY = y
  firstDraw = false

  return 1
end

lastDrawX = 0
lastDrawY = 0
firstDraw = true