restart:with(plots):with(plottools):

background:=polygon([[0,25],[25,25],[25,0],[0,0]],color=yellow):

rightleg:=display(line([6,0],[9,6],color=black)):

leftleg:=display(plot([[11,0],[9,6]],color=black)):

body:=display(plot([[9,6],[9,10]],color=black)):

rightarm:=display(plot([[9,10],[6,7]],color=black)):

leftarm:=display(plot([[9,10],[12,7]],color=black)):

head:=display(disk([9,11],1,color="White")):

smile:=display(arc([9,10.8],.6,0..-Pi)):

eye1:=display(disk([8.75,11.5],.1,color=black)):

eye2:=display(disk([9.3,11.5],.1,color=black)):

background2:=polygon([[0,25],[25,25],[25,0],[0,0]],color="Gray"):

poof:=textplot([10,15,"poof",'font'=["times",20]],color=white):

frown:=arc([9,10.25],.25,0..Pi):

stick:=display(plot([[17,10],[25,10]],color=black)):

leg1:=display(plot([[19,14],[17,10]],color=black)):

leg2:=display(plot([[19,14],[23,10]],color=black)):

body2:=display(plot([[19,14],[19,17]],color=black)):

arm1:=display(plot([[19,17],[15,16]],color=black)):

arm2:=display(plot([[19,17],[24,15]],color=black)):

back:=display(plot([[14,17],[17.5,13]],color=black)):

head2:=display(disk([19,18],1,color="black")):

mask:=display(rectangle([18.2,18.2],[19.8,17.7],color=white)):

eye3:=display(disk([18.5,18],.1,color=black)):

eye4:=display(disk([19.5,18],.1,color=black)):

background3:=polygon([[0,25],[25,25],[25,0],[0,0]],color=yellow):

words:=textplot([10,15,"I Got Your Back Bro.",'font'=["times",20]],color=black):

End:=textplot([10,15,"The End",'font'=["times",20]],color=black):

First:=display(eye1,eye2,head,smile,body,leftleg,rightleg,leftarm,rightarm,background):

PoofSecond:=display(background2,poof):

Third:=display(eye1,eye2,frown,head,leftleg,rightleg,leftarm,rightarm,eye3,eye4,mask,head2,body2,back,leg1,leg2,arm1,arm2,stick,background):

Fourth:=display(words,background):

End:=display(background3,End):

Final:= display([First, PoofSecond, Third, Fourth, End], insequence=true, scaling= constrained, axes=none):

Final;

# fps=1