restart:with(plots):with(plottools): howard_p jellyfish in the sea body:=ellipse([8,1],1,2.3,filled=true,color=lightpink): display(body,scaling=constrained): line1:=[[6.2,0],[6.75,-4.5]]: line2:=[[6.25,0],[7,-5.3]]: line3:=[[6.5,0],[7.15,-4.7]]: line4:=[[6.75,0],[7.5,-3.4]]: line5:=[[7,0],[7.95,-5.1]]: line6:=[[7.35,.3],[8.05,-3.6]]: line7:=[[7.60,.3],[8.45,-5.8]]: line8:=[[7.90,.58],[8.65,-4.3]]: line9:=[[8.25,.6],[9,-4.5]]: line10:=[[8.45,.68],[9.3,-3.8]]: line11:=[[8.8,.91],[9.6,-3.7]]: line12:=[[9.1,1.2],[9.8,-4.7]]: line13:=[[9.3,1.42],[10.05,-5.6]]: line14:=[[9.45,1.53],[10.35,-6]]: line15:=[[9.59,1.75],[10.55,-4.8]]: line16:=[[9.7,1.9],[10.75,-4.6]]: background:=rectangle([-5,12.5],[12,-5],color=dodgerblue): body2:=translate(rotate(body,-Pi/3,[5.5,1]),1,2.6): lines:=plot([line1,line2,line3,line4,line5,line6,line7,line8,line9,line10,line11,line12,line13,line14,line15,line16],color=[pink,plum,lavenderblush,mistyrose,plum,lightpink,palevioletred,pink,lavenderblush,lightpink,mistyrose,palevioletred,palevioletred,lightpink,mistyrose,lavenderblush]): jellyfish:=display([body2,lines,background]): jellyfish1:=display([body2,lines]): p1:=translate(jellyfish1,-.2,.2): p2:=translate(p1,-.3,.3): p3:=translate(p2,-.3,.3): p4:=translate(p3,-.3,.3): p5:=translate(p4,-.3,.3): p6:=translate(p5,-.3,.3): p7:=translate(p6,-.3,.3): p8:=translate(p7,-.4,.3): p9:=translate(p8,-.4,.3): p10:=translate(p9,-.4,.5): p11:=translate(p10,-.4,.5): p12:=translate(p11,-.4,.2): p13:=translate(p12,-.4,.2): p14:=translate(p13,-.4,.2): p15:=translate(p14,-.4,.2): p16:=translate(p15,-.4,.2): p17:=translate(p16,-.4,.2): p18:=translate(p17,-.4,.2): p19:=translate(p18,-.4,.2): p20:=translate(p19,-.4,.2): p21:=translate(p20,-.4,.2): p22:=translate(p21,-.4,.2): p23:=translate(p22,-.4,.2): p24:=translate(p23,-.4,.2): p25:=translate(p24,-.4,.3): p26:=translate(p25,-.4,.3): p27:=translate(p26,-.4,.3): p28:=translate(p27,-.4,.3): p29:=translate(p28,-.4,.3): display([p29,background]): background2:=rectangle([-5,12.5],[12,-5],color=dodgerblue): p42:=(p1): sand:=rectangle([-5,-3],[12,-5],color=blanchedalmond): grass:=line([-3,0],[-2,-3],color=seagreen,thickness=6): grass1:=line([-2.5,.5],[-2,-3],color=seagreen,thickness=7): grass2:=line([-1,-.25],[-2,-3],color=seagreen,thickness=6): rock:=ellipse([6,-3],2,1.5,filled=true,color=lightslategray): xmark:=plot([[-.5,-1.5],[2.2,-3.5]],color=black): xmark2:=plot([[2.2,-1.5],[-.5,-3.5]],color=black): xmark3:=display([xmark,xmark2]): p31:=(xmark3,grass,grass1,grass2,sand,rock,background): p32:=(xmark3,grass,grass1,grass2,sand,rock,background): p33:=(xmark3,grass1,grass2,sand,rock,background): p34:=(xmark3,grass1,grass2,sand,rock,background): p35:=(xmark3,grass1,grass2,sand,rock,background): p36:=(xmark3,grass1,grass2,sand,rock,background): p37:=(xmark3,grass1,grass2,sand,rock,background2,background): p38:=(xmark3,grass1,grass2,sand,rock,background2,background): p39:=(xmark3,grass1,grass2,sand,rock,background2,background): p40:=(xmark3,grass1,grass2,sand,rock,background2,background): p41:=(xmark3,grass1,grass2,sand,rock,background2,background): bottle:=rectangle([0,10],[1.5,12],color=red): trashname:=textplot([0,-3,coke],color=white): bottle2:=translate(rotate(bottle,-Pi/4,[.75,11]),0,-14): trashname2:=rotate(trashname,-Pi/2,[.7,-3.2]): message:=textplot([[-3,10,help],[0,10,keep],[3,10,the],[6,10,ocean],[9.8,10,clean],[3,6,"by"],[0,3,picking],[3.5,3,up],[7,3,plastics]],font=[times,roman,30],color=green): test:=display([p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12,p13,p14,p15,p16,p17,p18,p19,p20,p21,p22,p23,p24,p25,p26,p27,p28,p29,p31,p32,p33,p34,p35,p36,p37,p38,p39,p40,p41,p42],insequence=true,scaling=constrained,axes=none): test2:=display([test,message,grass,grass1,grass2,sand,rock,trashname2,bottle2,background]); speed 4