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

Jishnu J

Dancing Stickman

circle1 := circle([0,3],2):

body:=line([0,-5],[0,1]):

bod:=line([0,-5],[0,1]):

legs:=plot([[-4.5,-12.5],[-3,-13],[0,-5],[3,-13],[4.5,-12.5]]):

kid:=plot([[-3,2],[0,-3],[3,2]]):

eye1:= circle([-1,3.5],.4):

eye2:= circle([1,3.5],.4):

nose:= plot([[-.3,2.4],[0,3],[.3,2.4],[-.3,2.4]],color=red,filled=true):

mouth:=plot([[-1,2.2],[-.8,1.8],[.8,1.8],[1,2.2]]):

hello:=plot([[3,4],[0,0],[-3,4]]):

eye3:=line([-1.5,3.5],[-.5,3.5],color=blue):

mouth2:=line([-.8,1.8],[.8,1.8]):

bye:=line([.50,3.5],[1.5,3.5],color=blue):

mom:= ellipse([-1,3.2].2):

p4:=ellipse([1,3.35],.15,.25,filled=true):

p5:=ellipse([1,3.25],.1,.6,filled=true):

fatto:=ellipse([1,3.35],.15,.25,filled=true,color=blue):

matfom:=ellipse([-1,3.35],.15,.25,filled=true,color=blue):

kid2:=plot([[-3.5,1.5],[0,-3],[3.5,1.5]]):

p2:=display([circle1,body,legs,eye1,eye2,nose,mouth,kid2,fatto,matfom]):

kid2:

kid2:=plot([[-3.5,1.5],[0,-3],[3.5,1.5]]):

kid3:=plot([[-4.0,1.0],[0,-3],[4.0,1.0]]):

kid4:=plot([[-4.5,0.5],[0,-3],[4.5,0.5]]):

kid5:=plot([[-5.0,0],[0,-3],[5.0,0]]):

p6:=display([circle1,body,legs,eye3,bye,nose,mouth2,kid2]):

p100:=display([circle1,body,legs,eye3,bye,nose,mouth2,kid3]):

p8:=display([circle1,body,legs,eye3,bye,nose,mouth2,kid4]):

p200:=display([circle1,body,legs,eye3,bye,nose,mouth2,kid5]):

p7:=display([circle1,body,legs,eye3,bye,nose,mouth2,kid3]):

p9:=display([circle1,body,legs,eye3,bye,nose,mouth2,kid5]):

p50:=display([circle1,body,legs,eye1,eye2,nose,mouth,kid2,fatto,matfom]):

p60:=display([circle1,body,legs,eye1,eye2,nose,mouth,kid4,fatto,matfom]):

baby2:= display([p50,p7,p60,p9],insequence=true):

kid2:=plot([[-2.5,0.5],[0,-3],[2.5,0.5]]):

kid3:=plot([[-3.0,0],[0,-3],[3.0,0]]):

kid4:=plot([[-3.5,-0.5],[0,-3],[3.5,-0.5]]):

kid5:=plot([[-4.0,-1.0],[0,-3],[4.0,-1.0]]):

kid6:=plot([[-4.5,-1.5],[0,-3],[4.5,-1.5]]):

kid7:=plot([[-5.0,-2.0],[0,-3],[5.0,-2.0]]):

kid8:=plot([[-5.5,-2.5],[0,-3],[5.5,-2.5]]):

kid9:=plot([[-6.0,-3.0],[0,-3],[6.0,-3.0]]):

kid10:=plot([[-6.5,-3.0],[0,-3],[6.5,-3.0]]):

legs4:=plot([[-2.5,-12.5],[-1,-13],[0,-5],[1,-13],[2.5,-12.5]]):

jump1:=display([circle1,body,legs,eye1,eye2,nose,mouth,kid2,fatto,matfom]):

jump2:=translate(display([circle1,body,legs4,eye3,bye,nose,mouth2,kid3]),1,0):

jump3:=translate(display([circle1,body,legs,eye1,eye2,nose,mouth,kid4,fatto,matfom]),2,0):

jump4:=translate(display([circle1,body,legs4,eye3,bye,nose,mouth2,kid5]),3,0):

jump5:=translate(display([circle1,body,legs,eye1,eye2,nose,mouth,kid6,fatto,matfom]),4,0):

jump6:=translate(display([circle1,body,legs4,eye3,bye,nose,mouth2,kid7]),5,0):

jump7:=translate(display([circle1,body,legs,eye1,eye2,nose,mouth,kid8,fatto,matfom]),6,0):

jump8:=translate(display([circle1,body,legs4,eye3,bye,nose,mouth2,kid9]),7,0):

jump9:=translate(display([circle1,body,legs,eye1,eye2,nose,mouth,kid10,fatto,matfom]),8,0):

jump10:=translate(display([circle1,body,legs4,eye3,bye,nose,mouth2,kid]),9,0):

baby3:= display([jump1,jump2,jump3,jump4,jump5,jump6,jump7,jump8,jump9,jump10,jump9,jump8,jump7,jump6,jump5,jump4,jump3,jump2],insequence=true):

legs2:=display([legs,legs4],insequence=true):

baby2([translate(baby2,2,3)]):

grass:=plot([[-4,0],[-4,-5],[4,-5],[4,0],[-4,0]],color=green,axes=none,filled=true):

grass2:=plot([[-4.5,-12.5],[-4.5,-14],[4.5,-14],[4.5,-12.5]],color=green,filled=true):

grass4:=plot([[-10,-13],[-10,-14],[12,-14],[12,-13],[-10,-13]],filled=true,color="LimeGreen"):

leaves:=ellipse([-8,3],1.5,3,filled=true,color="ForestGreen"):

lightpole:=ellipse([-8,3],1.5,3,filled=true,color=coral):

lightpole2:=ellipse([-8,3],1.5,3,filled=true,color=yellow):

lightpole3:=ellipse([-8,3],1.5,3,filled=true,color="OrangeRed"):

lightpole4:=ellipse([-8,3],1.5,3,filled=true,color="Cyan"):

lightpole5:=ellipse([-8,3],1.5,3,filled=true,color="Violet"):

lightpole6:=ellipse([-8,3],1.5,3,filled=true,color="GreenYellow"):

lightpole7:=display([lightpole,lightpole2,lightpole3,lightpole4,lightpole5,lightpole6,lightpole,lightpole2,lightpole3,lightpole4,lightpole5,lightpole6,lightpole,lightpole2,lightpole3,lightpole4,lightpole5,lightpole6],insequence=true):

pole:=plot([[-8.5,0],[-7.5,0],[-7.5,-13],[-8.5,-13],[-8.5,0]],color=black,filled=true):

display([baby3,grass4,lightpole7,pole],view=[-11..12,-14..7], scaling=constrained,axes=none);

#Speed 2