with(plots): with(plottools):

head:=disk([3,4],.5,color="DeepSkyBlue"):

lines:= plot([ [3,1],[3,4] ],thickness=5,color="DeepSkyBlue"):

arm1:=plot([[2,2],[3,3],[4,2]],color="DeepSkyBlue",thickness=5):

legs:=plot([[2.5,-1],[3,1],[3.5,-1]],color="white",thickness=5):

background:=polygon([[-5,-5],[-5,15],[35,15],[35,-5]],color=green):

legs_red:=plot([[2.5,-1],[3,1],[3.5,-1]],color="red",thickness=5):

smurf1:=display(head,lines,arm1,legs):

smurf2:=display(translate(smurf1,-5,0)):

smurf3:=display(translate(smurf1,-2.5,0)):

smurf_dress:=polygon([[3,3],[2.5,0],[3.5,0]],color=white):

neck:= plot([ [3,3],[3,4] ],thickness=5,color="DeepSkyBlue"):

legs_blue:=plot([[2.5,-1],[2.75,0],[3.25,0],[3.5,-1]],color="DeepSkyBlue",thickness=5):

smurf4a:=display(smurf_dress,head,arm1,neck,legs_blue):

hair1:=sector([6,4], .75, 0..Pi, color=yellow,style=polygon):

hair2:=polygon([[5.25,4],[6.75,4],[6.75,3],[5.25,3]],color=yellow,style=polygon):

rect:=polygon([[10,0],[10,15],[1,15],[1,0]],color=black):

smurf4:=display(translate(smurf4a,3,0),hair1,hair2):

smurf5a:=display(head,lines,arm1,legs_red):

smurf5:=display(translate(smurf5a,5.5,0)):

smurfs:=display(smurf1,smurf2,smurf3,smurf4,smurf5):

f1:=display(smurfs,background):

f2:=display(translate(smurfs, 1, 0), background):

f3:=display(translate(smurfs, 2, 0), background):

f4:=display(translate(smurfs, 3, 0), background):

f5:=display(translate(smurfs, 4, 0), background):

f6:=display(translate(smurfs, 5, 0), background):

f7:=display(translate(smurfs, 6, 0), background):

f8:=display(translate(smurfs, 7, 0), background):

f9:=display(translate(smurfs, 8, 0), background):

f10:=display(translate(smurfs, 9, 0), background):

f11:=display(translate(smurfs, 10, 0), background):

f12:=display(translate(smurfs, 11, 0), background):

f13:=display(translate(smurfs, 12, 0), background):

f14:=display(translate(smurfs, 13, 0), background):

f15:=display(translate(smurfs, 14, 0), background):

f16:=display(translate(smurfs, 15, 0), background):

f17:=display(translate(smurfs, 16, 0), background):

f18:=display(translate(smurfs, 17, 0), background):

f19:=display(translate(smurfs, 18, 0), background):

f20:=display(translate(smurfs, 19, 0), background):

f21:=display(translate(smurfs, 20, 0), background):

f22:=display(translate(smurfs, 21, 0), background):

f23:=display(translate(smurfs, 22, 0), background):

f24:=display(translate(smurfs, 23, 0),background):

foot1:=(disk([3,3],1,color=brown)):

foot1:=(disk([3,-1],1,color=brown)):

foot2:=translate(foot1,4,0):

brainy:=textplot([22,10,"AAAAAHHHHH Gargameale!!!!!!!"],font=[Times,bold,12]):

f25:=display(brainy,rect,foot1,foot2,translate(smurfs, 24, 0),background):

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,f25,f25,f25], insequence=true, axes=none, scaling=constrained);

(*speed 5*)