//---- Gaurds for the Nest Textures
//----Rocks 12/15/94
//
//  Original file by Mike Miller
//
//  Modified for POV-Ray version 3.x by
//  Colin Fleming, cj_fleming@btinternet.com
//
//  RoseStone
//  GrayStone

//------- Medium Mauve Med.Rose & deep cream
#declare RoseSwirl =
pigment {
  granite
  turbulence 0.5
  color_map {
    [0.000 0.178 color red 0.804 green 0.569 blue 0.494 filter 0.000 color red 0.855 green 0.729 blue 0.584 filter 0.000]
    [0.178 0.356 color red 0.855 green 0.729 blue 0.584 filter 0.000 color red 0.667 green 0.502 blue 0.478 filter 0.000]
    [0.356 0.525 color red 0.667 green 0.502 blue 0.478 filter 0.000 color red 0.859 green 0.624 blue 0.545 filter 0.000]
    [0.525 0.729 color red 0.859 green 0.624 blue 0.545 filter 0.000 color red 0.855 green 0.729 blue 0.584 filter 0.000]
    [0.729 1.001 color red 0.855 green 0.729 blue 0.584 filter 0.000 color red 0.804 green 0.569 blue 0.494 filter 0.000]
  }
}

//------- Medium Gray & deep cream
#declare GraySwirl = pigment {
  granite
  turbulence 0.5
  color_map {
    [0.000 0.178 color red 0.804 green 0.669 blue 0.694 filter 0.000 color red 0.855 green 0.829 blue 0.784 filter 0.000]
    [0.178 0.356 color red 0.855 green 0.829 blue 0.784 filter 0.000 color red 0.667 green 0.602 blue 0.678 filter 0.000]
    [0.356 0.525 color red 0.667 green 0.602 blue 0.578 filter 0.000 color red 0.859 green 0.724 blue 0.745 filter 0.000]
    [0.525 0.729 color red 0.859 green 0.724 blue 0.745 filter 0.000 color red 0.855 green 0.829 blue 0.784 filter 0.000]
    [0.729 1.001 color red 0.855 green 0.829 blue 0.784 filter 0.000 color red 0.804 green 0.669 blue 0.694 filter 0.000]
  }
}

//------- Light Gray & deep cream
#declare L_GraySwirl = pigment {
  granite
  turbulence 0.5
  color_map {
    [0.000 0.178 color red 0.804 green 0.75 blue 0.75 filter 0.000 color red 0.855 green 0.88 blue 0.83 filter 0.000]
    [0.178 0.356 color red 0.855 green 0.88 blue 0.83 filter 0.000 color red 0.667 green 0.65 blue 0.7 filter 0.000]
    [0.356 0.525 color red 0.667 green 0.65 blue 0.7  filter 0.000  color red 0.859 green 0.78 blue 0.79 filter 0.000]
    [0.525 0.729 color red 0.859 green 0.78 blue 0.79 filter 0.000 color red 0.855 green 0.88 blue 0.82 filter 0.000]
    [0.729 1.001 color red 0.855 green 0.88 blue 0.82 filter 0.000 color red 0.804 green 0.75 blue 0.75 filter 0.000]
  }
}

//----- Translucent Grnt0
#declare WhiteSwirl = pigment {
  granite
  turbulence 0.6
  colour_map {
    [0.000 0.153 color red 0.729 green 0.502 blue 0.451 filter 0.306 color red 0.769 green 0.686 blue 0.592 filter 0.792]
    [0.153 0.398 color red 0.769 green 0.686 blue 0.592 filter 0.792 color red 0.843 green 0.753 blue 0.718 filter 0.296]
    [0.398 0.559 color red 0.843 green 0.753 blue 0.718 filter 0.296 color red 0.780 green 0.667 blue 0.561 filter 0.976]
    [0.559 0.729 color red 0.780 green 0.667 blue 0.561 filter 0.976 color red 0.741 green 0.659 blue 0.576 filter 0.720]
    [0.729 1.001 color red 0.741 green 0.659 blue 0.576 filter 0.720 color red 0.729 green 0.502 blue 0.451 filter 0.306]
  }
}

#declare Black = color rgb 0;
#declare Scarlet = color rgb <0.5, 0.3, 0.1>;
#declare DimGray = color rgb <0.4, 0.4, 0.4>;

#declare Crack1 = pigment {
  marble
  turbulence 0.85
  color_map {
    [0    0.04  color Black   filter 0.6 color Black   filter 1]
    [0.04 0.97  color Scarlet filter 0.8 color DimGray filter 0.9]
    [0.97 1.001 color Black   filter 0.9 color Black   filter 1]
  }
}

#declare F1 = finish { ambient 0.25 diffuse 0.8 phong 0 }
#declare F2 = finish { ambient 0.3  diffuse 0.8 phong 0.6 phong_size 20 }
#declare F3 = finish { ambient 0.1  diffuse 0.7 phong 0.1 phong_size 10 }
#declare F4 = finish { ambient 0.2  diffuse 0.8 phong 0.6 phong_size 30 }

//***********
#declare RoseStone =
texture { pigment { RoseSwirl scale <1, 1.5, 1> rotate z*40 } finish { F1 crand 0.02 } }
texture { pigment { WhiteSwirl scale <1, 1.5, 1> rotate z*-30 } finish {F1} }
texture { pigment { Crack1 scale 1 } finish {F2} }

//***********
#declare GrayStone =
texture { pigment { GraySwirl scale <1, 1.5, 1> rotate z*40 } finish { F1 crand 0.02 } }
texture { pigment { WhiteSwirl scale <1, 1.5, 1> rotate z*-30 } finish {F1} }
texture { pigment { Crack1 scale 1 } finish {F2} }

//***********
#declare L_GrayStone =
texture { pigment { L_GraySwirl scale <1, 1.5, 1> rotate z*40 } finish { F1 crand 0.02 } }
texture { pigment { WhiteSwirl scale <1, 1.5, 1> rotate z*-30 } finish {F1} }
texture { pigment { Crack1 scale 1 } finish {F2} }

//*******************

#include "gray_r.map"
#include "gray_t.map"
//------- Ground Dirt
#declare Mud = pigment { granite turbulence 0.5 color_map { gray_r } }
#declare Mud_Tint = pigment { granite turbulence 0.5 color_map { gray_t } }

#declare Rock_Tex =
texture { pigment { Mud } finish { crand 0.05 } }
texture { pigment { Mud_Tint scale 3 } }
texture { pigment { WhiteSwirl } finish { F3 } }

#declare RStone_2 = texture { RoseStone finish { F4 } scale 600 }

#declare snake_fin = finish { ambient 0.4 diffuse 1 }

#include "skin.map"

#declare Scales = pigment { crackle turbulence 0.05 color_map { skin } }

#declare Tentacle_Tex =
texture {
  pigment {
    bozo
    color_map {
      [ 0 color rgb 0.35 ]
      [ 1 color rgb 0.56 ]
    }
  }
  normal {
    agate 0.3
    scale 1.6
 }
  finish {
    ambient color rgb 0
    diffuse 0.8
    specular 0.1
    roughness 0.1
    metallic
    brilliance 1
  }
  scale 0.4
}
texture {
  pigment { //color rgbf 1
    image_map {
      //tga "ten_map.tga"
      gif "test_ten_map.gif"
      interpolate 2
    }
  }
  finish { snake_fin }
  scale <1055, 1950, 1>
  translate <-628, -1758, 0>
}
texture {
  pigment { Scales scale 50 }
  finish { phong 0.8 phong_size 10 }
  normal { bumps 0.2 scale 5 }
}