restart:with(plots):with(plottools): wood:=plot([[0,0],[6,0],[6,10],[0,10],[0,0]],color=brown, filled=true): wood2:=plot([[6,3.5],[6,3.9],[5.8,3.9],[5.8,3.5]],color=white, filled=true): door:=plot([[1,0], [4,0], [4,5], [2,5], [2,0]],color=black, filled=true): gun:=polygon([[6, 4.9], [7.5,4.9], [7.5,5.1], [6, 5.1]], color=gray, filled=true): blind:=display([door, wood, gun]): bullet:=disk([7.6,5],.1, color=gold): c1:=translate(bullet,0,0): c2:=translate(bullet,.5,0): c3:=translate(bullet,1,0): c4:=translate(bullet,1.5,0): c5:=translate(bullet,2,0): c6:=translate(bullet,2.5,0): c7:=translate(bullet,3,0): c8:=translate(bullet,3.5,0): c9:=translate(bullet,4,0): c10:=translate(bullet,4.5,0): c11:=translate(bullet,5,0): c12:=translate(bullet,5.5,0): c13:=translate(bullet,6,0): c14:=translate(c9,0,-.5): c15:=translate(c9,0,-1): c16:=translate(c9,0,-1.5): c17:=translate(c9,-.5,-1.5): c18:=translate(c9,-1,-1.5): c19:=translate(c9,-1.5,-1.5): c20:=translate(c9,-2,-1.5): c21:=translate(c9,-2.5,-1.5): c22:=translate(c9,-3,-1.5): c23:=translate(c9,-3.5,-1.5): c24:=translate(c9,-4,-1.5): c25:=translate(c9,-4.5,-1.5): c26:=translate(c9,-5,-1.5): c27:=translate(c9,-5.5,-1.5): L1:=disk([20,5],4, color=white): L2:=disk([20,5],3, color=white): L3:=disk([20,5],2.5, color=white): L4:=disk([20,5],2, color=white): L5:=disk([20,5],1.5, color=black): L6:=plot([[16,5], [24,5]]): L7:=plot([[20,1], [20,9]]): L8:=plot([[17.05,2.25], [22.6,8]]): L9:=plot([[22.5,2], [17.5,8]]): bang:=textplot([20,8,"BANG"],font=[TIMES,ROMAN,20]): target2:=display([L6, L7, L8, L9, L5, L4, L3, L2, L1, bang]): target:=display([L5, L4, L3, L2, L1]): p1:=display([blind, c1]): p2:=display([blind, c2]): p3:=display([blind, c3]): p4:=display([blind, c4]): p5:=display([blind, c5]): p6:=display([blind, c6]): p7:=display([blind, c7]): p8:=display([blind, c8]): p9:=display([blind, c9]): p10:=display([translate(blind,-1,0), c9, translate(target,-1,0)]): p11:=display([translate(blind,-2,0), c9, translate(target,-2,0)]): p12:=display([translate(blind,-3,0), c9, translate(target,-3,0)]): p13:=display([translate(blind,-4,0), c9, translate(target,-4,0)]): p14:=display([translate(blind,-5,0), c9, translate(target,-5,0)]): p15:=display([translate(blind,-6,0), c9, translate(target,-6,0)]): p16:=display([translate(blind,-7,0), c9, translate(target,-7,0)]): p17:=display([translate(blind,-8,0), c9, translate(target,-8,0)]): p18:=display([translate(blind,-8.5,0), c9, translate(target,-8.5,0)]): p19:=display([translate(blind,-8.5,0), c9, translate(target2,-8.5,0)]): p20:=display([translate(blind,-8.5,0), c9, translate(target2,-8.5,0)]): p21:=display([translate(blind,-8.5,0), c9, translate(target2,-8.5,0)]): p22:=display([blind, c14]): p23:=display([blind, c15]): p24:=display([blind, c16]): p25:=display([blind, c17]): p26:=display([blind, c18]): p27:=display([blind, c19]): p28:=display([blind, c20]): p29:=display([blind, c21]): p30:=display([blind, c22]): p31:=display([blind, c23]): p32:=display([blind, c24]): p33:=display([blind, c25]): p34:=display([blind, c26]): p35:=display([blind, wood2, c27]): speed 8 display([p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12,p13,p14,p15,p16,p17,p18,p19,p20,p21,p20,p19,p18,p17,p16,p15,p14,p13,p12,p11,p10,p22,p23,p24,p25,p26,p27,p28,p29,p30,p31,p32,p33,p34,p35], view=[0..15,0..12], insequence=true, scaling=constrained, axes=none);