restart:with(plots):with(plottools):
body:=ellipse([0,9],2,5,color=blue,filled=true):
rightleg:=polygon([[2,0],[1,5],[0,4],[1,0]], color=blue):
leftleg:=polygon([[-2,0],[-1,5],[0,4],[-1,0]], color=blue):
rightarm:=polygon([[2,10],[5,12],[4,13],[2,11]], color=blue):
head:=disk([0,15],1,color=tan):
eye:=disk([.5,15.5],0.0625,color=black):
mouth:=arc([1,15],.75,-Pi..-Pi/2,color=black):
mouth2:=plot([[1,14.5],[0,14.5]],color=black):
ball:=disk([0,0],.5,color=red):
dogbody:=polygon([[4,1.5],[7,1.5],[7,3],[4,3],[4,1.5]],color=orange):
frontleg:=polygon([[4,1.5],[4.5,1.5],[4.5,0],[4,0]],color=orange):
backleg:=polygon([[6.5,1.5],[7,1.5],[7,0],[6.5,0]],color=orange):
doghead:=rectangle([2.5,3],[4,2],color=orange,filled=true):
tail := rectangle([7, 3], [7.5, 2.5], color = orange):
ear := polygon([[3.6, 3], [3.8, 3.3], [4, 3]], color = orange, filled = true):
dogeye := disk([3.3, 2.9], 0.625e-1, color = black):
QyQ+SSZ0cnVua0c2Ii1JKHBvbHlnb25HRiU2JTcmNyQiI0IiIio3JEYrIiM6NyQiI0RGLjckRjBGLC9JJmNvbG9yR0YlSSZicm93bkdGJS9JJ2ZpbGxlZEdGJUkldHJ1ZUclKnByb3RlY3RlZEchIiI=
QyQ+SSR0b3BHNiItSSVkaXNrR0YlNiU3JCIjQyIjOSIiIy9JJmNvbG9yR0YlSSZncmVlbkdGJSEiIg==
QyQ+SSV0cmVlRzYiLUkoZGlzcGxheUdGJTYkSSR0b3BHRiVJJnRydW5rR0YlISIi
man:=display(body, rightleg, leftleg, eye, head, mouth2):
man5:=display(body, eye, head, mouth, rightleg, leftleg):
man2:=display(rotate(display(body, eye, head, mouth),-Pi/8,[0,6]), rightleg, leftleg):
man3:=display(rotate(display(body, eye, head, mouth),-Pi/4,[0,6]), rightleg, leftleg):
dog := display(dogbody, frontleg, backleg, dogeye, tail, ear, doghead):
game:= textplot([5,7, "A GAME OF FETCH"], align={above},font = [TIMES, ROMAN, 30]):
isaac:= textplot([0,6, "BY"], align={below},font = [TIMES, ROMAN, 30]):
isaac2:=textplot([3,3, "ISAAC"], align={below,right},font = [TIMES, ROMAN, 30]):
frame0:=display(game,isaac,isaac2):
frame1 := display(man5, rightarm, translate(ball,6,13), tree, scaling = constrained):
frame2 := display(man5, rightarm, translate(ball,8,13), dog, tree, scaling = constrained, axes = none):
frame3 := display(man5, rotate(rightarm,-Pi/6,[1,10]), translate(ball,10,13), dog, tree, scaling = constrained, axes = none):
frame4 := display(man5, rotate(rightarm,-2*Pi/6,[1,10]), translate(ball,12,13), dog, tree, scaling = constrained, axes = none):
frame5 := display(man5, rotate(rightarm,-Pi/1.3,[1,10]), translate(ball,12,13), dog, tree, scaling = constrained ,axes=none):
frame6 := display(man2,translate(ball,14,13), dog, tree, scaling = constrained ,axes=none):
fetch := textplot([3, 16, "fetch"], align = {above, right}, font = [TIMES, ROMAN, 30]):
frame7 := display(man2,translate(ball,16,13), dog, tree,fetch, scaling = constrained ,axes=none):
frame8 := display(man3,translate(ball,18,13), dog, tree,fetch, scaling = constrained ,axes=none):
bop := textplot([20, 12.5, "BOP"], align = {above, left}, font = [TIMES, ROMAN, 20]):
frame9 := display(man3, translate(ball, 23, 12), dog, tree, bop, scaling = constrained, axes = none):
mark := textplot([0, 16, "?"], align = {above}, font = [TIMES, ROMAN, 40]):
frame10 := display(man2, translate(ball, 18, 13), dog, tree, bop, scaling = constrained, axes = none):
frame11 := display(man, translate(ball, 14, 13), dog, tree, bop, scaling = constrained, axes = none):
frame12 := display(man, translate(ball, 8, 12), mark, dog, tree, scaling = constrained, axes = none):
frame13 := display(man, translate(ball, 6, 12), mark, dog, tree, scaling = constrained, axes = none):
frame14 := display(man, translate(ball, 4, 12), mark, dog, tree, scaling = constrained, axes = none):
pow := textplot([4, 14, "POW"], align = {above, right}, font = [TIMES, ROMAN, 20]):
frame15 := display(man, translate(ball, 2, 12), dog, tree, pow, scaling = constrained, axes = none):
ball3 := disk([-12,6.5], .5, color = red):
pow := textplot([4, 14, "POW"], align = {above, right}, font = [TIMES, ROMAN, 20]):
man4 := display(rotate(man, (1/8)*Pi, [-2, 0])):
frame16:=display(man4, translate(ball, -2,12), dog, tree, pow, scaling = constrained, axes = none):
man6:=display(rotate(man, (1/4)*Pi, [-2, 0])):
frame17:=display(man6, translate(ball, -6,11), dog, tree, pow, scaling = constrained, axes = none):
man7:=display(rotate(man, (1/2)*Pi, [-2, 0])):
frame18:=display(man7, translate(ball, -12,4.5), dog, tree, pow, scaling = constrained, axes = none):
ball2 := disk([-12, 4.5], .5, color = red):
frame19 := display(man7, ball2, tree, dog, scaling = constrained):
frame20 := display(man7, translate(dog, -3, 0), tree, ball2, scaling = constrained):
frame21 := display(translate(dog, -6, 0), man7, tree, ball2, scaling = constrained):
frame22 := display(translate(dog, -9, 0), man7, tree, ball2, scaling = constrained):
frame23 := display(translate(dog, -13, 0), man7, tree, ball2, scaling = constrained):
frame24 := display(translate(dog, -14, 4), man7, tree, ball2, scaling = constrained):
the := textplot([0, -1, "THE"], align = {below, left}, font = [TIMES, ROMAN, 20]):
frame25 := display(translate(dog, -14, 4), man7, tree, ball3, scaling = constrained):
frame26 := display(translate(dog, -14, 4), man7, tree, ball3, the, scaling = constrained):
ending:=textplot([8,-1, "END"], align = {below, left}, font = [TIMES, ROMAN, 20]):
frame27 := display(translate(dog, -14, 4), man7, tree, ball3, the,scaling = constrained):
frame28:=display(translate(dog, -14,4), man7, tree, ball3,the,ending,scaling = constrained):
frame29:=display(translate(dog, -14,4), man7, tree, ball3,the,ending,scaling = constrained):
display([frame0,frame0,frame0,frame0,frame0,frame0,frame1, frame2, frame3, frame4, frame5, frame6, frame7, frame8, frame9, frame10, frame11, frame12, frame13, frame14, frame15, frame16, frame17, frame18, frame19, frame20, frame21, frame22, frame23, frame24, frame25,frame26,frame27,frame28,frame29,frame29,frame29], insequence = true, scaling = constrained);
# 5 FPS
LUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYjLUkjbWlHRiQ2I1EhRic=