restart:with(plots):with(plottools):face0:=disk([0,0],1,color="PeachPuff"):eye1:=disk([-.4,.35],.1,color=blue):eye2:=disk([.4,.35],.1,color=blue):pupil1:=disk([-.4,.35],.05,color=black):pupil2:=disk([.4,.35],.05,color=black):mouth:=plot([[-.3,-.5],[.3,-.5]],color=black,axes=none):face1:=display(pupil1,pupil2,eye1,eye2,face0,mouth):moustache:=polygon([[-.4,-.2],[-.4,-.3],[.4,-.3],[.4,-.2],[-.4,-.2]],color=black):face2:=display(pupil1,pupil2,eye1,eye2,face0,mouth,moustache):hat1:=polygon([[-.9,.5],[.9,.5],[.9,1.1],[-.9,1.1],[-.9,.5]],color=red):white:=polygon([[-.5,.5],[.5,.5],[.5,1],[-.5,1],[-.5,.5]],color=white):M:=plot([[-.5,.5],[-.4,1],[0,.5],[.4,1],[.5,.5]],color=red):face:=display(M,white,hat1,moustache,pupil1,pupil2,eye1,eye2,face0,mouth):body:=polygon([[-.7,-.8],[.7,-.8],[.7,-2.4],[-.7,-2.4]],color=blue):arm1:=polygon([[-.7,-.8],[-.7,-1.2],[-1.4,-2],[-1.6,-1.8],[-.7,-.8]],color=red):display(M,white,hat1,moustache,pupil1,pupil2,eye1,eye2,face0,mouth,body,arm1):arm2:=polygon([[.7,-.8],[.7,-1.2],[1.4,-2],[1.6,-1.8],[.7,-.8]],color=red):glove1:=polygon([[-1.4,-2],[-1.6,-1.8],[-1.3,-1.48],[-1.1,-1.68],[-1.4,-2]],color="white"):display(M,white,hat1,moustache,pupil1,pupil2,eye1,eye2,face0,mouth,body,glove1,arm1,arm2):glove2:=polygon([[1.4,-2],[1.6,-1.8],[1.3,-1.48],[1.1,-1.68],[1.4,-2]],color="white"):leg1:=polygon([[-.7,-2.4],[-.7,-3.8],[-.25,-3.8],[-.25,-2.4],[-.7,-2.4]],color=blue):leg2:=polygon([[.7,-2.4],[.7,-3.8],[.25,-3.8],[.25,-2.4],[-.7,-2.4]],color=blue):shoe1:=polygon([[.7,-3.8],[.25,-3.8],[.25,-4],[.7,-4],[.7,-3.8]],color=brown):display(M,white,hat1,moustache,pupil1,pupil2,eye1,eye2,face0,mouth,body,glove1,glove2,arm1,arm2,leg1,leg2,shoe1):shoe2:=polygon([[-.7,-3.8],[-.25,-3.8],[-.25,-4],[-.7,-4],[-.7,-3.8]],color=brown):mario1:=display(M,white,hat1,moustache,pupil1,pupil2,eye1,eye2,face0,mouth,body,glove1,glove2,arm1,arm2,leg1,leg2,shoe1,shoe2):arm3:=polygon([[-.7,-.8],[-.7,-1.2],[-1.4,-2],[-1.6,-1.8],[-.7,-.8]],color="ForestGreen"):arm4:=polygon([[.7,-.8],[.7,-1.2],[1.4,-2],[1.6,-1.8],[.7,-.8]],color="ForestGreen"):hat2:=polygon([[-.9,.5],[.9,.5],[.9,1.1],[-.9,1.1],[-.9,.5]],color="ForestGreen"):L:=plot([[-.2,1],[-.2,.55],[.25,.55]],color="ForestGreen"):luigi1:=display(L,white,hat2,moustache,pupil1,pupil2,eye1,eye2,face0,mouth,body,glove1,glove2,arm3,arm4,leg1,leg2,shoe1,shoe2):luigi:=translate(luigi1,7,4):mario:=translate(mario1,0,4):bar1:=plot([[-2,0],[-2,6]],color="Grey"):bar2:=plot([[-1.5,0],[-1.5,6]],color="Grey"):bar3:=plot([[-1,0],[-1,6]],color="Grey"):bar4:=plot([[-.5,0],[-.5,6]],color="Grey"):bar5:=plot([[0,0],[0,6]],color="Grey"):bar6:=plot([[.5,0],[.5,6]],color="Grey"):bar7:=plot([[1,0],[1,6]],color="Grey"):bar8:=plot([[1.5,0],[1.5,6]],color="Grey"):bar9:=plot([[2,0],[2,6]],color="Grey"):bar10:=plot([[-2,6],[2,6]],color="Grey"):bar11:=plot([[-2,5],[2,5]],color="Grey"):bar12:=plot([[-2,4],[2,4]],color="Grey"):bar13:=plot([[-2,3],[2,3]],color="Grey"):bar14:=plot([[-2,2],[2,2]],color="Grey"):bar15:=plot([[-2,1],[2,1]],color="Grey"):LUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYmLUkjbWlHRiQ2I1EhRictSSdtc3BhY2VHRiQ2Ji8lJ2hlaWdodEdRJjAuMGV4RicvJSZ3aWR0aEdRJjAuMGVtRicvJSZkZXB0aEdGNC8lKmxpbmVicmVha0dRKG5ld2xpbmVGJy1GMDYmRjJGNUY4L0Y7USVhdXRvRidGKw==bar16:=plot([[-2,0],[2,0]],color="Grey"):bar:=display(bar1,bar2,bar3,bar4,bar5,bar6,bar7,bar8,bar9,bar10,bar11,bar12,bar13,bar14,bar15,bar16):ship:=polygon([[-6,3],[-4,0],[10,0],[12,3],[13,3],[10.5,-1],[-4.5,-1],[-7,3],[-6,3]],color=brown):background:=polygon([[-10,10],[-10,-10],[15,-10],[15,10],[-10,10]],color="LightSkyBlue"):text1:=textplot([0, 8, "Luigi you can't trap me."],'view'=[-10..15,-10..10]):text2:=textplot([0,7,"I'm too fat and the wood will break."],'view'=[-10..15,-10..10]):f1:=display(text1,text2,ship,bar,mario,luigi,background):disapear:=polygon([[-1.7,0],[-1.7,-1],[1.7,-1],[1.7,0]],color="LightSkyBlue"):f2:=display(disapear,ship,bar,mario,luigi,background):mario1:=translate(mario,0,-1):mario2:=translate(mario,0,-2):mario3:=translate(mario,0,-3):mario4:=translate(mario,0,-4):mario5:=translate(mario,0,-5):mario6:=translate(mario,0,-6):mario7:=translate(mario,0,-7):mario8:=translate(mario,0,-8):mario9:=translate(mario,0,-9):mario10:=translate(mario,0,-10):f3:=display(disapear,ship,bar,mario1,luigi,background):f4:=display(disapear,ship,bar,mario2,luigi,background):f5:=display(disapear,ship,bar,mario3,luigi,background):f6:=display(disapear,ship,bar,mario4,luigi,background):f7:=display(disapear,ship,bar,mario5,luigi,background):f8:=display(disapear,ship,bar,mario6,luigi,background):f9:=display(disapear,ship,bar,mario7,luigi,background):f10:=display(disapear,ship,bar,mario8,luigi,background):f11:=display(disapear,ship,bar,mario9,luigi,background):f12:=display(disapear,ship,bar,mario10,luigi,background):background1:=polygon([[-10,5.5],[-10,-10],[15,-10],[15,5.5],[-10,5.5]],color="LightSkyBlue"):lava:=polygon([[-10,-10],[15,-10],[15,-7.5],[-10,-7.5]],color="OrangeRed"):f13:=display(lava,mario,background1):f14:=display(lava,mario1,background1):f15:=display(lava,mario2,background1):f16:=display(lava,mario3,background1):f17:=display(lava,mario4,background1):f18:=display(lava,mario5,background1):f19:=display(lava,mario6,background1):f20:=display(lava,mario7,background1):f21:=display(lava,mario8,background1):f22:=display(lava,mario9,background1):f23:=display(lava,mario10,background1):black:=polygon([[-10,5.5],[-10,-10],[15,-10],[15,5.5],[-10,5.5]],color=black):f24:=display(black):display(f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f24,f24,f24,f24,insequence=true);Play at 10 FPS