Question: Maple plot - graph names

Hi guys! 

I'm going to plot:

plote1 := spacecurve(e1(theta),theta=a1..b1,color=red):
plote1p := plot(e1plan(theta),theta=Pi/4..Pi/2,color=red):
plote2 := spacecurve(e2(theta),theta=a2..b2,color=blue):
plote2p := plot(e2plan(theta),theta=0..Pi,color=blue):
plote3 := spacecurve(e3(theta),theta=a3..b3,color=yellow):
plote3p := plot(e3plan(theta),theta=0..3*Pi/2,color=yellow):
A := array(1..2):
A[1] := display(C,plote3,plote1,plote2,orientation=[60,75],axes=box):
A[2] := display(plote3p,plote2p,plote1p,caption="(theta,z)-planen (cylinderen skåret op)"):
display(A);

 My question is: How do I get Maple to make a box next to the plot that tells which graph belongs to which color? 

 

Thanks in advance!

Please Wait...