[LaTeX] Si possono fare cicli in latex?

[Manuel Toniato]

Ciao a tutti,
ho cominciato a farmi i disegnini per la tesi e non trovando niente di
meglio ho deciso di farli in latex.
Quello che riporto sotto ne è un esempio (è un sottoinsieme del piano
ZxZ). La mia domanda in proposito è banale. Esiste la possibilità di
avere cicli for in latex?
Tanto per non dover fare tanto copia/incolla/sostituisci con espressioni
regolari...

Grazie!
Manuel


\begin{picture}(140,140)

%Griglia
\multiput(0,0)(0,4){31}{\multiput (0,0)(4,0){31}{\circle*{0.1}}}
\thinlines
%Asse z_1
\put(-4,60){\vector(1,0) {132}}
\put(122,52){\makebox(0,0)[bl]{\scriptsize $z_1$}}
%Asse z_2
\put(60,-4){\vector(0,1) {132}}
\put(50,122){\makebox(0,0)[bl]{\scriptsize $z_2$}}


\thicklines
\put(30,120){\line(1,-2){30}}
\thinlines
\put(60,60){\line(1,-2){30}}
\thicklines
\put(60,60){\line(1,-1){60}}
\multiput(32,120)(4,0){16}{\multiput(0,0)(4,-8){8}{\circle*{2}}
\multiput(0,-4)(4,-8){7}{\circle*{2}}}
\multiput(96,120)(4,-8){7}{\circle*{2}}
\multiput(96,116)(4,-8){7}{\circle*{2}}
\multiput(100,120)(4,-8){6}{\circle*{2}}
\multiput(100,116)(4,-8){6}{\circle*{2}}
\multiput(104,120)(4,-8){5}{\circle*{2}}
\multiput(104,116)(4,-8){5}{\circle*{2}}
\multiput(108,120)(4,-8){4}{\circle*{2}}
\multiput(108,116)(4,-8){4}{\circle*{2}}
\multiput(112,120)(4,-8){3}{\circle*{2}}
\multiput(112,116)(4,-8){3}{\circle*{2}}
\multiput(116,120)(4,-8){2}{\circle*{2}}
\multiput(116,116)(4,-8){2}{\circle*{2}}
\put(120,120){\circle*{2}}
\put(120,116){\circle*{2}}
\multiput(60,60)(4,0){16}{\circle*{2}}
\multiput(64,56)(4,0){15}{\circle*{2}}
\multiput(68,52)(4,0){14}{\circle*{2}}
\multiput(72,48)(4,0){13}{\circle*{2}}
\multiput(76,44)(4,0){12}{\circle*{2}}
\multiput(80,40)(4,0){11}{\circle*{2}}
\multiput(84,36)(4,0){10}{\circle*{2}}
\multiput(88,32)(4,0){9}{\circle*{2}}
\multiput(92,28)(4,0){8}{\circle*{2}}
\multiput(96,24)(4,0){7}{\circle*{2}}
\multiput(100,20)(4,0){6}{\circle*{2}}
\multiput(104,16)(4,0){5}{\circle*{2}}
\multiput(108,12)(4,0){4}{\circle*{2}}
\multiput(112,8)(4,0){3}{\circle*{2}}
\multiput(116,4)(4,0){2}{\circle*{2}}
\put(120,0){\circle*{2}}
\end{picture}