home *** CD-ROM | disk | FTP | other *** search
- { material
- name _field1;
- model { phong
-
- Ks 0.2;
- Kt 0;
- ni 1;
- Ka 0.2;
- Kd 0.6;
- n 10;
- Od (0,0,1);
- Os (0.5,0.5,0.5);
- }
-
- }
-
- { material
- name _field2;
- model { phong
-
- Ks 0.2;
- Kt 0;
- ni 1;
- Ka 0.2;
- Kd 0.6;
- n 10;
- Od (1,0,0);
- Os (0.5,0.5,0.5);
- }
-
- }
-
- { object
- name bend;
- model { field
-
- { object
- name obj000001;
- material standard;
- model { box
- xmin 0;
- xmax 1;
- ymin 0;
- ymax 1;
- zmin 0;
- zmax 1;
- }
- }
-
- decoration
- { object
- name decoration;
- material _field1;
- model { polyline
- open 1;
- p ( 0.5 , 0.5 , 0.05 );
- p ( 0.5 , 0.5 , 0.1 );
- p ( 0.5 , 0.5 , 0.15 );
- p ( 0.5 , 0.5 , 0.2 );
- p ( 0.5 , 0.5 , 0.25 );
- p ( 0.5 , 0.5 , 0.3 );
- p ( 0.5 , 0.5 , 0.35 );
- p ( 0.5 , 0.5 , 0.4 );
- p ( 0.5 , 0.5 , 0.45 );
- p ( 0.5 , 0.5 , 0.5 );
- p ( 0.5 , 0.5 , 0.55 );
- p ( 0.5 , 0.5 , 0.6 );
- p ( 0.5 , 0.5 , 0.65 );
- p ( 0.5 , 0.5 , 0.7 );
- p ( 0.5 , 0.5 , 0.75 );
- p ( 0.5 , 0.5 , 0.8 );
- p ( 0.5 , 0.5 , 0.85 );
- p ( 0.5 , 0.5 , 0.9 );
- p ( 0.5 , 0.5 , 0.95 );
- }
- }
-
- dfmat _field2;
- param {
- k value 0.2 from 0 to 1;
- }
- mat {
- k "0.2;";
- dist "sqrt( x*x + z*z );";
- inc "k * 3.1415 * dist;";
- ang " atan( z / ( x + 0.001 * zero(x)) );";
- ry "0;";
- rx "dist * cos( ang + inc ) - x;";
- rz "dist * sin( ang + inc ) - z;";
- }
-
- }
- }
- .
-
-