//Chessmen

global_settings{assumed_gamma 1 ambient_light <0,0,0>}

//The Measurement-Macro
#include "umacro.inc"

//The Chessmen-Macro-Include
#include "ch_figs.inc"

//Side-view, perpendicular
//camera{location <0,.025,-6> look_at <0,.025,0> angle 1}
//Isometric-View
//camera{location <.06,.06,-.06> look_at <0,.025,0>}
//camera{location <0,.05,-.1> look_at <0,.025,0>}
light_source{<0,.01+.2*clock,0> rgb 1}

//light_source{<-120,80,-120> rgb z*.5}
//light_source{<-120,40,120> rgb x*.4}
//Queen  Measures: Height 4.8 cm Base-Diam. 2 cm
//King   Measures: Height 5.6 cm Base-Diam. 2 cm
//Bishop Measures: Height 4.6 cm Base-Diam. 2 cm
//Knight Measures: Height 4.1 cm Base-Diam. 2 cm
//Tower  Measures: Height 3.5 cm Base-Diam. 2 cm
//Pawn   Measures: Height 3 cm Base-Diam. 2 cm
//Board  Measures: 19.2cm*19.2cm

//camera{location <cm(21),cm(16),cm(-6)> look_at <0,0,0>}
camera{location <.15,.15,-.05> look_at <0,0,0>}

//(Position,Rotation,Color,Val, Scale)
//White
Tower(  CBoard(1,1,0), 0, 0, 1, 1)
Knight( CBoard(2,1,0), y*90, 0, 2, 1)
Bishop( CBoard(3,1,0), 0, 0, 3, 1)
King (  CBoard(4,1,0), 0, 0, 4, 1)
Queen(  CBoard(5,1,0), 0, 0, 5, 1)
Bishop( CBoard(6,1,0), 0, 0, 6, 1)
Knight( CBoard(7,1,0), y*90, 0, 7, 1)
Tower(  CBoard(8,1,0), 0, 0, 8, 1)

Pawn(   CBoard(1,2,0), 0, 0, 9, 1)
Pawn(   CBoard(2,2,0), 0, 0, 10, 1)
Pawn(   CBoard(3,2,0), 0, 0, 11, 1)
Pawn(   CBoard(4,2,0), 0, 0, 12, 1)
Pawn(   CBoard(5,2,0), 0, 0, 13, 1)
Pawn(   CBoard(6,2,0), 0, 0, 14, 1)
Pawn(   CBoard(7,2,0), 0, 0, 15, 1)
Pawn(   CBoard(8,2,0), 0, 0, 16, 1)

//Black
Tower(  CBoard(1,8,0), 0, 1, 1, 1)
Knight( CBoard(2,8,0), y*-90, 1, 2, 1)
Bishop( CBoard(3,8,0), y*180, 1, 3, 1)
King (  CBoard(4,8,0), 0, 1, 4, 1)
Queen(  CBoard(5,8,0), 0, 1, 5, 1)
Bishop( CBoard(6,8,0), y*180, 1, 6, 1)
Knight( CBoard(7,8,0), y*-90, 1, 7, 1)
Tower(  CBoard(8,8,0), 0, 1, 8, 1)

Pawn(   CBoard(1,7,0), 0, 1, 9, 1)
Pawn(   CBoard(2,7,0), 0, 1, 10, 1)
Pawn(   CBoard(3,7,0), 0, 1, 11, 1)
Pawn(   CBoard(4,7,0), 0, 1, 12, 1)
Pawn(   CBoard(5,7,0), 0, 1, 13, 1)
Pawn(   CBoard(6,7,0), 0, 1, 14, 1)
Pawn(   CBoard(7,7,0), 0, 1, 15, 1)
Pawn(   CBoard(8,7,0), 0, 1, 16, 1)

//plane{y*1,0 pigment{checker color rgb 1 color rgb 0 scale cm(2)} translate z*cm(1)}
Board( 0 )