%---- LCB --- 11 Nov 2002 -- v.0.1 ---------------------------------------------
%---- LCB --- 29 Mar 2003 -- v.0.2 ---------------------------------------------
%
%-------------------------------------------------------------------------------
\NeedsTeXFormat{LaTeX2e}
\def\fileversion{v.0.2}
\def\filedate{2003/03/30}% must retain this format, else syntax error
\ProvidesPackage{pdfseminar}[\filedate\space\fileversion\space  PDF seminar style (LCB)]
%
\RequirePackage{graphicx}% for \includegraphics
\RequirePackage{color}% for coloured screen output
\RequirePackage{comment}% for begin{screen}, begin{paper} environments.
%
\newif\if@screen          \@screentrue
\newif\if@paper           \@paperfalse
\newif\if@showtrigger     \@showtriggerfalse
\newif\if@staticpagemenu  \@staticpagemenufalse
\newif\if@usebgcolour     \@usebgcolourtrue
\newif\if@usebgimage      \@usebgimagefalse
\newif\if@compact         \@compactfalse
%
% order here is important 
% this is the order in which options will be processed by ProcessOptions
%
\DeclareOption{screen}{\@screentrue\@paperfalse}
\DeclareOption{paper}{\@papertrue\@screenfalse}
\DeclareOption{showtrigger}{\@showtriggertrue}
\DeclareOption{staticpagemenu}{\@staticpagemenutrue}
\DeclareOption{transientpagemenu}{\@staticpagemenufalse}
\DeclareOption{compact}{\@compacttrue}
%
\ExecuteOptions{screen,transientpagemenu}% default set of options
\ProcessOptions
%
%-------------------------------------------------------------------------------
%
%---- Screen options starts here -----------------------------------------------
%
\if@screen
%
\includecomment{screen}
\excludecomment{paper}
%
%-------------------------------------------------------------------------------
% Make sure that the document finishes with a \clearpage
% This ensure i) the page menu highlighting works correctly on the last page
% and ii) a spurious background image does not appear on the last page
%
% This entry must appear before the \end{Form} otherwise the above problems
% re-appear
%
\AtEndDocument{\clearpage}
%-------------------------------------------------------------------------------
% Make sure that \end{Form} is the *second* item in \AtEndDocument for
% proper matching with \begin{Form} in \AtBeginDocument (see later)
%
\AtEndDocument{\end{Form}}
%-------------------------------------------------------------------------------
%
%-------------------------------------------------------------------------------
%
\@ifundefined{hyperref}{\RequirePackage[pdftex]{hyperref}}{}
\hypersetup{pdfpagemode=none,
            colorlinks,
            pdfmenubar=true,%false,
            pdftoolbar=true,%false,
            pdffitwindow=true,
            pdfcenterwindow=false,
            pdfwindowui=true,%true,
            menucolor=menucolor,
            pdfview=Fit,
            pdfstartview=Fit,
            bookmarksopen=true}
%-------------------------------------------------------------------------------
%
%-------------- Redefine Hyperlink colours -------------------------------------
%
\def\@linkcolor{LinkColor}
\def\@anchorcolor{AnchorColor}
\def\@citecolor{CiteColor}
\def\@filecolor{FileColor}
\def\@urlcolor{URLColor}
\def\@menucolor{MenuColor}
\def\@pagecolor{PageColor}
%
%-------------- Global counters, dimensions etc. -------------------------------
%
\unitlength=1pt
%
%-------------- Add a Trojan horse to \shipout ---------------------------------
%
% Adapted from Hyperref, use macro \@AddToOverlay to add material to each page
%
\@ifundefined{LCBorg@shipout}{%
  \global\let\LCBorg@shipout\shipout
  \gdef\shipout{%
    \afterassignment\LCB@shipout
    \global\setbox\@cclv=%
  }%
  \gdef\LCB@shipout{%
    \ifvoid\@cclv\relax
       \aftergroup\LCB@@shipout
       \LCB@pageliteral
    \else
      \LCBorg@shipout\vbox{%
        \LCB@pageliteral
        \box\@cclv
      }%
    \fi
  }%
  \gdef\LCB@@shipout{%
    \LCBorg@shipout\box\@cclv\relax
  }%
  \gdef\LCB@pageliteral{\@Overlay}% the trojan horse
}{}%
%
\newdimen\@@xoffset
\newdimen\@@yoffset
%
\AtBeginDocument{% so that we can pick up users choice for Horigin/Vorigin
\newcommand{\@Overlay}{% extra material to add to each page
  \ifx\@Overlay@Hook\@empty% nothing to add
  \else
    \bgroup
      \@@xoffset=\PDFHorigin
      \@@yoffset=-\PDFVorigin
      \advance\@@yoffset\paperheight
      \vbox{\let\protect\relax%
        \unitlength=1pt%
        % Relocate the overlay box so that its lower left corner lies
        % at the lower left corner of the screen.
        % xoffset and yoffset define the new reference point for 
        % the \pictur@ box, the effect is to move the box in the opposite direction
        % so xoffset = +1cm would move the box 1cm to the left and
        % yoffset = +1cm would move the box down by 1cm.
        \pictur@(0,0)(\strip@pt\@@xoffset,\strip@pt\@@yoffset)%
          \@Overlay@Hook% the overlay material
        \endpicture}%
    \egroup
  \fi}}
