Here is a map of the lower peninsula of Michigan, with some cities
marked out in red dots.


// Persistence of Vision Ray Tracer Scene Description File
// File: Michpoly.pov
// Vers: 3
// Desc: Map of Michigan using a polygon object.
// Date: Sept. 1999
// Auth: rob### [at] accnorg
// Polygon object of a map of Michigan.
// Each point calculated by hand on paper. 

#version 3
#include "colors.inc"
global_settings
{assumed_gamma 1.0
}
#default {texture {pigment { color Red } } };
// ----------------------------------------
#declare camx=6.0
#declare camy=9.0
camera
{ location  <camx, camy, -28.0>
  direction 1.5*z
  right     4/3*x
  look_at   <camx, camy,  0.0>
}

sky_sphere
{ pigment
  {
    gradient y
    color_map { [0.0 color blue 0.6] [1.0 color rgb 1] }
  }
}

light_source
{ 0*x // light's position (translated below)
  color red 1.0  green 1.0  blue 1.0  // light's color
  translate <-30, 30, -30>
}

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


// arbitrary X,Y FINITE (no CSG) shape
// A complex example for a polygon is the letter "P":
merge {
polygon
{
  56, // number of points
  <0,0>, <2, 2>, <2.4,3>, <2.5,4.5>, <2.2,6.1>, //5 points per line
  <1.5,7.5>, <1,8.2>, <1.4,9>, <1,10>, <2,11.5>,
  <2.5,13>, <2.5,13.8>, <3.5,14>, <4.5,15>, <4.3,13.4>,
  <4.4,13.2>, <4.6,13.1>, <5,13.9>, <5.1,15>, <6,16>, 
  <6,16.7>, <7.4,17.7>, <9.2,17>, <11,16.2>, <12,16>,
  <12.5,15.7>, <13.3,14.6>, <13.2,13.2>, <13.2,11.6>, <11.2,9.8>,
  <11,9.2>, <11.3,8.5>, <12,8>, <12.5,8.5>, <13,9>, 
  <13.3,9.3>, <13.5,9.9>, <14.1,10>, <14.5,10.5>, <15,10.5>, 
  <15.5,10.3>, <16,10>, <16.3,9.5>, <16.4,8.9>, <17,6.5>,
  <17.5,5.8>, <17,5>, <16.5,4.5>, <16,4.2>, <15.8,3.8>,
  <15,2.6>, <14.8,1.8>, <13.8,.2>, <8.5,0>, <8.3,.4>,
  
  <0,0> //end point is beginning
  
  texture {pigment {color DarkGreen}}
  scale <1,1,1>
} // polygon

// create a sphere shape
sphere //Grand Rapids
{ <5, 5, 0>, // center of sphere <X Y Z>
  0.3       // radius of sphere
  texture {pigment {color Red}}
}
sphere //Detroit
{ <15, 4, 0>, // center of sphere <X Y Z>
  0.4       // radius of sphere
  texture {pigment {color Red}}
}
sphere //Lansing
{ <8, 4.5, 0>, // center of sphere <X Y Z>
  0.3       // radius of sphere
  texture {pigment {color Red}}
}
sphere //Allegan
{ <3.5, 3.5, 0>, // center of sphere <X Y Z>
  0.2       // radius of sphere
  texture {pigment {color Red}}
}

  translate <0,0,1>
} //merge

Post a reply to this message