restart:with(plots):with(plottools):
square:=polygon([[0,0],[0,2],[2,2],[2,0],[0,0]],color="green"):
pic1:=polygon([[2,0],[2,2],[3,3],[3,1],[2,0]],color="green"):
pic2:=polygon([[0,2],[2,2],[3,3],[1,3],[0,2]],color="green"):
face:=polygon([[0.4,1.6],[0.8,1.6],[0.8,1.2],[1.2,1.2],[1.2,1.6],[1.6,1.6],[1.6,1.2],[1.2,1.2],[1.2,0.8],[1.4,0.8],[1.4,0.4],[1.2,0.4],[1.2,0.6],[0.8,0.6],[0.8,0.4],[0.6,0.4],[0.6,0.8],[0.8,0.8],[0.8,1.2],[0.4,1.2],[0.4,1.6]],color=black):
creeper:=display(face,pic1,pic2,square):
creeper1:=scale(creeper,1.1,1.1,[1,1]):
creeper2:=scale(creeper,1.2,1.2,[1,1]):
creeper3:=scale(creeper,1.3,1.3,[1,1]):
creeper4:=scale(creeper,1.4,1.4,[1,1]):
creeper5:=scale(creeper,1.5,1.5,[1,1]):
bigBlackRectangle:=polygon([[-1,-1],[5,-1],[5,5],[-1,5],[-1,-1]],color=black):
bigwhiterectangle:=polygon([[-1,-1],[5,-1],[5,5],[-1,5],[-1,-1]],color=white):
display([creeper,creeper1,creeper2,creeper3,creeper4,creeper5,bigBlackRectangle,bigwhiterectangle,bigBlackRectangle,bigwhiterectangle,bigBlackRectangle,bigwhiterectangle,bigBlackRectangle,bigwhiterectangle,bigBlackRectangle,bigwhiterectangle], insequence=true, axes=none);