\newcommand{\@Overlay@Hook}{}% start with empty overlay
\newcommand{\@AddToOverlay}{\g@addto@macro\@Overlay@Hook}
%-------------------------------------------------------------------------------
% Note : the above changes mean that *within* the overlay, put(0,0) refers
%        to the lower left of the screen.
%-------------------------------------------------------------------------------
%
%-------------- Image and colour overlays --------------------------------------
%
\def\backgroundcolour#1{\@usebgcolourtrue\@usebgimagefalse\gdef\@backgroundcolor{#1}}
\def\backgroundcolor#1{\@usebgcolourtrue\@usebgimagefalse\gdef\@backgroundcolor{#1}}
\def\backgroundimage#1{\@usebgcolourfalse\@usebgimagetrue\gdef\@backgroundimage{#1}}
%
\backgroundcolor{defaultbackgroundcolor}
%
\@AddToOverlay{%
   \setlength{\unitlength}{1pt}
   \if@usebgcolour%
   %
   % add hook for background colour, no background image
   %
     \put(0,0){%
     \colorbox{\@backgroundcolor}{%
     \color{white}\makebox(\strip@pt\paperwidth,\strip@pt\paperheight){}}}
   \else
   %
   % add hook for background image, no background colour
   %
     \put(0,0){%
     \includegraphics[width=\paperwidth,height=\paperheight]{\@backgroundimage}}%
   \fi}%
%
%-------------- Layout macros --------------------------------------------------
%
\newdimen\panelheight
\newlength\panelwidth
\newdimen\marginright
\newdimen\marginleft
\newdimen\margintop
\newdimen\marginbottom
\newdimen\panelwidthmin
%
\def\panelwidthfactor{0.15}% default panel width = 15% of screen
%
\newdimen\PDFHorigin
\newdimen\PDFVorigin
%
%-------------------------------------------------------------------------------
% Define the page origin. 
%
% This is the actual position on the page where text will begin. It is also
% the point selected by the the latex command \put(0,0).
%
% Note : LaTeX will read pdftex.cfg to obtain its horigin and vorigin values.
% The values entered here are just to pass the pdftex.cfg entries on to
% the overlay routines in pdfseminar.sty. Changing PDFHorigin or PDFVorigin
% will not reposition the text on the page, instead it will (incorrectly)
% relocate the overlay.
%
\PDFHorigin = 1truein% Yikes, that Middle Ages Measurement System rears its
\PDFVorigin = 1truein% ugly head yet again. This is not my choice, rather it
                     % is forced upon me by the defaults set in pdftex.cfg.
                     % Why do some people persist in using this antiqauted
                     % system? Have they not heard of the French Revolution?
                     % I wonder if they also still play vinyl records, ride
                     % penny-farthing bicycles and wash their clothes on the
                     % side of a rock? End of rant. Sorry. I feel better now.
