restart: with(plots): with(plottools):
ground:=polygon([[1,1],[1,2],[10,2],[10,1],[1,1]],color="Green"):
sky:=polygon([[1,2],[1,10],[10,10],[10,2],[1,2]],color="DeepSkyBlue"):
cloud:=polygon([[3,9],[3,7],[7,7],[7,9]],color="white"):
background2:=display(cloud,ground,sky):
mariohead:=disk([3,4.5],0.5,color="NavajoWhite"):
mariobody:=polygon([[2.5,4],[2.5,3],[3.5,3],[3.5,4],[2.5,4]],color="Red"):
marioleg1:=polygon([[2.5,3],[2.5,2],[3,2],[3,3]],color="Blue"):
marioleg2:=polygon([[3,3],[3,2],[3.5,2],[3.5,3],[3,3]],color="Blue"):
marioarm1:=polygon([[2,4],[2,3],[2.5,3],[2.5,4],[2,4]],color="Red"):
mariohat:=polygon([[2.5,5],[2.5,5.5],[3.5,5.5],[3.5,5],[2.5,5],[4,5]],color="Red"):
marioarm2:=display(polygon([[3.5,3],[3.5,4],[4,4],[4,3]],color="Red")):
mariohatm:=textplot([3,5.25,"M"],color=white):
marioscompletehat:=display(mariohatm,mariohat):
gameloading:=textplot([5.5,5,"GAME LOADING..."],'font' = ["times", "roman", 30],color=white):
background1:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Black")):
mario:=display([mariohead,mariobody,marioleg1,marioleg2,marioarm1,marioarm2,marioscompletehat,background2]):
scene1:=display(gameloading,background1):
theslime:=polygon([[7,2],[7,5],[9,5],[9,2]],color="LightGreen"):
ts:=display(theslime,mario):
theslime2:=translate(theslime,-1,0):
scene2:=display(theslime2,mario):
theslime3:=translate(theslime2,-1,0):
scene3:=display(theslime3,mario):
theslime4:=translate(theslime3,-1,0):
scene35:=display(theslime4,mario):
pow:=textplot([5.5,5,"POW!"],'font' = ["times", "roman", 50],color=black):
background4:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Orange")):
scene4:=display(pow,background4):
gameover:=textplot([5.5,5,"GAME OVER"],'font' =["times", "roman", 47],color=white):
background5:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Black")):
scene5:=display(gameover,background5):
broyousuckandstuff:=textplot([5.5,5,"Bro, you suck and stuff."],'font' =["times", "roman", 30],color="LightGreen"):
background6:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Black")):
scene6:=display(broyousuckandstuff,background6):
ohyeah:=textplot([5.5,5,"OH YEAH?!"],'font' =["times", "roman", 50],color="DeepSkyBlue"):
background7:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Black")):
scene7:=display(ohyeah,background7):
gameloading2:=textplot([5.5,5,"GAME LOADING..."],'font' =["times", "roman", 30],color=white):
background8:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Black")):
scene8:=display(gameloading2,background8):
marioarm3:=display(polygon([[3.5,3.5],[3.5,4],[4.5,4],[4.5,3.5]],color="Red")):
mario:=display([mariohead,mariobody,marioleg1,marioleg2,marioarm1,marioarm3,marioscompletehat,background2]):
gun:=display(polygon([[4.5,3.5],[5,3.5],[5,4],[5.75,4],[5.75,4.5],[4.5,4.5],[4.5,3.5]],color="Black")):
mario:=display([mariohead,mariobody,marioleg1,marioleg2,marioarm1,marioarm3,gun,marioscompletehat,background2]):
theslime2:=display(polygon([[7,2],[7,5],[9,5],[9,2]],color="LightGreen")):
mario:=display([mariohead,mariobody,marioleg1,marioleg2,marioarm1,marioarm3,gun,marioscompletehat,theslime2,background2]):
scene9:=display(mario):
marioface:=display(disk([5.5,5.5],4.5,color="NavajoWhite")):
marioseyebrow1:=display(polygon([[3.5,9],[5.25,6.5]],color="Black")):
marioseyebrow2:=display(polygon([[7.5,9],[5.75,6.5]],color="Black")):
marioseye1:=display(polygon([[4,5],[4,7]],color="Black")):
marioseye2:=display(polygon([[7,5],[7,7]],color="Black")):
mariosmouth:=display(polygon([[4,1.5],[7,1.5],[8.5,3.5],[2.5,3.5]],color="White")):
mariosteeth1:=display(polygon([[5.5,3.5],[5.5,1.5]],color="Black")):
mariosteeth2:=display(polygon([[6.5,3.5],[6.5,1.5]],color="Black")):
mariosteeth3:=display(polygon([[4.5,3.5],[4.5,1.5]],color="Black")):
scene10:=display(marioseyebrow1,marioseyebrow2,marioseye1,marioseye2,mariosteeth1,mariosteeth2,mariosteeth3,mariosmouth,marioface):
theend:=textplot([5.5,5,"THE END?"],'font' =["times", "roman", 50],color=white):
background9:=display(polygon([[1,1],[1,10],[10,10],[10,1]],color="Black")):
scene11:=display(theend,background9):
movie:=display([scene1,scene2,scene3,scene35,scene4,scene5,scene6,scene7,scene8,scene9,scene10,scene11],insequence=true,axes=none,scaling=constrained):
movie;
# 1 fps