Mathematica code:

Rot =  Table[  Table[   RotationTransform[a, {1, 1, 0}, {0, 0, 0}][Tuples[{-1, 1}, 3][[v]]],  {v, 1, 8, 1}],{a, 0, 2 Pi, 2 Pi/100}]Edge := {1, 2, 4, 3, 7, 8, 6, 5, 1, 3, 4, 8, 7, 5, 6, 2}CubeProjections[color_, pr_, b_, s_, h_, w_, m_, o_] :=Graphics[ Table[  Translate[   {AbsoluteThickness[h], If[color == 0, Black, White],    Line[     Table[      Table[       Rot[[1 + Mod[w (y + m*x) + a, 100]]][[Edge[[k]]]][[c]],       {c, 1, 2, 1}],      {k, 1, 16, 1}]]},   {s*x, s*y}],  {x, -b, b, 1}, {y, -b, b, 1}], PlotRange -> {{-pr, pr}, {-pr, pr}}, ImageSize -> 500,  Background -> If[color == 0, White, Black] ]Manipulate[PM = {color, pr, b, s, h, w, m, a};CubeProjections[color, pr, b, s, h, w, m, a],{color, 0, 1, 1}, {{pr, 17}, 1, 52}, {{b, 5}, 1, 10, 1},{{s, 3}, 0, 5}, {{h, 1}, .01, 10},{{w, 1}, 0, 20, 1},{{m, 1}, 0, 20, 1},{a, 1, 100, 1}]P = {1, 28, 9, 3, 1.4, 1, 1, 30}Manipulate[CubeProjections[P[[1]],P[[2]],P[[3]],P[[4]],P[[5]],P[[6]],P[[7]],a],{a, 48, 0, -2}]

1. jeffbxco reblogged this from jeffbxco2
2. technically-tony reblogged this from intothecontinuum
3. laudland reblogged this from ryanpanos
4. addictedtosymmetry reblogged this from intothecontinuum
5. conscienza reblogged this from intothecontinuum
6. 1-800-dreamgirl reblogged this from intothecontinuum
7. ronenreblogs reblogged this from intothecontinuum
8. naked-thoughts-nude-heart reblogged this from ryanpanos
9. skatetuff reblogged this from domdecarlo and added:
deep lines
10. glitchsigifs reblogged this from intothecontinuum
11. 2d2d2 reblogged this from intothecontinuum
12. pure-art-photography reblogged this from yeaaaahbaby
13. yeaaaahbaby reblogged this from 1l1k3
14. preshtildeath reblogged this from fromtheweirdtotheinsane
15. fromtheweirdtotheinsane reblogged this from petuniagypsyfoot
16. petuniagypsyfoot reblogged this from intothecontinuum
17. artismagic reblogged this from ryanpanos
18. godual reblogged this from smoot
19. ice-sparks reblogged this from intothecontinuum
20. catalyst226 reblogged this from intothecontinuum
21. wellshiet reblogged this from intothecontinuum
22. radarloquere reblogged this from intothecontinuum
23. patterntrip reblogged this from wickedcoolperson
24. measurementoftheobserver reblogged this from intothecontinuum
25. irrelephantish reblogged this from intothecontinuum
26. valelapenaesperar reblogged this from linohlala
27. laclemdelaclem reblogged this from intothecontinuum
28. crissavelin reblogged this from intothecontinuum and added:
PAREDE!!!
29. talesofthemetro reblogged this from gewg
30. dark-fire-light-rain reblogged this from chondrichthye and added:
mathematica! …..I should go start those mathematica projects…heh.
31. softnice reblogged this from gewg
32. betam4x reblogged this from intothecontinuum