%
%-------------------------------------------------------------------------------
% Set the screen and margin sizes
%
\def\screensize#1#2#3#4#5#6{%
    \paperheight=#1%
    \paperwidth=#2%
    \marginleft=#3%
    \marginright=#4%
    \margintop=#5%
    \marginbottom=#6%
    \setlength\panelwidth{\panelwidthfactor\paperwidth}%
    \ifdim\panelwidth<\panelwidthmin\setlength\panelwidth{\panelwidthmin}\fi
%
    \hoffset=0pt
    \voffset=0pt
%
    \pagestyle{empty}
    \setlength\headheight{0pt}
    \setlength\headsep{0pt}
    \setlength\footskip{0pt}
%
    \setlength{\textwidth}{\paperwidth}
    \addtolength{\textwidth}{-\marginleft}
    \addtolength{\textwidth}{-\marginright}
    \if@staticpagemenu\addtolength{\textwidth}{-\panelwidth}\fi
    \setlength{\textheight}{\paperheight}
    \addtolength{\textheight}{-\margintop}
    \addtolength{\textheight}{-\marginbottom}
    \addtolength{\textheight}{-\headheight}
    \addtolength{\textheight}{-\headsep}
    \addtolength{\textheight}{-\footskip}
    \setlength{\oddsidemargin}{\marginleft}
    \addtolength{\oddsidemargin}{-\PDFHorigin}% horizontal offset
    \setlength{\evensidemargin}{\marginleft}
    \addtolength{\evensidemargin}{-\PDFHorigin}% horizontal offset
    \setlength{\topmargin}{\margintop}
    \addtolength{\topmargin}{-\PDFVorigin}}% vertical offset
%
%-------------------------------------------------------------------------------
% Default screen and margin size
%
    \screensize{16cm}{21cm}{1.6cm}{1.6cm}{1.6cm}{1.6cm}
%
%-------------------------------------------------------------------------------
% Page menu code starts here
%-------------------------------------------------------------------------------
% Utility macros
%
\def\@PDFobj{\immediate\pdfobj}% okay for both pdftex-13 and pdftex-14
\def\@PDFrefobj#1{\the#1\space 0 R}% \pdfrefobj not defined in pdfTeX-13
\def\@PDFLastObj{\the\pdflastobj\space 0 R}%
%
%-------------------------------------------------------------------------------
% Create extra colours when document is first opened
%
\AtBeginDocument{% so that we can pick up users choice for colours
\@PDFobj{<< /S /GoTo /D [0 /Fit] >>}% open doc. on first page
\@PDFobj{<< /S /JavaScript /JS (%
color.ItemRollover = new Array("RGB",\JS@PgMnuRollover);
color.ItemFlagged  = new Array("RGB",\JS@PgMnuFlagged);
color.ItemNormal   = new Array("RGB",\JS@PgMnuNormal);
color.AcrobatRollover = new Array("RGB",\JS@AcrobatRollover);
color.AcrobatNormal   = new Array("RGB",\JS@AcrobatNormal);) /Next \@PDFLastObj >>}
\pdfcatalog{^^J/OpenAction \@PDFLastObj^^J}}%
%
%-------------------------------------------------------------------------------
% Boxes and counters for the Page Menu
%
\newcount\MenuHeadEnter
\newcount\MenuHeadExit
\newcount\MenuHeadUp
%
\newcount\MenuItemEnter
\newcount\MenuItemExit
\newcount\MenuItemUp
%
\newcount\AllHide
\newcount\AllShow
\newcount\AcrobatAllHide
\newcount\AcrobatAllShow
%
\newcount\PageMenuItemNum\PageMenuItemNum=0
\newcount\thePagetmp\thePagetmp=0
%
\newbox\tmpboxa
\newbox\tmpboxb
%
%-------------------------------------------------------------------------------
\def\AnnotList{}
\def\@AddToAnnotList{\g@addto@macro\AnnotList}
%
%-------------------------------------------------------------------------------
% Show all items
%
\@PDFobj{<< /S /Hide /H true  /T (MenuHeadInVisible) >>}
\@PDFobj{<< /S /Hide /H false /T (MenuHeadVisible) /Next \@PDFLastObj >>}
\@PDFobj{<< /S /Hide /H false /T (Item) /Next \@PDFLastObj >>}\AllShow=\pdflastobj
%
%-------------------------------------------------------------------------------
% Hide all items
%
\@PDFobj{<< /S /Hide /H false /T (MenuHeadInVisible) >>}
\@PDFobj{<< /S /Hide /H true  /T (MenuHeadVisible) /Next \@PDFLastObj >>}
\@PDFobj{<< /S /Hide /H true  /T (Item) /Next \@PDFLastObj >>}\AllHide=\pdflastobj
%
%-------------------------------------------------------------------------------
% Highlight the menu item for the current page
%
\if@compact
   \def\@PDFPageMenuFlag#1{%
   \edef\HighLightItem{/AA << /O  << /S /JavaScript /JS (var f = this.getField("#1"); var g = f.fillColor; f.fillColor = color.ItemFlagged;) >>
                              /C  << /S /JavaScript /JS (var f = this.getField("#1"); f.fillColor = g;) >> >>}}
