%% symbol library for TikZ track schematics
%
% Copyright (c) 2018 - 2022, Martin Scheidt (ISC license)
%
% Permission to use, copy, modify, and/or distribute this file for any purpose with or without fee is hereby granted, provided that the above copyright notice and this permission notice appear in all copies.
%
\ProvidesFileRCS{tikzlibrarytrackschematic.electrics.code.tex}%
%
%%%%%%%%%%%%%%%
% global settings
%%%%%%%%%%%%%%%
\RequirePackage{tikz,etoolbox}%
\usetikzlibrary{calc,intersections,arrows.meta}%
%
%%%%%%%%%%%%%%%
% tikz keys for multiple use
%%%%%%%%%%%%%%%
%
\pgfkeys{%
 /tikz/trackschematic/.is family,%
 /tikz/trackschematic/.cd,%
 %% face
 face/.value required,% forward, backward OR bidirectional
 face/.store in=\face,% forward, backward OR bidirectional
 /tikz/face/.forward to=/tikz/trackschematic/face,%
 /tikz/forward/.code={\pgfkeys{/tikz/trackschematic/face=forward}},%
 /tikz/backward/.code={\pgfkeys{/tikz/trackschematic/face=backward}},%
 /tikz/bidirectional/.code={\pgfkeys{/tikz/trackschematic/face=bidirectional}},%
 %% traffic practice
 traffic practice/.value required,% left OR right
 traffic practice/.store in=\trafficpractice,%
 /tikz/traffic practice/.forward to=/tikz/trackschematic/traffic practice,%
 /tikz/position/.forward to=/tikz/trackschematic/traffic practice,%
 %% label
 shift label/.store in=\labelcoord,% (coord)
 shift label=(none),% DEFAULT
 /tikz/shift label/.forward to=/tikz/trackschematic/shift label,%
}%
\tikzset{traffic practice=right}%
%
\definecolor{ts-signal-blue}{HTML}{013ADF}%
% tikz keys
\pgfkeys{%
 /tikz/trackschematic/electrics/.is family,%
 /tikz/trackschematic/electrics/.cd,%
 %% color hectometer
 signal color/.store in=\signalcolor,%
 signal color=ts-signal-blue,% DEFAULT
 /tikz/electrics signal color/.forward to=/tikz/trackschematic/electrics/signal color,%
}%
%%%%%%%%%%%%%%%%
% symbol distant power off
%%%%%%%%%%%%%%%
%% command
\newcommand\distantpoweroff{}% just for safety
\def\distantpoweroff[#1]#2(#3)#4(#5){% \distantpoweroff[options] at (coord) label (name);
 \pic[#1] at (#3) {distant_power_off={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/distant_power_off/.default=,%
 pics/distant_power_off/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.3) + \facefactor*( 0.45,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0,-0.05) + \facefactor*(-0.1,0)$)%
           ($\trafficfactor*\facefactor*(0,-0.5) + \facefactor*( 0.45,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0, 0.05) + \facefactor*(-0.1,0)$);% symbol
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/distant_power_off/.style args={#1/#2/#3}
 % symbology entry
 symbology_distant_power_off/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \distantpoweroff[forward] at (3,0) label ();%
 },%
}%
%
%%%%%%%%%%%%%%%%
% symbol power off
%%%%%%%%%%%%%%%
%% command
\newcommand\poweroff{}% just for safety
\def\poweroff[#1]#2(#3)#4(#5){% \poweroff[options] at (coord) label (name);
 \pic[#1] at (#3) {power_off={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/power_off/.default=,%
 pics/power_off/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.3) + \facefactor*( 0.5,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0,-0.05) + \facefactor*(-0.1,0)$)%
           ($\trafficfactor*\facefactor*(0,-0.5) + \facefactor*( 0.5,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0, 0.05) + \facefactor*(-0.1,0)$)%
           ($\trafficfactor*\facefactor*(0,-0.3) + \facefactor*( 0.3,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0,-0.2) + \facefactor*( 0.05,0)$);% symbol
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/power_off/.style args={#1/#2/#3}
 % symbology entry
 symbology_power_off/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \poweroff[forward] at (3,0) label ();%
 },%
}%
%
%%%%%%%%%%%%%%%%
% symbol power on
%%%%%%%%%%%%%%%
%% command
\newcommand\poweron{}% just for safety
\def\poweron[#1]#2(#3)#4(#5){% \poweron[options] at (coord) label (name);
 \pic[#1] at (#3) {power_on={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/power_on/.default=,%
 pics/power_on/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.3) + \facefactor*( 0.475,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0,-0.05) + \facefactor*(-0.11,0)$)%
           ($\trafficfactor*\facefactor*(0,-0.5) + \facefactor*( 0.475,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0, 0.05) + \facefactor*(-0.11,0)$);% symbol part1
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.3) + \facefactor*( 0.325,0)$) rectangle%
         ++($\trafficfactor*\facefactor*(0,-0.2) + \facefactor*( 0.05,0)$);% symbol part2
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/power_on/.style args={#1/#2/#3}
 % symbology entry
 symbology_power_on/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \poweron[forward] at (3,0) label ();%
 },%
}%
%
%%%%%%%%%%%%%%%%
% symbol distant pantograph down
%%%%%%%%%%%%%%%
%% command
\newcommand\distantpantographdown{}% just for safety
\def\distantpantographdown[#1]#2(#3)#4(#5){% \distantpantographdown[options] at (coord) label (name);
 \pic[#1] at (#3) {distant_pantograph_down={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/distant_pantograph_down/.default=,%
 pics/distant_pantograph_down/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.23) + \facefactor*( 0.35,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.2)$) -- ++($\facefactor*(-0.05,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.15)$) -- cycle%
           ($\trafficfactor*\facefactor*(0,-0.57) + \facefactor*( 0.45,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.2)$) -- ++($\facefactor*(0.05,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.15)$) -- cycle;% symbol
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/distant_pantograph_down/.style args={#1/#2/#3}
 % symbology entry
 symbology_distant_pantograph_down/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \distantpantographdown[forward] at (3,0) label ();%
 },%
}%
%
%
%%%%%%%%%%%%%%%%
% symbol pantograph down
%%%%%%%%%%%%%%%
%% command
\newcommand\pantographdown{}% just for safety
\def\pantographdown[#1]#2(#3)#4(#5){% \pantographdown[options] at (coord) label (name);
 \pic[#1] at (#3) {pantograph_down={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/pantograph_down/.default=,%
 pics/pantograph_down/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.18) + \facefactor*( 0.4 ,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.03) + \facefactor*( 0.03,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.38)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.03) + \facefactor*(-0.03,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.03) + \facefactor*(-0.03,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.38)$) -- cycle;% symbol
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/pantograph_down/.style args={#1/#2/#3}
 % symbology entry
 symbology_pantograph_down/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \pantographdown[forward] at (3,0) label ();%
 },%
}%
%
%
%%%%%%%%%%%%%%%%
% symbol pantograph up
%%%%%%%%%%%%%%%
%% command
\newcommand\pantographup{}% just for safety
\def\pantographup[#1]#2(#3)#4(#5){% \pantographup[options] at (coord) label (name);
 \pic[#1] at (#3) {pantograph_up={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/pantograph_up/.default=,%
 pics/pantograph_up/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.4 ) + \facefactor*( 0.62,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.03) + \facefactor*(-0.03,0)$) --%
         ++($\facefactor*(-0.38,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.03) + \facefactor*(-0.03,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.03) + \facefactor*( 0.03,0)$) --%
         ++($\facefactor*( 0.38,0)$) -- cycle;% symbol
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/pantograph_up/.style args={#1/#2/#3}
 % symbology entry
 symbology_pantograph_up/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \pantographup[forward] at (3,0) label ();%
 },%
}%
%
%
%%%%%%%%%%%%%%%%
% symbol wire limit
%%%%%%%%%%%%%%%
%% command
\newcommand\wirelimit{}% just for safety
\def\wirelimit[#1]#2(#3)#4(#5){% \wirelimit[options] at (coord) label (name);
 \pic[#1] at (#3) {wire_limit={#2/#4/#5}}% symbol
}%
%%
%% symbol definition
\tikzset{%
 pics/wire_limit/.default=,%
 pics/wire_limit/.style args={#1/#2/#3}{code={%
   %% settings
   \def\coordcommand{#1}% beware of leading and tailing spaces!
   \def\labelcommand{#2}% beware of leading and tailing spaces!
   \def\labelcontent{#3}%
   %% symbol marker
   %
   %% traffic practice setup
   \ifdefstring{\trafficpractice}{left}{% branch
     \pgfmathsetmacro{\trafficfactor}{-1}%
   }{%
     \ifdefstring{\trafficpractice}{right}{% branch
       \pgfmathsetmacro{\trafficfactor}{1}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/trafficcontrol/traffic practice}{“left“ OR “right“ as key required}}%
     }%
   }% end \ifdefstring{\trafficpractice}
   %% face setup
   \ifdefstring{\face}{forward}{% face
     \pgfmathsetmacro{\facefactor}{1}%
     \def\align{left}%
   }{%
     \ifdefstring{\face}{backward}{% face
       \pgfmathsetmacro{\facefactor}{-1}%
       \def\align{right}%
     }{% error message
       \pgfkeys{/errors/unknown choice value={/tikz/trackschematic/face}{“forward“ OR “backward“ as key required}}%
     }%
   }% end \ifdefstring{\face}
   %
   %% signal pole
   \path[draw=foreground,line width=1pt] (0,0) -- ++($\trafficfactor*\facefactor*(0,-0.4)$) -- ++($\facefactor*(0.4,0)$);% signal pole
   %% signal marker
   \path[draw=foreground,line width=0.1pt,double=background,double distance=0.5pt,fill=\signalcolor,rounded corners=0.1pt]%
           ($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.4,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*(-0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.25,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.25) + \facefactor*( 0.25,0)$) -- cycle;% sign
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.25) + \facefactor*( 0.4 ,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*(-0.15,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.15) + \facefactor*( 0.15,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.15) + \facefactor*( 0.15,0)$) -- cycle;% symbol
   \path[fill=\signalcolor]%
           ($\trafficfactor*\facefactor*(0,-0.3 ) + \facefactor*( 0.4 ,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.1 ) + \facefactor*(-0.1 ,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.1 ) + \facefactor*( 0.1 ,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.1 ) + \facefactor*( 0.1 ,0)$) -- cycle;% symbol
   \path[fill=background]%
           ($\trafficfactor*\facefactor*(0,-0.35) + \facefactor*( 0.4 ,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.05) + \facefactor*(-0.05,0)$) --%
         ++($\trafficfactor*\facefactor*(0,-0.05) + \facefactor*( 0.05,0)$) --%
         ++($\trafficfactor*\facefactor*(0, 0.05) + \facefactor*( 0.05,0)$) -- cycle;% symbol
   %% label
   \tikzset{every node/.style={text=foreground,inner sep=1pt}};%
   \ifdefstring{\labelcontent}{}{}{% label NOT empty
     \coordinate (label-coord) at ($\trafficfactor*\facefactor*(0,-0.4)$);%
     \ifdefstring{\labelcoord}{(none)}{}{% initialize if NOT default
       \path let \p1=\labelcoord in coordinate (label-coord) at ($(label-coord)+(\x1,\y1)$);%
     }%
     \node[\align] at (label-coord) {\footnotesize \labelcontent};%
   }%
 }},% END of  pics/wire_limit/.style args={#1/#2/#3}
 % symbology entry
 symbology_wire_limit/.pic = {%
   \maintrack (0,0) -- (6,0);%
   \wirelimit[forward] at (3,0) label ();%
 },%
}%
%
%
%%%%%%%%%%%%%%%
% TODO:
% * documentation
%
%%%%%%%%%%%%%%%
\endinput%
%

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.