summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/tkz/tkz-elements/latex/tkz-elements.sty
blob: a147a045aaf3f1cf5a02451ac14de75b791c45d5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
% encoding : utf8 
% tkz-elements v1.00b
% Copyright 2023  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.

\ProvidesPackage{tkz-elements}[2023/10/20 v1.00b Graphic Object Library]
\RequirePackage{luacode}
\RequirePackage{filecontents}
\directlua{require "tkz_elements_main"}

\newenvironment{tkzelements}
  {\directlua{scale=1}
   \luacode}
  {\endluacode}
\def\tkzGetNodes{\directlua{%
   for K,V in pairs(z) do
      local KS,n,sd,ft
      KS = tostring(K)
      n = string.len(KS)
      if n >1 then
      _,_,ft, sd = string.find( KS , "(.+)(.)" )  
     if sd == "p" then   K=ft.."'" end  
       end    
  tex.print("\\coordinate ("..K..") at ("..V.re..","..V.im..") ;\\\\")
end}
}
\endinput