JSFHrestart; with(plots): with(plottools): hole:=ellipse([0,0],1,2,color=black,filled=true): rear:=ellipticArc([0, 0],3,3, (1/2)*Pi .. 3/2*Pi,color=grey,filled=true): line1:=plot([ [0,3],[8,2] ],color=grey,filled=true): line2:=plot([ [0,-3],[8,-2] ],color=grey,filled=true): body1:=display(rear,translate(hole,8,0),line1,line2): body2:=rotate(body1,.05*Pi,[0,0]): body3:=rotate(body1,.07*Pi,[0,0]): body4:=rotate(body1,.09*Pi,[0,0]): body5:=rotate(body1,.11*Pi,[0,0]): body6:=rotate(body1,.13*Pi,[0,0]): bomb:=disk([0,0],1,color=grey,filled=true): star1:=plot([[-0.5,1],[0,2],[0.5,1]],filled=true): star2:=rotate(star1, Pi/4): star3:=rotate(star2, Pi/4): star4:=rotate(star3, Pi/4): star5:=rotate(star4, Pi/4): star6:=rotate(star5, Pi/4): star7:=rotate(star6, Pi/4): star8:=rotate(star7, Pi/4): window1:=plot([[0,0],[0,4]],color=brown,thickness=12): window2:=plot([[0,4],[4,4]],color=brown,thickness=12): window3:=plot([[4,4],[4,0]],color=brown,thickness=12): window4:=plot([[4,0],[0,0]],color=brown,thickness=12): window:=display([window1,window2,window3,window4]): bombflame:=display(bomb,star1,star2,star3,star4,star5,star6,star7,star8): bodybombflame:=display(translate(bombflame,8,3.5),body6): bodybomb2:=display(translate(bomb,9,5),body6): bodybomb3:=display(translate(bomb,10,5),body6): bodybomb4:=display(translate(bomb,11,5),body6): bodybomb5:=display(translate(bomb,12,5),body6): bodybomb6:=display(translate(bomb,13,5),body6): bomb7:=display(translate(bomb,14,5)): bomb8:=display(translate(bomb,15,5)): bomb9:=display(translate(bomb,16,5)): dboard1:=polygon([[0,0],[0,12],[9,12],[9,0],[0,0]],color=brown,filled=true): dknob:=disk([8,5],.5,color=black,filled=true): door:=display([dknob,dboard1]): ttrunk:=polygon([[0,0],[4,0],[4,10],[0,10]],color=brown): tleaves:=disk([2,10],5,color=green,filled=true): tree:=display([ttrunk,tleaves]): dboard1:=polygon([[0,0],[0,12],[9,12],[9,0],[0,0]],color=brown,filled=true): dknob:=disk([8,5],.5,color=black,filled=true): bombthrudoor:=disk([39,5],1.5,door,color=grey,filled=true): door:=display([dknob,dboard1]): windowbomb10:=display(translate(bomb,17,5),translate(window,18,8)): windowbomb11:=display(translate(bomb,18,5),translate(window,18,8)): windowbomb12:=display(translate(bomb,19,5),translate(window,18,8)): windowbomb13:=display(translate(bomb,20,5),translate(window,18,8)): windowbomb14:=display(translate(bomb,21,5),translate(window,18,8)): windowbomb15:=display(translate(bomb,22,5),translate(window,18,8)): windowbomb16:=display(translate(bomb,23,5),translate(window,18,8)): windowbomb17:=display(translate(bomb,24,5),translate(window,18,8)): windowbomb18:=display(translate(bomb,25,5),translate(window,18,8)): windowbomb19:=display(translate(bomb,26,5),translate(window,18,8)): windowbomb20:=display(translate(bomb,27,5),translate(window,18,8)): windowbomb21:=display(translate(bomb,28,5),translate(window,18,8)): windowbomb22:=display(translate(bomb,29,5),translate(window,18,8)): windowbomb23:=display(translate(bomb,30,5),translate(window,18,8)): windowbomb24:=display(translate(bomb,31,5),translate(window,18,8)): windowbomb25:=display(translate(bomb,32,5),translate(window,18,8)): doorwindowbomb26:=display(translate(bomb,33,5),translate(window,18,8),translate(door,33,0)): doorwindowbomb27:=display(translate(bomb,34,5),translate(window,18,8),translate(door,33,0)): doorwindowbomb28:=display(translate(bomb,35,5),translate(window,18,8),translate(door,33,0)): doorwindowbomb29:=display(translate(bomb,36,5),translate(window,18,8),translate(door,33,0)): doorwindowbomb30:=display(translate(bomb,37,5),translate(window,18,8),translate(door,33,0)): treebomb31:=display(translate(bomb,39,5),translate(tree,42,0)): treebomb32:=display(translate(bomb,40,4),translate(tree,42,0)): treebomb33:=display(translate(bomb,41,3),translate(tree,42,0)): treebomb34:=display(translate(bomb,42,2),translate(tree,42,0)): treebomb35:=display(translate(bomb,42,1),translate(tree,42,0)): flame1:=polygon([[40,0],[47,0],[45,12],[43.5,10],[42,12],[40,0]],color=yellow): flame2:=polygon([[41,0],[46,0],[44,6],[43.5,3],[42,6],[41,0]],color=red): fire:=display([flame2,flame1]): treeandfire:=display((fire),translate(tree,42,0)): flame3:=polygon([[41,0],[48,0],[46,12],[44.5,10],[43,12],[41,0]],color=yellow): flame4:=polygon([[40,0],[45,0],[43,6],[42.5,3],[41,6],[40,0]],color=red): fire2:=display(flame4,flame3): treeandfire2:=display((fire2),translate(tree,42,0)): speed 8 display([body1,body2,body3,body4,body5,body6,bodybombflame,bodybomb2,bodybomb3,bodybomb4,bodybomb5,bodybomb6,bomb7,bomb8,bomb9,translate(window,18,8),windowbomb10,windowbomb11,windowbomb12,windowbomb13,windowbomb14,windowbomb15,windowbomb16,windowbomb17,windowbomb18,windowbomb19,windowbomb20,windowbomb21,translate(door,33,0),doorwindowbomb26,doorwindowbomb27,doorwindowbomb28,doorwindowbomb29,doorwindowbomb30,bombthrudoor,treebomb31,treebomb32,treebomb33,treebomb34,treebomb35,treeandfire,treeandfire2,treeandfire,treeandfire2,treeandfire,treeandfire2,treeandfire], insequence=true, scaling=constrained,axes=none);