<table cellspacing='0' cellpadding='0' border='0' background='none' style='font-family:arial;font-size:10pt;color:rgb(51, 51, 51);background-color:rgb(255, 255, 255);width:100%;'><tr><td valign='top' style='font: inherit;'>Thanks for your help but...<br><br>I just Copied and Pasted Herbert Voss code:<br><br>%%%<br>\documentclass{article}<br><pre>\usepackage{pstricks-add}<br>\usepackage{multido}<br><br>\makeatletter<br>\def\psThomae{\<a href="http://tug.org/mailman/listinfo/pstricks">pst at object</a>{psThomae}}<br>\def\<a href="http://tug.org/mailman/listinfo/pstricks">psThomae at i</a>(#1,#2){%<br>   \<a href="http://tug.org/mailman/listinfo/pstricks">begin at ClosedObj</a><br>   \<a href="http://tug.org/mailman/listinfo/pstricks">addto at pscode</a>{<br>     \<a href="http://tug.org/mailman/listinfo/pstricks">psk at dotsize</a><br>     1 1 500 {<br>       dup<br>       /ipSave ED<br>       /ip ED<br>       1 1 500 {<br>         dup<br>         /iqSave
 ED<br>         /iq ED<br>         {<br>           iq 0 le { exit } if<br>           ip iq mod<br>           /ip iq def<br>           /iq ED<br>         } loop<br>         ip 1 eq {<br>           \<a href="http://tug.org/mailman/listinfo/pstricks">psk at dotsize</a><br>           \@nameuse{psds@\<a href="http://tug.org/mailman/listinfo/pstricks">psk at dotstyle</a>}<br>           \<a href="http://tug.org/mailman/listinfo/pstricks">pst at usecolor</a>\pslinecolor ipSave iqSave div 1 iqSave div <br>\<a href="http://tug.org/mailman/listinfo/pstricks">tx at ScreenCoor</a><br>           2 copy moveto Dot<br>         } if<br>       } for<br>     } for<br>   }%<br>   \<a href="http://tug.org/mailman/listinfo/pstricks">end at ClosedObj</a>%<br>}<br><br>\makeatother<br><br>\begin{document}<br>\begin{center}<br>   \psset{unit=4cm,dotsize=1pt 0}<br>   \begin{pspicture}(2.5,1.5)<br>     \psaxes{-&gt;}(0,0)(2.5,1.5)<br>     \psThomae(0,2)<br>  
 \end{pspicture}<br>\end{center}<br><br>\end{document}<br>%%%<br><br>and I get:<br>"This is pdfTeX, Version 3.141592-1.40.4 (MiKTeX 2.7) (preloaded format=latex 2008.1.4)  11 JUN 2008 17:47<br>entering extended mode<br>**Thomae's*Function.tex<br>("Thomae's Function.tex"<br>LaTeX2e &lt;2005/12/01&gt;<br>"Use of \psThomae doesn't match its definition.<br>l.45      \psThomae(<br>                    0,2)<br>If you say, e.g., `\def\a1{...}', then you must always<br>put `1' after `\a', since control sequence names are<br>made up of letters only. The macro here has not been<br>followed by the required stuff, so I'm ignoring it."<br></pre>I don't understand anything of the above code so I have no idea of whats going on...<br><br>Using Jean-Côme Charpentier I only get 100 error messages!!!<br><br>Thank you all again anyway.<br><br>Sebas<br><br></td></tr></table><br>__________________________________________________<br>Correo Yahoo!<br>Espacio para todos tus
 mensajes, antivirus y antispam ¡gratis! <br>¡Abrí tu cuenta ya! - http://correo.yahoo.com.ar