\else
   \def\@PDFPageMenuFlag#1{%
   \pdfpageattr{/AA << /O  << /S /JavaScript /JS (var f = this.getField("#1"); f.fillColor = color.ItemFlagged;) >>
                       /C  << /S /JavaScript /JS (var f = this.getField("#1"); f.fillColor = color.ItemNormal;) >> >>}}
\fi
%
%-------------------------------------------------------------------------------
\def\@PDFPageMenuHead{%
%
%-------------------------------------------------------------------------------
% Hide page menu : Mouse up
%
      \hbox to 0.5cm{\vrule width 0pt height 10pt depth 0.8\paperheight%
      \setbox\tmpboxa=\hbox{\raise 0pt\hbox{\vrule width 0pt height 10pt depth 0.8\paperheight%
      \pdfannot width 0.5cm height 10pt depth 0.8\paperheight{%
            /Subtype /Widget%
            /F \if@staticpagemenu4\else6\fi % 4 = visible, 6 = invisible
            /T (MenuHeadVisible)%
            /FT /Btn%
            /Ff 65536%
            /H /N%
            /BS << /W 0 /S /S >>%
            /MK << /BG [\if@showtrigger\PDF@Showtrigger\fi] /CA () >>% Transparent rectangle, no text
            /DA (/Helv 8 Tf 1 1 1 rg)% white text
            /A \@PDFrefobj\AllHide}{\expanded{\@AddToAnnotList{\the\pdflastannot\space 0 R\space}}}}}%
      \wd\tmpboxa=0pt\ht\tmpboxa=0pt\dp\tmpboxa=0pt%
%-------------------------------------------------------------------------------
% Show page menu : Mouse up
%
      \setbox\tmpboxb=\hbox{\raise 0pt\hbox{\vrule width 0pt height 10pt depth 0.8\paperheight%
      \pdfannot width 0.5cm height 10pt depth 0.8\paperheight{%
            /Subtype /Widget%
            /F \if@staticpagemenu6\else4\fi % 4 = visible, 6 = invisible
            /T (MenuHeadInVisible)%
            /FT /Btn%
            /Ff 65536%
            /H /N%
            /BS << /W 0 /S /S >>%
            /MK << /BG [\if@showtrigger\PDF@Showtrigger\fi] /CA () >>% Transparent rectangle, no text
            /DA (/Helv 8 Tf 1 1 1 rg)% white text
            /A \@PDFrefobj\AllShow}{\expanded{\@AddToAnnotList{\the\pdflastannot\space 0 R\space}}}}}%
      \wd\tmpboxb=0pt\ht\tmpboxb=0pt\dp\tmpboxb=0pt%
      \box\tmpboxa\box\tmpboxb\hfill}}
