摘自pst-node
第 39 页的文档:
这个非常简短的描述并\getnodelist
不能帮助我(也许其他人也一样)了解如何使用它。
您能给我一个如何使用\getnodelist
非空的例子<next command>
吗?
答案1
从来源来看pst-node.tex
,
\getnodelist{<name>}{\command}(…)(…)…
和
\getnodelist{<name>}{}(…)(…)… \command
即使在后一个例子中,您也可以毫无问题地使用\PST@root
(= <name>
) 和\pst@args
(保存最新节点的编号)。<name>
第一个版本强制采用更系统的结构(例如\command
明确使用以下节点)。在其他地方使用它可能会产生意外结果。
请考虑以下示例:
\documentclass[pstricks]{standalone}
\usepackage{pstricks,multido,pst-node}
\makeatletter
\def\myCircles#1{%
\multido{\iCount=0+1}{\the\numexpr\pst@args+1\relax}{
\pscircle*(\PST@root\iCount){#1}
}
}
\makeatother
\begin{document}
\begin{pspicture}(7,7)
\getnodelist{P}{\myCircles{.25}}(2,2)(2,5)(5,2)(5,5)
\end{pspicture}
\begin{pspicture}(7,7)
\getnodelist{P}{}(2,2)(2,5)(5,2)(5,5)\myCircles{.25}
\end{pspicture}
\end{document}
没有区别。它们产生完全相同的结果。
但是如果你想提供一个自己的宏,比如说\pstDottedNodes
,你作为这个宏的作者\pstDottedNodes
就没有机会在前面加上\myCircles
。(当你想对<name>
用户隐藏内部的 s 并且\pstDottedNodes
只有一个参数(半径)时,它会变得更加清晰。)
\documentclass[pstricks]{standalone}
\usepackage{pstricks,multido,pst-node}
\makeatletter
\def\pstDottedNodes#1#2{\getnodelist{#1}{\myCircles{#2}}}
\def\myCircles#1{%
\multido{\iCount=0+1}{\the\numexpr\pst@args+1\relax}{
\pscircle*(\PST@root\iCount){#1}
}
}
\makeatother
\begin{document}
\begin{pspicture}(7,7)
\pstDottedNodes{P}{.25}(2,2)(2,5)(5,2)(5,5)
\end{pspicture}
\end{document}
答案2
这是一个简单的例子,它回答了如何根据一系列点绘制(封闭)多边形的问题:
\documentclass{article}
\usepackage{multido,pst-node}% http://ctan.org/pkg/{multido,pst-node}
\makeatletter
\newcounter{mycount}
\newcommand{\drawpolygon}{%
\setcounter{mycount}{\csname\PST@root nodecount\endcsname}% Extract number of nodes
\stepcounter{mycount}\pnode(\PST@root 0){\PST@root\themycount}% Add extra node that matches origin node (for closed polygon)
\multido{\iA=0+1,\iB=1+1}{\value{mycount}}{%
\psline(\PST@root\iA)(\PST@root\iB)\psdot(\PST@root\iA)}% Draw line + dot
}
\makeatother
\begin{document}
\begin{pspicture}
\SpecialCoor
\getnodelist{P}{\drawpolygon}(1,1)(2,1)(2,2)(1,2)
\degrees[5]
\rput{0}(4,2){\getnodelist{Q}{\drawpolygon}(1;0)(1;1)(1;2)(1;3)(1;4)}
\end{pspicture}
\end{document}
这个想法是用来\getnodelist
调用\drawpolygon
后指定一组节点。每个节点都有一个根名称( 的第一个参数\getnodelist
),存储在 中\PST@root
。
答案3
经过一些修改的 Werners 解决方案:
\documentclass{article}
\usepackage{multido,pst-node}
\newcommand\drawpolygon[1]{{%
\psset{showpoints}
\multido{\iA=0+1}{\csname#1nodecount\endcsname}{%
\psline(#1\iA)(#1\the\numexpr\iA+1)}
\psline(#1 0)(#1\csname#1nodecount\endcsname)}}
\begin{document}
\begin{pspicture}
\getnodelist{P}{\drawpolygon{P}}(1,1)(2,1)(2,2)(1,2)
\degrees[5]
\rput{0}(4,2){\getnodelist{Q}{\drawpolygon{Q}}(1;0)(1;1)(1;2)(1;3)(1;4)}
\end{pspicture}
\end{document}
答案4
\documentclass[border=12pt]{standalone}
\usepackage{multido,pst-node}
\makeatletter
\newcommand\psPolygon[2][my@pst@node@name]{\getnodelist{#1}{\my@Polygon{#2}}}
\def\my@Polygon#1{%
\pscustom[#1]
{
\psnline{-}(0,\csname\PST@root nodecount\endcsname){\PST@root}
\closepath
}
\multido{\i=0+1}{\the\numexpr\pst@args+1\relax}{%
\pscircle*(\PST@root\i){2pt}
}\ignorespaces
}
\makeatother
\begin{document}
\begin{pspicture}(5,5)
\psPolygon{fillstyle=solid,fillcolor=orange,origin={2.5,2.5}}(0,0)(5,0)(5,5)(0,5)
\end{pspicture}
\qquad
\begin{pspicture}(-2,-2)(2,2)
\degrees[5]
\psPolygon[Karl]{fillstyle=solid,fillcolor=orange}(1;0)(1;1)(1;2)(1;3)(1;4)
\psline(Karl0)(Karl2)
\end{pspicture}
\end{document}