diff options
Diffstat (limited to 'Master/texmf-dist/tex')
| -rw-r--r-- | Master/texmf-dist/tex/latex/animate/animate.sty | 732 |
1 files changed, 512 insertions, 220 deletions
diff --git a/Master/texmf-dist/tex/latex/animate/animate.sty b/Master/texmf-dist/tex/latex/animate/animate.sty index 6001e2f51aa..98bfe2d76bb 100644 --- a/Master/texmf-dist/tex/latex/animate/animate.sty +++ b/Master/texmf-dist/tex/latex/animate/animate.sty @@ -13,10 +13,11 @@ % Supports LaTeX->dvips->ps2pdf or pdfLaTeX workflows. \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{animate}[2007/07/04] +\ProvidesPackage{animate}[2007/08/23] \RequirePackage{keyval} \RequirePackage{ifthen} \RequirePackage{ifpdf} +\RequirePackage{ifdraft} \RequirePackage{calc} \DeclareOption*{}\ProcessOptions*\relax %allow anything as option @@ -119,15 +120,13 @@ \fi \newbox\@anim@box %stores animation frames -\newdimen\@anim@tmpdima %length register for occasional use +\newdimen\@anim@tmpdima %length registers for occasional use +\newdimen\@anim@tmpdimb %creates Form XObject from graphics file \def\@anim@pt{pt} \ifpdf \def\@anim@ximage#1#2#3{%#1:@anim@num, #2:@anim@curframe@zb, #3:filename - \IfFileExists{#3}{}{% - \PackageError{animate}{File `#3' cannot be opened for embedding.}{}% - }% %store file in a box \def\@anim@mps{.mps}% \ifx\@anim@ext\@anim@mps% @@ -135,15 +134,12 @@ \else% \immediate\pdfximage{#3}% \global\setbox\@anim@box=\hbox{\pdfrefximage\pdflastximage}% - \fi + \fi% %delegate Form XObject creation \@anim@xinline{#1}{#2}{\@anim@box}% } \else \def\@anim@ximage#1#2#3{% - \IfFileExists{#3}{}{% - \PackageError{animate}{File `#3' cannot be opened for embedding.}{}% - }% %store file in a box \edef\@anim@curfile{{#3}}% \global\setbox\@anim@box=\hbox{\expandafter\includegraphics\@anim@curfile}% @@ -292,11 +288,7 @@ \setlength{\unitlength}{1pt}% \global\setbox\@anim@box=\hbox{% \pdfliteral{q}% - \begin{picture}(% - \@anim@animwidth,\@anim@animtotalheight% - )(% - 0,-\@anim@animdepth% - )% + \begin{picture}(\@anim@animwidth,\@anim@animtotalheight)% \end{picture}% \pdfliteral{Q\@anim@content}% }% @@ -326,8 +318,8 @@ %create container XObjects for play & pause button faces; \ifpdf - \def\@anim@makeppcontainer#1#2{% #1: @anim@num, #2: Right or Left - %OCGs + \def\@anim@makeppcontainer#1#2#3{% #1: @anim@num, #2: Right or Left, + %OCGs #3: index of existing button face colour combination \immediate\pdfobj{<</Type/OCG /Name (#1.Play#2)>>}% \edef\@anim@playocg{\the\pdflastobj\space 0 R}% \immediate\pdfobj{<< /Type/OCG /Name (#1.Pause#2)>>}% @@ -342,8 +334,8 @@ /Resources <<% /Properties <</oc0 \@anim@playocg /oc1 \@anim@pauseocg>>% /XObject <<% - /im0 \@anim@getkeyval{btnPlay#2} - /im1 \@anim@getkeyval{btnPause#2}% + /im0 \@anim@getkeyval{btnPlay#2:#3} + /im1 \@anim@getkeyval{btnPause#2:#3}% >>% >>% }{% @@ -352,7 +344,7 @@ \@anim@newkey{btn#1.PlayPause#2}{\the\pdflastobj\space 0 R}% } \else - \def\@anim@makeppcontainer#1#2{% + \def\@anim@makeppcontainer#1#2#3{% \special{ps: %OCGs mark /_objdef {#1.Play#2} /type/dict /OBJ pdfmark @@ -379,8 +371,8 @@ /Resources <<% /Properties <</oc0 {#1.Play#2} /oc1 {#1.Pause#2}>>% /XObject <<% - /im0 {btnPlay#2} - /im1 {btnPause#2}% + /im0 {btnPlay#2:#3} + /im1 {btnPause#2:#3}% >>% >>% >> /PUT pdfmark @@ -392,10 +384,11 @@ \ifpdf %stroking commands \def\@anim@btnend{% + \@anim@bg\space 2.5 w 1 J 1 j - 0 G + \@anim@fg\space 10 10 130 130 re S 10 w @@ -409,10 +402,11 @@ S } \def\@anim@btnstep{% + \@anim@bg\space 2.5 w 1 J 1 j - 0 G + \@anim@fg\space 10 10 130 130 re S 10 w @@ -422,10 +416,11 @@ S } \def\@anim@btnplay{% + \@anim@bg\space 2.5 w 1 J 1 j - 0 G + \@anim@fg\space 10 10 130 130 re S 10 w @@ -436,9 +431,10 @@ S } \def\@anim@btnpause{% + \@anim@bg\space 2.5 w 1 j - 0 G + \@anim@fg\space 0 10 m 140 10 l 140 140 l @@ -450,10 +446,11 @@ S } \def\@anim@btnminus{% + \@anim@bg\space 2.5 w 1 J 1 j - 0 G + \@anim@fg\space 10 10 130 130 re S 10 w @@ -463,10 +460,11 @@ S } \def\@anim@btnplus{% + \@anim@bg\space 2.5 w 1 J 1 j - 0 G + \@anim@fg\space 10 10 130 130 re S 10 w @@ -478,17 +476,18 @@ S } \def\@anim@btnreset{% + \@anim@bg\space 2.5 w 1 J 1 j - 0 G + \@anim@fg\space 10 10 130 130 re S 10 w 75 40 m 75 110 l S - 0 g + \@anim@@@fg\space 35 50 m 70 75 l 35 100 l @@ -505,62 +504,63 @@ 115 75 l S } - \def\@anim@makebuttons{% + \def\@anim@makebuttons#1{% \@anim@xbutton{EndLeft}{% q -0.1 0 0 0.1 15 0 cm \@anim@btnend\space Q% - }% + }{#1}% \@anim@xbutton{EndRight}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnend\space Q% - }% + }{#1}% \@anim@xbutton{Minus}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnminus\space Q% - }% + }{#1}% \@anim@xbutton{PauseLeft}{% q -0.1 0 0 0.1 15 0 cm \@anim@btnpause\space Q% - }% + }{#1}% \@anim@xbutton{PauseRight}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnpause\space Q% - }% + }{#1}% \@anim@xbutton{PlayLeft}{% q -0.1 0 0 0.1 15 0 cm \@anim@btnplay\space Q% - }% + }{#1}% \@anim@xbutton{PlayRight}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnplay\space Q% - }% + }{#1}% \@anim@xbutton{Plus}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnplus\space Q% - }% + }{#1}% \@anim@xbutton{Reset}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnreset\space Q% - }% + }{#1}% \@anim@xbutton{StepLeft}{% q -0.1 0 0 0.1 15 0 cm \@anim@btnstep\space Q% - }% + }{#1}% \@anim@xbutton{StepRight}{% q 0.1 0 0 0.1 0 0 cm \@anim@btnstep\space Q% - }% + }{#1}% } %XObject creation - \def\@anim@xbutton#1#2{% #1 name, #2 stroking commands + \def\@anim@xbutton#1#2#3{% #1 name, #2 stroking commands, #3 @anim@num \immediate\pdfobj stream attr{% /Type/XObject/Subtype/Form/BBox [0 0 15 15]% }{#2}% - \@anim@newkey{btn#1}{\the\pdflastobj\space 0 R}% + \@anim@newkey{btn#1:#3}{\the\pdflastobj\space 0 R}% } \else \def\@anim@btnend{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 1 setlinecap 1 setlinejoin @@ -581,7 +581,8 @@ stroke } \def\@anim@btnstep{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 1 setlinecap 1 setlinejoin @@ -598,7 +599,8 @@ stroke } \def\@anim@btnplay{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 1 setlinecap 1 setlinejoin @@ -616,7 +618,8 @@ stroke } \def\@anim@btnpause{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 0 setlinecap 1 setlinejoin @@ -631,7 +634,8 @@ stroke } \def\@anim@btnminus{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 1 setlinecap 1 setlinejoin @@ -648,7 +652,8 @@ stroke } \def\@anim@btnplus{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 1 setlinecap 1 setlinejoin @@ -667,7 +672,8 @@ stroke } \def\@anim@btnreset{% - 0 setgray + \@anim@bg\space + \@anim@fg\space 0.25 setlinewidth 1 setlinecap 1 setlinejoin @@ -700,50 +706,50 @@ 11.5 7.5 lineto stroke } - \def\@anim@makebuttons{% + \def\@anim@makebuttons#1{% #1: @anim@num \@anim@xbutton{EndLeft}{% [-1 0 0 1 15 0] concat \@anim@btnend% - }% + }{#1}% \@anim@xbutton{EndRight}{% \@anim@btnend% - }% + }{#1}% \@anim@xbutton{Minus}{% \@anim@btnminus% - }% + }{#1}% \@anim@xbutton{PauseLeft}{% [-1 0 0 1 15 0] concat \@anim@btnpause% - }% + }{#1}% \@anim@xbutton{PauseRight}{% \@anim@btnpause% - }% + }{#1}% \@anim@xbutton{PlayLeft}{% [-1 0 0 1 15 0] concat \@anim@btnplay% - }% + }{#1}% \@anim@xbutton{PlayRight}{% \@anim@btnplay% - }% + }{#1}% \@anim@xbutton{Plus}{% \@anim@btnplus% - }% + }{#1}% \@anim@xbutton{Reset}{% \@anim@btnreset% - }% + }{#1}% \@anim@xbutton{StepLeft}{% [-1 0 0 1 15 0] concat \@anim@btnstep% - }% + }{#1}% \@anim@xbutton{StepRight}{% \@anim@btnstep% - }% + }{#1}% } - \def\@anim@xbutton#1#2{% #1: name; #2: stroking commands + \def\@anim@xbutton#1#2#3{% #1: name; #2: stroking commands, #3 @anim@num \special{ps: gsave mark - /_objdef {btn#1} + /_objdef {btn#1:#3} /BBox [0 0 15 15] /BP pdfmark { #2 } ?pdfmark mark /EP pdfmark grestore @@ -809,8 +815,98 @@ \newcount\@anim@curframe \newcount\@anim@curframe@zb% zero based -\newboolean{@anim@buttonsmade} %true if button faces have been made -\setboolean{@anim@buttonsmade}{false} +%draftbox from file +\ifpdf + \def\@anim@filedraftbox#1{% #1: filename + %store file in a box + \def\@anim@mps{.mps}% + \ifx\@anim@ext\@anim@mps% + \global\setbox\@anim@box=\hbox{\convertMPtoPDF{#1}{1}{1}}% + \else% + \immediate\pdfximage{#1}% + \global\setbox\@anim@box=\hbox{\pdfrefximage\pdflastximage}% + \fi% + \@anim@draftbox{\@anim@box}% draw draft box with controls (if set) + } +\else + \def\@anim@filedraftbox#1{% + \edef\@anim@curfile{{#1}}% + \global\setbox\@anim@box=\hbox{\expandafter\includegraphics\@anim@curfile}% + \@anim@draftbox{\@anim@box}% + } +\fi + +%draftbox from savebox (lowlevel macro) +\def\@anim@draftbox#1{% #1: box number + %get size + \xdef\@anim@animwidth{\strip@pt\wd#1}% + \xdef\@anim@animheight{\strip@pt\ht#1}% + \xdef\@anim@animdepth{\strip@pt\dp#1}% + \setlength{\@anim@tmpdima}{\ht#1}% + \addtolength{\@anim@tmpdima}{\dp#1}% + \xdef\@anim@animtotalheight{\strip@pt\@anim@tmpdima}% + \@anim@rescale% rescale box + \edef\@anim@oldunitlength{\the\unitlength}% + \setlength{\unitlength}{1pt}% + \vtop{% draw boxes + \offinterlineskip% + \hbox{% + \raisebox{-\@anim@animdepth\@anim@pt}{% + \begin{picture}(\@anim@animwidth,\@anim@animtotalheight)% + \put(0,0){\framebox(\@anim@animwidth,\@anim@animtotalheight){}}% + \end{picture}% + }% + }% + \if@anim@controls% + \setlength{\@anim@tmpdima}{\@anim@btnsize}% + \vskip 0.1\@anim@tmpdima% + \hbox to \@anim@animwidth\@anim@pt {% + \hss% + \setlength{\@anim@tmpdimb}{2\@anim@tmpdima}% + \begin{picture}(\strip@pt\@anim@tmpdimb,\strip@pt\@anim@tmpdima)% + \put(0,0){\line(1,0){\strip@pt\@anim@tmpdimb}}% + \put(0,\strip@pt\@anim@tmpdima){% + \line(1,0){\strip@pt\@anim@tmpdimb}% + }% + \put(0,0){\line(0,1){\strip@pt\@anim@tmpdima}}% + \end{picture}% + \if@anim@step\else% + \begin{picture}(\strip@pt\@anim@tmpdimb,\strip@pt\@anim@tmpdima)% + \put(0,0){\line(1,0){\strip@pt\@anim@tmpdimb}}% + \put(0,\strip@pt\@anim@tmpdima){% + \line(1,0){\strip@pt\@anim@tmpdimb}% + }% + \end{picture}% + \fi% + \begin{picture}(\strip@pt\@anim@tmpdimb,\strip@pt\@anim@tmpdima)% + \put(0,0){\line(1,0){\strip@pt\@anim@tmpdimb}}% + \put(0,\strip@pt\@anim@tmpdima){% + \line(1,0){\strip@pt\@anim@tmpdimb}% + }% + \put(\strip@pt\@anim@tmpdimb,0){% + \line(0,1){\strip@pt\@anim@tmpdima}% + }% + \end{picture}% + \if@anim@step\else% + \hskip 0.3\@anim@tmpdima% + \setlength{\@anim@tmpdimb}{3\@anim@tmpdima}% + \begin{picture}(\strip@pt\@anim@tmpdimb,\strip@pt\@anim@tmpdima)% + \put(0,0){\line(0,1){\strip@pt\@anim@tmpdima}}% + \put(0,0){\line(1,0){\strip@pt\@anim@tmpdimb}}% + \put(0,\strip@pt\@anim@tmpdima){% + \line(1,0){\strip@pt\@anim@tmpdimb}% + }% + \put(\strip@pt\@anim@tmpdimb,0){% + \line(0,1){\strip@pt\@anim@tmpdima}% + }% + \end{picture}% + \fi% + \hss% + }% + \fi% + \setlength{\unitlength}{\@anim@oldunitlength}% + }% +} %user command for embedding animation sequence % #1: options @@ -829,74 +925,86 @@ \def\@anim@first{#4}% \def\@anim@last{#5}% % - \if@anim@controls% - %create button faces if necessary - \if@anim@buttonsmade\else% - \@anim@makebuttons% - \setboolean{@anim@buttonsmade}{true}% - \fi% - \if@anim@step\else% - %combine Pause & Play button faces into one XObject - \@anim@makeppcontainer{\the\@anim@num}{Right}% - \@anim@makeppcontainer{\the\@anim@num}{Left}% - \fi% - \fi% - \xdef\@anim@fps{#2}% current frame rate - \xdef\@anim@nfps{#2}% - \xdef\@anim@pauseat{}% - \xdef\@anim@nfpsat{}% - \xdef\@anim@pfpsat{}% - % - %read all frames of the sequence \@anim@curframe=\@anim@first% \@anim@curframe@zb=0% - \loop\ifnum\@anim@curframe>\@anim@last\else% - %get file name extension of current file - \@anim@getext{% - \@anim@base\@anim@pad{\@anim@first}{\the\@anim@curframe}% - }% - %embed graphics - \@anim@ximage{\the\@anim@num}{\the\@anim@curframe@zb}{% - \@anim@base\@anim@pad{\@anim@first}{\the\@anim@curframe}\@anim@ext% - }% - \advance\@anim@curframe by 1% - \advance\@anim@curframe@zb by 1% - \repeat% - \xdef\@anim@frames{\the\@anim@curframe@zb}% total number - %build timeline from optional timeline file - \if@anim@timeline\@anim@buildtmln{\the\@anim@num}\fi% - \@anim@makecontainer{\the\@anim@num}% create container XObject - %insert animation widget & controls - \@anim@insertwidgets{\the\@anim@num}% + \if@anim@draft% + %test for existence of all files of the sequence + \loop\ifnum\@anim@curframe>\@anim@last\else% + %get file name extension of current file (also tests for existence) + \@anim@getext{% + \@anim@base\@anim@pad{\@anim@first}{\the\@anim@curframe}% + }% + \advance\@anim@curframe by 1% + \advance\@anim@curframe@zb by 1% + \repeat% + %draw draftbox according to dimensions of the first frame + \@anim@filedraftbox{\@anim@base\@anim@first\@anim@ext}% + \else% + \if@anim@controls% + %create button faces only once in the current colour combination + \expandafter\ifx\csname + btncol:\@anim@bgcolour:\@anim@fgcolour\endcsname\relax% + \@anim@makebuttons{\the\@anim@num}% + \@anim@newkey{btncol:\@anim@bgcolour:\@anim@fgcolour}{\the\@anim@num}% + \fi% + \if@anim@step\else% + %combine Pause & Play button faces into one XObject + \@anim@makeppcontainer{\the\@anim@num}{Right}{% + \@anim@getkeyval{btncol:\@anim@bgcolour:\@anim@fgcolour}}% + \@anim@makeppcontainer{\the\@anim@num}{Left}{% + \@anim@getkeyval{btncol:\@anim@bgcolour:\@anim@fgcolour}}% + \fi% + \fi% + \xdef\@anim@fps{#2}% current frame rate + \xdef\@anim@nfps{#2}% + % + %read all frames of the sequence + \loop\ifnum\@anim@curframe>\@anim@last\else% + %get file name extension of current file + \@anim@getext{% + \@anim@base\@anim@pad{\@anim@first}{\the\@anim@curframe}% + }% + %embed graphics + \@anim@ximage{\the\@anim@num}{\the\@anim@curframe@zb}{% + \@anim@base\@anim@pad{\@anim@first}{\the\@anim@curframe}\@anim@ext% + }% + \advance\@anim@curframe by 1% + \advance\@anim@curframe@zb by 1% + \repeat% + \xdef\@anim@frames{\the\@anim@curframe@zb}% total number + %build timeline from optional timeline file + \if@anim@timeline\@anim@buildtmln{\the\@anim@num}\fi% + \@anim@makecontainer{\the\@anim@num}% create container XObject + %insert animation widget & controls + \@anim@insertwidgets{\the\@anim@num}{% + \@anim@getkeyval{btncol:\@anim@bgcolour:\@anim@fgcolour}}% + \fi% \global\advance\@anim@num by 1% }% -%insert the animation and control button widgets -\def\@anim@insertwidgets#1{%#1:@anim@num +%inserts animation and control button widgets +\def\@anim@insertwidgets#1#2{%#1:@anim@num, #2 existing btn colour combination \vtop{% \offinterlineskip% \hbox{\@anim@animwidget{#1}}% \if@anim@controls% \setlength{\@anim@tmpdima}{\@anim@btnsize}% - \setlength{\@anim@tmpdima}{0.1\@anim@tmpdima}% - \vskip \@anim@tmpdima% + \vskip 0.1\@anim@tmpdima% \hbox to \@anim@animwidth\@anim@pt {% \hss% - \@anim@buttonwidget{#1}{EndLeft}{EndLeft}% - \@anim@buttonwidget{#1}{StepLeft}{StepLeft}% + \@anim@buttonwidget{#1}{EndLeft}{EndLeft:#2}% + \@anim@buttonwidget{#1}{StepLeft}{StepLeft:#2}% \if@anim@step\else% \@anim@buttonwidget{#1}{PlayPauseLeft}{#1.PlayPauseLeft}% \@anim@buttonwidget{#1}{PlayPauseRight}{#1.PlayPauseRight}% \fi% - \@anim@buttonwidget{#1}{StepRight}{StepRight}% - \@anim@buttonwidget{#1}{EndRight}{EndRight}% + \@anim@buttonwidget{#1}{StepRight}{StepRight:#2}% + \@anim@buttonwidget{#1}{EndRight}{EndRight:#2}% \if@anim@step\else% - \setlength{\@anim@tmpdima}{\@anim@btnsize}% - \setlength{\@anim@tmpdima}{0.3\@anim@tmpdima}% - \hskip \@anim@tmpdima% - \@anim@buttonwidget{#1}{Minus}{Minus}% - \@anim@buttonwidget{#1}{Reset}{Reset}% - \@anim@buttonwidget{#1}{Plus}{Plus}% + \hskip 0.3\@anim@tmpdima% + \@anim@buttonwidget{#1}{Minus}{Minus:#2}% + \@anim@buttonwidget{#1}{Reset}{Reset:#2}% + \@anim@buttonwidget{#1}{Plus}{Plus:#2}% \fi% \hss% }% @@ -963,6 +1071,9 @@ \setlength{\@anim@tmpdima}{\@anim@animdepth\@anim@pt}% \setlength{\@anim@tmpdima}{\@anim@boxscale\@anim@tmpdima}% \xdef\@anim@animdepth{\strip@pt\@anim@tmpdima}% + \setlength{\@anim@tmpdima}{\@anim@animheight\@anim@pt}% + \addtolength{\@anim@tmpdima}{\@anim@animdepth\@anim@pt}% + \xdef\@anim@animtotalheight{\strip@pt\@anim@tmpdima}% } %creates animation widget @@ -991,7 +1102,6 @@ /T (anm@#1)% /MK <<% /TP 1% icon, no caption - /BG [\@anim@bg]% /IF <</SW/A/S/A>>% scale icon freely within widget >>% /AA <<% bind JavaScripts to trigger events @@ -1044,7 +1154,6 @@ /T (anm@#1)% /MK <<% /TP 1 - /BG [\@anim@bg]% /IF <</SW/A/S/A>>% >>% /AA <<% @@ -1081,7 +1190,6 @@ /T (btn@#1@#2)% /MK <<% /TP 1% - /BG [\@anim@btnbg]% /IF <</SW/A/S/A>>% scale button face icon freely within widget >>% /A <</S/JavaScript/JS (\@anim@upjscriptstring)>>% @@ -1120,7 +1228,6 @@ /T (btn@#1@#2)% /MK << /TP 1 - /BG [\@anim@btnbg] /IF <</SW/A/S/A>> >>% /A <</S/JavaScript/JS (\@anim@upjscriptstring)>>% @@ -1147,20 +1254,24 @@ \setboolean{@anim@inside}{true}% \@anim@reset% to default settings \setkeys{anim@user}{#1}% - %create button faces if necessary - \if@anim@controls% - \if@anim@buttonsmade\else% - \@anim@makebuttons% - \setboolean{@anim@buttonsmade}{true}% - \fi% - \if@anim@step\else% - %combine Pause & Play button faces into one XObject - \@anim@makeppcontainer{\the\@anim@num}{Right}% - \@anim@makeppcontainer{\the\@anim@num}{Left}% + \if@anim@draft\else% + %create button faces if necessary + \if@anim@controls% + \expandafter\ifx\csname + btncol:\@anim@bgcolour:\@anim@fgcolour\endcsname\relax% + \@anim@makebuttons{\the\@anim@num}% + \@anim@newkey{btncol:\@anim@bgcolour:\@anim@fgcolour}{\the\@anim@num}% + \fi% + \if@anim@step\else% + \@anim@makeppcontainer{\the\@anim@num}{Right}{% + \@anim@getkeyval{btncol:\@anim@bgcolour:\@anim@fgcolour}}% + \@anim@makeppcontainer{\the\@anim@num}{Left}{% + \@anim@getkeyval{btncol:\@anim@bgcolour:\@anim@fgcolour}}% + \fi% \fi% + \xdef\@anim@fps{#2}% + \xdef\@anim@nfps{#2}% current frame rate (for use in \newframe) \fi% - \xdef\@anim@fps{#2}% - \xdef\@anim@nfps{#2}% current frame rate (for use in \newframe) \global\@anim@curframe@zb=0% \@anim@beginframe% \ignorespaces% @@ -1168,12 +1279,15 @@ \unskip% \@anim@endframe{\the\@anim@num}{\the\@anim@curframe@zb}% \global\advance\@anim@curframe@zb by 1% - \xdef\@anim@frames{\the\@anim@curframe@zb}% total number - %build timeline from optional timeline file - \if@anim@timeline\@anim@buildtmln{\the\@anim@num}\fi% - \@anim@makecontainer{\the\@anim@num}% create container XObject - %insert animation widget & controls - \@anim@insertwidgets{\the\@anim@num}% + \if@anim@draft\else% + \xdef\@anim@frames{\the\@anim@curframe@zb}% total number + %build timeline from optional timeline file + \if@anim@timeline\@anim@buildtmln{\the\@anim@num}\fi% + \@anim@makecontainer{\the\@anim@num}% create container XObject + %insert animation widget & controls + \@anim@insertwidgets{\the\@anim@num}{% + \@anim@getkeyval{btncol:\@anim@bgcolour:\@anim@fgcolour}}% + \fi% \global\advance\@anim@num by 1% \setboolean{@anim@inside}{false}% } @@ -1191,33 +1305,30 @@ \@anim@endframe{\the\@anim@num}{\the\@anim@curframe@zb}% \@ifstar\@anim@newframestar\@anim@newframe% } -\newcommand{\@anim@newframestar}[1][]{% starred variant to pause animation - \if@anim@step\else% % #1: new frame rate - \if@anim@timeline\else% - %build JavaScript commands to fill the `pauseAt' array - \xdef\@anim@pauseat{% - \@anim@pauseat% - a\the\@anim@num.pauseAt[\the\@anim@curframe@zb]=1;% - }% - \setboolean{@anim@pauseframes}{true}% - \xdef\@anim@pfps{\@anim@nfps}% - \xdef\@anim@nfps{#1}% - \ifx\@anim@nfps\@empty% - \xdef\@anim@nfps{\@anim@pfps}% - \else% - \ifnum\@anim@curframe@zb=0% - \xdef\@anim@fps{#1}% +\newcommand{\@anim@newframe}[1][]{% #1: new frame rate + \if@anim@draft\else% + \if@anim@step\else% + \if@anim@timeline\else% + \edef\@anim@pfps{\@anim@nfps}% + \edef\@anim@nfps{#1}% + \ifx\@anim@nfps\@empty% + \edef\@anim@nfps{\@anim@pfps}% + \else% + \ifnum\@anim@curframe@zb=0% + \xdef\@anim@fps{#1}% + \fi% + %build JavaScript commands to fill the `nFpsAt' & `pFpsAt' arrays + \xdef\@anim@nfpsat{% + \@anim@nfpsat% + a\the\@anim@num.nFpsAt[\the\@anim@curframe@zb]=Math.abs(#1);% + }% + \xdef\@anim@pfpsat{% + \@anim@pfpsat% + a\the\@anim@num.pFpsAt[\the\@anim@curframe@zb]=% + Math.abs(\@anim@pfps);% + }% + \setboolean{@anim@chfps}{true}% change fps \fi% - %build JavaScript commands to fill the `nFpsAt' & `pFpsAt' arrays - \xdef\@anim@nfpsat{% - \@anim@nfpsat% - a\the\@anim@num.nFpsAt[\the\@anim@curframe@zb]=Math.abs(#1);% - }% - \xdef\@anim@pfpsat{% - \@anim@pfpsat% - a\the\@anim@num.pFpsAt[\the\@anim@curframe@zb]=Math.abs(\@anim@pfps);% - }% - \setboolean{@anim@chfps}{true}% change fps \fi% \fi% \fi% @@ -1225,27 +1336,36 @@ \@anim@beginframe% \ignorespaces% } -\newcommand{\@anim@newframe}[1][]{% #1: new frame rate - \if@anim@step\else% - \if@anim@timeline\else% - \edef\@anim@pfps{\@anim@nfps}% - \edef\@anim@nfps{#1}% - \ifx\@anim@nfps\@empty% - \edef\@anim@nfps{\@anim@pfps}% - \else% - \ifnum\@anim@curframe@zb=0% - \xdef\@anim@fps{#1}% - \fi% - %build JavaScript commands to fill the `nFpsAt' & `pFpsAt' arrays - \xdef\@anim@nfpsat{% - \@anim@nfpsat% - a\the\@anim@num.nFpsAt[\the\@anim@curframe@zb]=Math.abs(#1);% - }% - \xdef\@anim@pfpsat{% - \@anim@pfpsat% - a\the\@anim@num.pFpsAt[\the\@anim@curframe@zb]=Math.abs(\@anim@pfps);% +\newcommand{\@anim@newframestar}[1][]{% starred variant for pauseing animation + \if@anim@draft\else% #1: new frame rate + \if@anim@step\else% + \if@anim@timeline\else% + %build JavaScript commands to fill the `pauseAt' array + \xdef\@anim@pauseat{% + \@anim@pauseat% + a\the\@anim@num.pauseAt[\the\@anim@curframe@zb]=1;% }% - \setboolean{@anim@chfps}{true}% change fps + \setboolean{@anim@pauseframes}{true}% + \xdef\@anim@pfps{\@anim@nfps}% + \xdef\@anim@nfps{#1}% + \ifx\@anim@nfps\@empty% + \xdef\@anim@nfps{\@anim@pfps}% + \else% + \ifnum\@anim@curframe@zb=0% + \xdef\@anim@fps{#1}% + \fi% + %build JavaScript commands to fill the `nFpsAt' & `pFpsAt' arrays + \xdef\@anim@nfpsat{% + \@anim@nfpsat% + a\the\@anim@num.nFpsAt[\the\@anim@curframe@zb]=Math.abs(#1);% + }% + \xdef\@anim@pfpsat{% + \@anim@pfpsat% + a\the\@anim@num.pFpsAt[\the\@anim@curframe@zb]=% + Math.abs(\@anim@pfps);% + }% + \setboolean{@anim@chfps}{true}% change fps + \fi% \fi% \fi% \fi% @@ -1254,9 +1374,9 @@ \ignorespaces% } -%starts a new frame +%starts new frame \def\@anim@beginframe{% - \begin{lrbox}{\@anim@box}% store the graphics in a box + \begin{lrbox}{\@anim@box}% store graphics in a box \the\@anim@begin% } @@ -1264,7 +1384,7 @@ \def\@anim@endframe#1#2{% \the\@anim@end% \end{lrbox}% - \message{< a#1, fr#2}% + \if@anim@draft\else\message{< a#1, fr#2}\fi% %determine size of graphics \ifnum #2=0% \xdef\@anim@animwidth{\strip@pt\wd\@anim@box}% @@ -1285,10 +1405,11 @@ }{}% \fi% \fi% + %draw draftbox according to dimensions of the first frame + \if@anim@draft\@anim@draftbox{\@anim@box}\fi% \fi% %now create Form XObject of box contents - \@anim@xinline{#1}{#2}{\@anim@box}% - \message{>}% + \if@anim@draft\else\@anim@xinline{#1}{#2}{\@anim@box}\message{>}\fi% } %prints zero padded integers @@ -1325,7 +1446,7 @@ \edef\@anim@endlinechar{\the\endlinechar}% \endlinechar=-1% suppress trailing space at input line end \global\@anim@curframe@zb=0% - %read timeline file a first time to get number lines (= number of frames) + %read timeline file a first time to get number of lines (= number of frames) \openin\@anim@@tmlnfile=\@anim@tmlnfile% \read\@anim@@tmlnfile to \@anim@inputline% \edef\@anim@inputline{\@anim@inputline\space}% @@ -1346,7 +1467,7 @@ \setboolean{@anim@eof}{false}\fi% }% \closein\@anim@@tmlnfile% - \xdef\@anim@images{\@anim@frames}% total number of images + \xdef\@anim@transp{\@anim@frames}% total number of transp \xdef\@anim@frames{\the\@anim@curframe@zb}% total number of anim positions \global\@anim@curframe@zb=0% %reopen timeline file and build timeline @@ -1413,11 +1534,11 @@ \@anim@parsethird#3,:;% } -%parses 3rd column of timeline file (comma separated list of image specs) +%parses 3rd column of timeline file (comma separated list of transp. specs) \def\@anim@parsethird#1,#2;{% \def\@anim@firstarg{#1}% \ifx\@anim@firstarg\@empty\else% - \@anim@process#1x:;% process one image spec + \@anim@process#1x:;% process one transparency spec \fi% \ifx #2:\else% \@anim@parsethird#2;% @@ -1425,9 +1546,10 @@ } \newcount\@anim@tmpcnt %scratch counter for different uses -%process image spec, such as 123 or 456x78 or 9x0 + +%process transparency spec, such as 123 or 456x78 or 9x0 \def\@anim@process#1x#2;{% - %determine number of repetitions of current image + %determine number of repetitions of current transparency \ifx #2:% \gdef\@anim@repeats{1}% \else% @@ -1444,9 +1566,9 @@ \edef\@anim@repeatuntil{\the\@anim@tmpcnt}% \fi% \fi% - %build contents of animation frames according to image specifications - \ifnum\@anim@images<#1\else% ignore image specifications which do not exist - \ifnum\@anim@images=#1\else% + %build contents of animation frames according to transparency specifications + \ifnum\@anim@transp<#1\else% ignore non-existing transparencies + \ifnum\@anim@transp=#1\else% \@anim@tmpcnt=\@anim@curframe@zb% \loop\ifnum\@anim@repeatuntil>\@anim@tmpcnt% \@anim@newkey{@anim@content@\the\@anim@tmpcnt}{% @@ -1481,15 +1603,97 @@ \define@key{anim@user}{scale}{% \gdef\@anim@boxscale{#1}% } - -\define@key{anim@user}{screenbg}{%background colour - \gdef\@anim@bg{#1}% -} \define@key{anim@user}{buttonsize}{% \gdef\@anim@btnsize{#1}% } -\define@key{anim@user}{buttonbg}{%background of buttons - \gdef\@anim@btnbg{#1}% +\def\@anim@colours#1:#2;{% helper macro to get number of colour components and + \xdef\@anim@colour{\@anim@colour\space #1}% to replace : by ` ' in the arg + \ifx #2!\else% + \global\advance\@anim@tmpcnt by 1% + \@anim@colours#2;% + \fi% +} +\ifpdf %background frame of buttons + \def\@anim@@@bg{% + 0 j + 0 0 150 150 re + f% + } +\else + \def\@anim@@@bg{% + 0 setlinejoin + 0 0 moveto + 15 0 lineto + 15 15 lineto + 0 15 lineto + closepath + fill% + } +\fi +\define@key{anim@user}{buttonbg}{%background colour of buttons + \global\@anim@tmpcnt=1% + \gdef\@anim@colour{}% + \@anim@colours#1:!;% + \xdef\@anim@bgcolour{\@anim@colour}% + \ifpdf% + \ifnum\@anim@tmpcnt=1 + \xdef\@anim@bg{\@anim@colour\space g\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=3 + \xdef\@anim@bg{\@anim@colour\space rg\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=4 + \xdef\@anim@bg{\@anim@colour\space k\space\@anim@@@bg}% + \fi% + \fi% + \fi% + \else% + \ifnum\@anim@tmpcnt=1 + \xdef\@anim@bg{\@anim@colour\space setgray\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=3 + \xdef\@anim@bg{\@anim@colour\space setrgbcolor\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=4 + \xdef\@anim@bg{\@anim@colour\space setcmykcolor\space\@anim@@@bg}% + \fi% + \fi% + \fi% + \fi% +} +\define@key{anim@user}{buttonfg}{%stroking colour of buttons + \global\@anim@tmpcnt=1% + \gdef\@anim@colour{}% + \@anim@colours#1:!;% + \xdef\@anim@fgcolour{\@anim@colour}% + \ifpdf% + \ifthenelse{\the\@anim@tmpcnt=1}{% + \xdef\@anim@fg{\@anim@colour\space G}% + \xdef\@anim@@@fg{\@anim@colour\space g}% + }{% + \ifthenelse{\the\@anim@tmpcnt=3}{% + \xdef\@anim@fg{\@anim@colour\space RG}% + \xdef\@anim@@@fg{\@anim@colour\space rg}% + }{% + \ifthenelse{\the\@anim@tmpcnt=4}{% + \xdef\@anim@fg{\@anim@colour\space K}% + \xdef\@anim@@@fg{\@anim@colour\space k}% + }{}% + }% + }% + \else% + \ifthenelse{\the\@anim@tmpcnt=1}{% + \xdef\@anim@fg{\@anim@colour\space setgray}% + }{% + \ifthenelse{\the\@anim@tmpcnt=3}{% + \xdef\@anim@fg{\@anim@colour\space setrgbcolor}% + }{% + \ifthenelse{\the\@anim@tmpcnt=4}{% + \xdef\@anim@fg{\@anim@colour\space setcmykcolor}% + }{}% + }% + }% + \fi% } \newboolean{@anim@controls} \setboolean{@anim@controls}{false} @@ -1505,9 +1709,7 @@ \setboolean{@anim@autoplay}{false} \define@key{anim@user}{autoplay}[true]{% \setboolean{@anim@autoplay}{#1}% - \if@anim@autoplay - \setboolean{@anim@autoresume}{false} - \fi% + \if@anim@autoplay\setboolean{@anim@autoresume}{false}\fi% } \newboolean{@anim@autoresume} \setboolean{@anim@autoresume}{false} @@ -1541,6 +1743,18 @@ \define@key{anim@user}{step}[true]{% \setboolean{@anim@step}{#1}% } +\newboolean{@anim@draft} +\setboolean{@anim@draft}{false} +\define@key{anim@user}{draft}[true]{% + \setboolean{@anim@draft}{#1}% +} +\define@key{anim@user}{final}[true]{% + \ifthenelse{\equal{#1}{true}}{% + \setboolean{@anim@draft}{false}% + }{% + \setboolean{@anim@draft}{true}% + }% +} \define@key{anim@user}{timeline}{% \IfFileExists{#1}{% \gdef\@anim@tmlnfile{#1}% @@ -1568,7 +1782,10 @@ \gdef\@anim@boxheight{}% \gdef\@anim@boxwidth{}% \xdef\@anim@bg{\@anim@@bg}% - \xdef\@anim@btnbg{\@anim@@btnbg}% + \xdef\@anim@fg{\@anim@@fg}% + \ifpdf\xdef\@anim@@@fg{\@anim@@@@fg}\fi% + \xdef\@anim@bgcolour{\@anim@@bgcolour}% default button colours + \xdef\@anim@fgcolour{\@anim@@fgcolour}% \xdef\@anim@btnsize{\@anim@@btnsize}% \xdef\@anim@poster{\@anim@@poster}% \let\if@anim@controls=\if@anim@@controls% @@ -1578,6 +1795,7 @@ \let\if@anim@autopause=\if@anim@@autopause% \let\if@anim@palindrome=\if@anim@@palindrome% \let\if@anim@step=\if@anim@@step% + \let\if@anim@draft=\if@anim@@draft% \gdef\@anim@posterocg{}% \gdef\@anim@properties{}% \gdef\@anim@xobject{}% @@ -1594,18 +1812,79 @@ } %package options -\def\@anim@@bg{}% -\define@key{anim@pkg}{screenbg}{% - \gdef\@anim@@bg{#1}% +\def\@anim@@bg{} +\def\@anim@@bgcolour{} +\define@key{anim@pkg}{buttonbg}{%background colour of buttons + \global\@anim@tmpcnt=1% + \gdef\@anim@colour{}% + \@anim@colours#1:!;% + \xdef\@anim@@bgcolour{\@anim@colour}% + \ifpdf% + \ifnum\@anim@tmpcnt=1 + \xdef\@anim@@bg{\@anim@colour\space g\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=3 + \xdef\@anim@@bg{\@anim@colour\space rg\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=4 + \xdef\@anim@@bg{\@anim@colour\space k\space\@anim@@@bg}% + \fi% + \fi% + \fi% + \else% + \ifnum\@anim@tmpcnt=1 + \xdef\@anim@@bg{\@anim@colour\space setgray\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=3 + \xdef\@anim@@bg{\@anim@colour\space setrgbcolor\space\@anim@@@bg}% + \else% + \ifnum\@anim@tmpcnt=4 + \xdef\@anim@@bg{\@anim@colour\space setcmykcolor\space\@anim@@@bg}% + \fi% + \fi% + \fi% + \fi% +} +\ifpdf\def\@anim@@fg{0 G}\def\@anim@@@@fg{0 g}\else\def\@anim@@fg{0 setgray}\fi +\def\@anim@@fgcolour{} +\define@key{anim@pkg}{buttonfg}{%stroking colour of buttons + \global\@anim@tmpcnt=1% + \gdef\@anim@colour{}% + \@anim@colours#1:!;% + \xdef\@anim@@fgcolour{\@anim@colour}% + \ifpdf% + \ifthenelse{\the\@anim@tmpcnt=1}{% + \xdef\@anim@@fg{\@anim@colour\space G}% + \xdef\@anim@@@@fg{\@anim@colour\space g}% + }{% + \ifthenelse{\the\@anim@tmpcnt=3}{% + \xdef\@anim@@fg{\@anim@colour\space RG}% + \xdef\@anim@@@@fg{\@anim@colour\space rg}% + }{% + \ifthenelse{\the\@anim@tmpcnt=4}{% + \xdef\@anim@@fg{\@anim@colour\space K}% + \xdef\@anim@@@@fg{\@anim@colour\space k}% + }{}% + }% + }% + \else% + \ifthenelse{\the\@anim@tmpcnt=1}{% + \xdef\@anim@@fg{\@anim@colour\space setgray}% + }{% + \ifthenelse{\the\@anim@tmpcnt=3}{% + \xdef\@anim@@fg{\@anim@colour\space setrgbcolor}% + }{% + \ifthenelse{\the\@anim@tmpcnt=4}{% + \xdef\@anim@@fg{\@anim@colour\space setcmykcolor}% + }{}% + }% + }% + \fi% } \def\@anim@@btnsize{1.44em}% \define@key{anim@pkg}{buttonsize}{% \gdef\@anim@@btnsize{#1}% } -\def\@anim@@btnbg{}% -\define@key{anim@pkg}{buttonbg}{% - \gdef\@anim@@btnbg{#1}% -} \newboolean{@anim@@controls} \setboolean{@anim@@controls}{false}% \define@key{anim@pkg}{controls}[true]{% @@ -1654,6 +1933,22 @@ \define@key{anim@pkg}{step}[true]{% \setboolean{@anim@@step}{#1}% } +\newboolean{@anim@@draft} +\ifdraft{%globally set by document class + \setboolean{@anim@@draft}{true}% +}{% + \setboolean{@anim@@draft}{false}% +}% +\define@key{anim@pkg}{draft}[true]{% + \setboolean{@anim@@draft}{#1}% +} +\define@key{anim@pkg}{final}[true]{% + \ifthenelse{\equal{#1}{true}}{% + \setboolean{@anim@@draft}{false}% + }{% + \setboolean{@anim@@draft}{true}% + }% +} %process package options \def\@anim@setpkgkeys#1{\setkeys{anim@pkg}{#1}} @@ -1664,21 +1959,18 @@ %animation widget's PageOpen event \ifpdf \def\@anim@pojscript#1{% - \gdef\@anim@posterlast{last}% - \gdef\@anim@posternone{none}% \immediate\pdfobj stream {\@anim@@pojscript{#1}}% \xdef\@anim@pojscriptobj{\the\pdflastobj\space 0 R}% } \else \def\@anim@pojscript#1{% - \gdef\@anim@posterlast{last}% - \gdef\@anim@posternone{none}% \special{ps: mark /_objdef {a#1@pojscript} /type/stream /OBJ pdfmark mark {a#1@pojscript} (\@anim@@pojscript{#1}) /PUT pdfmark }% } \fi +\def\@anim@posterlast{last}% helper macro \def\@anim@@pojscript#1{% #1: @anim@num % console.show();% % console.clear();% |