%
\def\@PDFPageMenuItem#1#2#3{% 
%-------------------------------------------------------------------------------
% Actions for Menu Items
%
\@PDFobj{<< /S /JavaScript /JS (%
this.pageNum=(#3);
var f = this.getField("#1"); f.fillColor = color.ItemFlagged;
var f = this.getField("Item"); f.fillColor = color.ItemNormal;) >>}
\if@staticpagemenu\relax\else
\@PDFobj{<< /S /Hide /H false /T (MenuHeadInVisible) /Next \@PDFLastObj >>}
\@PDFobj{<< /S /Hide /H true  /T (MenuHeadVisible)   /Next \@PDFLastObj >>}
\@PDFobj{<< /S /Hide /H true  /T (Item) /Next \@PDFLastObj >>}%
\fi
\MenuItemUp=\pdflastobj
%
\@PDFobj{<< /S /JavaScript /JS (var f = this.getField("#1"); var g = f.fillColor; f.fillColor = color.ItemRollover;) >>}\MenuItemEnter=\pdflastobj
%
\@PDFobj{<< /S /JavaScript /JS (var f = this.getField("#1"); f.fillColor = g;) >>}\MenuItemExit=\pdflastobj
%  
%-------------------------------------------------------------------------------
% Menu Item
%
      \hbox{\raise 0pt\hbox to 0.965\panelwidth{\vrule width 0pt height 10pt depth 2pt%
      \pdfannot width 0.965\panelwidth height 10pt depth 2pt{%
            /Subtype /Widget
            /F \if@staticpagemenu4\else6\fi % 4 = visible, 6 = invisible
            /T (#1)
            /FT /Btn
            /Ff 65536
            /H /N
            /BS << /W 0 /S /S >>
            /MK << /BG [ \PDF@PgMnuNormal ] /CA (#2) >>
            /DA (/Helv 8 Tf \PDF@PgMnuTextColour\space rg)% white text, 8pt Helvetica bold
            /A \@PDFrefobj\MenuItemUp
            /AA << /E \@PDFrefobj\MenuItemEnter\space 
                   /X \@PDFrefobj\MenuItemExit\space >>}{\expanded{\@AddToAnnotList{\the\pdflastannot\space 0 R\space}}}\hfill}}
\vskip 0pt}
%
%-------------------------------------------------------------------------------
% Automate creation of menu items
%-------------------------------------------------------------------------------
%
% We maintain two internal lists, \@PageMenuList and \@PageMenulist
%
%    \@PageMenuList : read from \jobnmae.mnu at the start of the document
%                     contains macros to create each entry of the page menu.
%
%    \@PageMenulist : created during the first pass of the document
%                     contains macros that will be used in the second pass to
%                     display the page menu entries. This list is written out
%                     at the end of the document and will be re-read as
%                     \@PageMenuList during the second pass.
%
%-------------------------------------------------------------------------------
% Read page menu list, generated in first pass
%
\AtBeginDocument{%
   \def\@PageMenuList{}\InputIfFileExists{\jobname.mnu}{}{}}
%
%-------------------------------------------------------------------------------
%
\def\@PDFtableofcontents{\hbox{\offinterlineskip%
                               \vtop{\@PageMenuList}\@PDFPageMenuHead}}
%
%-------------------------------------------------------------------------------
%
\def\@doTableOfContents{\put(0,0){%
      \makebox(\strip@pt\paperwidth,\strip@pt\paperheight)[rt]%
      \@PDFtableofcontents}\if@compact\gdef\@doTableOfContents{\relax}\fi}
\@AddToOverlay{\@doTableOfContents}
%
%-------------------------------------------------------------------------------
% Build an internal list that records data for each menu item
%
\def\@InitPageMenuList{\def\@PageMenuItemlist{\noexpand\makeatletter}}
\def\@AddToPageMenuItemlist#1{\g@addto@macro\@PageMenuItemlist{#1}}
%
\AtBeginDocument{\@InitPageMenuList}
%
%-------------------------------------------------------------------------------
% Write the internal list to the menu file
%
\AtEndDocument{%
\@AddToPageMenuItemlist{^^J\noexpand\makeatother}
\newwrite\PDFMenuItemFile
\immediate\openout\PDFMenuItemFile=\jobname.mnu
\immediate\write\PDFMenuItemFile{\@PageMenuItemlist}
\immediate\closeout\PDFMenuItemFile}
%
%-------------------------------------------------------------------------------
% The main user macro : \PageMenuItem
%-------------------------------------------------------------------------------
% Prepare an item for the menu. Note, the item does not at this stage appear
% on the screen. It will first be added to an internal list and that list will,
% at the end of this document, be written out to the file \jobname.mnu
% That file will be read, in a second pass, and will cause all menu items 
% to appear on every page.
%
\def\PageMenuItem#1{%
   \thePagetmp=\thepage%
   \advance\thePagetmp by -1% for zero based PDF page numbering
   \global\advance\PageMenuItemNum by 1%
   \xdef\@dummy{%
      \noexpand\@PDFPageMenuFlag{Item.\the\PageMenuItemNum}%
      \noexpand\@AddToPageMenuItemlist{^^J%
      \noexpand\string\noexpand\g@addto@macro%
      \noexpand\string\noexpand\@PageMenuList{%
      \noexpand\string\noexpand\@PDFPageMenuItem{%
      Item.\the\PageMenuItemNum}{#1}{\the\thePagetmp}}}}\@dummy%
      \if@compact\expanded{\pdfpageattr{\HighLightItem\space/Annots\space[\AnnotList]}}\fi}
%
%-------------------------------------------------------------------------------
% Acrobat menu code starts here
%-------------------------------------------------------------------------------
% Fix for pdfannot rule problem in pdftex-13
%
\ifnum\pdftexversion>13
   \def\@raiseacrobatmenu{}
   \def\@raiseacrobattrigger{}
   \message{Set for pfdtex version > 13}
\else
   \def\@raiseacrobatmenu{\raise 20pt}
   \def\@raiseacrobattrigger{\raise 0.1\paperheight}
   \message{Set for pfdtex version <= 13}
\fi
%-------------------------------------------------------------------------------
% Show all items
%
\@PDFobj{<< /S /Hide /H true  /T (AcrobatMenuHeadInVisible) >>}
\@PDFobj{<< /S /Hide /H false /T (AcrobatMenuHeadVisible) /Next \@PDFLastObj >>}
\@PDFobj{<< /S /Hide /H false /T (AcrobatItem) /Next \@PDFLastObj >>}\AcrobatAllShow=\pdflastobj

%-------------------------------------------------------------------------------
% Hide all items
%
\@PDFobj{<< /S /Hide /H false /T (AcrobatMenuHeadInVisible) >>}
\@PDFobj{<< /S /Hide /H true  /T (AcrobatMenuHeadVisible) /Next \@PDFLastObj >>}
\@PDFobj{<< /S /Hide /H true  /T (AcrobatItem) /Next \@PDFLastObj >>}\AcrobatAllHide=\pdflastobj
%
%-------------------------------------------------------------------------------
\def\@PDFAcrobatMenuHead{%
%
%-------------------------------------------------------------------------------
% Hide Acrobat menu : Mouse up
%
      \hbox to 0.5cm{\vrule width 0pt height 0.1\paperheight depth 0pt%
      \setbox\tmpboxa=\hbox{\@raiseacrobattrigger\hbox{\vrule width 0pt height 0.1\paperheight depth 0pt%
      \pdfannot width 0.5cm height 0.1\paperheight depth 0pt{%
            /Subtype /Widget%
            /F 6 % opendoc state : invisible
            /T (AcrobatMenuHeadVisible)%
            /FT /Btn%
            /Ff 65536%
            /H /N%
            /BS << /W 0 /S /S >>%
            /MK << /BG [\if@showtrigger\PDF@Showtrigger\fi] /CA () >> % Transparent rectangle, no text
            /DA (/Helv 8 Tf 1 1 1 rg) % white text
            /A \@PDFrefobj\AcrobatAllHide}{\expanded{\@AddToAnnotList{\the\pdflastannot\space 0 R\space}}}}}%
%-------------------------------------------------------------------------------
% Show Acrobat menu : Mouse up
%
      \setbox\tmpboxb=\hbox{\@raiseacrobattrigger\hbox{\vrule width 0pt height 0.1\paperheight depth 0pt%
      \pdfannot width 0.5cm height 0.1\paperheight depth 0pt{%
            /Subtype /Widget%
            /F 4 % opendoc state : visible
            /T (AcrobatMenuHeadInVisible)%
            /FT /Btn%
            /Ff 65536%
            /H /N%
            /BS << /W 0 /S /S >>%
            /MK << /BG [\if@showtrigger\PDF@Showtrigger\fi] /CA () >> % Transparent rectangle, no text
            /DA (/Helv 8 Tf 1 1 1 rg) % white text
            /A \@PDFrefobj\AcrobatAllShow}{\expanded{\@AddToAnnotList{\the\pdflastannot\space 0 R\space}}}}}%
      \box\tmpboxa\box\tmpboxb\hfill}}
%
\def\@PDFAcrobatMenuItem#1#2#3{% 
%-------------------------------------------------------------------------------
% Acrobat Actions for Menu Items
%
\@PDFobj{<< /S /Named /N /#3 >>}\MenuItemUp=\pdflastobj
%
\@PDFobj{<< /S /JavaScript /JS (var f = this.getField("#1"); f.fillColor = color.AcrobatRollover;) >>}\MenuItemEnter=\pdflastobj
%
\@PDFobj{<< /S /JavaScript /JS (var f = this.getField("#1"); f.fillColor = color.AcrobatNormal;) >>}\MenuItemExit=\pdflastobj
%  
%-------------------------------------------------------------------------------
% Acrobat Menu Item
%
      \hbox{\@raiseacrobatmenu\hbox to 40pt{\vrule width 0pt height 20pt depth 0pt%
      \pdfannot width 40pt height 20pt depth 0pt{%
            /Subtype /Widget
            /F 6 % 6 = hidden, 4 = visible
            /T (#1)
            /FT /Btn
            /Ff 65536
            /H /N
            /BS << /W 0 /S /S >>
            /MK << /BG [ \PDF@PgMnuNormal ] /CA (#2) >>
            /DA (/Helv 8 Tf \PDF@AcrobatTextColour\space rg)
            /A \@PDFrefobj\MenuItemUp
            /AA << /E \@PDFrefobj\MenuItemEnter 
                   /X \@PDFrefobj\MenuItemExit >>}{\expanded{\@AddToAnnotList{\the\pdflastannot\space 0 R\space}}}\hfill}}}
%-------------------------------------------------------------------------------
\def\@AcrobatMenuList{\@PDFAcrobatMenuItem{AcrobatItem.1}{First}{FirstPage}%
                      \@PDFAcrobatMenuItem{AcrobatItem.2}{Last}{LastPage}%
                      \@PDFAcrobatMenuItem{AcrobatItem.3}{Prev}{PrevPage}%
                      \@PDFAcrobatMenuItem{AcrobatItem.4}{Next}{NextPage}%
                      \@PDFAcrobatMenuItem{AcrobatItem.5}{Back}{GoBack}}
\def\@PDFAcrobatMenu{\@AcrobatMenuList\@PDFAcrobatMenuHead}
%-------------------------------------------------------------------------------
\def\@doAcrobatMenu{%
    \put(0,0){%
    \makebox(\strip@pt\paperwidth,10)[rb]%
    \@PDFAcrobatMenu}\if@compact\gdef\@doAcrobatMenu{\relax}\fi}
\@AddToOverlay{\@doAcrobatMenu}
%-------------------------------------------------------------------------------
% Make sure that \begin{Form} is the last item in \AtBeginDocument for
% proper matching with \end{Form} in \AtEndDocument (see earlier)
%
\AtBeginDocument{\begin{Form}}
%-------------------------------------------------------------------------------
\fi
%-------------- end of screen option -------------------------------------------
%
%-------------- paper options start here ---------------------------------------
%
\if@paper
\RequirePackage[pdftex,bookmarksopen,colorlinks]{hyperref}
\includecomment{paper}
\excludecomment{screen}
\def\@linkcolor{LinkColor}
\def\@anchorcolor{AnchorColor}
\def\@citecolor{CiteColor}
\def\@filecolor{FileColor}
\def\@urlcolor{URLColor}
\def\@menucolor{MenuColor}
\def\@pagecolor{PageColor}
\def\PageMenuItem#1{\relax}
%
%-------------------------------------------------------------------------------
\fi
%-------------- end of paper option --------------------------------------------
%
%---- Load system preferences
%
\InputIfFileExists{pdfseminar.cfg}{}{}
%
%-------------------------------------------------------------------------------
%
%---- Load users preferences
%
\InputIfFileExists{\jobname.cfg}{}{}
%
%-------------------------------------------------------------------------------
%
\endinput