// Oliver Ferdinand, AP Statistics, 5/25/2021 camera{location <-25,15,-120> look_at <0,-3,0>} light_source{<50,20,-100> rgb <3,3,3>} plane{1*y, -1 pigment{color rgb<1,0,0>}translate <0,-11,0>} // various geometric transformation macros // #include "transforms.inc" #declare head = box{<0,0,0> <4,4,4> pigment{color rgb <5,1,0>} translate<-2,4,-2>} #declare torso = box{<0,0,0> <4,8,2> pigment{color rgb <5,1,0>} translate<-2,-4,-1>} #declare larm = box{<0,0,0> <2,2,8> pigment{color rgb <5,1,0>} translate<2,2,-1> Rotate_Around_Trans(<5*clock/2.4,0,0>,<3,3,0>)} #declare rarm = box{<0,0,0> <2,2,-8> pigment{color rgb <5,1,0>} translate<-4,2,1> Rotate_Around_Trans(<-5*clock/2.4,0,0>,<-3,3,0>)} #declare lleg = box{<0,0,0> <2,2,-9> pigment{color rgb <5,1,0>} translate<0,-6,1> Rotate_Around_Trans(<-5*clock/2.4,0,0>,<1,-5,-.5>)} #declare rleg = box{<0,0,0> <2,2,9> pigment{color rgb <5,1,0>} translate<-2,-6,-1> Rotate_Around_Trans(<5*clock/2.4,0,0>,<-1,-5,.5>)} #declare man = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg}} #declare iiman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-10,0,-10>} #declare iiiman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-20,0,15>} #declare ivman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-30,0,-7>} #declare vman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<10,0,-17>} #declare viman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<20,0,23>} #declare viiman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<30,0,-31>} #declare viiiman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-40,0,17>} #declare ixman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-50,0,-39>} #declare xman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-60,0,23>} #declare ximan = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<40,0,12>} #declare xiiman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<50,0,31>} #declare xiiiman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<60,0,43>} #declare xivman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-5,0,-34>} #declare xvman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-45,0,-19>} #declare xviman = union{object{head} object{torso} object{larm} object{rleg} object{rarm} object{lleg} translate<-25,0,-46>} man iiman iiiman ivman vman viman viiman viiiman ixman xman ximan xiiman xiiiman xivman xvman xviman