restart;with(plots):with(plottools):
dogp1:=polygon([[3,6], [1,4], [5,4], [6,5.5], [6.5,5], [7,5], [7,4], [8,4], [8,3.25], [7,3.25], [6,2], [6,0.5], [6.5,0.5], [6.5,0], [5,0], [5,2], [2,2], [2,0.5], [2.5,0.5], [2.5,0], [1,0], [1,3], [0.5,4], [2.5,6], [3,6]],color=maroon):
eye:=disk([6.5,4.5],.1, color=blue):
tree:=polygon([[16,0], [17,1], [17,8], [9,8], [9,9], [17,9], [17,12], [20,12], [20,1], [21,0], [16,0]],color="Chocolate"):
cathead:=polygon([[9.3,10.5], [10.5,10], [11.5,10], [12.2,10.5], [12.5,10], [12.5,9], [9.5,9], [9.3,10]],color="black"):
eyebrows:=plot([[10.5,10], [11,9.5], [11.5,10]],color="Grey"):
righteye:=disk([10.5,9.7],.2,color="Red"):
lefteye:=disk([11.5,9.7], .2, color="Red"):
catmouth:=plot([[10.5,9.4], [11.5,9.4], [12,9.5]], color="Grey"):
fang:=polygon([[11.2,9.4], [11.4,9.2], [11.5,9.4]], color="White"):
catbody:=polygon([[12.5,10], [15,9.95], [14,11], [14.5,11], [15,10], [15,9], [12.5,9]], color="Black"):
arms:=plot([[12.5,10], [12.5,9], [14.5,9], [15,9], [15,9.5], [14,9.5], [13.5,9], [13,9], [13,9.5], [12.5,9.5], [12.5,10]], color="Grey"):
dogp2:=polygon([[11,6], [9,4], [13,4], [14,5.5], [14.5,5], [15,5], [15,4], [16,4], [16,3.25], [15,3.25], [14,2], [14,0.5], [14.5,0.5], [14.5,0], [13,0], [13,2], [10,2], [10,0.5], [10.5,0.5], [10.5,0], [9,0], [9,3], [8.5,4], [10.5,6], [11,6]],color=maroon):
eye2:=disk([14.5,4.5],.1, color=blue):
haha:=textplot([12.7,12,"HAHA YOU CAN'T GET ME!"]):
dogmouth:=polygon([[15,3.25], [15.75,2.75], [15.75,2.60], [15,3.25]], color="Maroon"):
bark:=textplot([12,7,"RUFF,RUFF,RUFF!"]):
p1:=display(eye,dogp1,tree,eyebrows,righteye,lefteye,catmouth,fang,cathead,arms,catbody):
p2:=display(eye2,dogp2,dogmouth,tree,eyebrows,righteye,lefteye,catmouth,fang,cathead,arms,catbody,bark,haha):
display([p1,p2],insequence=true,scaling=constrained,axes=none);
#speed = 1