\setlength{\unitlength}{0.75cm}
\referencesystem(0,0)(1,0)(0.25,0.75)
\begin{Picture}(-4.5,-4.5)(4.5,4.5)
\externalaxes
\cartesiangrid(-4,-4)(4,4)
\linethickness{1pt}
\pictcolor{blue}
\Polyline(-2,2)(-3,-1)(0,0)(2,3)(2,2)
\pictcolor{red}
\Polygon(0,0)(1,1)(3,1)(1,-1)
\end{Picture}
