// Orizuru / Spiral July '07 // by Tsutomu HIGO URL:http://www.asahi-net.or.jp/~nj2t-hg/ #version 3.6; global_settings { max_trace_level 5 assumed_gamma 2.2 } camera { location <-5, 6, 2> look_at <30, -100, 0> angle 70 } media { scattering { 15, rgb 0.03 } intervals 1 samples 1 method 2 } light_source { <10, -100, 0> color rgb <0.6, 0.7, 1> } #declare Pwtr =<0, 1, -0.06>; #declare Pwtl =<0, 1, 0.06>; #declare Pwmr =<0, 0.082392, -0.02>; #declare Pwml =<0, 0.082392, 0.02>; #declare Pwmfr=<0.268761, 0.351153, -0.04>; #declare Pwmbr=<-0.268761, 0.351153, -0.04>; #declare Pwbfr=<0.191342, -0.03806, -0.02>; #declare Pw0fr=<0.198912, 0, -0.02>; #declare Pwmfl=<0.268761, 0.351153, 0.04>; #declare Pwmbl=<-0.268761, 0.351153, 0.04>; #declare Pwbfl=<0.191342, -0.03806, 0.02>; #declare Pw0fl=<0.198912, 0, 0.02>; #declare Pwbc=<0, 0, 0>; #declare Pwbbr=<-0.191342, -0.03806, -0.02>; #declare Pw0br=<-0.198912, 0, -0.02>; #declare Pwbbl=<-0.191342, -0.03806, 0.02>; #declare Pw0bl=<-0.198912, 0, 0.02>; #declare Ptt =<-0.382683, 0.92388, 0>; #declare Phm =<0.490923, 0.662567, 0>; #declare Phtr =<0.349501, 0.757062, -0.01>; #declare Phtl =<0.349501, 0.757062, 0.01>; #declare Phn =<0.306147, 0.739104, 0>; #declare Pbt =<0, 0.414214, 0>; #declare Pbmfr =<0.234633, 0.17958, -0.05>; #declare Pbmbr =<-0.234633, 0.17958, -0.05>; #declare Pbmfl =<0.234633, 0.17958, 0.05>; #declare Pbmbl =<-0.234633, 0.17958, 0.05>; #declare Latsumi =<0, 0, 0.002>; #declare Ltakami =<0, 0.002, 0>; #declare Crane=union{ //right //right head union{ triangle { Phm, Phtr, Phn } triangle { Phm, Phtr, Phn translate -1*Latsumi } triangle { Phm, Phtr, Phn translate -2*Latsumi } triangle { Phm, Phtr, Phn translate -3*Latsumi } } //right neck union { triangle { Pwbfr, Pwbc, Phn } triangle { Phn, Phtr, Pwbfr } triangle { Pwbfr, Pwbc, Phn translate -1*Latsumi} triangle { Phn, Phtr, Pwbfr translate -1*Latsumi} triangle { Pwbfr, Pwbc, Phn translate -2*Latsumi} triangle { Phn, Phtr, Pwbfr translate -2*Latsumi} triangle { Pwbfr, Pwbc, Phn translate -3*Latsumi} triangle { Phn, Phtr, Pwbfr translate -3*Latsumi} } //right wing union { triangle { Pw0fr, Pwbc, Pwmfr } triangle { Pbt, Pwbc, Pwmfr } triangle { Pbt, Pwtr, Pwmfr } triangle { Pw0br, Pwbc, Pwmbr } triangle { Pbt, Pwbc, Pwmbr } triangle { Pbt, Pwtr, Pwmbr } triangle { Pwbfr, Pwbc, Pwmfr translate -1*Latsumi } triangle { Pbt, Pwbc, Pwmfr translate -1*Latsumi } triangle { Pbt, Pwtr, Pwmfr translate -1*Latsumi } triangle { Pwbbr, Pwbc, Pwmbr translate -1*Latsumi } triangle { Pbt, Pwbc, Pwmbr translate -1*Latsumi } triangle { Pbt, Pwtr, Pwmbr translate -1*Latsumi } triangle { Pbmfr, Pwmr, Pwmfr } triangle { Pbmbr, Pwmr, Pwmbr } triangle { Pbmfr, Pwmr, Pwmfr translate -1*Latsumi } triangle { Pbmbr, Pwmr, Pwmbr translate -1*Latsumi } triangle { Pbmfr, Pwmr, Pwbfr } triangle { Pbmbr, Pwmr, Pwbbr } triangle { Pwbc, Pwmr, Pwbfr } triangle { Pwbc, Pwmr, Pwbbr } triangle { Pbmfr, Pwmr, Pwbfr translate -1*Latsumi } triangle { Pbmbr, Pwmr, Pwbbr translate -1*Latsumi } triangle { Pwbc, Pwmr, Pwbfr translate -1*Latsumi } triangle { Pwbc, Pwmr, Pwbbr translate -1*Latsumi } } //right body union { triangle { Pwbfr, Pwbc, Pbmfr } triangle { Pbt, Pwbc, Pbmfr } triangle { Pwbbr, Pwbc, Pbmbr } triangle { Pbt, Pwbc, Pbmbr } triangle { Pw0fr, Pwbc, Pbmfr translate 1*Ltakami } triangle { Pbt, Pwbc, Pbmfr translate 1*Ltakami } triangle { Pw0br, Pwbc, Pbmbr translate 1*Ltakami } triangle { Pbt, Pwbc, Pbmbr translate 1*Ltakami } } //right tail union { triangle { Ptt, Pwbc, Pwbbr } triangle { Ptt, Pwbc, Pwbbr translate -1*Latsumi } triangle { Ptt, Pwbc, Pwbbr translate -2*Latsumi } triangle { Ptt, Pwbc, Pwbbr translate -3*Latsumi } } //left //left head union{ triangle { Phm, Phtl, Phn } triangle { Phm, Phtl, Phn translate 1*Latsumi } triangle { Phm, Phtl, Phn translate 2*Latsumi } triangle { Phm, Phtl, Phn translate 3*Latsumi } } //left neck union { triangle { Pwbfl, Pwbc, Phn } triangle { Phn, Phtl, Pwbfl } triangle { Pwbfl, Pwbc, Phn translate 1*Latsumi } triangle { Phn, Phtl, Pwbfl translate 1*Latsumi } triangle { Pwbfl, Pwbc, Phn translate 2*Latsumi } triangle { Phn, Phtl, Pwbfl translate 2*Latsumi } triangle { Pwbfl, Pwbc, Phn translate 3*Latsumi } triangle { Phn, Phtl, Pwbfl translate 3*Latsumi } } //left wing union { triangle { Pw0fl, Pwbc, Pwmfl } triangle { Pbt, Pwbc, Pwmfl } triangle { Pbt, Pwtl, Pwmfl } triangle { Pw0bl, Pwbc, Pwmbl } triangle { Pbt, Pwbc, Pwmbl } triangle { Pbt, Pwtl, Pwmbl } triangle { Pwbfl, Pwbc, Pwmfl translate 1*Latsumi } triangle { Pbt, Pwbc, Pwmfl translate 1*Latsumi } triangle { Pbt, Pwtl, Pwmfl translate 1*Latsumi } triangle { Pwbbl, Pwbc, Pwmbl translate 1*Latsumi } triangle { Pbt, Pwbc, Pwmbl translate 1*Latsumi } triangle { Pbt, Pwtl, Pwmbl translate 1*Latsumi } triangle { Pbmfl, Pwml, Pwmfl } triangle { Pbmbl, Pwml, Pwmbl } triangle { Pbmfl, Pwml, Pwmfl translate 1*Latsumi } triangle { Pbmbl, Pwml, Pwmbl translate 1*Latsumi } triangle { Pbmfl, Pwml, Pwbfl } triangle { Pbmbl, Pwml, Pwbbl } triangle { Pwbc, Pwml, Pwbfl } triangle { Pwbc, Pwml, Pwbbl } triangle { Pbmfl, Pwml, Pwbfl translate 1*Latsumi } triangle { Pbmbl, Pwml, Pwbbl translate 1*Latsumi } triangle { Pwbc, Pwml, Pwbfl translate 1*Latsumi } triangle { Pwbc, Pwml, Pwbbl translate 1*Latsumi } } //left body union { triangle { Pwbfl, Pwbc, Pbmfl } triangle { Pbt, Pwbc, Pbmfl } triangle { Pwbbl, Pwbc, Pbmbl } triangle { Pbt, Pwbc, Pbmbl } triangle { Pw0fl, Pwbc, Pbmfl translate 1*Ltakami } triangle { Pbt, Pwbc, Pbmfl translate 1*Ltakami } triangle { Pw0bl, Pwbc, Pbmbl translate 1*Ltakami } triangle { Pbt, Pwbc, Pbmbl translate 1*Ltakami } } //left tail union { triangle { Ptt, Pwbc, Pwbbl } triangle { Ptt, Pwbc, Pwbbl translate 1*Latsumi } triangle { Ptt, Pwbc, Pwbbl translate 2*Latsumi } triangle { Ptt, Pwbc, Pwbbl translate 3*Latsumi } } } ; #declare Kmax=36; #declare K=20*Kmax; #while (K>-3*Kmax) object { Crane scale 4 translate x*-6 rotate y*1.02*360/Kmax*K translate y*-K/2 texture { pigment { color rgbt <1, 0.3, 0.3, 0.9> } finish { ambient .6 diffuse .7 reflection 0.8 specular 0.5 } } no_shadow } #declare K=K-1; #end