61 lines
1.1 KiB
PHP
61 lines
1.1 KiB
PHP
/*
|
|
poteaux.inc
|
|
-----------
|
|
|
|
*/
|
|
|
|
#include "woods.inc"
|
|
|
|
// -----------------------------------------------------------------
|
|
|
|
#declare Poteau_0 = object
|
|
{
|
|
union
|
|
{
|
|
box { <-2.2, 0, -2.2>, <2.2, 0.8, 2.2> }
|
|
cylinder { <0, 0, 0>, <0, 20, 0>, 0.75 }
|
|
}
|
|
texture { New_Penny scale 0.3 }
|
|
}
|
|
|
|
// -----------------------------------------------------------------
|
|
|
|
#macro Base_Poteau_1 (Foo)
|
|
union
|
|
{
|
|
box { <-1, 0, -1>, <-0.08, 1.6, 1.5> }
|
|
box { <0.08, 0, -1.5>, <1, 1.6, 1> }
|
|
texture {
|
|
pigment { color Gray75 }
|
|
#local R = rand(RND);
|
|
#if (R < 0.50) normal { bumps 0.333 }
|
|
#else normal { dents 0.333 }
|
|
#end // if R
|
|
}
|
|
}
|
|
#end // macro
|
|
|
|
#macro Bois_Poteau_1 (Foo)
|
|
union
|
|
{
|
|
cylinder { <0, 0, 0>, <0, 20, 0>, 0.42 }
|
|
cone { <0, 20, 0>, 0.64, <0, 21, 0>, 0.21 }
|
|
cylinder { <-4, 19, 0>, <4, 19, 0>, 0.20 }
|
|
#local R = rand(RND);
|
|
#if (R < 0.76) texture { T_Wood12 rotate x*90 scale 3 }
|
|
#else texture { T_Wood14 rotate x*90 scale 3 }
|
|
#end
|
|
}
|
|
#end // macro
|
|
|
|
#declare Poteau_1 = object
|
|
{
|
|
union
|
|
{
|
|
object { Base_Poteau_1 (0) }
|
|
object { Bois_Poteau_1 (0) }
|
|
}
|
|
}
|
|
|
|
// -----------------------------------------------------------------
|