diff options
Diffstat (limited to 'macros/latex/contrib/epic/picman-fig2.tex')
-rw-r--r-- | macros/latex/contrib/epic/picman-fig2.tex | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/macros/latex/contrib/epic/picman-fig2.tex b/macros/latex/contrib/epic/picman-fig2.tex new file mode 100644 index 0000000000..815a8a4987 --- /dev/null +++ b/macros/latex/contrib/epic/picman-fig2.tex @@ -0,0 +1,32 @@ +\xjunk=60 \yjunk=3 +\loop +\drawline(0,0)(\xjunk,\yjunk) +\drawline(0,0)(-\xjunk,\yjunk) +\drawline(0,0)(\xjunk,-\yjunk) +\drawline(0,0)(-\xjunk,-\yjunk) +\put(\xjunk,\yjunk){\plotchar} +\put(-\xjunk,\yjunk){\plotchar} +\put(\xjunk,-\yjunk){\plotchar} +\put(-\xjunk,-\yjunk){\plotchar} +\put(\xjunk,\yjunk){\makebox(8,0)[l]{\ \ (\number\xjunk,\number\yjunk)}} +\put(-\xjunk,\yjunk){\makebox(-4,0)[r]{(\number-\xjunk,\number\yjunk)}} +\put(\xjunk,-\yjunk){\makebox(8,0)[l]{\ \ (\number\xjunk,\number-\yjunk)}} +\put(-\xjunk,-\yjunk){\makebox(-4,0)[r]{(\number-\xjunk,\number-\yjunk)}} +\ifnum\yjunk < 53 \advance\yjunk by 10 %will go till 53. +\repeat +\xjunk=3 \yjunk=60 +\loop +\drawline(0,0)(\xjunk,\yjunk) +\drawline(0,0)(-\xjunk,\yjunk) +\drawline(0,0)(\xjunk,-\yjunk) +\drawline(0,0)(-\xjunk,-\yjunk) +\put(\xjunk,\yjunk){\plotchar} +\put(-\xjunk,\yjunk){\plotchar} +\put(\xjunk,-\yjunk){\plotchar} +\put(-\xjunk,-\yjunk){\plotchar} +\put(\xjunk,\yjunk){\makebox(0,7)[t]{(\number\xjunk,\number\yjunk)}} +\put(-\xjunk,\yjunk){\makebox(0,5)[t]{(\number-\xjunk,\number\yjunk)}} +\put(\xjunk,-\yjunk){\makebox(0,-4)[t]{(\number\xjunk,\number-\yjunk)}} +\put(-\xjunk,-\yjunk){\makebox(0,-6)[t]{(\number-\xjunk,\number-\yjunk)}} +\ifnum\xjunk < 53 \advance\xjunk by 10 +\repeat |