ملخص

// Persistence of Vision Ray Tracer Scene Description File
// File: ?.pov
// Vers: 3.6
// Desc: Basic Scene Example
// Date: mm/dd/yy
// Auth: ?
//
         

#version 3.6;

#include "colors.inc"

global_settings {
  assumed_gamma 2.1    
  // used in global_settings, sets an overall brightness/ambient light level in the scene
  ambient_light color rgb <1,1,1>/10
}

// ----------------------------------------

camera {
  location  <+0.3, 0.5, -4.0>     // -0.2  0.0  +0.2    //  -0.3 -0.1 +0.1 +0.3
  direction 1.5*z
  right     x*image_width/image_height
  look_at   <0.0, 0.0,  0.0>
}

sky_sphere {
  pigment {
    gradient y
    color_map {
      [0.0 rgb <0.6,0.7,1.0>]
      [0.7 rgb <0.0,0.1,0.8>]
    }
  }
}

light_source {
  <-50, 40, -60>            // light's position (translated below)
  color rgb <1, 0, 0>  // light's color
}     

light_source {
  <50, 40, -60>            // light's position (translated below)
  color rgb <0, 1, 0>  // light's color
}

light_source {
  <0, 190, -60>            // light's position (translated below)
  color rgb <0, 0, 1.1>  // light's color
  
}

// ----------------------------------------

plane {
  y, -1.3
  pigment { color rgb <0.7,0.5,0.3> }
}

#declare ba=5.7;  //linksunten rechst oben   flach
#declare bb=7.3;  //linksoben rechtunten         //6 , 9 ,    , 15
#declare bc=5.5;    //links unten rechts oben   steil
#declare b1=max(ba,bb,bc)+2;

#declare s=sqrt(3)/2;        

    /*
//tube armchair
#declare bb=bb+6;  //6 , 9 ,    , 15
#declare r=(bb-6)/pi;
#macro ab2y(b,a) sin(a/r)*r  
#end
#macro ab2x(b,a)  b 
#end
#macro ab2z(b,a)  cos(a/r)*r  -r
#end
  */

   /*
//rim armchair
#declare r=(bb-6)/pi*3;
#macro ab2y(b,a) sin(a/r)*r   
#end
#macro ab2x(b,a)  b 
#end
#macro ab2z(b,a)  cos(a/r)*r  -r
#end
     */

/*  
//ribbon
#macro ab2x(a,b) a 
#end
#macro ab2y(a,b)  b 
#end
#macro ab2z(a,b)  0 
#end        
*/ 

#declare ha=0.92;
#declare hu=1.3;
#declare hr=sqrt(ha*ha+hu*hu);

    
//rim zizag
#declare r=1.68;//3.135;
#macro ab2x(a,b) sin((hu*a-ha*b)/hr/r)*r 
#end
#macro ab2y(a,b)  (ha*a+hu*b)/hr 
#end
#macro ab2z(a,b)  cos((hu*a-ha*b)/hr/r)*r -r
#end        
  

/*
//ribbon
#declare r=3;//1.68;//3.135;
#macro ab2x(a,b) ((hu*a-ha*b)/hr/r)*r 
#end
#macro ab2y(a,b)  (ha*a+hu*b)/hr 
#end
#macro ab2z(a,b)  0
#end        
*/

    /*   
//tube zizag
#declare ba=ba+2;
#declare r=(ba*s)/pi;
#macro ab2x(a,b) sin(a/r)*r 
#end
#macro ab2y(a,b)  b 
#end
#macro ab2z(a,b)  cos(a/r)*r  -r
#end

  */   

// m,n -> x,y
/*

  ****
 *    *
*      *
 *    *
  ****

*/

#macro kugel(m,n)
       #if ( (abs(m)<ba) & (abs(n)<bb) & (abs(m+n-0.5)<bc) )
// #if (abs(m+n)<ba)
                sphere{<ab2x(m+n/2,n*s),ab2y(m+n/2,n*s),ab2z(m+n/2,n*s)>,0.2}
   //    #end 
   #end        
#end

#macro zylinder(m,n,m1,n1)
       #if ( (abs(m)<ba) & (abs(n)<bb) & (abs(m+n-0.5)<bc) )
#if ( (abs(m1)<ba) & (abs(n1)<bb) & (abs(m1+n1-0.5)<bc) )
                cylinder{<ab2x(m+n/2,n*s),ab2y(m+n/2,n*s),ab2z(m+n/2,n*s)>,<ab2x(m1+n1/2,n1*s),ab2y(m1+n1/2,n1*s),ab2z(m1+n1/2,n1*s)>,0.17}
       #end 
   #end        
#end

union{   

#declare m = -b1;
#while (m <= b1)
#declare n = -b1;
#while (n <= b1)

kugel(m,n)
zylinder(m,n,m-1/3,n+2/3)
kugel(m-1/3,n+2/3)
zylinder(m-1/3,n+2/3,m-1,n+1)
zylinder(m-1/3,n+2/3,m,n+1)

#declare n = n+1;   // increment our counter
#end
#declare m = m+1;   // increment our counter
#end

         texture {
            pigment {
                color rgb <1,1,1>*0.7
            }
            finish{
              specular 0.6
            }
         }
     scale 0.2 //08 //2
   //  translate 0.4*z
     rotate <90,45,0>
     rotate <0,90,0>
     rotate <-20,0,0>
   //  translate z        
}

ترخيص

أنا، مالِك حقوق تأليف ونشر هذا العمل، أجعله في النِّطاق العامِّ، يسري هذا في أرجاء العالم كلِّه. في بعض البلدان، قد يكون هذا التَّرخيص غيرَ مُمكنٍ قانونيَّاً، في هذه الحالة: أمنح الجميع حق استخدام هذا العمل لأي غرض دون أي شرط ما لم يفرض القانون شروطًا إضافية.