// Chaos1 / The Lorenz Attractor Modification '00.05 // By Tsutomu HIGO E-mail: nj2t-hg@asahi-net.or.jp #version 3.1; #global_settings { assumed_gamma 2.2 } camera { location <150, 50, -10> look_at <0, -15, 0> angle 50 } #macro Chaos ( H, A, B, C, Nstart, Nend ) #declare X = 0.1; #declare Y = 0; #declare Z = 0; #declare N = Nstart; #while (N < Nend) #declare X1 = X + H*A*(Y-X); #declare Y1 = Y + H*(X*(B-Z)-Y); #declare Z1 = Z + H*(X*Y-C*Z); cylinder { 0.2 pigment { color rgb } finish { reflection 0.5 ambient 0.3 phong 1 diffuse 1 brilliance 1} no_shadow } #declare X = X1; #declare Y = Y1; #declare Z = Z1; #declare N = N+1; #end #end #declare Lorentz = union { Chaos ( 0.008, 10, 28, 8/3, 0, 10000 ) } object { Lorentz translate z*30 rotate y*210 } object { Lorentz translate z*30 rotate y*330 } object { Lorentz translate z*30 rotate y*90 } light_source { <700, 1000, -3000> color rgb <0.8,1.5,0.8> }