<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>illusion.tex</title>
<meta name="Generator" content="Vim/8.1">
<meta name="plugin-version" content="vim8.1_v1">
<meta name="syntax" content="tex">
<meta name="settings" content="use_css,pre_wrap,no_foldcolumn,expand_tabs,prevent_copy=">
<meta name="colorscheme" content="default">
<style type="text/css">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #ffffff; background-color: #000000; }
body { font-family: monospace; color: #ffffff; background-color: #000000; }
* { font-size: 1em; }
.Constant { color: #ff6060; }
.Special { color: #ff40ff; }
.Statement { color: #ffff00; }
.Comment { color: #8080ff; }
.PreProc { color: #ff40ff; }
-->
</style>
</head>
<body>
<pre id='vimCodeElement'>
<span class="Comment">% ---------------------------------------------------------------------------- %</span>
<span class="Comment">%% \file illusion.tex</span>
<span class="Comment">%% \author Sebastien Beaugrand</span>
<span class="Comment">%% \sa <a href="http://beaugrand.chez.com/">http://beaugrand.chez.com/</a></span>
<span class="Comment">%% \copyright CeCILL 2.1 Free Software license</span>
<span class="Comment">% ---------------------------------------------------------------------------- %</span>
<span class="Statement">\documentclass</span><span class="Special">[</span><span class="Constant">a4paper</span><span class="Special">]{</span><span class="PreProc">article</span><span class="Special">}</span>
<span class="Statement">\usepackage</span><span class="Special">{</span><span class="Special">vmargin</span><span class="Special">}</span>
<span class="Statement">\setmarginsrb</span><span class="Special">{</span><span class="Constant">2cm</span><span class="Special">}{</span><span class="Constant">2cm</span><span class="Special">}{</span><span class="Constant">2cm</span><span class="Special">}{</span><span class="Constant">2cm</span><span class="Special">}{</span><span class="Constant">0cm</span><span class="Special">}{</span><span class="Constant">0cm</span><span class="Special">}{</span><span class="Constant">0cm</span><span class="Special">}{</span><span class="Constant">0cm</span><span class="Special">}</span>
<span class="Statement">\pagestyle</span><span class="Special">{</span>empty<span class="Special">}</span>
<span class="Statement">\usepackage</span><span class="Special">{</span><span class="Special">multido</span><span class="Special">}</span>
<span class="Statement">\usepackage</span><span class="Special">{</span><span class="Special">pstricks</span><span class="Special">}</span>

<span class="PreProc">\begin{document}</span>
<span class="Statement">\newrgbcolor</span><span class="Special">{</span>grey<span class="Special">}{</span>0.71 0.71 0.71<span class="Special">}</span>
<span class="Statement">\def</span><span class="Statement">\w</span><span class="Special">{</span>0.45<span class="Special">}</span>
<span class="Statement">\def</span><span class="Statement">\h</span><span class="Special">{</span>0.3<span class="Special">}</span>
<span class="Statement">\rput</span>(8,-12.35)<span class="Special">{</span><span class="Comment">%</span>
  <span class="Statement">\psframe</span><span class="Special">[</span>linestyle=none,fillstyle=solid,fillcolor=grey<span class="Special">]</span>(-8.5,-8.5)(8.5,8.5)
  <span class="Statement">\SpecialCoor</span>
  <span class="Statement">\degrees</span><span class="Special">[</span>360<span class="Special">]</span>
  <span class="Statement">\qdisk</span>(0,0)<span class="Special">{</span><span class="Constant">0.7mm</span><span class="Special">}</span>
  <span class="Statement">\multido</span><span class="Special">{</span><span class="Special">\i</span>=0+12<span class="Special">}{</span>30<span class="Special">}{</span><span class="Comment">%</span>
    <span class="Statement">\rput</span><span class="Special">{</span><span class="Special">\i</span><span class="Special">}</span>(5.00;<span class="Special">\i</span>)<span class="Special">{</span><span class="Comment">%</span>
      <span class="Statement">\rput</span><span class="Special">{</span> -56.31<span class="Special">}</span>(0,0)<span class="Special">{</span><span class="Comment">% 45+11.31 ou arctan(w/h)</span>
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=white<span class="Special">]</span>(0, <span class="Statement">\h</span>)(<span class="Statement">\w</span>,0)
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=black<span class="Special">]</span>(-<span class="Statement">\w</span>,0)(0,-<span class="Statement">\h</span>)
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=white<span class="Special">]</span>(-<span class="Statement">\w</span>,0)(0, <span class="Statement">\h</span>)
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=black<span class="Special">]</span>(0,-<span class="Statement">\h</span>)(<span class="Statement">\w</span>,0)
      <span class="Special">}</span>
    <span class="Special">}</span>
  <span class="Special">}</span>
  <span class="Statement">\multido</span><span class="Special">{</span><span class="Special">\i</span>=0+10<span class="Special">}{</span>36<span class="Special">}{</span><span class="Comment">%</span>
    <span class="Statement">\rput</span><span class="Special">{</span><span class="Special">\i</span><span class="Special">}</span>(6.25;<span class="Special">\i</span>)<span class="Special">{</span><span class="Comment">%</span>
      <span class="Statement">\rput</span><span class="Special">{</span>-123.69<span class="Special">}</span>(0,0)<span class="Special">{</span><span class="Comment">% 90+45-11.31 ou 180-arctan(w/h)</span>
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=white<span class="Special">]</span>(0, <span class="Statement">\h</span>)(<span class="Statement">\w</span>,0)
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=black<span class="Special">]</span>(-<span class="Statement">\w</span>,0)(0,-<span class="Statement">\h</span>)
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=white<span class="Special">]</span>(-<span class="Statement">\w</span>,0)(0, <span class="Statement">\h</span>)
        <span class="Statement">\psline</span><span class="Special">[</span>linecolor=black<span class="Special">]</span>(0,-<span class="Statement">\h</span>)(<span class="Statement">\w</span>,0)
      <span class="Special">}</span>
    <span class="Special">}</span>
  <span class="Special">}</span>
<span class="Special">}</span>
<span class="PreProc">\end{document}</span>
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->