\documentclass[12pt,a4paper]{article}
\begin{document}
\begin{picture}(500,500)(25,100)
\multiput(0,0)(0,100){8}{
\begin{picture}(500,500)(0,0)
\multiput(0,0)(100,50){5}{\begin{picture}(500,500)(0,0)
\put(0,0){\line(0,1){800}}
\put(0,0){\line(1,0){500}}
\put(0,0){\line(2,3){500}}
\put(0,0){\line(2,1){500}}

\put(0,0){\line(0,-1){800}}
\put(0,0){\line(-1,0){500}}
\put(0,0){\line(-2,-3){500}}
\put(0,0){\line(-2,-1){500}}

\put(0,0){\line(2,-3){500}}
\put(0,0){\line(2,-1){500}}

\put(0,0){\line(-2,3){500}}
\put(0,0){\line(-2,1){500}}
\end{picture}}
\end{picture}}
\end{picture}
\end{document}