Created using only circles subjected to constrained randomness. Every instant is a unique configuration.

Music: “Dark” by Moritz Von Oswald Trio

Mathematica code:

RR[n_, m_] := (SeedRandom[n*m]; RandomReal[])

G[t_, r_, Q_] :=
 Graphics[
  Table[
   Table[
    {RGBColor[RR[i, Q], RR[i, 2*Q], RR[i, 3*Q],
      .25*Exp[-(Mod[t, 2] - .5 - RR[i, 5*Q])^2/.1]],
     Disk[
      RotationTransform[(k + (-1)^(i)*Mod[t, 2])*2 Pi/8]
                                [{r*RR[2 i, 4*Q], r*RR[2 i + 1, 4*Q]}],
      (.075 + .1 RR[i, Q])*Exp[-(Mod[t, 2] - .5 - RR[i, 5*Q])^2/.1]]},
   {k, 0, 7, 1}],
  {i, 1, 30, 1}],
 PlotRange -> 1.15, ImageSize -> 640, Background -> Black]

Manipulate[
 Show[
  Table[
   G[.02 t + k,
      If[.02 t < 2, .1 + 0.283 Sqrt[.02 t], .45 + .05 Cos[2 Pi*t/100]],
      2*Ceiling[(.02 t + k)/2] + k],
  {k, 0, 1, 1}]],
{t, 1567, 2000, 1}]