PicTeX: Wie erstelle ich Legende für ein Diagramm?

[JuL!]

Liebe Texgemeinde,

ich habe das Problem, dass ich in PicTeX folgendes Diagramm entworfen habe, aber keine Ahnung habe, wie ich hier ein gescheite Legende hinzufügen kann:

% Common
\documentclass[a4paper, 10pt, twoside]{report}
\usepackage[latin1]{inputenc}
\usepackage{graphicx}
\usepackage{pictex}
\usepackage{color} % color text and bars


\begin{document}

\beginpicture

\definecolor{light}{gray}{0.85}
\definecolor{dark}{gray}{0.45}

\setcoordinatesystem units <1mm,2mm>

\setplotarea x from -10 to 70, y from 0 to 25
\plotheading {\scriptsize \bf Übersicht zu sets}

\setcoordinatesystem units <1mm,2mm>
\setplotarea x from 0 to 70, y from 0 to 25

\axis left label {\rotatebox{90}{\tiny{number}}} 
	ticks 
	short
	unlabeled from 1 to 25 by 1
	long
	numbered from 0 to 25 by 5 
 /


\axis bottom
%label {Other}
	ticks
	short
	unlabeled from 0 to 70 by 14 /

\setbars <0mm,0mm> breadth <0mm> 
baseline at y = 0
baselabels ([B] <-7mm,-5mm>)

\plot 14 0 "\tiny{set1}" 	
	28 0 "\tiny{set2}" 
	42 0 "\tiny{set3}" 
	56 0 "\tiny{set4}" 
	70 0 "\tiny{set5}" 
/


% both bars:
\linethickness3mm

% === Bar 1 ===
\setbars breadth <0mm> baseline at y = 0.1 endlabels ([B] <0mm,1mm>)
\color{black}
\plot 
	5.4 13 "\tiny{13}"
	19.4 21 "\tiny{21}"
	33.4 12 "\tiny{12}"	
	47.4 11 "\tiny{11}"	
	61.4 19 "\tiny{19}"
/

% === Bar 2 ===
\color{light}
\setbars breadth <0mm> baseline at y = 0.1 endlabels ([B] <0mm,1mm>)
\plot
	8.5 11 "\textcolor{black}{\tiny{11}}" 
	22.5 22 "\textcolor{black}{\tiny{22}}" 	
	36.5 13 "\textcolor{black}{\tiny{13}}" 
	50.5 3 "\textcolor{black}{\tiny{3}}" 
	64.5 10 "\textcolor{black}{\tiny{10}}" 
/


\endpicture

\end{document}

Ich habe mal versucht Mehrzeiligen Text einzufügen via

\put{\lines[l]{Typ 1 \cr Typ 2}}[tr] 70 25

aber da fehlt noch das Bild und dass ist die totale Frickelei. Ich habe mal ein Bild angefügt, was verdeutlichen soll, was ich meine. Die roten Objekte sind die gewünschten Elemente:

[JuL!]

Habe jetzt nach langen versuchen eine Lösung gefunden:

...
\usepackage{amssymb}
...

\setplotarea ...

% LEGEND
\put {\parbox{20mm}{
{\color{light} $\blacksquare$} Eintrag 1 \\
$\blacksquare$ Eintrag 2}} [tl] at 80 70

\plotheading ...