Inspired by Vasilj Godzh

Mathematica code:
s[q_] := (SeedRandom[q]; RandomReal[])r[S_, a_, v_, w_, t_] :=  S (1 + .05 Sin[v*a] Cos[w*a] + .1 Cos[8*a] + .025 Sin[a + t])F[Q_, S_, M_, v_, w_, th_, t_] := {EdgeForm[{AbsoluteThickness[th], Black}], FaceForm[White],  Polygon[   Table[    {{0, 0},     {r[S, (a + s[Q*a]) 2 Pi/M, v, w, t] Cos[(a + s[Q*a]) 2 Pi/M],      r[S, (a + s[Q*a]) 2 Pi/M, v, w, t] Sin[(a + s[Q*a]) 2 Pi/M]},     {r[S, (a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M, v, w, t] Cos[(a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M],      r[S, (a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M, v, w, t] Sin[(a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M]}},    {a, 1, M, 1}]]}Manipulate[ Graphics[  Table[   Translate[    Reverse@     Table[      F[i*j, (1 + .3 i^1.7), 125 + 25 i,          3 + Round[9 s[i*j]], 3 + Round[9 s[2 i*j]],        .6, t + s[j] 2 Pi],      {i, 1, 4, 1}],    {17*s[j], 23.8*s[2 j]}],   {j, 1, 46, 1}],  PlotRange -> {{.5, 17.5}, {-1.2, 22.6}},   ImageSize -> {500, 700}], {t, 0, 2Pi}]

Inspired by Vasilj Godzh

Mathematica code:

s[q_] := (SeedRandom[q]; RandomReal[])

r[S_, a_, v_, w_, t_] :=
S (1 + .05 Sin[v*a] Cos[w*a] + .1 Cos[8*a] + .025 Sin[a + t])

F[Q_, S_, M_, v_, w_, th_, t_] :=
{EdgeForm[{AbsoluteThickness[th], Black}], FaceForm[White],
Polygon[
Table[
{{0, 0},
{r[S, (a + s[Q*a]) 2 Pi/M, v, w, t] Cos[(a + s[Q*a]) 2 Pi/M],
r[S, (a + s[Q*a]) 2 Pi/M, v, w, t] Sin[(a + s[Q*a]) 2 Pi/M]},
{r[S, (a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M, v, w, t] Cos[(a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M],
r[S, (a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M, v, w, t] Sin[(a + 1 + s[Q (Mod[a, M] + 1)]) 2 Pi/M]}},
{a, 1, M, 1}]]}

Manipulate[
Graphics[
Table[
Translate[
Reverse@
Table[
F[i*j, (1 + .3 i^1.7), 125 + 25 i,
3 + Round[9 s[i*j]], 3 + Round[9 s[2 i*j]],
.6, t + s[j] 2 Pi],
{i, 1, 4, 1}],
{17*s[j], 23.8*s[2 j]}],
{j, 1, 46, 1}],
PlotRange -> {{.5, 17.5}, {-1.2, 22.6}},
ImageSize -> {500, 700}],
{t, 0, 2Pi}]
 
  1. profanumxsacrum reblogged this from demystifyme
  2. clazzjassicalrockhop reblogged this from intothecontinuum
  3. daark-side reblogged this from boss-ass-bitche
  4. outofitbutstillcool reblogged this from torncheek
  5. torncheek reblogged this from crackersaregreatwithamnesia
  6. crackersaregreatwithamnesia reblogged this from klonopin-kids
  7. sundegai2013 reblogged this from sundegai
  8. seleniclunar reblogged this from dystopiabella
  9. fantasminhabebe reblogged this from fugaz67
  10. jpixiepoison reblogged this from fluorescentfunk
  11. where-weve-been-is-who-we-are reblogged this from mechanicalbubble
  12. mechanicalbubble reblogged this from serpenteatserpent
  13. serpenteatserpent reblogged this from pachi-pachi
  14. pachi-pachi reblogged this from neonexperience
  15. jimmynewland reblogged this from intothecontinuum
  16. gettingtwisted reblogged this from higher-than-giraffe-pussy
  17. tsukimadrigal reblogged this from dystopiabella
  18. sebastianvi reblogged this from dystopiabella
  19. gambita reblogged this from thevuas
  20. kannibalking reblogged this from dystopiabella
  21. dystopiabella reblogged this from karma-is-a-bitch-lol
  22. what-evennnnn reblogged this from intothecontinuum
  23. mymindisjustverystrange reblogged this from lavitaebella69
  24. kittiemetal reblogged this from organic-wisdom
  25. lavitaebella69 reblogged this from meditationonabone
  26. theresnoiinteam reblogged this from tatooineghost
  27. tatooineghost reblogged this from the-cunning-linguist
  28. bluboi236 reblogged this from alcoholicjukeboxes
  29. deptth reblogged this from meditationonabone
  30. inombrainzs reblogged this from thedevilyousay
  31. maddy-vosel reblogged this from melancholyblueportal