restart:with(plots):with(plottools):
ColorTools:-GetPalette("dalton"):
head:=disk([4,19],4,color=yellow):
eyeball:=ellipse([1.5,20],0.5,.75,filled=true,color=black,scaling=constrained):
mouth:=arc([1.6,18],2,Pi/50..-1.1*Pi/2,scaling=constrained):
eye:=disk([2,20],1,color=white):
sky:=polygon([[-20,-6],[10,-6],[10,30],[-20,30]],color="SkyBlue"):
body:=polygon([[2.5,4.5],[3,4],[6,4],[6.5,4.5],[6,14],[5,16],[4,16],[2.5,14]],color=yellow,scaling=constrained):
face:=(eyeball,eye,mouth,head):
headchest:=(eyeball,eye,mouth,head,body):
rightarm:=polygon([[4,14],[5.5,14],[4.5,10],[1.5,9],[1,11],[3,11.5]],color=yellow,scaling=constrained):
leftarm:=polygon([[4,14],[5.5,14],[4.5,10],[1.5,9],[1,11],[3,11.5]],color=yellow,scaling=constrained):
leftlegstraight:=polygon([[3,5],[4.5,4],[4.5,-6],[3,-6]],color=yellow):
rightlegstraight:=polygon([[2.5,5],[4,4],[4,-6],[2.5,-6]],color=yellow):
e0:=leftlegstraight:
e1:=rotate(leftlegstraight,-Pi/20,[4.5,4]):
e2:=rotate(leftlegstraight,-Pi/16,[4.5,4]):
e3:=rotate(leftlegstraight,-Pi/12,[4.5,4]):
e4:=rotate(leftlegstraight,-Pi/8,[4.5,4]):
e5:=rotate(leftlegstraight,-Pi/6,[4.5,4]):
e6:=rotate(leftlegstraight,-Pi/5,[4.5,4]):
e7:=display(polygon([[3.5,6],[4.1,4.3],[0.5,0.5],[-1.8,-3.8],[-3,-2.9],[0,2]],color=yellow)):
e8:=rotate(e7,-Pi/20,[4.5,4]):
e9:=display(polygon([[-4,-0.5],[-3,-1.5],[0,2],[4.1,4.3],[3.9,6.05],[-0.5,3.5]],color=yellow)):
e10:=rotate(e9,-Pi/20,[4.5,4]):
e11:=display(polygon([[-4,0],[-2.75,-1],[-0.25,3],[4.1,4.3],[3.9,6],[-0.75,4.5]],color=yellow)):
e12:=display(polygon([[-2,-2],[-0.5,-2.25],[0.5,4],[4.1,4.3],[3.9,6],[-0.75,5.5]],color=yellow)):
e13:=rotate(e12,Pi/20,[4.5,4]):
e14:=rotate(e13,Pi/20,[4.5,4]):
e15:=rotate(e14,Pi/20,[4.5,4]):
e16:=rotate(e15,Pi/20,[4.5,4]):
e17:=rotate(e16,Pi/20,[4.5,4]):
e18:=rotate(e17,Pi/20,[4.5,4]):
e19:=display(polygon([[2.5,4.6],[4,4],[2.75,0.5],[4,-5.5],[2.5,-5.75],[1,0.5]],color=yellow)):
e20:=e0:
r0:=rightlegstraight:
r1:=rotate(rightlegstraight,-Pi/20,[4,4]):
r2:=rotate(rightlegstraight,-Pi/16,[4,4]):
r3:=rotate(rightlegstraight,-Pi/12,[4,4]):
r4:=rotate(rightlegstraight,-Pi/8,[4,4]):
r5:=rotate(rightlegstraight,-Pi/6,[4,4]):
r6:=rotate(rightlegstraight,-Pi/5,[4,4]):
r7:=display(polygon([[3.5,6],[4.1,4.3],[0.5,0.5],[-1.8,-3.8],[-3,-2.9],[0,2]],color=yellow)):
r8:=rotate(r7,-Pi/20,[4,4]):
r9:=display(polygon([[-4,-0.5],[-3,-1.5],[0,2],[4.1,4.3],[3.9,6.05],[-0.5,3.5]],color=yellow)):
r10:=rotate(r9,-Pi/20,[4,4]):
r11:=display(polygon([[-4,0],[-2.75,-1],[-0.25,3],[4.1,4.3],[3.9,6],[-0.75,4.5]],color=yellow)):
r12:=display(polygon([[-2,-2],[-0.5,-2.25],[0.5,4],[4.1,4.3],[3.9,6],[-0.75,5.5]],color=yellow)):
r13:=rotate(r12,Pi/20,[4,4]):
r14:=rotate(r13,Pi/20,[4,4]):
r15:=rotate(r14,Pi/20,[4,4]):
r16:=rotate(r15,Pi/20,[4,4]):
r17:=rotate(r16,Pi/20,[4,4]):
r18:=rotate(r17,Pi/20,[4,4]):
r19:=display(polygon([[2.5,4.6],[4,4],[2.75,0.5],[4,-5.5],[2.5,-5.75],[1,0.5]],color=yellow)):
r20:=r0:
fifa:=textplot([[0,0,"FIFA",font=["Helvetica",14],color=purple]]):
horizontalballline:=line([-1.5,0],[1.5,0]):
verticalballline:=line([0,1.5],[0,-1.5]):
ballbase:=disk([0,0],1.5,color=green):
ball:=display(horizontalballline,verticalballline,ballbase):
b1:=display(translate(rotate(ball,.05*Pi),4,30)):
b2:=display(translate(rotate(ball,.1*Pi),3,29)):
b3:=display(translate(rotate(ball,.15*Pi),2,28)):
b4:=display(translate(rotate(ball,.2*Pi),1.5,27)):
b5:=display(translate(rotate(ball,.25*Pi),1,25.5)):
b6:=display(translate(rotate(ball,.3*Pi),0.5,24)):
b7:=display(translate(rotate(ball,.35*Pi),0,22.5)):
b8:=display(translate(rotate(ball,.45*Pi),-0.5,21)):
b9:=display(translate(rotate(ball,.5*Pi),-0.51,19.5)):
b10:=display(translate(rotate(ball,.55*Pi),-0.52,18)):
b11:=display(translate(rotate(ball,.6*Pi),-0.53,16.5)):
b12:=display(translate(rotate(ball,.65*Pi),-0.54,15)):
b13:=display(translate(rotate(ball,.7*Pi),-0.55,13.5)):
b14:=display(translate(rotate(ball,.75*Pi),-0.56,12)):
b15:=display(translate(rotate(ball,.8*Pi),-0.57,10.5)):
b16:=display(translate(rotate(ball,.85*Pi),-0.58,9)):
b17:=display(translate(rotate(ball,.9*Pi),-0.59,7.5)):
b18:=display(translate(rotate(ball,.95*Pi),-0.6,7)):
b19:=display(translate(rotate(ball,.05*Pi),-0.61,6.5)):
b20:=display(translate(rotate(ball,.1*Pi),-0.62,6)):
b21:=display(translate(rotate(ball,.15*Pi),-0.6,7)):
b22:=display(translate(rotate(ball,.2*Pi),-0.7,8)):
b23:=display(translate(rotate(ball,.25*Pi),-0.8,9)):
b24:=display(translate(rotate(ball,.3*Pi),-0.9,10)):
b25:=display(translate(rotate(ball,.35*Pi),-1,11)):
b26:=display(translate(rotate(ball,.4*Pi),-1.1,12)):
b27:=display(translate(rotate(ball,.45*Pi),-1.2,13)):
b28:=display(translate(rotate(ball,.5*Pi),-1.3,14)):
b29:=display(translate(rotate(ball,.55*Pi),-1.4,15)):
b30:=display(translate(rotate(ball,.6*Pi),-1.5,15.5)):
b31:=display(translate(rotate(ball,.65*Pi),-1.6,15)):
b32:=display(translate(rotate(ball,.7*Pi),-1.7,14)):
b33:=display(translate(rotate(ball,.75*Pi),-1.8,13)):
b34:=display(translate(rotate(ball,.8*Pi),-1.9,12)):
b35:=display(translate(rotate(ball,.85*Pi),-2,11)):
b36:=display(translate(rotate(ball,.9*Pi),-2.1,10)):
b37:=display(translate(rotate(ball,.95*Pi),-2.2,9)):
b38:=display(translate(rotate(ball,Pi),-2.3,8)):
b39:=display(translate(rotate(ball,.05*Pi),-2.4,7)):
b40:=display(translate(rotate(ball,.1*Pi),-2.5,6)):
b41:=display(translate(rotate(ball,.15*Pi),-2.5,7)):
b42:=display(translate(rotate(ball,.2*Pi),-3,6)):
b43:=display(translate(rotate(ball,.25*Pi),-3.5,5)):
b44:=display(translate(rotate(ball,.3*Pi),-5,3)):
b45:=display(translate(rotate(ball,.35*Pi),-6,4)):
b46:=display(translate(rotate(ball,.4*Pi),-7,5)):
b47:=display(translate(rotate(ball,.45*Pi),-8,6)):
b48:=display(translate(rotate(ball,.5*Pi),-9,7)):
b49:=display(translate(rotate(ball,.55*Pi),-10,8)):
b50:=display(translate(rotate(ball,.6*Pi),-11,9)):
b51:=display(translate(rotate(ball,.65*Pi),-12,10)):
b52:=display(translate(rotate(ball,.7*Pi),-13,11)):
b53:=display(translate(rotate(ball,.75*Pi),-14,12)):
b54:=display(translate(rotate(ball,.8*Pi),-15,12)):
b55:=display(translate(rotate(ball,.85*Pi),-16,11)):
b56:=display(translate(rotate(ball,.9*Pi),-17,10)):
b57:=display(translate(rotate(ball,.95*Pi),-18,9)):
b58:=display(translate(rotate(ball,Pi),-19,8)):
b59:=display(translate(rotate(ball,.05*Pi),-20,7)):
b60:=display(translate(rotate(ball,.1*Pi),-21,6)):
p0:=rightarm:
p1:=rotate(rightarm,Pi/16,[5,14]):
p2:=rotate(rightarm,Pi/14,[5,14]):
p3:=rotate(rightarm,Pi/12,[5,14]):
p4:=rotate(rightarm,Pi/10,[5,14]):
p5:=rotate(rightarm,Pi/8,[5,14]):
p6:=rotate(rightarm,Pi/6,[5,14]):
p7:=rotate(rightarm,Pi/4,[5,14]):
p8:=rotate(rightarm,Pi/3,[5,14]):
p9:=rotate(rightarm,Pi/2.5,[5,14]):
p10:=rotate(rightarm,Pi/2,[5,14]):
p11:=rotate(rightarm,Pi/2,[5,14]):
p12:=rotate(rightarm,Pi/2.5,[5,14]):
p13:=rotate(rightarm,Pi/3,[5,14]):
p14:=rotate(rightarm,Pi/4,[5,14]):
p15:=rotate(rightarm,Pi/6,[5,14]):
p16:=rotate(rightarm,Pi/8,[5,14]):
p17:=rotate(rightarm,Pi/10,[5,14]):
p18:=rotate(rightarm,Pi/12,[5,14]):
p19:=rotate(rightarm,Pi/14,[5,14]):
p20:=rotate(rightarm,Pi/16,[5,14]):
p201:=rightarm:
p21:=rotate(rightarm,-Pi/32,[5,14]):
p22:=rotate(rightarm,-Pi/20,[5,14]):
p23:=rotate(rightarm,-Pi/16,[5,14]):
p24:=rotate(rightarm,-Pi/12,[5,14]):
p25:=rotate(rightarm,-Pi/8,[5,14]):
p26:=rotate(rightarm,-Pi/7,[5,14]):
p27:=rotate(rightarm,-Pi/6,[5,14]):
p28:=rotate(rightarm,-Pi/4,[5,14]):
p29:=rotate(rightarm,-Pi/3,[5,14]):
p30:=rotate(rightarm,-Pi/2.5,[5,14]):
p31:=rotate(rightarm,-Pi/3,[5,14]):
p32:=rotate(rightarm,-Pi/4,[5,14]):
p33:=rotate(rightarm,-Pi/6,[5,14]):
p34:=rotate(rightarm,-Pi/8,[5,14]):
p35:=rotate(rightarm,-Pi/10,[5,14]):
p36:=rotate(rightarm,-Pi/12,[5,14]):
p37:=rotate(rightarm,-Pi/14,[5,14]):
p38:=rotate(rightarm,-Pi/16,[5,14]):
p39:=rotate(rightarm,-Pi/18,[5,14]):
p40:=rotate(rightarm,-Pi/21,[5,14]):
q0:=leftarm:
q1:=rotate(leftarm,-Pi/16,[5,14]):
q2:=rotate(leftarm,-Pi/14,[5,14]):
q3:=rotate(leftarm,-Pi/12,[5,14]):
q4:=rotate(leftarm,-Pi/10,[5,14]):
q5:=rotate(leftarm,-Pi/8,[5,14]):
q6:=rotate(leftarm,-Pi/6,[5,14]):
q7:=rotate(leftarm,-Pi/4,[5,14]):
q8:=rotate(leftarm,-Pi/3,[5,14]):
q9:=rotate(leftarm,-Pi/2.5,[5,14]):
q10:=rotate(leftarm,-Pi/2,[5,14]):
q11:=rotate(leftarm,-Pi/2,[5,14]):
q12:=rotate(leftarm,-Pi/2.5,[5,14]):
q13:=rotate(leftarm,-Pi/3,[5,14]):
q14:=rotate(leftarm,-Pi/4,[5,14]):
q15:=rotate(leftarm,-Pi/6,[5,14]):
q16:=rotate(leftarm,-Pi/8,[5,14]):
q17:=rotate(leftarm,-Pi/10,[5,14]):
q18:=rotate(leftarm,-Pi/12,[5,14]):
q19:=rotate(leftarm,-Pi/14,[5,14]):
q20:=rotate(leftarm,-Pi/16,[5,14]):
q201:=leftarm:
q21:=rotate(leftarm,Pi/24,[5,14]):
q22:=rotate(leftarm,Pi/20,[5,14]):
q23:=rotate(leftarm,Pi/16,[5,14]):
q24:=rotate(leftarm,Pi/12,[5,14]):
q25:=rotate(leftarm,Pi/8,[5,14]):
q26:=rotate(leftarm,Pi/7,[5,14]):
q27:=rotate(leftarm,Pi/6,[5,14]):
q28:=rotate(leftarm,Pi/5,[5,14]):
q29:=rotate(leftarm,Pi/4,[5,14]):
q30:=rotate(leftarm,Pi/2,[5,14]):
q31:=rotate(leftarm,Pi/3,[5,14]):
q32:=rotate(leftarm,Pi/4,[5,14]):
q33:=rotate(leftarm,Pi/6,[5,14]):
q34:=rotate(leftarm,Pi/8,[5,14]):
q35:=rotate(leftarm,Pi/10,[5,14]):
q36:=rotate(leftarm,Pi/12,[5,14]):
q37:=rotate(leftarm,Pi/14,[5,14]):
q38:=rotate(leftarm,Pi/16,[5,14]):
q39:=rotate(leftarm,Pi/18,[5,14]):
q40:=rotate(leftarm,Pi/21,[5,14]):
leftjog:=display([q0,q1,q2,q3,q4,q5,q6,q7,q8,q9,q10,q11,q12,q13,q14,q15,q16,q17,q18,q19,q20,q201,q21,q22,q23,q24,q25,q26,q27,q28,q29,q30,q31,q32,q33,q34,q34,q36,q37,q38,q39,q40],insequence=true):
rightjog:=display([p0,p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12,p13,p14,p15,p16,p17,p18,p19,p20,p201,p21,p22,p23,p24,p25,p26,p27,p28,p29,p30,p31,p32,p33,p34,p35,p36,p37,p38,p39,p40],insequence=true):
f1:=display(q0,e0,headchest,p0,r0,b1,sky):
f2:=display(q1,e0,headchest,p1,r0,b2,sky):
f3:=display(q2,e0,headchest,p2,r0,b3,sky):
f4:=display(q3,e0,headchest,p3,r0,b4,sky):
f5:=display(q4,e0,headchest,p4,r0,b5,sky):
f6:=display(q5,e0,headchest,p5,r0,b6,sky):
f7:=display(q6,e0,headchest,p6,r0,b7,sky):
f8:=display(q7,e0,headchest,p7,r0,b8,sky):
f9:=display(q8,e0,headchest,p8,r1,b9,sky):
f10:=display(q9,e0,headchest,p9,r2,b10,sky):
f11:=display(q10,e0,headchest,p10,r3,b11,sky):
f12:=display(q11,e0,headchest,p11,r4,b12,sky):
f13:=display(q12,e0,headchest,p12,r5,b13,sky):
f14:=display(q13,e0,headchest,p13,r6,b14,sky):
f15:=display(q14,e0,headchest,p14,r7,b15,sky):
f16:=display(q15,e0,headchest,p15,r8,b16,sky):
f17:=display(q16,e0,headchest,p16,r9,b17,sky):
f18:=display(q17,e0,headchest,p17,r10,b18,sky):
f19:=display(q18,e0,headchest,p18,r11,b19,sky):
f20:=display(q19,e0,headchest,p19,r12,b20,sky):
f21:=display(q20,e0,headchest,p20,r13,b21,sky):
f22:=display(q21,e0,headchest,p21,r14,b22,sky):
f23:=display(q22,e0,headchest,p22,r15,b23,sky):
f24:=display(q23,e0,headchest,p23,r16,b24,sky):
f25:=display(q24,e0,headchest,p24,r17,b25,sky):
f26:=display(q25,e0,headchest,p25,r18,b26,sky):
f27:=display(q26,e0,headchest,p26,r19,b27,sky):
f28:=display(q27,e0,headchest,p27,r20,b28,sky):
f29:=display(q28,e0,headchest,p28,r0,b29,sky):
f30:=display(q29,e1,headchest,p29,r0,b30,sky):
f31:=display(q30,e2,headchest,p30,r0,b31,sky):
f32:=display(q31,e3,headchest,p31,r0,b32,sky):
f33:=display(q32,e4,headchest,p32,r0,b33,sky):
f34:=display(q33,e5,headchest,p33,r0,b34,sky):
f35:=display(q34,e6,headchest,p34,r0,b35,sky):
f36:=display(q35,e7,headchest,p35,r0,b36,sky):
f37:=display(q36,e8,headchest,p36,r0,b37,sky):
f38:=display(q37,e9,headchest,p37,r0,b38,sky):
f39:=display(q38,e10,headchest,p38,r0,b39,sky):
f40:=display(q39,e11,headchest,p39,r0,b40,sky):
f41:=display(q40,e12,headchest,p40,r0,b41,sky):
f42:=display(q0,e12,headchest,p0,r0,b42,sky):
f43:=display(q0,e11,headchest,p0,r0,b43,sky):
f44:=display(q0,e10,headchest,p0,r0,b44,sky):
f45:=display(q0,e9,headchest,p0,r0,b45,sky):
f46:=display(q0,e8,headchest,p0,r0,b46,sky):
f47:=display(q0,e9,headchest,p0,r0,b47,sky):
f48:=display(q0,e10,headchest,p0,r0,b48,sky):
f49:=display(q0,e11,headchest,p0,r0,b49,sky):
f50:=display(q0,e12,headchest,p0,r0,b50,sky):
f51:=display(q0,e13,headchest,p0,r0,b51,sky):
f52:=display(q0,e14,headchest,p0,r0,b52,sky):
f53:=display(q0,e15,headchest,p0,r0,b53,sky):
f54:=display(q0,e16,headchest,p0,r0,b54,sky):
f55:=display(q0,e17,headchest,p0,r0,b55,sky):
f56:=display(q0,e18,headchest,p0,r0,b56,sky):
f57:=display(q0,e19,headchest,p0,r0,b57,sky):
f58:=display(q0,e20,headchest,p0,r0,b58,sky):
f59:=display(q0,e20,headchest,p0,r0,b59,sky):
f60:=display(q0,e20,headchest,p0,r0,b60,sky):
display(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,f27,f28,f29,f30,f31,f32,f33,f34,f35,f36,f37,f38,f39,f40,f41,f42,f43,f44,f45,f46,f47,f48,f49,f50,f51,f52,f53,f54,f55,f56,f57,f58,f59,f60,insequence=true,axes=none,scaling=constrained,view=[-20..10,-6..30]);
speed 30