restart; with(plots):with(plottools): tramp:=plot ( [[4,1], [5,1], [4,1]], thickness=10, color=black): leg1:=plot([[4,0], [4,1], [4,0]], color=black): leg2:=plot([[5,0], [5,1]], color=black): pole:=plot([[3,0], [3,3], [3,3]], thickness=5, color=gray): landpad := plot([[1, 0], [1, 1], [2, 1], [2, 0], [1, 0]], thickness = 20, color = blue): body := plot([[4.5, 1], [4.5, 1.7]], color = tan): head := plot([[4.5, 1.5], [4.5, 1.7]], thickness = 15, color = tan): arm1:=plot([[4.5,1.4], [4.7,1.3]], color=tan): person:=display(body, head, arm1): f1:=display(person,tramp, leg1, leg2, pole, landpad): f2:=display(translate(person,-.3,.3),tramp, leg1, leg2, pole, landpad): f3:=display(translate(person,-.6,.6),tramp, leg1, leg2, pole, landpad): f4:=display(translate(person,-.9,.9),tramp, leg1, leg2, pole, landpad): f5:=display(translate(person,-1.2,1.2),tramp, leg1, leg2, pole, landpad): f6:=display(translate(person,-1.5,1.5),tramp, leg1, leg2, pole, landpad): f7:=display(translate(person,-1.7,1.7),tramp, leg1, leg2, pole, landpad): f8:=display(rotate(translate(person,-1.7,1.7),-Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f9:=display(rotate(translate(person,-1.7,1.7),-2*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f10:=display(rotate(translate(person,-1.7,1.7),-3*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f11:=display(rotate(translate(person,-1.7,1.7),-4*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f12:=display(rotate(translate(person,-1.7,1.7),-5*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f13:=display(rotate(translate(person,-1.7,1.7),-6*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f14:=display(rotate(translate(person,-1.7,1.7),-7*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f15:=display(rotate(translate(person,-1.7,1.7),-8*Pi/4,[3,3]),tramp, leg1, leg2, pole, landpad): f16:=display(translate(person,-2.0,2.0),tramp, leg1, leg2, pole, landpad): f17:=display(translate(person,-2.3,2.3),tramp, leg1, leg2, pole, landpad): f18:=display(translate(person,-2.6,2.3),tramp, leg1, leg2, pole, landpad): f19:=display(translate(person,-2.6,2.0),tramp, leg1, leg2, pole, landpad): f20:=display(translate(person,-2.6,1.7),tramp, leg1, leg2, pole, landpad): f21:=display(translate(person,-2.6,1.4),tramp, leg1, leg2, pole, landpad): f22:=display(translate(person,-2.6,1.1),tramp, leg1, leg2, pole, landpad): f23:=display(translate(person,-2.6,0.8),tramp, leg1, leg2, pole, landpad): f24:=display(translate(person,-2.6,0.5),tramp, leg1, leg2, pole, landpad): f25:=display(translate(person,-2.6,0.2),tramp, leg1, leg2, pole, landpad): f26:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f27:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f28:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f29:=display(translate(person,-2.6,0.2),tramp, leg1, leg2, pole, landpad): f30:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f31:=display(translate(person,-2.6,0.2),tramp, leg1, leg2, pole, landpad): f32:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f33:=display(translate(person,-2.6,0.2),tramp, leg1, leg2, pole, landpad): f34:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f35:=display(translate(person,-2.6,0.2),tramp, leg1, leg2, pole, landpad): f36:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): f37:=display(translate(person,-2.6,0.0),tramp, leg1, leg2, pole, landpad): display([f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,f27,f28,f29,f30,f31,f32,f33,f34,f35,f36,f37], insequence=true, axes=none, scaling=constrained); #speed 8