% tkz-obj-eu-polygons.tex % Copyright 2020 Alain Matthes % This work may be distributed and/or modified under the % conditions of the LaTeX Project Public License, either version 1.3 % of this license or (at your option) any later version. % The latest version of this license is in % http://www.latex-project.org/lppl.txt % and version 1.3 or later is part of all distributions of LaTeX % version 2005/12/01 or later. % % This work has the LPPL maintenance status “maintained”. % % The Current Maintainer of this work is Alain Matthes. % utf8 encoding \def\fileversion{3.06c} \def\filedate{2020/03/18} \typeout{2020/03/18 3.06c tkz-obj-eu-polygons.tex} \makeatletter %<--------------------------------------------------------------------------–> % Polygon %<--------------------------------------------------------------------------–> %<---------------------------- Draw --------------------------------–> % %<--------------------------------------------------------------------------–> \def\tkzDrawPolygon{\pgfutil@ifnextchar[{\tkz@DrawPolygon}{% \tkz@DrawPolygon[]}} \def\tkz@DrawPolygon[#1](#2,#3){% \begingroup \draw[line style,#1] (#2) \foreach \pt in {#2,#3}{--(\pt)}--cycle;% \endgroup } %<---------------------------- FILL --------------------------------–> % %<--------------------------------------------------------------------------–> \def\tkzFillPolygon{\pgfutil@ifnextchar[{\tkz@FillPolygon}{% \tkz@FillPolygon[]}} \def\tkz@FillPolygon[#1](#2,#3){% \begingroup \fill[#1] (#2) \foreach \pt in {#2,#3}{--(\pt)}--cycle;% \endgroup } %<--------------------------------------------------------------------------–> \def\tkzDrawSquare{\pgfutil@ifnextchar[{\tkz@DrawSquare}{\tkz@DrawSquare[]}} \def\tkz@DrawSquare[#1](#2,#3){% \begingroup \tkzDefSquare(#2,#3) \tkzDrawPolygon[#1](#2,#3,tkzFirstPointResult,tkzSecondPointResult) \endgroup } %<--------------------------------------------------------------------------–> \def\tkzDrawRectangle{\pgfutil@ifnextchar[{\tkz@DrawRectangle}% {\tkz@DrawRectangle[]}} \def\tkz@DrawRectangle[#1](#2,#3){% \begingroup \draw[#1](#2) -| (#3) -| (#2); \endgroup } %<-------------------------- gold rectangle -------------------------------–> % %<--------------------------------------------------------------------------–> \def\tkz@DrawGoldRectangle[#1](#2,#3){ \begingroup \tkzDefGoldRectangle(#2,#3) \tkzDrawPolygon[#1](#2,#3,tkzFirstPointResult,tkzSecondPointResult) \endgroup } %<-------------- Labels for Regular Polygon -------------------------–> % %<--------------------------------------------------------------------------–> \pgfkeys{/deflabelregpoly/.cd, name/.store in = \tkz@regpolname, sep/.store in = \tkz@regpolsep, name = P, sep = 1.1 } \def\tkzLabelRegPolygon{\pgfutil@ifnextchar[{\tkz@labelPolygon}{% \tkz@labelPolygon[]}} \def\tkz@labelPolygon[#1](#2)#3{% \begingroup \pgfqkeys{/deflabelregpoly}{#1} \foreach \v [count=\vi from 1] in {#3} {% \path (#2) to [pos=1.1] node {$\v$} (\tkz@regpolname\vi) ; \pgfnodealias{\v}{\tkz@regpolname\vi} } \endgroup } \makeatother \endinput