home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Raytrace & Morphing / SOS-RAYTRACE.ISO / programm / raytrace / polyray / dat / person / man.inc < prev    next >
Encoding:
Text File  |  1992-11-18  |  4.5 KB  |  145 lines
  1. // Person, version 3 for Polyray, created with CSG.
  2. // Created by Will Wagner.
  3. // Thanks to Ken Boyce and Alexander Enzmann for their help.
  4. // Test to see if combined form is faster
  5.  
  6. include "rots.inc"
  7.  
  8. define man
  9. object {
  10.     object {    // torso
  11.         object{sphere<0,2,0>,1.2 scale<1.665,1,1>}+
  12.         object{cylinder<0,2,0>,<0,1.75,0>,1.2 scale<1.665,1,1>}+
  13.         object{parabola<0,-1,0>,<0,1.75,0>,1.2 scale<1.665,1,1>}+
  14.         object {    // neck
  15.             object{cone<0,0,0>,0.5,<0,1.5,0.45>,0.6}+
  16.             object{sphere<0,1.5,0.45>,0.65}+
  17.             object {    // head
  18.                 object{sphere<0,0.5,0.15>,1}+
  19.                 (object{cylinder<0,-1.5,0.15>,<0,0.5,0.15>,1}*
  20.                 object{sphere<0,0.5,1.025>,1.375})
  21.                 head_rotation
  22.                 translate<0,1.5,0.45>
  23.                 }
  24.             scale<0.85,1,1>
  25.             neck_rotation
  26.             translate<0,2.6,-0.3>
  27.             }+
  28.         object {    // right upper arm
  29.             object{sphere<0,0,0>,0.55}+
  30.             object{cone<0,0,0>,0.55,<0,-2.575,0>,0.5}+
  31.             object {    // right lower arm
  32.                 object{sphere<0,0,0>,0.5}+
  33.                 object{cone<0,0,0>,0.45,<0,-2.25>,0.2}+
  34.                 object{sphere<0,-2.25,0>,0.2}+
  35.                 object {    // right hand
  36.                     object{cone<0,0,0>,0.075,<0,-0.25,0>,0.15 scale<1,1,3>}+
  37.                     object{cylinder<0,-0.25,0>,<0,-0.8,0>,0.15 scale<1,1,3>}+
  38.                     object{sphere<0,-0.8,0>,0.15 scale<1,1,3>}+
  39.                     object {    // right fingers
  40.                         cone<0,0,0>,0.15,<0,-0.65,0>,0.1
  41.                         scale <1,1,3>
  42.                         right_finger_rotation
  43.                         translate<0,-0.8,0>
  44.                         }
  45.                     right_hand_rotation
  46.                     translate<0,-2.25,0>
  47.                     }
  48.                 right_lower_rotation
  49.                 translate<0,-2.575,0>
  50.                 }
  51.             scale<0.925,1,1>
  52.             right_upper_rotation
  53.             translate<2.35,2.25,0>
  54.             }+
  55.         object {    // left upper arm
  56.             object{sphere<0,0,0>,0.55}+
  57.             object{cone<0,0,0>,0.55,<0,-2.575,0>,0.5}+
  58.             object {    // left lower arm
  59.                 object{sphere<0,0,0>,0.5}+
  60.                 object{cone<0,0,0>,0.45,<0,-2.25>,0.2}+
  61.                 object{sphere<0,-2.25,0>,0.2}+
  62.                 object {    // left hand
  63.                     object{cone<0,0,0>,0.075,<0,-0.25,0>,0.15 scale<1,1,3>}+
  64.                     object{cylinder<0,-0.25,0>,<0,-0.8,0>,0.15 scale<1,1,3>}+
  65.                     object{sphere<0,-0.8,0>,0.15 scale<1,1,3>}+
  66.                     object {    // left fingers
  67.                         cone<0,0,0>,0.15,<0,-0.65,0>,0.1
  68.                         scale <1,1,3>
  69.                         left_finger_rotation
  70.                         translate<0,-0.8,0>
  71.                         }
  72.                     left_hand_rotation
  73.                     translate<0,-2.25,0>
  74.                     }
  75.                 left_lower_rotation
  76.                 translate<0,-2.575,0>
  77.                 }
  78.             scale<0.925,1,1>
  79.             left_upper_rotation
  80.             translate<-2.35,2.25,0>
  81.             }
  82.         torso_rotation
  83.         }+
  84.     object {
  85.         object {lathe 2,<0,1,0>,6,<0,1>,<-0.5,1>,<-1,0.75>,<-1,0>,<-0.25,-1>,<0,-1>
  86.             root_solver Sturm scale<1.665,1,1>}+
  87.             object {    // right thigh
  88.                 object{sphere<0,0,0>,0.825}+
  89.                 object{cylinder<0,0,0>,<0,-2.75,0>,0.8}+
  90.                 object {    // right calf
  91.                     object{sphere<0,0,0>,0.8}+
  92.                     object{cone<0,0,0>,0.75,<0,-2.75,0>,0.4}+
  93.                     object {    // right foot
  94.                         object{disc<0,-0.4,1.125>,<0,0.9422,0.3350>,1.35}*
  95.                         object{disc<0,-0.85,2.25>,<0,0,1>,0.65}*
  96.                         object{disc<0,-0.75,0.825>,<0,-0.9945,-0.1047>,1.60}*
  97.                         object{disc<0,-0.3,-0.3>,<0,0.7071,-0.7071>,0.55}*
  98.                         object{disc<0.475,-0.75,0.825>,<0.8910,0.4472,-0.0782>,1.5}*
  99.                         object{disc<-0.475,-0.75,0.825>,<-0.8910,0.4472,-0.0782>,1.5}*
  100.                         (object{sphere<0,-0.85,1.6>,0.65}+
  101.                         object{cone<0,-0.85,1.6>,0.65,<0,-0.6,-0.6>,1})+
  102.                         object{sphere<0,0,0>,0.4}+
  103.                         object{sphere<0,-0.5,-0.75>,0.4}
  104.                         right_foot_rotation
  105.                         translate<0,-2.75,0>
  106.                         }
  107.                     right_calf_rotation
  108.                     translate<0,-2.75,0>
  109.                     }
  110.                 scale<0.925,1,1>
  111.                 right_thigh_rotation
  112.                 translate<0.9,-0.25,0>
  113.                 }+
  114.             object {    // left thigh
  115.                 object{sphere<0,0,0>,0.825}+
  116.                 object{cylinder<0,0,0>,<0,-2.75,0>,0.8}+
  117.                 object {    // left calf
  118.                     object{sphere<0,0,0>,0.8}+
  119.                     object{cone<0,0,0>,0.75,<0,-2.75,0>,0.4}+
  120.                     object {    // left foot
  121.                         object{disc<0,-0.4,1.125>,<0,0.9422,0.3350>,1.35}*
  122.                         object{disc<0,-0.85,2.25>,<0,0,1>,0.65}*
  123.                         object{disc<0,-0.75,0.825>,<0,-0.9945,-0.1047>,1.60}*
  124.                         object{disc<0,-0.3,-0.3>,<0,0.7071,-0.7071>,0.55}*
  125.                         object{disc<0.475,-0.75,0.825>,<0.8910,0.4472,-0.0782>,1.5}*
  126.                         object{disc<-0.475,-0.75,0.825>,<-0.8910,0.4472,-0.0782>,1.5}*
  127.                         (object{sphere<0,-0.85,1.6>,0.65}+
  128.                         object{cone<0,-0.85,1.6>,0.65,<0,-0.6,-0.6>,1})+
  129.                         object{sphere<0,0,0>,0.4}+
  130.                         object{sphere<0,-0.5,-0.75>,0.4}
  131.                         left_foot_rotation
  132.                         translate<0,-2.75,0>
  133.                         }
  134.                     left_calf_rotation
  135.                     translate<0,-2.75,0>
  136.                     }
  137.                 scale<0.925,1,1>
  138.                 left_thigh_rotation
  139.                 translate<-0.9,-0.25,0>
  140.                 }
  141.             abdomen_rotation
  142.             translate<0,-1.75,0>
  143.             }
  144.     personcolor
  145.     }