#macro C(W)(sin(W)+1.7)/2#end light_source{x,1}#local L=text{ttf"povlogo.ttf""P"1,0};#local i=0;#while(i<50)sphere{trace(L,<i-int(i),int(i)/50,-3>,z)-<.3,.5,-1>1/80pigment{rgb<C(i*6),C(i/2.1),C((i-int(i))*22)>}finish{phong 1}}#local i=i+0.021;#end