restart,with(plots):with(plottools): tri1:=polygon([[0,0],[0,4],[5,4],[1,0]], color=navy): tri2:=polygon([[17,0],[17,4],[12,4],[16,0]],color=navy): tri3:=polygon([[1,4],[1,6],[3,4],[1,4]],color="gray"): tri4:=polygon([[16,4],[16,6],[14,4],[16,4]],color="gray"): rect1:=polygon([[0,4],[0,8],[1,8],[1,4],[0,4]],color=black): rect2:=polygon([[17,4],[17,8],[16,8],[16,4],[17,4]],color=black): fig1:=polygon([[3,2],[4,3],[5,3],[5,2]],color=black): fig2:=polygon([[14,2],[13,3],[12,3],[12,2]],color=black): shot1:=polygon([[5,3],[6,3.5],[5.5,3],[6,2.5],[5.5,2],[6,1.5],[5,2]],color=red): rect3:=polygon([[0,0],[-15,0],[-15,4],[0,4]],color=navy): rect4:=polygon([[-11,4],[-8,6.5],[-7,6.5],[-4,4]],color="gray"): rect5:=polygon([[-8,6.5],[-11,6.5],[-11,6],[-8.7,6]],color=black): rect6:=polygon([[-9.2,5.5],[-12,5.5],[-12,5],[-9.8,5]],color=black): boolet1:=disk([11,2.5],.25,thickness=8,color=black): explosion2:=polygon([[15,8],[16,7],[15,6],[16,5],[15,4],[16,3],[15,2],[16,1], [15,0], [16,1], [17,0], [18,1], [19,0],[20,1],[19,2],[20,3],[19,4],[20,5],[19,6],[20,7],[19,8],[20,7],[17,8],[16,7],[15,8]],color=orange): explosion1:=polygon([[12,8],[13,7],[12,6],[13,5],[12,4],[13,3],[12,2],[13,1], [12,0], [13,1], [14,0], [15,1], [16,0],[17,1],[16,2],[17,3],[16,4],[17,5],[16,6],[17,7],[16,8],[15,7],[14,8],[13,7],[12,8]],color=red): display(tri1,tri2,tri3,tri4,rect1,rect2,fig1,fig2,rect3,rect4,rect5,rect6,shot1): boat1:=display(tri1,tri3,rect1,fig1,rect3,rect4,rect5,rect6):boat1: boat2:=display(tri2,tri4,rect2,fig2):boat2: f1:=translate(boat1,-4,0): f2:=translate(boat1,-3,0): f3:=translate(boat1,-2,0): f4:=translate(boat1,-1,0): f5:=translate(boat1,0,0): f6:=display(boat1,translate(boat2,6,0)): f7:=display(boat1,translate(boat2,5,0)): f8:=display(boat1,translate(boat2,4,0)): f9:=display(boat1,translate(boat2,3,0)): f10:=display(shot1,translate(boolet1,-5,0),boat1,translate(boat2,3,0)): f11:=display(shot1,translate(boolet1,-4,0),boat1,translate(boat2,3,0)): f12:=display(translate(boolet1,-3,0),boat1,translate(boat2,3,0)): f13:=display(translate(boolet1,-2,0),boat1,translate(boat2,3,0)): f14:=display(translate(boolet1,-1,0),boat1,translate(boat2,3,0)): f15:=display(translate(boolet1,0,0),boat1,translate(boat2,3,0)): f16:=display(translate(boolet1,1,0),boat1,translate(boat2,3,0)): f17:=display(translate(boolet1,2,0),boat1,translate(boat2,3,0)): f18:=display(translate(boolet1,3,0),boat1,translate(boat2,3,0)): f19:=display(translate(boolet1,4,0),boat1,translate(boat2,3,0)): f20:=display(explosion1,boat1): f21:=display(explosion2,boat1): f22:=display(explosion1,boat1): f23:=display(explosion2,boat1): f24:=display(explosion1,boat1): f25:=display(explosion2,boat1): f26:=display(explosion1,boat1): f27:=translate(boat1,1,0): f28:=translate(boat1,2,0): f29:=translate(boat1,3,0): f30:=translate(boat1,4,0): f31:=translate(boat1,5,0): f32:=translate(boat1,6,0): f33:=translate(boat1,7,0): f34:=translate(boat1,8,0): f35:=translate(boat1,9,0): f36:=translate(boat1,10,0): f37:=translate(boat1,11,0): f38:=translate(boat1,12,0): f39:=translate(boat1,13,0): f40:=translate(boat1,14,0): f41:=translate(boat1,15,0): f42:=translate(boat1,16,0): f43:=translate(boat1,17,0): f44:=translate(boat1,18,0): f45:=translate(boat1,19,0): f46:=translate(boat1,20,0): f47:=translate(boat1,21,0): f48:=translate(boat1,22,0): f49:=translate(boat1,23,0): f50:=translate(boat1,24,0): f51:=translate(boat1,25,0): f52:=translate(boat1,26,0): f53:=translate(boat1,27,0): f54:=translate(boat1,28,0): f55:=translate(boat1,29,0): f56:=translate(boat1,30,0): f57:=translate(boat1,31,0): f58:=translate(boat1,32,0): f59:=translate(boat1,33,0): f60:=translate(boat1,34,0): f61:=translate(boat1,35,0): f62:=translate(boat1,36,0): 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,f28,f29,f30,f31,f32,f33,f34,f35,f36,f37,f38,f39,f40,f41,f42,f43,f44,f45,f46,f47,f48,f49,f50,f51,f52,f53,f54,f55,f56,f57,f58,f58,f59,f60,f61,f62], insequence=true, scaling=constrained, view=[0..20,0..10], axes=none); #speed 6