#include "colors.inc"
#include "finish.inc"
//Output_File_Name=c:\My Documents\povrayimages\
//probably end up with a magenta/black color scheme
//global_settings { ambient_light rgb<1, 1, 1> }
//background
plane
{
z,+.1
pigment {rgb <1,0,1>}
}
//area of interest is
// -11 < x < 11
// 0.0 < y < 21
// 0.0 < z < 0.1
// bit this needs to be slightly expanded for a neat boarder
//eye
camera
{
location <0,10.5,-30>
look_at <0,10.5,0>
}
light_source { <-11,0,-25> <0,0,1> shadowless}
light_source { <11,21,-25> <1,0,0> shadowless}
light_source { <0,10.5,-25> <0.5,0.5,0.5>}
//light_source { <0,10.5,-25> <1,1,1>}
//Boarder
#declare border =
torus
{
20, 6
pigment { Black}
rotate x*-90
translate <0,11,-0.1>
}
//border
//hairs
#declare hair =
cone
{
<0,0,0>, 1.1
<0,-3,0>, 0
}
#declare Count = 0;
#declare hairs =
union
{
#while (Count < 100)
object {hair rotate z*Count }
#declare Count=Count +15;
#end
}
#declare LHairs =
union
{
hairs
rotate z*-90
translate <-5,14,0>
}
#declare RHairs =
union
{
hairs
translate <5,14,0>
}
//left side =
difference {
triangle
{
<-5, -1, 0>, <-11,14,0>,<-5,14,0>
pigment { Black}
}
LHairs //translate <-5,14,0>
pigment {rgb <1,0,1>}
}
//Right side =
difference {
triangle
{
<5, -1, 0>, <11,14,0>,<5,14,0>
pigment { Black}
}
RHairs
pigment {rgb <1,0,1>}
}
//left top =
triangle
{
<-2.5, 18, 0>, <-11,18,0>,<-2.5,21,0>
pigment { Black}
}
//Right top =
triangle
{
<2.5, 18, 0>, <11,18,0>,<2.5,21,0>
pigment { Black}
}
//Nipples
disc
{
<0,0,0>,z, 0.6, 0.2
pigment { Black}
translate <-3,10,0>
}
disc
{
<0,0,0>,z, 0.6, 0.2
pigment { Black}
translate <3,10,0>
}
//sphere at origen
sphere
{
<0,0,0>, 0.4
pigment { Black }
}
No comments:
Post a Comment