Hola,


"rotate" se me desplaza, pero no se me gira.



#include "colors.inc"
#include "shapes.inc"
#include "stones.inc"
#include "textures.inc"
  background { White }
  camera {location <170, 11, -110> look_at  <180, -15, -16> }
  light_source { <170, -30, -100> color White}
===============My object===========
#declare Cuc =
   blob {

     sphere {
       <0, 5, 0>, 2, 1
       pigment { Red } }
scale 1
translate <190, -20, 0> no_shadow
}
===================================

=========The macro===================
#macro Make_Stuff (Stuff,How_Many)
#local Ample=-12;

#while (Ample<How_Many)
    object{Stuff  rotate <0,0*Ample,0> translate<3*Ample,11*cos
(Ample/8),0> }
    #local Ample=Ample+1;
  #end
#end
#declare layer = union {Make_Stuff (Cuc,-11)}
global_settings { max_trace_level 29 }

// Fi de Bicapa en una sola dimensio
//Bicapa en les dos dimensions del pla de la membrana.
#macro Make_Many (Stuff,How_Many)
#local Fons=0;

#while (Fons<How_Many)
    object{Stuff  translate <0,5*sin (Fons/8),3*Fons>}
    #local Fons=Fons+1;
  #end
#end
// Incrementar el nombre de bicapes unidimensionals per a fer una membrana
mes fonda. 50 molecules de lipid de fons funciona be, 72 amb el

union {Make_Many (layer,10)}
global_settings { max_trace_level 32 }
================================

Muchas gracias,
Oleguer

Post a reply to this message