| Current File : //usr/share/texlive/texmf-dist/tex/generic/pgf/modules/pgfmoduleanimations.code.tex |
% Copyright 2019 by Till Tantau
%
% This file may be distributed and/or modified
%
% 1. under the LaTeX Project Public License and/or
% 2. under the GNU Public License.
%
% See the file doc/generic/pgf/licenses/LICENSE for more details.
\ProvidesFileRCS{pgfmoduleanimations.code.tex}
% We need the animation system abstraction:
\input pgfsysanimations.code.tex
% Animate an attribute over time
%
% #1 = an attribute
% #2 = configuration keys
%
% This command adds animation commands for the attribute given in #1
% of some future object to the current graphic scope. For instance,
% when #1 is "fill opacity" then the fill opacity of the object will
% change over time. The object to which the command refers is
% specified using a special key in #2.
%
% The keys in #2 specify how the changes occur over time. There are a
% number of keys that have an effect on the animation "as a whole"
% (like "repeats") while the most central key is the entry key. This
% key takes two parameters: a time and a value. It specifies that at
% the given time the attribute should have the specified value. The
% times must be given in ascending order. Between the times given in
% this way, the values of the attribute will be interpolated; you can
% influence the details of how this interpolation is done using
% additional keys.
%
% The keys in #2 are given in key-value syntax and can be given in any
% order, except that the entry keys must be given in order of
% ascending times.
%
% The syntax of the second parameter of the entry key depends on
% #1. Currently, these are:
%
% Attribute Value Type
% ---------------------------------------
% fill opacity scalar
% stroke opacity scalar
% opacity scalar
% visible boolean
% line width dimension
% fill color
% stroke color
% motion motion
% translate point
% scale scaling
% rotate scalar
% xskew scalar
% yskew scalar
% path path
% softpath softpath
% view viewbox
% dash phase dimension
% dash pattern dashpattern
% none any
%
% Example:
%
% \pgfanimateattribute{fill opacity}{entry={0s}{1}, entry={2s}{0}}
\def\pgfanimateattribute#1#2{%
\pgfanimateattributecode{#1}{\pgfkeys{/pgf/animation/.cd,#2}}%
}%
% Variant of \pgfanimateattribute
%
% #1 = attribute
% #2 = code
%
% Description:
%
% A version of \pgfanimateattribute where instead of keys #2 you
% provide a code #2 that calls the animation keys itself.
\def\pgfanimateattributecode#1#2{%
{%
\pgfkeys{/pgf/@animation attributes/.cd,#1}%
#2%
\csname pgf@animation@check@\pgf@animation@attribute\endcsname%
\pgfsysanimate{\pgf@animation@attribute}%
}%
}%
% Create a time snapshot
%
% #1 = a time
%
% Description:
%
% This command should be called in a scope prior to all calls of
% animation commands in that scope. When called, all animations will
% be "intercepted" and, instead of creating the animation code, normal
% code will be generated that shows the state of the animation at the
% specified "moment" #1. Since no animation code is involved, this
% works with all drivers.
%
% The command \pgfsnapshotafter works the same way as \pgfsnapshot,
% only the timing is slightly different: Conceptually, #1 is
% interpreted as "#1+epsilon". For instance, if there are two values
% specified for the time #1, then \pgfsnapshot will use the first
% while \pgfsnapshotafter will use the second. Likewise, when an
% animation ends at time #1, \pgfsnapshot will still us the
% animation's value, while \pgfsnapshotafter will not.
%
% Example:
%
% {
% \pgfsnapshot{1.2s}
% \pgfanimateattribute{fill opacity}{entry={0s}{1}, entry={2s}{0}}
% \fill (0,0) rectangle (1,1);
% }
\def\pgfsnapshot#1{\pgfparsetime{#1}\expandafter\pgfsysanimsnapshot\expandafter{\pgftimeresult}}%
\def\pgfsnapshotafter#1{\pgfparsetime{#1}\expandafter\pgfsysanimsnapshotafter\expandafter{\pgftimeresult}}%
% The animation attributes
\pgfkeys{/pgf/@animation attributes/.cd,
visible/.code=\pgf@animate@attr{visibility}{mapped}\def\pgf@anim@map@true{visible}\def\pgf@anim@map@false{hidden},
stage/.code=\pgf@animate@attr{visibility}{mapped}\def\pgf@anim@map@true{visible}\def\pgf@anim@map@false{hidden}\pgfsysanimkeybase\pgfsysanimvaltext{hidden},
opacity/.code=\pgf@animate@attr{opacity}{scalar},
fill opacity/.code=\pgf@animate@attr{fillopacity}{scalar},
draw opacity/.code=\pgf@animate@attr{strokeopacity}{scalar},
stroke opacity/.style=draw opacity,
line width/.code=\pgf@animate@attr{linewidth}{dimension},
fill/.code=\pgf@animate@attr{fillcolor}{color},
draw/.code=\pgf@animate@attr{strokecolor}{color},
color/.code=\pgf@animate@attr{color}{color},
stroke/.style=draw,
motion/.code=\pgf@animate@attr{motion}{scalar},
translate/.code=\pgf@animate@attr{translate}{point},
scale/.code=\pgf@animate@attr{scale}{scaling},
rotate/.code=\pgf@animate@attr{rotate}{scalar},
xskew/.code=\pgf@animate@attr{skewx}{scalar},
yskew/.code=\pgf@animate@attr{skewy}{scalar},
skew x/.style=xskew,
skew y/.style=yskew,
path/.code=\pgf@animate@attr{path}{path},
softpath/.code=\pgf@animate@attr{path}{softpath},
view/.code=\pgf@animate@attr{viewbox}{viewbox},
dash/.code=\pgf@animate@attr{dash}{dash},
none/.code=\pgf@animate@attr{none}{none},
}%
\def\pgf@animate@attr#1#2{%
\def\pgf@animation@attribute{#1}%
\expandafter\let\expandafter\pgfanim@type@parser\csname pgfanim@parse@type@#2\endcsname%
}%
% The time parser
%
% #1 = a time
%
% This macro parses the time in #1, but adds some support for times:
%
% 1) The postfix operator "s" is added, which has no effect.
% 2) The postfix operator "ms" is added, which divides a number by
% 1000, so "2ms" equals "0.002".
% 3) The postfix operator "min" is added, which multiplies a number by
% 60.
% 4) The postfix operator "h" is added, which multiplies a number by
% 3600.
% 5) The infix operator ":" is redefined, so that it multiplies its
% first argument by 60 and adds the second. This implies that
% "1:20" equals "80" and "01:00:00" equals "3600".
% 6) The parsing of octal numbers is switched off to allow things like
% "01:08" for 68s.
\def\pgfparsetime#1{%
\begingroup%
\pgfmathdeclareoperator{s}{@seconds}{1}{postfix}{600}%
\pgfmathdeclareoperator{m}{m@encountered}{1}{postfix}{600}%
\pgfmathdeclareoperator{i}{i@encountered}{1}{postfix}{600}%
\pgfmathdeclareoperator{n}{@minutes}{1}{postfix}{600}%
\pgfmathdeclareoperator{h}{@hours}{1}{postfix}{600}%
\pgfmathdeclareoperator{:}{time@colon}{2}{infix}{50}%
\pgfmath@octalparsingfalse%
\pgfmathparse{#1}%
\expandafter\endgroup%
\expandafter\def\expandafter\pgftimeresult\expandafter{\pgfmathresult}%
}%
\newif\ifpgfanim@m@encountered
\newif\ifpgfanim@i@encountered
\pgfmathdeclarefunction{@seconds}{1}{%
\begingroup%
\expandafter\pgfmath@x#1pt\relax%
\ifpgfanim@m@encountered%
\divide\pgfmath@x by1000\relax%
\fi%
\global\pgfanim@m@encounteredfalse%
\pgfmath@returnone\pgfmath@x%
\endgroup%
}%
\pgfmathdeclarefunction{m@encountered}{1}{%
\global\pgfanim@m@encounteredtrue%
\begingroup%
\expandafter\pgfmath@x#1pt\relax%
\pgfmath@returnone\pgfmath@x%
\endgroup%
}%
\pgfmathdeclarefunction{i@encountered}{1}{%
\ifpgfanim@m@encountered%
\global\pgfanim@m@encounteredfalse%
\global\pgfanim@i@encounteredtrue%
\else%
\pgfmath@error{Unexpected i}{}%
\fi%
\begingroup%
\expandafter\pgfmath@x#1pt\relax%
\pgfmath@returnone\pgfmath@x%
\endgroup%
}%
\pgfmathdeclarefunction{@minutes}{1}{%
\ifpgfanim@i@encountered%
\global\pgfanim@i@encounteredfalse%
\else%
\pgfmath@error{Unexpected n}{}%
\fi%
\begingroup%
\expandafter\pgfmath@x#1pt\relax%
\pgfmath@x60\pgfmath@x\relax%
\pgfmath@returnone\pgfmath@x%
\endgroup%
}%
\pgfmathdeclarefunction{@hours}{1}{%
\begingroup%
\expandafter\pgfmath@x#1pt\relax%
\pgfmath@x3600\pgfmath@x\relax%
\pgfmath@returnone\pgfmath@x%
\endgroup%
}%
\pgfmathdeclarefunction{time@colon}{2}{%
\begingroup%
\pgfmath@x=#1pt\relax%
\pgfmath@x=60\pgfmath@x\relax%
\pgfmath@y=#2pt\relax%
\advance\pgfmath@x by\pgfmath@y%
\pgfmath@returnone\pgfmath@x%
\endgroup%
}%
% Sets general animation attributes
%
% #1 = key-value pairs that are executed for the path /pgf/animation/
\def\pgfanimationset{\pgfqkeys{/pgf/animation}}%
% Sets the target animation scope that should be animated.
%
% #1 = A name that will be used with an idscope.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{whom=some scope, entry={0s}{1}, entry={1s}{0}}
% \begin{scope}[name=some scope]
% \draw (0,0) -- (1,1);
% \draw (1,0) -- (2,1);
% \end{scope}
\pgfanimationset{
whom/.code={%
\pgf@anim@decomp{#1}%
\pgfidrefnextuse\pgf@anim@id\pgf@anim@id@name%
\expandafter\expandafter\expandafter\pgfsysanimkeywhom\expandafter\expandafter\expandafter{\expandafter\pgf@anim@id\expandafter}\expandafter{\pgf@anim@type}%
\let\pgf@anim@whom@id\pgf@anim@id%
\let\pgf@anim@whom@type\pgf@anim@type%
}
}%
\def\pgf@anim@decomp#1{%
\edef\pgf@temp{#1}%
\expandafter\pgfutil@in@\expandafter.\expandafter{\pgf@temp}%
\ifpgfutil@in@%
\expandafter\pgf@anim@decomp@\pgf@temp\pgf@stop%
\else%
\expandafter\pgf@anim@decomp@\pgf@temp.\pgf@stop%
\fi%
}%
\def\pgf@anim@decomp@#1.#2\pgf@stop{%
\def\pgf@anim@id@name{#1}%
\def\pgf@anim@type{#2}%
}%
% Assigns a name to this animation so that it can be used as an event
% id in another animation
%
% #1 = A name
%
% The name "previous" is special and always refers to the most recent
% animation before the animation currently being constructed.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{name=anim 1, entry={0s}{1}, entry={1s}{0}}
% \pgfanimateattribute{fill opacity}{begin on={end,of=anim 1}, entry={0s}{1}, entry={1s}{0}}
\pgfanimationset{
name/.code=\pgfuseid{#1},
}%
% Configures whether an animation can be restarted
%
% Some animations can restart when certain events take place. This key
% configures this. Setting it to
%
% "true" allows a restart at any time,
% "false" does not allow a restart,
% "when not active" allows a restart only, when the element is not
% active.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{entry={0s}{1}, entry={1s}{0}, restart=false}
\pgfanimationset{
restart/.is choice,
restart/.default=true,
restart/true/.code=\pgfsysanimkeyrestartalways,
restart/false/.code=\pgfsysanimkeyrestartnever,
restart/never/.code=\pgfsysanimkeyrestartnever,
restart/when not active/.code=\pgfsysanimkeyrestartwhennotactive,
}%
% Sets the number times an animation should repeat
%
% #1 = A string of the following form:
%
% [<empty> | <number> | for <time>] ["accumulating"]
%
% When empty (the default value) the animation repeats forever.
%
% When a <number> is provided, the animation will repeat <number>
% times, which need not be an integer.
%
% When a <time> is given, the repeating will stop after this much time.
%
% When the optional "accumulating" is specified, the repeat
% accumulates, otherwise each repeat begins with the original start
% value.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{repeats, entry={0s}{1}, entry={6s}{0}}
% \pgfanimateattribute{fill opacity}{repeats=2, entry={0s}{1}, entry={6s}{0}}
% \pgfanimateattribute{fill opacity}{repeats=2 accumulating, entry={0s}{1}, entry={6s}{0}}
% \pgfanimateattribute{fill opacity}{repeats=for 15s, entry={0s}{1}, entry={6s}{0}}
\pgfanimationset{
repeats/.code={%
\pgfutil@in@{accumulating\pgf@stop}{#1\pgf@stop}%
\ifpgfutil@in@%
\pgfsysanimkeyaccumulate%
\pgfanim@parse@acc#1\pgf@stop%
\else%
\pgfsysanimkeynoaccumulate%
\pgfanim@parse@noacc{#1}%
\fi%
},
repeats/.default=,
repeat/.style={repeats={#1}},
repeat/.default=,
}%
\def\pgfanim@parse@acc#1accumulating\pgf@stop{%
\pgfanim@parse@noacc{#1}%
}%
\def\pgfanim@parse@noacc#1{%
\pgfutil@in@{\pgf@stop for}{\pgf@stop#1}%
\ifpgfutil@in@%
\pgfanim@parse@for#1\pgf@stop%
\else%
\def\pgf@temp{#1}%
\ifx\pgf@temp\pgfutil@empty%
\pgfsysanimkeyrepeatindefinite%
\else%
\pgfmathparse{#1}%
\expandafter\pgfsysanimkeyrepeat\expandafter{\pgfmathresult}%
\fi%
\fi%
}%
\def\pgfanim@parse@for for#1\pgf@stop{\pgfparsetime{#1}\expandafter\pgfsysanimkeyrepeatdur\expandafter{\pgftimeresult}}%
% Specifies that an animation should begin or end at a certain time
% (relative to the current context). The "begin..." options may be
% used multiple times and their effects accumulate, likewise for the
% "end..." options.
%
% #1 = A time
%
% Example:
%
% \pgfanimateattribute{fill opacity}{begin=2s, end=2.5s, entry={0s}{1}, entry={1s}{0}}
\pgfanimationset{
begin/.code=\pgfparsetime{#1}\expandafter\pgfsysanimkeyoffset\expandafter{\pgftimeresult}{begin},
end/.code=\pgfparsetime{#1}\expandafter\pgfsysanimkeyoffset\expandafter{\pgftimeresult}{end},
}%
% Specifies that an animation should begin (or end) when a certain
% event takes place.
%
% #1 = A list of key-value pairs.
%
% The following keys are allowed:
%
% event=some event : The begin / end is triggered by that event. The
% list of allowed events is defined in the SVG
% standard.
% of=some name : The event does not refer to the current group,
% but to the object named "some name", which must
% previously have been named \pgfuseid. If some
% name contains a period, the part before the
% period must be the name of the id, the part
% following it the type of the id.
% key=some key : The trigger is some key being pressed
% repeat=number : The trigger is that an animation has been
% repeated number times.
% delay=time : A delay, may be negative.
%
% These keys are executed with the path prefix /pgf/animation/events.
%
% Some of them are predefined:
%
% "click" is a shorthand for "event=click"
% "focus in" is a shorthand for "event=focusin"
% "focus out" is a shorthand for "event=focusout"
% "activate" is a shorthand for "event=activate"
% "mouse down" is a shorthand for "event=mousedown"
% "mouse up" is a shorthand for "event=mouseup"
% "mouse over" is a shorthand for "event=mouseover"
% "mouse move" is a shorthand for "event=mousemove"
% "mouse out" is a shorthand for "event=mouseout"
% "begin" is a shorthand for "event=begin"
% "end" is a shorthand for "event=end"
%
% Example:
%
% % Begin after 5s or when clicked:
% \pgfanimateattribute{fill opacity}{begin=5s, begin on=click, entry={0s}{1}, entry={1s}{0}}
%
% % Begin, when an object named "button" is clicked
% \pgfanimateattribute{fill opacity}{begin on={click, of=button}, entry={0s}{1}, entry={1s}{0}, name=another animation}
%
% % Begin 1s after some other animation ends
% \pgfanimateattribute{fill opacity}{begin on={end, of=another animation, delay=1s}, entry={0s}{1}, entry={1s}{0}}
\pgfanimationset{
begin on/.code={\pgfanim@make@event{#1}{begin}},%
end on/.code={\pgfanim@make@event{#1}{end}},
}%
\def\pgfanim@make@event#1#2{%
\let\pgfanim@event@event\pgfutil@empty%
\let\pgf@anim@id\pgfutil@empty%
\let\pgf@anim@type\pgfutil@empty%
\let\pgfanim@event@key\pgfutil@empty%
\let\pgfanim@event@repeat\pgfutil@empty%
\let\pgfanim@event@delay\pgfutil@empty%
\pgfkeys{/pgf/animation/events/.cd,#1}%
\ifx\pgfanim@event@key\pgfutil@empty%
\ifx\pgfanim@event@repeat\pgfutil@empty%
\ifx\pgfanim@event@event\pgfutil@empty%
\pgferror{No event specified}%
\else%
\pgfsysanimkeyevent{\pgf@anim@id}{\pgf@anim@type}{\pgfanim@event@event}{\pgfanim@event@delay}{#2}%
\fi%
\else%
\pgfsysanimkeyrepeatevent{\pgf@anim@id}{\pgf@anim@type}{\pgfanim@event@repeat}{\pgfanim@event@delay}{#2}%
\fi%
\else%
\pgfsysanimkeyaccesskey{\pgfanim@event@key}{\pgfanim@event@delay}{#2}%
\fi%
}%
\pgfkeys{/pgf/animation/events/.cd,
event/.store in=\pgfanim@event@event,
of/.code={%
\pgf@anim@decomp{#1}%
\pgfidrefprevuse\pgf@anim@id\pgf@anim@id@name%
\ifx\pgf@anim@id\pgfutil@empty%
\pgferror{Unknown object/node name '\pgf@anim@id@name'. Did you
mean 'of next=\pgf@anim@id@name'?}%
\fi%
},
of next/.code={%
\pgf@anim@decomp{#1}%
\pgfidrefnextuse\pgf@anim@id\pgf@anim@id@name%
},
of id/.code=\def\pgf@anim@id{#1},
key/.store in=\pgfanim@event@key,
repeat/.code=\pgfmathparse{#1}\let\pgfanim@event@repeat\pgfmathresult,
delay/.code=\pgfparsetime{#1}\let\pgfanim@event@delay\pgftimeresult,
click/.style={event=click},
focus in/.style={event=focusin},
focus out/.style={event=focusout},
mouse down/.style={event=mousedown},
mouse up/.style={event=mouseup},
mouse over/.style={event=mouseover},
mouse move/.style={event=mousemove},
mouse out/.style={event=mouseout},
begin/.style={event=begin},
end/.style={event=end},
}%
% Specifies the timeline start for a snapshot
%
% #1 = a time
%
% Description:
%
% What a snapshot is taken of an animation (using \pgfsnapshot), all
% animations normally start at time 0s. When this key is used, the
% animation's timeline start is considered to be at moment #1
% instead.
\pgfanimationset{
begin snapshot/.code=
\pgfparsetime{#1}\expandafter\pgfsysanimkeysnapshotstart\expandafter{\pgftimeresult}
}%
% Specifies the origin for transforming animations
%
% #1 = a pgf point
%
% Specifies the origin of transformations (for instance, a rotate will
% rotate around this point).
%
% Example:
%
% \pgfanimateattribute{rotate}{entry={0s}{0}, entry={1s}{90}, origin=\pgfpoint{1cm}{1cm}}
\pgfanimationset{
origin/.code={%
\pgf@process{#1}%
\edef\pgf@marshal{%
\noexpand\pgfsysanimkeycanvastransform%
{\noexpand\pgftransformshift{\noexpand\pgfqpoint{\the\pgf@x}{\the\pgf@y}}{\noexpand\pgflowlevelsynccm}}%
{\noexpand\pgftransforminvert\noexpand\pgflowlevelsynccm}%
\noexpand\pgf@anim@save@transform{\noexpand\pgftransformshift{\noexpand\pgfqpoint{\the\pgf@x}{\the\pgf@y}}}%
}%
\pgf@marshal%
},
}%
\pgfsysanimkeycanvastransform{{\pgflowlevelsynccm}}{\pgftransforminvert\pgflowlevelsynccm}%
% Specifies the transforming for the animation coordinate system
%
% #1 = code that changes the pgf coordinate system
%
% Specifies an additional transformation of the coordinate system for
% animations.
%
% Example:
%
% \pgfanimateattribute{shift}{entry={0s}{\pgfpointorigin}, entry={1s}{\pgfpoint{1cm}{0cm}}, transform=\pgftransformrotate{30}}
\pgfanimationset{
transform/.code={%
\pgfsysanimkeycanvastransform{#1{\pgflowlevelsynccm}}{\pgftransforminvert\pgflowlevelsynccm}%
\pgf@anim@save@transform{#1}%
},
}%
% Specifies a motion path.
%
% #1 = pgf commands for constructing a path
%
% Use this key to specify a motion path for the motion attribute. The
% values of the "entry" key specify fractions along this path.
%
% Example:
%
% \pgfanimateattribute{motion}{
% entry={0s}{0}, entry={1s}{1},
% along=\pgfpathmoveto{\pgfpointorigin} \pgfpathlineto{\pgfpoint{1cm}{1cm}}
% }
\pgfanimationset{
along/.code=%
{%
\pgfsyssoftpath@getcurrentpath\pgfanim@save@path%
\pgfsyssoftpath@setcurrentpath\pgfutil@empty%
#1%
\pgfsyssoftpath@getcurrentpath\pgfanim@the@path%
\global\let\pgfanim@the@path\pgfanim@the@path%
\pgfsyssoftpath@setcurrentpath\pgfanim@save@path%
}%
\expandafter\pgf@anim@protocol@path@size\pgfanim@the@path\pgf@stop%
\expandafter\pgfsysanimkeymovealong\expandafter{\pgfanim@the@path}%
}%
% Specifies a motion soft path.
%
% #1 = a pgf soft path (result of calling \pgfsyssoftpath@getcurrentpath)
%
% Use this key to specify a motion path for the motion attribute when
% a softpath has already been constructed.
%
% Example:
%
% \pgfanimateattribute{motion}{entry={0s}{0}, entry={1s}{1},
% along softpath=\pgfsyssoftpath@movetotoken {0pt}{0pt}\pgfsyssoftpath@linetotoken {10pt}{10pt}}
\pgfanimationset{
along softpath/.code=%
\pgf@anim@protocol@path@size#1\pgf@stop%
\pgfsysanimkeymovealong{#1}%
}%
\def\pgf@anim@protocol@path@size{%
\pgfutil@ifnextchar\pgf@stop\relax\pgf@anim@protocol@path@size@%
}%
\def\pgf@anim@protocol@path@size@#1#2#3{%
\pgf@protocolanimsizes@direct{#2}{#3}%
\pgf@anim@protocol@path@size%
}%
% Configures whether the motion is rotated along the path.
%
% Example:
%
% \pgfanimateattribute{motion}{rotate along, entry={0s}{0}, entry={1s}{1},
% along=\pgfpathmoveto{\pgfpointorigin} \pgfpathlineto{\pgfpoint{1cm}{1cm}}}
\pgfanimationset{
rotate along/.is choice,
rotate along/.default=true,
rotate along/true/.code=\pgfsysanimkeyrotatealong,
rotate along/false/.code=\pgfsysanimkeynorotatealong,
}%
% Specifies an entry
%
% #1 = A time. This time will be parsed using \pgfparsetime
% #2 = A value. The format of this value depends on the current type
% of the animation attribute. (So for an animation of the "fill
% opacity", #1 must be a scalar value, for an animation of the "fill"
% color, #1 must be a color, and so on.)
% If #2 is the special text "current value", then the current
% value will be used. For SVG, this is allowed only when exactly
% two entries are specified and this special value is used for
% the first one.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{entry={0s}{0}, entry={1s}{1}}
\pgfanimationset{entry/.code 2 args=\pgf@anim@entry{#1}{#2}}%
\def\pgf@anim@entry#1#2{%
\pgf@anim@entry@giventrue%
\pgfparsetime{#1}%
\edef\pgf@marshal{\noexpand\pgfsysanimkeytime{\pgftimeresult}\pgf@anim@entry@spline\pgf@anim@exit@spline}%
\pgf@marshal%
\def\pgf@temp{#2}%
\ifx\pgf@temp\pgf@special@current@text%
\pgfsysanimvalcurrent%
\else%
\pgfanim@type@parser{#2}%
\fi%
}%
\def\pgf@special@current@text{current value}%
\newif\ifpgf@anim@entry@given
% Specifies a base value
%
% #1 = A value. The format is as for the entry key.
%
% Description:
%
% Will set the "base" value of the animation, which is a value that is
% used when the animation is not active.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{base = 0.5, entry={0s}{0.5}, entry={1s}{1}}
\pgfanimationset{base/.code=\pgf@anim@base{#1}}%
\def\pgf@anim@base#1{%
\pgfsysanimkeybase%
\pgfanim@type@parser{#1}%
}%
% Specifies that there is an entry "at infinity".
%
% When an animation ends, its "effect" can either persist or it can be
% removed. Setting "freeze at end" to true will cause it to persist,
% otherwise it will be removed.
%
% Example:
%
% \pgfanimateattribute{fill opacity}{entry={0s}{1}, entry={1s}{0}, freeze at end}
\pgfanimationset{
freeze at end/.is choice,
freeze at end/.default=true,
freeze at end/true/.code=\pgfsysanimkeyfreezeatend,
freeze at end/false/.code=\pgfsysanimkeyremoveatend,
}%
% Specifies an entry or exit spline control
%
% #1 = time fraction
% #2 = attribute fraction
%
% Description:
%
% Suppose that an animation is supposed to interpolate a attribute's
% value between the two values "50" and "100" over a time of 10s. The
% simplest way of doing so is to do a linear interpolation, where the
% value as, say, 1s is 55, at 2s it is 60, and so on.
%
% Unfortunately, the linear interpolation does not "look" nice in many
% cases since the acceleration of a linear interpolation is zero
% during the animation, but infinite at the beginning and at the end;
% which looks "jerky".
%
% To avoid this, you can specify that the time--attribute curve should
% not be a straight line, but rather a curve. You specify this curve
% using a spline.
%
% The most logical "coordinate rectangle" used for this spline in our
% example would be (0s,50) and (10s,100) and we would like to specify
% something like "(0s,50) .. controls (5s,50) and (9s,100)
% .. (10s,100)". This would result in a time--attribute curve where
% the attribute at 50 changes slowly at 0s and also arrives slowly at
% 100 at 10s, but speeds up between these values.
%
% We call the first control point (5s,50) the "exit control" and call
% (9s,100) the "entry control": The first control dictates how quickly
% or slowly a time point is left, the second dictates how quickly or
% slowly we enter the next one.
%
% The control points are, however, not specified in the coordinate
% system indicated above. Rather, the rectangle (0s,50) to (10s, 100),
% gets normalized to (0,0) to (1,1). The control point (5s,50) would
% thus become (0.5,0) and (9s,100) becomes (0.9,1).
%
% Example:
%
% \pgfanimateattribute{rotate}{
% exit control={0.5}{0},
% entry control={0.9}{1},
% entry={0s}{50},
% entry={10s}{100}}
\pgfanimationset{
entry control/.code 2 args={%
\pgfmathsetmacro\pgf@temp@t{#1}%
\pgfmathsetmacro\pgf@temp@a{#2}%
\edef\pgf@anim@entry@spline{{\pgf@temp@t}{\pgf@temp@a}}%
},
exit control/.code 2 args={%
\pgfmathsetmacro\pgf@temp@t{#1}%
\pgfmathsetmacro\pgf@temp@a{#2}%
\edef\pgf@anim@exit@spline{{\pgf@temp@t}{\pgf@temp@a}}%
},
stay/.code=\let\pgf@anim@exit@spline\pgfsys@stay@text,%
jump/.code=\let\pgf@anim@entry@spline\pgfsys@jump@text,%
linear/.style={entry control={1}{1},exit control={0}{0}},
}%
\def\pgf@anim@entry@spline@base{{1}{1}}%
\def\pgf@anim@exit@spline@base{{0}{0}}%
\def\pgf@anim@reset@linear{\let\pgf@anim@entry@spline\pgf@anim@entry@spline@base\let\pgf@anim@exit@spline\pgf@anim@exit@spline@base}%
\pgf@anim@reset@linear
% Specifies how much arrow tips should be shortened (as in
% \pgfsetshortenstart)
%
% #1 = an additional shortening distance the path start.
%
% Description:
%
% Works like \pgfsetshortenstart, only for animated paths.
\pgfanimationset{
shorten </.code={%
\ifpgf@anim@entry@given%
\pgferror{You must specify shorten < prior to the path entries}%
\else%
\pgfmathsetmacro\pgf@anim@marker@extra@shorten@start{#1}%
\edef\pgf@anim@marker@extra@shorten@start{\pgf@anim@marker@extra@shorten@start pt}%
\fi%
},
shorten >/.code={%
\ifpgf@anim@entry@given%
\pgferror{You must specify shorten < prior to the path entries}%
\else%
\pgfmathsetmacro\pgf@anim@marker@extra@shorten@end{#1}%
\edef\pgf@anim@marker@extra@shorten@end{\pgf@anim@marker@extra@shorten@end pt}%
\fi%
},
}%
\def\pgf@anim@marker@extra@shorten@start{0pt}%
\def\pgf@anim@marker@extra@shorten@end{0pt}%
\def\pgf@anim@marker@shorten@start{0pt}%
\def\pgf@anim@marker@shorten@end{0pt}%
% Specifies the arrow tips used for path animations
%
% #1 = an arrow specification of the form <start>-<end> as for the
% command \pgfsetarrows
%
% Description:
%
% Specifies arrow tips that are used in a path animation. Note that in
% order to set the arrow tips of a path that is animated, you always
% have to use this command. In particular, you should *not* set arrow
% tips for the to-be-animated path, but use this key and the base key
% to install a base path with arrow tips.
\pgfanimationset{
arrows/.code={%
\ifpgf@anim@entry@given%
\pgferror{You must specify animation arrows prior to the path entries}%
\else%
\pgf@anim@parser@arrows#1\pgf@stop%
\fi%
},
}%
\def\pgf@anim@parser@arrows#1-#2\pgf@stop{%
\pgf@anim@prepare@arrow@start{#1}%
\pgf@anim@prepare@arrow@end{#2}%
\expandafter\expandafter\expandafter\pgfsysanimkeytipmarkers\expandafter\expandafter\expandafter{\expandafter\pgf@anim@marker@id@start\expandafter}\expandafter{\pgf@anim@marker@id@end}%
}%
\def\pgf@anim@prepare@arrow@start#1{%
\def\pgf@anim@temp{#1}%
\ifx\pgf@anim@temp\pgfutil@empty%
\let\pgf@anim@marker@id@start\pgfutil@empty%
\def\pgf@anim@marker@shorten@start{0pt}%
\else%
{%
\pgfsetarrowsstart{#1}%
\pgf@anim@prep@marker@arrow\pgf@start@tip@sequence\pgf@anim@marker@id\pgf@anim@marker@shorten%
\global\let\pgf@anim@marker@id@start\pgf@anim@marker@id%
\global\let\pgf@anim@temp\pgf@anim@marker@shorten%
}%
\let\pgf@anim@marker@shorten@start\pgf@anim@temp%
\fi%
}%
\def\pgf@anim@prepare@arrow@end#1{%
\def\pgf@anim@temp{#1}%
\ifx\pgf@anim@temp\pgfutil@empty%
\let\pgf@anim@marker@id@end\pgfutil@empty%
\def\pgf@anim@marker@shorten@end{0pt}%
\else%
{%
\pgfsetarrowsend{#1}%
\pgf@anim@prep@marker@arrow\pgf@end@tip@sequence\pgf@anim@marker@id\pgf@anim@marker@shorten%
\global\let\pgf@anim@marker@id@end\pgf@anim@marker@id%
}%
\let\pgf@anim@marker@shorten@end\pgf@anim@marker@shorten%
\fi%
}%
% Draw an arrow using markers
\def\pgf@anim@prep@marker@arrow#1#2#3{%
% #1 = tip sequence
% #2 = macro for storing marker code
% #3 = macro for storing shortening length
%
% First, compute id's:
{%
\let\pgf@arrow@handle\pgf@anim@marker@id@test%
\let\pgf@arrow@handle@dot\relax%?
\global\let\pgf@anim@marker@id@list\pgfutil@empty%
#1%
}%
\expandafter\let\expandafter#2\csname pgfanim@marker@cache@\pgf@anim@marker@id@list\endcsname%
\expandafter\let\expandafter#3\csname pgfanim@marker@cachel@\pgf@anim@marker@id@list\endcsname%
\ifx#2\relax% ok, have to create it!
\pgf@relevantforpicturesizefalse%
\pgfinterruptpath%
\pgf@arrow@compute@shortening{#1}%
\xdef#3{\the\pgf@xa}%
{%
\let\pgf@arrow@handle\pgf@anim@drawer@marker
\let\pgf@arrow@handle@dot\relax%
\pgfsys@marker@declare#2{%
\pgftransformxshift{-\pgf@xb}%
\pgftransformxshift{\pgf@xa}%
#1%
}%
}%
\endpgfinterruptpath%
\expandafter\global\expandafter\let\csname pgfanim@marker@cache@\pgf@anim@marker@id@list\endcsname#2%
\expandafter\global\expandafter\let\csname pgfanim@marker@cachel@\pgf@anim@marker@id@list\endcsname#3%
\fi%
}%
\def\pgf@anim@marker@id@test#1#2{%
\pgfarrows@getid{#1}{#2}%
\expandafter\expandafter\expandafter\pgf@arrow@drawer@shift\csname pgf@ar@ends@\pgf@arrow@id\endcsname%
\xdef\pgf@anim@marker@id@list{\pgf@anim@marker@id@list:\pgf@arrow@id\ifpgfarrowswap s\else n\fi\pgfarrows@slant w\the\pgf@xc}%
}%
\def\pgf@anim@drawer@marker#1#2{%
% Prepare:
{%
\pgfarrows@getid{#1}{#2}%
% Do shift:
\expandafter\expandafter\expandafter\pgf@arrow@drawer@shift\csname pgf@ar@ends@\pgf@arrow@id\endcsname%
% Do slant:
\ifdim\pgfarrows@slant pt=0pt%
\else%
\pgftransformxslant{\pgfarrows@slant}%
\fi%
% do swap:
\ifpgfarrowswap%
\pgftransformyscale{-1}%
\fi%
{%
\csname pgf@ar@saves@\pgf@arrow@id\endcsname%
\pgfsys@beginscope%
\pgf@arrows@color@setup%
\pgflowlevelsynccm\csname pgf@ar@cache@\pgf@arrow@id\endcsname%
\pgfsys@endscope%
}%
\expandafter}%
% Transform to next tip:
\expandafter\pgftransformxshift\expandafter{\the\pgf@xc}%
}%
% The parsers
% Parse no value
%
% #1 is ignored
%
% Example:
%
% entry = {0s}{5+6}
\def\pgfanim@parse@type@none#1{%
\pgfsysanimvalnone%
}%
% Parse a scalar
%
% #1 is a number parsed using \pgfmathparse
%
% Example:
%
% entry = {0s}{5+6}
\def\pgfanim@parse@type@scalar#1{%
\pgfmathparse{#1}%
\expandafter\pgfsysanimvalscalar\expandafter{\pgfmathresult}%
}%
% Parse a dimension
%
% #1 is a number parsed using \pgfmathparse
%
% Example:
%
% entry = {0s}{5cm + 2pt}
\def\pgfanim@parse@type@dimension#1{%
\pgfmathparse{#1}%
\expandafter\pgfsysanimvaldimension\expandafter{\pgfmathresult pt}%
}%
% Parse a mapped text
%
% #1 is a text. It is looked up in \pgf@anim@map@#1 and gets replaced
% by what this macro expands to.
%
% Example:
%
% entry = {0s}{true}
\def\pgfanim@parse@type@mapped#1{%
{%
\expandafter\let\expandafter\pgf@temp\csname pgf@anim@map@#1\endcsname\relax%
\ifx\pgf@temp\relax%
\pgferror{Value '#1' not allowed for an animation for this attribute}%
\let\pgf@temp\pgfutil@empty%
\fi%
\expandafter}%
\expandafter\pgfsysanimvaltext\expandafter{\pgf@temp}%
}%
% Parse a color
%
% #1 is a color
%
% entry = {0s}{blue!20}
\def\pgfanim@parse@type@color#1{%
\pgfsysanimvalcolor{#1}%
}%
% Parse a path
%
% #1 is a sequence of pgf path construction commands
%
% entry = {0s}{\pgfpathmoveto{\pgfpointorigin} \pgfpathlineto{\pgfpoint{1cm}{1cm}}}
\def\pgfanim@parse@type@path#1{%
{%
\pgfsyssoftpath@getcurrentpath\pgfanim@save@path%
\pgfsyssoftpath@setcurrentpath\pgfutil@empty%
#1%
\pgfsyssoftpath@getcurrentpath\pgfanim@the@path%
\pgfprocessround{\pgfanim@the@path}{\pgfanim@the@path}%
\global\let\pgfanim@the@path\pgfanim@the@path%
\pgfsyssoftpath@setcurrentpath\pgfanim@save@path%
}%
\expandafter\pgfanim@parse@type@softpath\expandafter{\pgfanim@the@path}%
}%
% Parse a softpath
%
% #1 is a sequence of pgf softpath token commands
%
% entry = {0s}{\pgfsyssoftpath@movetotoken {0pt}{0pt}\pgfsyssoftpath@linetotoken {10pt}{10pt}}
\def\pgfanim@parse@type@softpath#1{%
{%
\def\pgf@anim@path{#1}%
% Shorten?
\pgf@worryfalse%
\pgf@xb=\pgf@anim@marker@extra@shorten@start%
\advance\pgf@xb by\pgf@anim@marker@shorten@start%
\pgf@xc=\pgf@anim@marker@extra@shorten@end%
\advance\pgf@xc by\pgf@anim@marker@shorten@end%
\ifdim\pgf@xb=0pt\else\pgf@worrytrue\fi%
\ifdim\pgf@xc=0pt\else\pgf@worrytrue\fi%
\ifpgf@worry%
\edef\pgf@path@shortening@distance@end{\the\pgf@xc}%
\edef\pgf@path@shortening@distance@start{\the\pgf@xb}%
% Yes! Need to shorten.
\pgf@anim@shorten@path%
\fi%
\expandafter}%
\expandafter\pgfsysanimvalpath\expandafter{\pgf@anim@path}%
}%
\def\pgf@anim@shorten@path{%
\pgf@precise@shorteningfalse%
\let\pgf@path@shortening@distance\pgf@path@shortening@distance@end%
%
% Step 1: Split
%
\pgfprocesssplitpath{\pgf@anim@path}%
\pgfprocesssplitsubpath{\pgfprocessresultpathsuffix}%
%
% Step 2: extract
%
\expandafter\pgf@parse@end\pgfprocessresultsubpathsuffix\pgf@stop\pgf@stop\pgf@stop%
%
% Step 3: prep end
%
\pgf@prep@end%
%
% Step 4: shorten end
%
\ifdim\pgf@path@shortening@distance=0pt\else\pgf@do@shorten@end\fi%
%
\let\pgf@path@shortening@distance\pgf@path@shortening@distance@start%
%
% Step 5: extract
%
\expandafter\pgf@parse@start\pgfprocessresultpathsuffix\pgf@stop\pgf@stop\pgf@stop%
%
% Step 6: prep start
%
\pgf@prep@start%
%
% Step 7: shorten start
%
\ifdim\pgf@path@shortening@distance=0pt\else\pgf@do@shorten@start\fi%
\expandafter\expandafter\expandafter\def%
\expandafter\expandafter\expandafter\pgf@anim@path%
\expandafter\expandafter\expandafter{\expandafter\pgfprocessresultpathprefix\pgfprocessresultpathsuffix}%
}%
% Parse a point
%
% #1 is a point
%
% entry = {0s}{\pgfpoint{1cm}{2cm}}
\def\pgfanim@parse@type@point#1{%
\pgf@process{#1}%
\pgf@protocolanimsizes\pgf@x\pgf@y%
\expandafter\expandafter\expandafter\pgfsysanimvaltranslate\expandafter\expandafter\expandafter{\expandafter\the\expandafter\pgf@x\expandafter}\expandafter{\the\pgf@y}%
}%
% Parse a scaling
%
% #1 = if #1 contains a comma, the two parts are passed to
% pgfmathparse, otherwise the whole thing is passed to pgfmathparse.
%
% entry = {0s}{2}
% entry = {0s}{2,1}
\def\pgfanim@parse@type@scaling#1{%
\pgfutil@in@{,}{#1}%
\ifpgfutil@in@%
\pgfanim@unpack@comma#1\pgf@stop%
\else%
\pgfmathparse{#1}%
\expandafter\pgfsysanimvalscale\expandafter{\pgfmathresult}{\pgfmathresult}%
\fi%
}%
\def\pgfanim@unpack@comma#1,#2\pgf@stop{%
\pgfmathsetmacro{\pgf@anim@temp@x}{#1}%
\pgfmathsetmacro{\pgf@anim@temp@y}{#2}%
\expandafter\expandafter\expandafter\pgfsysanimvalscale\expandafter\expandafter\expandafter{\expandafter\pgf@anim@temp@x\expandafter}\expandafter{\pgf@anim@temp@y}%
}%
% Parse a viewbox
%
% #1 consists of two points, each in parentheses
%
% entry = {0s}{{\pgfpoint{1cm}{2cm}}{\pgfpoint{3cm}{4cm}}}
\def\pgfanim@parse@type@viewbox#1{%
{%
\pgfanim@unpack@viewbox#1%
\xdef\pgf@anim@caller{\noexpand\pgfsysanimvalviewbox{\the\pgf@x}{\the\pgf@y}{\the\pgf@xa}{\the\pgf@ya}}%
}%
\pgf@anim@caller%
}%
\def\pgfanim@unpack@viewbox#1#2{%
\pgfpointtransformed{#2}%
\pgf@xa\pgf@x%
\pgf@ya\pgf@y%
\pgfpointtransformed{#1}%
\ifdim\pgf@xa<\pgf@x% swap needed
\pgf@xb=\pgf@x%
\pgf@x=\pgf@xa%
\pgf@xa=\pgf@xb%
\fi%
\ifdim\pgf@ya<\pgf@y% swap needed
\pgf@yb=\pgf@y%
\pgf@y=\pgf@ya%
\pgf@ya=\pgf@yb%
\fi%
}%
% Parse a dash pattern
%
% #1,#2 is a dash pattern as in \pgfsetdash
%
% entry = {0s}{{{1pt}{2pt}{3pt}{1pt}}{1pt}}
\def\pgfanim@parse@type@dash#1{\pgfanim@parse@type@dash@#1}%
\def\pgfanim@parse@type@dash@#1#2{%
\def\pgf@temp{}%
\def\pgf@next{\pgf@strip}%
\pgf@strip#1{pgf@stop}%
\expandafter\pgfsysanimvaldash\expandafter{\pgf@temp}{#2}%
}%
%
%
% Bounding box adjustments in animations.
%
%
\def\pgf@protocolanimsizes#1#2{%
\edef\pgf@temp{\noexpand\pgf@anim@handle@point{\the#1}{\the#2}}%
\expandafter\expandafter\expandafter\def\expandafter\expandafter\expandafter\pgf@protocolanim@list\expandafter\expandafter\expandafter{\expandafter\pgf@protocolanim@list\pgf@temp}%
}%
\def\pgf@protocolanimsizes@direct#1#2{%
\expandafter\def\expandafter\pgf@protocolanim@list\expandafter{\pgf@protocolanim@list\pgf@anim@handle@point{#1}{#2}}%
}%
\let\pgf@protocolanim@list\pgfutil@empty
\def\pgf@animation@check@translate{%
\ifx\pgf@protocolanim@list\pgfutil@empty%
\else%
\expandafter\expandafter\expandafter\pgf@animation@check@translate@\expandafter\expandafter\expandafter{\expandafter\pgf@protocolanim@list\expandafter}\expandafter{\pgf@anim@saved@transform}%
\fi%
}%
\let\pgf@animation@check@motion\pgf@animation@check@translate
\def\pgf@animation@check@translate@#1#2{%
\pgfsys@attach@to@id\pgf@anim@whom@id\pgf@anim@whom@type{%
\pgf@size@hookedtrue%
{%
% Compute bounding box in local coordinate system
#2%
\pgf@pt@x0pt%
\pgf@pt@y0pt%
\pgf@picmaxx=-16000pt\relax%
\pgf@picminx=16000pt\relax%
\pgf@picmaxy=-16000pt\relax%
\pgf@picminy=16000pt\relax%
#1%
\edef\pgf@temp{{\the\pgf@picminx}{\the\pgf@picminy}{\the\pgf@picmaxx}{\the\pgf@picmaxy}}%
\expandafter%
}\expandafter%
\def\expandafter\pgf@temp\expandafter{\pgf@temp}%
\expandafter\expandafter\expandafter\def\expandafter\expandafter\expandafter\pgf@path@size@hook\expandafter\expandafter\expandafter{%
\expandafter\pgf@path@size@hook\expandafter\pgf@anim@bb\pgf@temp}%
}{}%
}%
\def\pgf@anim@handle@point#1#2{%
\pgf@x#1\pgf@y#2%
\pgf@pos@transform\pgf@x\pgf@y%
\ifdim\pgf@x<\pgf@picminx\pgf@picminx\pgf@x\fi%
\ifdim\pgf@x>\pgf@picmaxx\pgf@picmaxx\pgf@x\fi%
\ifdim\pgf@y<\pgf@picminy\pgf@picminy\pgf@y\fi%
\ifdim\pgf@y>\pgf@picmaxy\pgf@picmaxy\pgf@y\fi%
}%
\newdimen\pgf@anim@dim
\def\pgf@anim@bb#1#2#3#4{% (#1,#2) lower left, (#3, #4) upper right
\pgf@anim@dim\pgf@size@hook@x%
\advance\pgf@anim@dim by#1\relax%
\ifdim\pgf@anim@dim<\pgf@picminx\global\pgf@picminx\pgf@anim@dim\fi%
\pgf@anim@dim\pgf@size@hook@x%
\advance\pgf@anim@dim by#3\relax%
\ifdim\pgf@anim@dim>\pgf@picmaxx\global\pgf@picmaxx\pgf@anim@dim\fi%
\pgf@anim@dim\pgf@size@hook@y%
\advance\pgf@anim@dim by#2\relax%
\ifdim\pgf@anim@dim<\pgf@picminy\global\pgf@picminy\pgf@anim@dim\fi%
\pgf@anim@dim\pgf@size@hook@y%
\advance\pgf@anim@dim by#4\relax%
\ifdim\pgf@anim@dim>\pgf@picmaxy\global\pgf@picmaxy\pgf@anim@dim\fi%
}%
\def\pgf@anim@save@transform#1{%
\def\pgf@anim@saved@transform{#1}%
}%
\let\pgf@anim@saved@transform\pgfutil@empty%
\endinput