restart;with(plots):with(plottools): head:=polygon([[0,6], [1,5], [0,4], [-1,5]], color=red): body:=polygon([[1,2], [1,4], [-1,4], [-1,2]], color=red): leftarm:=polygon([[-1,3], [-2,3], [-2,4], [-1,4]], color=red): rightarm:=polygon([[1,2], [1,4], [2,4], [2,2]], color=red): leftleg:=polygon([[-1,0],[-1,2],[0,2]],color=red): rightleg:=polygon([[1,0],[1,2],[0,2]],color=red): british:=translate(display(head,body,leftarm,rightarm,leftleg,rightleg),30,0): heada:=polygon([[0,4],[1,5],[0,6],[-1,5]],color=blue): bodya:=polygon([[1,2],[1,4],[-1,4],[-1,2]],color=blue): leftarma:=polygon([[1,2],[1,4],[2,4],[2,2]],color=blue): rightarma:=polygon([[1,4],[1,5],[3,4],[3,3]],color=blue): leftlega:=polygon([[-1,0],[-1,2],[0,2]],color=blue): rightlega:=polygon([[1,0],[1,2],[0,2]],color=blue): american:=display(heada,bodya,leftarma,rightarma,leftlega,rightlega): battlefield:=polygon([[-1,0],[-1,1],[30,1],[30,0]],color=green): goodbye:=textplot([20,9,"Goodbye Cruel World!"], font=[TIMES,BOLD,16]): f1:=display(american,british,battlefield): f2:=display(translate(american,1,0),translate(british,-1,0),battlefield): f3:=display(translate(american,2,0),translate(british,-2,0),battlefield): f4:=display(translate(american,3,0),translate(british,-3,0),battlefield): f5:=display(translate(american,4,0),translate(british,-4,0),battlefield): f6:=display(translate(american,5,0),translate(british,-5,0),battlefield): f7:=display(translate(american,6,0),translate(british,-6,0),battlefield): f8:=display(translate(american,7,0),translate(british,-7,0),battlefield): f9:=display(translate(american,8,0),translate(british,-8,0),battlefield): f10:=display(translate(american,9,0),translate(british,-9,0),battlefield): bulletline1:=plot([[3.0,3.5],[5.0,3.5]]): bulletline2:=plot([[3.0,3.5],[5.0,2.5]]): bulletline3:=plot([[3.0,3.5],[4.5,4.5]]): f11:=display(translate(american,9,0),translate(british,-9,0),translate(bulletline1,9,0),translate(bulletline2,9,0),translate(bulletline3,9,0),battlefield): bullet:=disk([3.0,3.5],0.2,color=black): f12:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,9,0),battlefield): f13:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,10,0),battlefield): f13:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,11,0),battlefield): f14:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,12,0),battlefield): f15:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,13,0),battlefield): f16:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,14,0),battlefield): f17:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,15,0),battlefield): f18:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,16,0),battlefield): f19:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,17,0),battlefield): f20:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,24,0),battlefield): f21:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,26,0),battlefield): f22:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,28,0),battlefield): f23:=display(translate(american,9,0),translate(british,-9,0),translate(bullet,30,0),battlefield): f24:=display(goodbye,translate(american,9,0),translate(british,-9,0),battlefield): f25:=display(goodbye,translate(american,9,0),rotate(translate(british,-9,0),Pi/6,[21,2]),battlefield): f26:=display(goodbye,translate(american,9,0),rotate(translate(british,-9,0),2*Pi/6,[21,2]),battlefield): f27:=display(goodbye,translate(american,9,0),rotate(translate(british,-9,0),3*Pi/6,[21,2]),battlefield): display([f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,f27], insequence=true,scaling=constrained,axes=none,view=[0..30,0..10]); #speed 3