Inspired by old images from p.b.i I discovered five lines long.

--
#macro L(D)light_source{D*5D spotlight point_at-D falloff 25}#end#local C=0;L(
x)L(y)#macro G()#declare C=C+1;val(substr(concat("00000100200301001402002102",
"3030034040122141142143222242322341342343400401402403410414420421423430434440"
),C,1))#end L(z)camera{location 8look_at 0}union{#while(1e2>C)box{#local P=<G(
),G(),G()>*.4-1;P+.4P}#end box{-9 9}texture{pigment{rgb 1}}}// call me ABX :-)

Post a reply to this message