pro legend_multi, Names, Colors
common GraphC, Graph, GraphN, Item

    xy = Graph[GraphN].lp.region
    y0 = xy[1] + (xy[3] - xy[1])/2. + 0.02*(N_elements(Names)-1)/2
 
   for i = 0, N_elements(Names)-1 do $
      xyouts, xy[2]+0.02, y0-0.03*i ,Names[i], /NORMAL, charsize=graph[GraphN].Lp.charsize*0.8, color=Colors[i]    
 
return
end