// WIND / BLAZE '99.06 // By Tsutomu HIGO E-mail: nj2t-hg@asahi-net.or.jp // From a sample of maketree macro // by Mr. gilles Tran E-mail: tran@inapg.inra.fr #include "colors.inc" #include "txttree.inc" #include "maketree.pov" #declare PdV=<0, 4, -110>; #declare PdA=<0, 25, 0>; #declare dofile=false; #declare dotexture=false; #declare ftname="gttree5.inc" #declare fvname="gtfoliage5.inc" #declare ffname="gtleaf5.inc" #declare txtTree=texture{txtTree_5} #declare rsd=125; #declare rd=seed(rsd); #declare rdl=seed(rsd); #declare level0=6; #declare nseg0=10; #declare nb=2.5; #declare dotop=false; #declare lb0=35; #declare rb0=10; #declare ab0=45; #declare qlb=0.8; #declare qrb=0.4; #declare qab=0.91; #declare stdax=300; #declare stday=300; #declare branchproba=1; #declare jb=0; #declare fgnarl=0.3; #declare stdlseg=0.1; #declare twigproba=0; #declare v0=<0,1,0>; #declare pos0=<0,0,0>; #declare vpush=<0.5,0.3,0.3>; #declare fpush=0.5; #declare aboveground=-2; #declare belowsky=1000; #declare rootproba=1; #declare nroot=8; #declare vroot=<-0.5,-0.2,0>; #declare yroot=<0,1.2,0>; #declare leafproba=0.5; #declare leaflevel=5; #declare alz0=40; #declare alx0=-20; #declare stdalx=40; #declare stdlsize=0.8; #declare txtLeaf=texture{txtLeaf_1} #declare lsize=0.4; #declare seg=6; #declare ll=10; #declare wl=2; #declare fl=0.3; #declare lpow=2; #declare al=60; #declare apow=1; #declare ndents=0; #declare nlobes=1; #declare alobes=10; #declare qlobes=0.9; #declare ls=0; #declare ws=0.12; #declare as=2; object{ #if (leafproba>0) #declare Leaf=object{MakeLeaf(lsize,seg,ll,wl,fl,lpow,al, apow,ndents,nlobes,alobes,qlobes,ls,ws,as,dofile,ffname) #if (dotexture=false) texture{txtLeaf} #end } #end MakeTree() #if (dotexture = true) texture {txtLeaf} #else texture {txtTree} #end rotate y*70 rotate x*70 rotate y*300 scale 0.2 translate <2,-6,-8> no_shadow } // The end of tree #version 3.1; global_settings { max_trace_level 30 assumed_gamma 2.2 } light_source {<10, 30, -30> color <1,1,1>} camera { location <2,8,0> angle 85 look_at <-10, -25,-5> } box { <-1000, -5, -1000> <1000, 4, 1000> pigment {wrinkles color_map{ [0.10 color rgbt <6,3,0,0.4>] [0.47 color rgbt <2,1,0,1>] [1 color rgbt <1,0,0,1>] } turbulence 0.80 scale <8,8,16> rotate y*100 translate <25,0,130> } no_shadow } background {color rgb <0.9,0.3,0>}