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

ismael_r

Scoring a Goal

ball := disk([2,8], thickness=2, color=blue):

head :=disk([0,12],thickness=2, color=tan):

eye1 := disk ([-0.5,12.3],.1,thickness=2 ,color=black):

eye2 :=disk ([0.5,12.3],.1,thickness=2,color=black):

smile:=ellipticArc([0,12], 0.5, 0.5, (-3*Pi)/4 .. (-1*Pi)/4 ):

body :=line ([0,9],[0,11],thickness=15, color=darkgreen):

leg1 :=line ([0.5,7],[0,9.1],thickness=15,color=red):

leg2 :=line ([-1,7.5],[0,9.1],thickness=15,color=red):

sleeve :=line ([1,10],[-1,10.5],thickness=15,color=darkgreen):

goal1:=line ([5,13],[5,7],thickness=5,color=gray):

goal2:=line ([5,13],[12,7],thickness=5,color=gray):

ground:=line ([-2,7],[12,7],thickness=10,color=green):

p1 := display (eye1,eye2,smile,head,body,leg1,leg2,sleeve,goal1,goal2,ground):

leg12 :=line ([-0.5,7],[0,9.1],thickness=15,color=red):

p2:=display (eye1,eye2,smile,head,body,leg1,leg12,sleeve,goal1,goal2,ground):

leg22 :=line ([0,7],[0,9.1],thickness=15,color=red):

p3:=display (eye1,eye2,smile,head,body,leg1,leg22,sleeve,goal1,goal2,ground):

leg32 :=line ([0,7],[0,9.1],thickness=15,color=red):

p4:=display (eye1,eye2,smile,head,body,leg1,leg32,sleeve,goal1,goal2,ball,ground):

leg42 :=line ([0.3,7],[0,9.1],thickness=15,color=red):

p5:=display (eye1,eye2,smile,head,body,leg1,leg42,sleeve,ball,goal1,goal2,ground):

leg52 :=line ([1,7],[0,9.1],thickness=15,color=red):

p6:=display (eye1,eye2,smile,head,body,leg1,leg52,sleeve,ball,goal1,goal2,ground):

ball1 := disk([3,8.5], thickness=2, color=blue):

p7:=display (eye1,eye2,smile,head,body,leg1,leg2,sleeve,ball1,goal1,goal2,ground):

ball2 := disk([4,9.5], thickness=2, color=blue):

p8:=display (eye1,eye2,smile,head,body,leg1,leg2,sleeve,ball2,goal1,goal2,ground):

ball3 := disk([5,10.5], thickness=2, color=blue):

p9:=display (eye1,eye2,smile,head,body,leg1,leg2,sleeve,ball3,goal1,goal2,ground):

display([p1,p2,p3,p4,p5,p6,p7,p8,p9],insequence = true,scaling = constrained,axes=none, size=[600,300]);#speed 10