Mrthfx

I've written some macros to add OMR characters to the generated document. The OMR characters are needed for an envelope inserter machine.

When I want to print OMR characters for a double-sided document, I have to put:

 DoubleSidedPrinting

 AddOMR

I want to put my macro in a preamble that will be precompiled and be reused for several documents. In that case, I will only have to set DoubleSidedPrinting and AddOMR in each document. But this doesn't work. Do you know a workaround?

% The goal is to put this code in a reusable preamble

documentclass[12pt,twoside,a4paper]{article}



usepackage{eso-pic}

usepackage{rotating}

usepackage{graphicx}

usepackage{scrextend}

usepackage{lastpage}

usepackage{refcount}



newififAddOMR

defAddOMR{AddOMRtrue}

defOmitOMR{AddOMRfalse}



newififDoubleSidedPrinting

defSingleSidedPrinting{DoubleSidedPrintingfalse}

defDoubleSidedPrinting{DoubleSidedPrintingtrue}



%SingleSidedPrinting               %%if I define SingleSidedPrinting (or DoubleSidedPrinting) on this line

DoubleSidedPrinting                %%the code is working

AddOMR                             %%if I define SingleSidedPrinting (or DoubleSidedPrinting) on this line

%OmitOMR                           %%the code is working



makeatletter

newcommand*{LastOddCheck}{

    ifoddvalue{page}

        if@filesw

            immediatewrite@auxout{

                gdefstringLastOddPage{thevalue{page}}

            }

        fi 

    fi

}

newcommand*{LastOddPage}{0}



ifAddOMR

    ClearShipoutPicture

    AddToShipoutPicture{

        ifDoubleSidedPrinting

            ifoddc@page 

                LastOddCheck

                ifnumLastOddPage=value{page}

                    put(11,503){linethickness{0.5mm}{line(1,0){17}}}

                    put(11,489.5){linethickness{0.5mm}{line(1,0){17}}}

                    put(11,475){linethickness{0.5mm}{line(1,0){17}}}

                else

                    put(11,503){linethickness{0.5mm}{line(1,0){17}}}

                    put(11,475){linethickness{0.5mm}{line(1,0){17}}}

                fi

            else

            fi

        else

            ifnumgetpagerefnumber{LastPage}=value{page}

                    put(11,503){linethickness{0.5mm}{line(1,0){17}}}

                    put(11,489.5){linethickness{0.5mm}{line(1,0){17}}}

                    put(11,475){linethickness{0.5mm}{line(1,0){17}}}

            else

                put(11,503){linethickness{0.5mm}{line(1,0){17}}}

                put(11,475){linethickness{0.5mm}{line(1,0){17}}} 

            fi

        fi

    }

    makeatother

else

fi



ifDoubleSidedPrinting

    AtEndDocument{cleardoublepage}

else

fi



% This will be the end of the reusable preamble



%SingleSidedPrinting               %%I would like to define SingleSidedPrinting (or DoubleSidedPrinting) only at this moment

%DoubleSidedPrinting               %%but if I do so, the code is not working. Is there a workaround?



begin{document}



newpage  %% page 1

mbox{Text on page 1}



newpage  %% page 2

mbox{Text on page 2}



newpage  %% page 3

mbox{Text on page 3}



newpage  %% page 4

mbox{Text on page 4}



%newpage  %% page 5

%mbox{Text on page 5}



end{document}