1 files changed, 39 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/featpost/example/naoestacionar.mp b/Master/texmf-dist/doc/metapost/featpost/example/naoestacionar.mp
new file mode 100644
index 00000000000..e811368c414
--- /dev/null
+++ b/Master/texmf-dist/doc/metapost/featpost/example/naoestacionar.mp
@@ -0,0 +1,39 @@
+% naoestacionar.mp
+% L. Nobre G.
+% 2008
+
+prologues := 3;
+
+verbatimtex
+\documentclass{article}
+\usepackage{palatino}
+\begin{document}
+etex
+
+beginfig(1);
+        numeric stampnum, initang, i, stepang, stampoffset, amplfactor;
+        picture stamp;
+        bboxmargin := 9mm;
+        stampnum = 36;
+        stampoffset = 0.92mm;
+	amplfactor = 20;
+        label.urt( btex \begin{tabular}{c}
+	  N\~{A}O \\
+	  estacionar
+	  \end{tabular} etex scaled amplfactor, origin );
+        stamp = currentpicture;
+        unfill bbox stamp;
+        initang = 180/stampnum;
+        stepang = 2*initang;
+        drawoptions();
+        for i=0 upto (stampnum-1):
+            draw stamp shifted (stampoffset*dir(initang+i*stepang));
+        endfor;
+        undraw stamp;
+endfig;
+
+verbatimtex
+\end{document}
+etex
+
+end.