diff options
98 files changed, 5909 insertions, 10120 deletions
diff --git a/Master/texmf-dist/doc/context/third/letter/README b/Master/texmf-dist/doc/context/third/letter/README index 35714d5d493..cf4fa41dd62 100644 --- a/Master/texmf-dist/doc/context/third/letter/README +++ b/Master/texmf-dist/doc/context/third/letter/README @@ -1,15 +1,21 @@ -Letter module for ConTeXt. +Modulename : Correspondence (t-letter and t-memo) +Author : Wolfgang Schuster +License : GNU General Public License -The module and all included files are copyright of Wolfgang -Schuster and published under public domain. +Description +=========== -The letter module provides a environment to write private -and business letters. +The correspondence package for ConTeXt consists of a module +to write letters and memos. Both modules work with MkII and +MkIV but the letter and memo modules for MkIV requires +a installation from 15 December 2011 or newer while the MkII +version of both modules work also with older installations. -Style files are responsible for the layout of the letter, -the command \setupletterstyle could be used to change the -default to own preferences. +Usage +===== -Besides the default interface another two are include in -the bundle, you have to load either with the module or in -the document with \useletterinterface.
\ No newline at end of file +Letters +------- + +Memos +-----
\ No newline at end of file diff --git a/Master/texmf-dist/doc/context/third/letter/correspondence.pdf b/Master/texmf-dist/doc/context/third/letter/correspondence.pdf Binary files differdeleted file mode 100644 index 96664df2a59..00000000000 --- a/Master/texmf-dist/doc/context/third/letter/correspondence.pdf +++ /dev/null diff --git a/Master/texmf-dist/doc/context/third/letter/todo.txt b/Master/texmf-dist/doc/context/third/letter/todo.txt deleted file mode 100644 index 2d5f5f5a2cd..00000000000 --- a/Master/texmf-dist/doc/context/third/letter/todo.txt +++ /dev/null @@ -1,27 +0,0 @@ -Todo: - -o Page optimation of the output - - - reduce the parskip if the last page is filled less than 25% - of the textheight - - increase the parskip if the last page is filled more than 25% - and less than 50% of the textheight to have it at least filled - more than half of the textheight - -o support for address database - - - adrentry and addrentry macros from KOMA-Script - - xml files with ConTeXts contact structure - -o styles - - - english and american letters in block style - - formats from other countries - -o documentation - - - description about the elements - - examples from simple and complex letters - - list with all named elements - - list with the contents for the labels - - guide how to write style and extension files diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-environment.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-environment.tex deleted file mode 100644 index 584c703e9a7..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-environment.tex +++ /dev/null @@ -1,241 +0,0 @@ -\startenvironment correspondence-environment - -%%%% Manual for the ConTeXt correspondence module - -% To produce a pdf of this manual you have to run it with LuaTeX, -% to get the same layout as the version shipped with the module -% the lucida and delicious fonts are required. - -%%%% Variables - -\setvariables - [correspondence] - [title=Correspondence with \ConTeXt, - version=\ctxlua{tex.sprint(tex.ctxcatcodes,thirddata.correspondence.files[1]["version"])}] - - -%%%% Colors - -\definecolor[lettercolor] [h=BBD0B4] -\definecolor[fakerulecolor][darkgray] - -\definecolor[twhite][r=1,g=1,b=1,t=.75,a=1] - - -%%%% Images - -\setupexternalfigures[directory=images] - - -%%%% Hyperlinks etc. - -\setupinteraction - [state=start, - title={Correspondence with ConTeXt}, - author={Wolfgang Schuster}, - color=black, - contrastcolor=black, - style=] - - -%%%% Additional modules - -\usemodule[visual] -\usemodule[abr-01] -\usemodule[letter] -\usemodule[resume] -\usemodule[set-11]\loadsetups[cont-en.xml]\loadsetups[t-letter.xml]\loadsetups[t-resume.xml] -\usemodule[examplecontent] - -\setupframedtexts - [setuptext] - [frame=on, - rulethickness=1pt, - corner=round, - framecolor=lettercolor] - - -%%%% Fonts - -\startmode[wolf] - -\setupbodyfont[lucida,10pt] - -\definetypeface[examplefont][rm][specserif][Delicious][default] - -\stopmode - -\startnotmode[wolf] - -\setupbodyfont[pagella,10pt] - -\definetypeface[examplefont][rm][specserif][Latin Modern Sans][default] - -\stopnotmode - - -%%%% Layout - -%% Setup for the letter examples - -\setupletterstyle - [option] - [bodyfont=examplefont, - whitespace=line, - marking=no, - before={\page[left]}, - backgroundcolor=gray] - -\setupletterstyle - [content] - [align=normal] - -\setupletterstyle - [enclosure,copy,postscript] - [before={\blank[nowhite]}, - after={\blank[nowhite]}] - -\setupletterstyle - [closing] - [after={\blank[2*line]}] - -\setupresumestyle - [option] - [bodyfont=examplefont, - whitespace=none, - before={\page[left]}, - backgroundcolor=gray] - -%% Whitespace - -\setupwhitespace[line] - -\setupalign[right,broad] % gives better results with \cs in the text - -%% Headers - -\definestructureresetset[default][0,0][1] - -\setuphead - [part] - [placehead=yes, - header=empty, - sectionresetset=default, - alternative=middle, - style=\tfd] - -\setuphead - [chapter] - [header=empty, - style=\tfc, - sectionsegments=2:100] - -\setuphead - [section,subject] - [style=\tfb, - sectionsegments=2:100] - -\setuphead - [subsection,subsubject] - [style=\tfa] - -%% Content - -\setupcombinedlist - [content] - [interaction=all, - color=black] - -%% Pagenumbering - -\definestructureconversionset [pagenumber] [] [numbers] - -\setupuserpagenumber[numberconversionset=pagenumber] - -\setuppagenumbering - [alternative=doublesided, - location=footer] - -%% Head/Foot - -\setupheadertexts[{\getmarking[chapter]}] - -%% Verbatim - -\setuptyping - [before={\blank\testpage[2]}] - -%% Misc - -\setupmakeup - [standard] - [pagestate=start, - doublesided=empty, - page=no] - -%% Cover - -\defineoverlay[coverfigure][\overlayfigure{980559_60280625}] - -\def\TitlePage - {\bgroup - \setupbackgrounds[page][background=color,backgroundcolor=lettercolor] - \startstandardmakeup[align=middle] - \vfill - {\definedfont[SansBold sa 4]\setupinterlinespace\getvariable{correspondence}{title}\par} - \blank[2*line] - {\definedfont[Sans sa 2]\setupinterlinespace Version: \getvariable{correspondence}{version}\par} - \vfill\vfill\vfill - \stopstandardmakeup - \egroup} - -\def\LastPage - {\page[yes,left] - \bgroup - \setupbackgrounds[page][background=color,backgroundcolor=lettercolor] - \startstandardmakeup % why not - \stopstandardmakeup % \page[empty]? - \egroup} - -\def\CommandList - {\chapter{Command definitions} - \placesetup} - -%% Examples for the letter elements - -\defineframedtext - [element] - [width=\textwidth, - rulethickness=1pt, - corner=round, - framecolor=lettercolor] - -\defineframedtext - [smallelement] - [width=.35\textwidth, - rulethickness=1pt, - corner=round, - framecolor=lettercolor] - -%% Test mode - -\startmode[test] - - \showframe - \showgrid - -\stopmode - -%% The examplecontent module is not included in the manual sources -%% and will remain private therefore dummy defintions are necessary. - -\ifx\startexamplecontent\undefined - - \def\startexamplecontent {\gobbleuntil\stopexamplecontent} - \def\examplecontent {\dodoubleempty\doexamplecontent} - \def\doexamplecontent[#1][#2]{\framed[width=6cm,height=8cm]{}} - -\fi - - -\stopenvironment diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-introduction.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-introduction.tex deleted file mode 100644 index 2603c8188ae..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-introduction.tex +++ /dev/null @@ -1,28 +0,0 @@ -\startcomponent correspondence-introduction - -\environment correspondence-environment - -\chapter{Introduction} - -This is the manual for the \CONTEXT||correspondence manual. - -The module was written at the start as a package to write letters with a consistent -and use to use interface and a few options to change the layout in a consistent way. - -The core for the first version was based on the letter manual from Hans Hagen -(\filename{m-letter.tex}) and parts of this still remain in the low level code of -the module. - -As the time past more and more parts had been added to the package and it ended up -in a similar interface as the \LaTeX-classes but with its own commands to set user -values. Because of its origin in Hans’ module the user interface and the low level -parts are split in two different files and many more interfaces for users are -possible, one of them tries to mimic the style of Hans module. - -As the time past the author wrote a generic version of the complete setup commands -and a few other in the letter core and created the new file \filename{t-correspondence.tex} -which holds now the low level code. As a result of this the new file -\filename{t-resume.tex} became part of the package with its own setup commands -and external style and interface files. - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-labeltext.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-labeltext.tex deleted file mode 100644 index 048b2c69c97..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-labeltext.tex +++ /dev/null @@ -1,38 +0,0 @@ -\startcomponent correspondence-labeltext - -\environment correspondence-environment - -\chapter{Labeltexts} - -The following table presents the text for all predefined labels in the module, -only the labels for the {\em memo} style are not included. - -\page[left] - -\start - -\setuplinetable [nx=2,stretch=yes,width=.125\textwidth] -\setuplinetable[r][1][style=bold] - -\startbuffer[labeltext] -\NC label \NC english \NC dutch \NC german \NC french \NC italian \NC spanish \NC\NR -\startprocesscommalist - [name,room,yourref,yourmail,myref,mymail,customer,invoice, - attention,subject,cc,enclosure,to,toname,from,fromname,date, - phone,fax,email,url,bank,organization,city,zip,country,street] - \NC #1 - \NC \mainlanguage[en]\labeltext{letter:#1} - \NC \mainlanguage[nl]\labeltext{letter:#1} - \NC \mainlanguage[de]\labeltext{letter:#1} - \NC \mainlanguage[fr]\labeltext{letter:#1} - \NC \mainlanguage[it]\labeltext{letter:#1} - \NC \mainlanguage[es]\labeltext{letter:#1} - \NC\NR -\stopprocesscommalist -\stopbuffer - -\processlinetablebuffer[labeltext] - -\stop - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-background.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-background.tex deleted file mode 100644 index d0b0613f555..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-background.tex +++ /dev/null @@ -1,128 +0,0 @@ -\startcomponent correspondence-letter-background - -\environment correspondence-environment - -\chapter{Background} - -There are different ways to customize the look of a letter, they are namely the -\startitemize[text,a][lefttext=,righttext=,stopper={)}] -\item layout of the page, -\item the font for the main text and the styles for each element and -\item the header and the other information blocks. -\stopitemize -Another option is the stationary which you use for the printed result, you could -use either already preprinted paper or what will be described in the following chapter -create your own with ConTeXt. Three different methods are available to do this: - -\startitemize[a,packed][stopper={)}] -\item color, -\item images, -\item user created backgrounds. -\stopitemize - -% backgroundcolor - -\start - -\setupletterstyle[backgroundcolor=gray] - -\startletter -\input knuth -\stopletter - -\stop - -\section{Backgroundcolor} - -Setting a color for the background is the first method to customize the layout of the letter background, -you can see result of the following code in the example on the left page and all other full page letters -in this document. - -\starttyping -\setupcolors[state=start] - -\setupletterstyle[backgroundcolor=gray] - -\startletter -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -When you use {\em backgroundcolor} in combination with the other methods it's important to know the backgroundcolor -is always behind the other elements. - -% backgroundimage - -\start - -\setupletterstyle[backgroundimage=954380_42830609] - -\startletter -\input knuth -\stopletter - -\stop - -\section{Backgroundimages} - -The second mathod is to use a graphic as background for the letter, the example on the left page is created -with the following code, take care the argument is existing figure or you will get \ConTeXt’s usual placeholder -for missing figures. - -\starttyping -\setupletterstyle[backgroundimage=example] - -\startletter -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -When you take a look in the source you will see the module use \type{\overlayfigure} to stretch the graphic -to the size of the paper, it’s up to the user to provide a graphic with the correct width|/|height ration and -a resultion which is high enough to aviud artefacts. - -% background - -\start - -\startuseMPgraphic{dactylus} -draw unitsquare xyscaled (OverlayWidth-2cm,OverlayHeight-2cm) smoothed 1cm withpen pencircle scaled 2 ; -fill fullcircle scaled 1.5cm shifted (1cm,1cm) withcolor \MPcolor{orange} ; -\stopuseMPgraphic - -\setupletterstyle - [backgroundcolor=, - background=\useMPgraphic{dactylus}] - -\startletter -\input knuth -\stopletter - -\stop - -\section{Backgrounds} - -As third and last method you can use the {\em background} parameter which is nothing more than a overlay -which is placed in the background. A example where a graphic is drawn with \MetaPost\ is shown below with -the result on the left page. - -\starttyping -\startuseMPgraphic{dactylus} -draw unitsquare xyscaled (OverlayWidth-2cm,OverlayHeight-2cm) - smoothed 1cm withpen pencircle scaled 2 ; -fill fullcircle scaled 1.5cm shifted (1cm,1cm) - withcolor \MPcolor{orange} ; -\stopuseMPgraphic - -\setupletterstyle[background=\useMPgraphic{dactylus}] - -\startletter -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -You could use this method also to place normal graphic from a external file \type{\externalfigure} -where you have nore detailed control over the figure size etc. It's also possible to define different -background for the first and the second page but the user has to take care of this himself. - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-beginner.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-beginner.tex deleted file mode 100644 index ae83733517c..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-beginner.tex +++ /dev/null @@ -1,457 +0,0 @@ -\startcomponent correspondence-letter-beginner - -\environment correspondence-environment - -\chapter{Beginners’ guide} - -The most important thing in the module for the users is the interface to write the letter text and to set the values for one or more letters. - -You will learn how to write a letter with the module step by step, beginning with just a few lines of text, following with opening and closing sentences and at the end, after you know how to set every kind of information, you will finally learn how to change the position of the reference line and how to change the texts for the labels and to customise their style and color. - -\start - -\setupletter[alternative=none] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Pure text} - -To understand how a letter is written let’s study the code for the example letter on the left page. - -\starttyping -\usemodule[letter] - -\starttext - -\startletter -Thus, I came to the conclusion ... -\stopletter - -\stoptext -\stoptyping - -As you can see from the first line the letter module has to be loaded before it can be used because it is none of the functions \CONTEXT\ provides by default. To make the examples in the following sections a little bit shorter I will no longer add \type{\usemodule}, \type{\starttext} and \type{\stoptext} but you shouldn’t forget to add all of them in your files. - -The content for your letter is written between the letter environment, it doesn’t matter if you use blank lines before or after the letter text. - -If you take a closer look at the result on the left side you can see the paragraphs are separated by blank lines. This can be changed with the \type{\setupletterstyle} command but let us keep this for later. - -You’re not restricted to only one letter for a file. It is possible to write as many as you like in a file and you could use this to write serial letters. An easier method for this task is described later in this manual. - -\start - -\setupletter[alternative=none] - -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Opening and closing}\index{opening}\index{closing} - -You saw in the last example how to write a simple text. But shouldn’t it be possible to give a few opening and also closing words for the letter, because the reader should know for whom the content is. - -To achieve this the module provides the two variables {\em opening} and {\em closing}. To feed them with text you could either use the optional arguments for \type{\startletter} as done in the current example or you could set them before the start of the letter with the two commands \type{\setupletter} and \type{\setlettervalue}. - -Let us begin with first alternative and set them as arguments for \type{\startletter}: - -\starttyping -\startletter - [opening={Dear Reader,}, - closing={Greetings from the Author}] -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -If you don’t like this method you could set the two values before the letter environment with the \type{\setupletter} command. The text in your file should now look like: - -\starttyping -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}] - -\startletter -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -If you are more interested in a KOMA-Script like solution to set with every command only one value there is as last alternative the \type{\setlettervalue} command, both keyword and content are written between braces. -The first version with braces for two values has the following look. - -\starttyping -\setlettervalue{opening}{Dear Reader,} -\setlettervalue{closing}{Greetings from the Author} -\stoptyping - -The values itself have to be given before the letter environment because values in the letter text are ignored and will never be shown in the output. - -You have also to be careful with the content for the values because commas are interpreted as end of the value if you write it as argument for \type{\startletter} or with \type{\setupletter} and the text has to be protected with braces in this case but you don’t need them when there is no comma in the argument. - -This cannot happen if you set the values with the \type{\setlettervalue} command, because the content is delimited by the braces and commas are just normal text. - -\page[left] - -\start - -\setupletter[alternative=none] - -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}, - subject={Step by step guide to write a letter}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Subject}\index{subject} - -After you read how to write the text and set values for the opening and closing we mention now how we can write a subject. - -Instead of integrating this point in the last section I wrote a new one to let you understand the system. Before I will tell more let’s take a look at the code. - -\starttyping -\startletter - [opening={Dear Reader,}, - subject={Step by step guide to write a letter}, - closing={Greetings from the Author}] -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -The text for the subject is written as argument for {\em subject} as argument for \type{\startletter}, as you already guess you could have set it also with \type{\setupletter} or \type{\setlettervalue} and this is also possible and true for the values in the following sections. - -Besides the {\em subject} you have also the option to set a {\em title} for the letter. There is no big difference between them, but the title is normally written before the subject and has a slightly bigger size or is emphasized in another way. - -\start - -\setupletterstyle[whitespace=line] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}, - subject={Step by step guide to write a letter}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Address}\flushatnextpar{\index{toname}\index{toaddress}} - -Letters are normally meant to be sent by mail. To prevent you from writing the address by hand on the envelope you could buy envelopes with windows. To use these envelopes the address has to be written on the letter and to do this you have to set the {\em name} and the {\em address} for the addressee with the two values {\em toname} and {\em toaddress}. - -The input for the example on the left page looks like: - -\starttyping -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\startletter - [opening={Dear Reader,}, - subject={Step by step guide to write a letter}, - closing={Greetings from the Author}] -Thus, I came to the conclusion ... -\stopletter -\stoptyping - -The author prefers to set the values for the addressee not with \type{\startletter} but with \type{\setupletter} but this is just a matter of taste and you can select what fits your own working style best. - -\start - -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}, - subject={Step by step guide to write a letter}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Sender}\index{fromname}\index{fromaddress} - -It is not often enough to have just the addressee information on the letter. You’re also looking for a way to put the {\em name} and {\em address} of the sender into the header. - -If you have wondered why the author hasn’t just used {\em name} and {\em address} as keys for the addressee values you will now find the solution. To make the system consistent to set the values for addressee and the sender both needed unique key names to prevent confusion. Which value should use the simpler and which one a more verbose one both got a prefix to the key to differentiate them. So addressee information got the prefix {\em to} and sender information the prefix {\em from}. - -The additional lines for the example on the left page compared to the previous one are: - -\starttyping -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] -\stoptyping - -This manual describes in a later section how to write an own header with a personal look and feel. But this is outside of the user interface and requires knowledge about the layout. - -\start - -\setupletter - [name={Ben Johnson}, - phone={4922-89564}, - fax={4922-89564}] - -\setupletter - [list={name,phone,fax,date}] - -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}, - subject={Step by step guide to write a letter}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Reference line} - -If you’re in a company or an organisation you sometimes need a few extra information on your letter. The reference line or block is the right place to put these information to. - -Our old example from the last section is now extended by a reference line between the information of our addressee and the subject line. The information for the four fields are set with the following code. - -\starttyping -\setupletter - [name={Ben Johnson}, - phone={4922-89564}, - fax={4922-89564}, - date=\currentdate] - -\setupletter - [list={name,phone,fax,date}] -\stoptyping - -The first \type{\setupletter} set the content for the four fields {\em name}, {\em phone}, {\em fax} and {\em date}. Although the values are set none of them will appear in the output. We have to declare the fields for the reference line first, this is done in the second \type{\setupletter} command with the key {\em list}, the entries appear in the same order as you write them in the list. If one or more of the keys in the list have no values they will still appear in the output but no content is shown. - -If you do not change the {\em list} key in your file, by default the module will show the current date at the right side of the reference line. This will normally always happen and you could see the result in the examples of the two preceding sections. - -\start - -\setupletter - [name={Ben Johnson}, - phone={4922-89564}, - fax={4922-89564}] - -\setupletter - [list={name,phone,fax,date}] - -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\setupletter - [opening={Dear Reader,}, - closing={Greetings from the Author}, - subject={Step by step guide to write a letter}, - signature={Arthur Thor}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Signature}\index{signature} - -You know now how to set the letter text, the opening and closing lines, the values for the addressee and the sender and also how define your own values for the reference line. - -Most of the things needed for a letter are already told but a few fields at the end of the letter remain untold. The first line you want to add to our example letter is the signature. It is set with the {\em signature} in the same way as the other values in the former examples. What the author did in the left example was: - -\starttyping -\setupletter - [signature={Arthur Thor}] -\stoptyping - -There is some space between the closing and the signature to give you the possibility to sign the letter after having printed it out. - -You’re not limited to simple text for the signature. It is also possible to use a graphic if you won’t sign the letter by hand after you printed it. This solution is used in the following code. - -\starttyping -\setupletter - [signature={\externalfigure[autograph][height=2\lineheight]}] -\stoptyping - -How to adjust the space between the closing line and the signature for this way is shown in the letter style section. - -\start - -\setupletter - [name={Ben Johnson}, - phone={4922-89564}, - fax={4922-89564}] - -\setupletter - [list={name,phone,fax,date}] - -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\startletter - [opening={Dear Reader,}, - subject={Step by step guide to write a letter}, - closing={Greetings from the Author}, - signature={Arthur Thor}] - -\input knuth\par - -\ps{Postscript} - -\stopletter - -\stop - -\section{Postscript}\index{postscript}\index{\tex{ps}} - -\starttyping -\startletter - -... - -\ps{Postscript} - -\stopletter -\stoptyping - -\start - -\setupletter - [name={Ben Johnson}, - phone={4922-89564}, - fax={4922-89564}] - -\setupletter - [list={name,phone,fax,date}] - -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\startletter - [opening={Dear Reader,}, - subject={Step by step guide to write a letter}, - closing={Greetings from the Author}, - signature={Arthur Thor}] - -\input knuth\par - -\ps{Postscript} - -\encl{Appendices} - -\stopletter - -\stop - -\section{Enclosure}\index{enclosure}\index{\tex{encl}} - -\starttyping -\startletter - -... - -\ps{Postscript} -\encl{Appendices} - -\stopletter -\stoptyping - -\start - -\setupletter - [name={Ben Johnson}, - phone={4922-89564}, - fax={4922-89564}] - -\setupletter - [list={name,phone,fax,date}] - -\setupletter - [fromname={The Author}, - fromaddress={Hidden Street 2\\57895 Mystery town}] - -\setupletter - [toname={Mike Wilson}, - toaddress={Linden street 12\\78569 TeX City}] - -\startletter - [opening={Dear Reader,}, - subject={Step by step guide to write a letter}, - closing={Greetings from the Author}, - signature={Arthur Thor}] - -\input knuth\par - -\ps{Postscript} - -\encl{Appendices} - -\cc{List of recipients} - -\stopletter - -\stop - -\section{Copy}\index{copy}\index{\tex{cc}} - -\starttyping -\startletter - -... - -\ps{Postscript} -\encl{Appendices} -\cc{List of recipients} - -\stopletter -\stoptyping - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-examples.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-examples.tex deleted file mode 100644 index e0bb15d0e0b..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-examples.tex +++ /dev/null @@ -1,511 +0,0 @@ -\startcomponent correspondence-letter-examples - -\environment correspondence-environment - - - -% short example for single page layouts - -\startbuffer[example:content] - -\setupletter - [fromname={John Simmons}, - fromaddress={Parkstreet 12\\8257 Green Bay}] - -\setupletter - [toname={Steve Wilson}, - toaddress={Nightstreet 4a\\9183 Cotton Village}] - -\startletter - [opening={Dear Mr Wilson,}, - subject={Brand new templates for Word}, - closing={Best regards}, - signature={John Simmons}] - -\input knuth\par - -\stopletter - -\stopbuffer - -% long example for double page examples (included in running text) - -\startbuffer[example:long] - -\setupletterstyle[option][backgroundcolor=,before=] - -\setupletter - [fromname={John Simmons}, - fromaddress={Parkstreet 12\\8257 Green Bay}] - -\setupletter - [toname={Steve Wilson}, - toaddress={Nightstreet 4a\\9183 Cotton Village}] - -\startletter - [opening={Dear Mr Wilson,}, - subject={Brand new templates for Word}, - closing={Best regards}, - signature={John Simmons}] - -\dorecurse{4}{\input knuth\par} - -\stopletter - -\stopbuffer - - - -% general text about the example - -\chapter{Letter Examples} - -The letter module consits not only of just the main module, it contains also a few already defined styles for different countries and each of them use slightly different position for the layers and other setups. - -This section will give you a overview of all included styles you could use with the module without the need to write your own style. - - - -% DIN 676 B - -\start - -\getbuffer[example:content] - -\stop - -\startexamplecontent[dinb] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:dinb]{DIN 676 B}\index{DIN 676 B} - -The letter style \filename{dinb} is the default style for the module and is used if nothing else is specified by the user. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[dinb][1]}{First page} - {\examplecontent[dinb][2]}{Second page} - \stopcombination} - - - -% DIN 676 A - -\start - -\useletterstyle[dina] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[dina] - -\useletterstyle[dina] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:dina]{DIN 676 A}\index{DIN 676 A} - -The second style \filename{dina} follows the same rules as the style \filename{dinb} but all fields shifted by the same value upwards to give you more space for the lettercontent. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[dina][1]}{First page} - {\examplecontent[dina][2]}{Second page} - \stopcombination} - - - -% NEN 1026 - -\start - -\useletterstyle[dutch] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[dutch] - -\useletterstyle[dutch] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:dutch]{NEN 1026}\index{NEN 1026} - -The third style supported by the letter module is for dutch letters, the name of the style is called \filename{dutch}. The values and examples for the style are provided by Willi Egger. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[dutch][1]}{First page} - {\examplecontent[dutch][2]}{Second page} - \stopcombination} - - - -% French style - -\start - -\useletterstyle[french] - -\setupletterstyle[indenting={yes,1cm}] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[french] - -\useletterstyle[french] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:french]{French} - -The french style is based on values given to me by Olivier Guéry. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[french][1]}{First page} - {\examplecontent[french][2]}{Second page} - \stopcombination} - - - -% Full block - -\start - -\useletterstyle[fullblock] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[fullblock] - -\useletterstyle[fullblock] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:fullblock]{Full-block Style}\index{Full-block} - -The full-block format is the simplest of all six blockstyle formats. -Every part of the letter starts at the left margin with a blank line between -each part. - -The order of the parts is date, inside address, attention line, salutation, -subject line, body, complimentary close, signature and additional information. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[fullblock][1]}{First page} - {\examplecontent[fullblock][2]}{Second page} - \stopcombination} - - - -% Modified - -\start - -\useletterstyle[modified] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[modified] - -\useletterstyle[modified] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:modified]{Modified Block Style}\index{Modified} - -The modified style has the same layout as the full-block style but the date, -signature and closing moved to the right, which allows them to stand. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[modified][1]}{First page} - {\examplecontent[modified][2]}{Second page} - \stopcombination} - - - -% Semiblock - -\start - -\useletterstyle[semiblock] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[semiblock] - -\useletterstyle[semiblock] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:semiblock]{Semiblock Style}\index{Semiblock} - -The semiblock style is the format most people recognize as business letter. - -The layout is the same as in the modified style. Paragraphs are intended -by five spaces\footnote{The semiblock letter style use the \type{medium} -value for \type{\setupindenting} to indent the paragraphs.}. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[semiblock][1]}{First page} - {\examplecontent[semiblock][2]}{Second page} - \stopcombination} - - - -% Simplified - -\start - -\useletterstyle[simplified] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[simplified] - -\useletterstyle[simplified] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:simplified]{Simplified Style}\index{Simplified} - -The simplified style is used when you don't know the name of the person -you're writing to or when you write to a company. - -It contains no title, salutation or complimentary closing. The main focus -is the body of the letter. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[simplified][1]}{First page} - {\examplecontent[simplified][2]}{Second page} - \stopcombination} - - - -% Hanging style - -\start - -\useletterstyle[hanging] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[hanging] - -\useletterstyle[hanging] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:hanging]{Hanging indented Style}\index{Hanging} - -The hanging indented format is seldom used. It's main advantage -is that it calls attention to the body and each paragraph. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[hanging][1]}{First page} - {\examplecontent[hanging][2]}{Second page} - \stopcombination} - - - -% Memorandum - -\start - -\useletterstyle[memo] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[memo] - -\useletterstyle[memo] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:memo]{Memo Style}\index{Memo} - -The memo style used primarily for interoffice communication. The top of -the memo indicates the date, the name of the recipient, the name of the -sender and the subject. - -The abbreviation \quotation{RE} is sometimes used instead of \quotation{Subject}. - -A signature and additional information are optional. The signature is placed -near the center with the additional information at the left margin. - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[memo][1]}{First page} - {\examplecontent[memo][2]}{Second page} - \stopcombination} - - - -% English style - -\starthiding - -\start - -\useletterstyle[english] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[english] - -\useletterstyle[english] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:english]{English Style} - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[english][1]}{First page} - {\examplecontent[english][2]}{Second page} - \stopcombination} - -\stophiding - - - -% Swiss style - -\start - -\useletterstyle[swiss] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[swiss] - -\useletterstyle[swiss] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:swiss]{Swiss Style A} - -\startframedtext[width=\textwidth,framecolor=red,align=middle,corner=00] -The layout of this style is not finished, if you want to use it give -me information about the correct margins and position of the elements. -\stopframedtext - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[swiss][1]}{First page} - {\examplecontent[swiss][2]}{Second page} - \stopcombination} - - - -% Swiss left style - -\start - -\useletterstyle[swissleft] - -\getbuffer[example:content] - -\stop - -\startexamplecontent[swissleft] - -\useletterstyle[swissleft] - -\getbuffer[example:long] - -\stopexamplecontent - -\section[letter:example:swissleft]{Swiss Style B} - -\startframedtext[width=\textwidth,framecolor=red,align=middle,corner=00] -The layout of this style is not finished, if you want to use it give -me information about the correct margins and position of the elements. -\stopframedtext - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[swissleft][1]}{First page} - {\examplecontent[swissleft][2]}{Second page} - \stopcombination} - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-extension.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-extension.tex deleted file mode 100644 index 96567e9cfad..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-extension.tex +++ /dev/null @@ -1,28 +0,0 @@ -\startcomponent correspondence-letter-extension - -\environment correspondence-environment - -\chapter{Extensions} - -The letter module provides a special type of files, called extensions. -They provide functions that could be used by different files like the -labels for each language (\filename{label.nle}) or extra features -like page optimization (\filename{optimize.nle}). - -You can load extension files either with the letter module and write -their names as arguments to the \type{extension} key or afterwards in -your file with the \type{\useletterextension} command. - -\setup[useletterextension] - -The module itself comes with the following extensions: - -\starttabulate[|Bl|p|] -\NC label \NC Label texts for different languages \NC\NR -\NC pragma \NC Example content for Hans own letter module \NC\NR -\NC optimize \NC Increase or decrease the distance between - paragraphs to fill a page with at least 25\% - of the text height \NC\NR -\stoptabulate - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-header.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-header.tex deleted file mode 100644 index 68c34f640e4..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-header.tex +++ /dev/null @@ -1,173 +0,0 @@ -\startcomponent correspondence-letter-header - -\environment correspondence-environment - -\startbuffer[firsthead] -\switchtobodyfont[6pt] -\setlettervalue{fromname} {Max Mustermann} -\setlettervalue{fromaddress}{Musterweg 12\\12345 Musterstadt} -\setlettervalue{fromphone} {1234/567890} -\setlettervalue{fromfax} {1234/567891} -\setlettervalue{fromemail} {max.mustermann@muster.com} -\setlettervalue{fromurl} {max.mustermann.com} -\stopbuffer - -\chapter{Header and Footer} - -\section{Header} - -The head of a letter is the part where you can make the most customization, -when you don't want to do this the module provides a few predefined alternatives -which can be decorated with rules. - -The layout of the head is the selected with the \type{\setupletterstyle} command -and the \type{alternative} key, the second key \type{fromrule} is used for the three -alternatives {\em a, b} and {\em c.} - -\starttyping -\setupletterstyle - [head] - [alternative=..., - fromrule=...] -\stoptyping - -You can select between the following alternatives: - -\startitemize[columns,three,packed] -\item a -\item left -\item middle -\item right -\stopitemize - -The \type{fromrule} key accepts the following parameters which can be combined to get -a rule at the top and bottom of the header. - -\startitemize[columns,three,packed] -\item no -\item none -\item off -\item top -\item before -\item bottom -\item after -\item yes -\item on -\stopitemize - -The default alternative {\em a} prints the firstname and surname of the author in -the first line and the address in the following lines, the text is left aligned -but this can be changed with the \type{align} key. - -\start - -\setlettervalue{fromname} {Max Mustermann} -\setlettervalue{fromaddress}{Musterweg 12\\12345 Musterstadt} - -\startelement -\letterelement[head][a] -\stopelement - -\stop - -The other three alternatives {\em left, middle} and {\em right} place the text according -to their names in the left, center or right of the head with a few information than the -default layout provides. You can enable a option rule after the name of the addressee and -at the bottom of the address block. - -\placefigure - [force,none] - {} - {\setupcombinations[before=] - \startcombination[3*3] - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=no] - \letterelement[head][left] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC left \NC\AR - \NC fromrule \NC = \NC no \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=no] - \letterelement[head][middle] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC middle \NC\AR - \NC fromrule \NC = \NC no \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=no] - \letterelement[head][right] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC right \NC\AR - \NC fromrule \NC = \NC no \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=top] - \letterelement[head][left] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC left \NC\AR - \NC fromrule \NC = \NC top \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=top] - \letterelement[head][middle] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC middle \NC\AR - \NC fromrule \NC = \NC top \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=top] - \letterelement[head][right] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC right \NC\AR - \NC fromrule \NC = \NC top \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=bottom] - \letterelement[head][left] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC left \NC\AR - \NC fromrule \NC = \NC bottom \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=bottom] - \letterelement[head][middle] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC middle \NC\AR - \NC fromrule \NC = \NC bottom \NC\AR - \stoptable} - {\startsmallelement - \getbuffer[firsthead] - \setupletterstyle[head][fromrule=bottom] - \letterelement[head][right] - \stopsmallelement} - {\starttable[s1|r|c|l|] - \NC alternative \NC = \NC right \NC\AR - \NC fromrule \NC = \NC bottom \NC\AR - \stoptable} - \stopcombination} - -\section{Footer} - -\startframedtext[width=\textwidth,framecolor=red,align=middle,corner=00] -No default style/alternatives for the foot are provided from the module, -the current section will therefore show ways to create own ones. -\stopframedtext - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-interface.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-interface.tex deleted file mode 100644 index bda80c6012b..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-interface.tex +++ /dev/null @@ -1,190 +0,0 @@ -\startcomponent correspondence-letter-interface - -\environment correspondence-environment - -\chapter{Interface} - - -% Default interface - -\startexamplecontent[interface:default] - -\setupletterstyle[option][backgroundcolor=] - -\startletter -\dorecurse{4}{\input knuth\par} -\stopletter - -\stopexamplecontent - -\start - -\startletter -\input knuth -\stopletter - -\stop - -\section{Default} - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[interface:default][1]}{First page} - {\examplecontent[interface:default][2]}{Second page} - \stopcombination} - -\setup[letter] - - -% Pragma interface - -\startexamplecontent[interface:pragma] - -\useletterinterface[pragma] - -\setupletterstyle[option][backgroundcolor=] - -\setups[letter:test] - -\startsetups[letter:content] -\dorecurse{6}{\input tufte\par} -\stopsetups - -\setups[letter:place] - -\stopexamplecontent - -\start - -\useletterinterface[pragma] - -\setups[letter:test] - -\setups[letter:place] - -\stop - -\section{Pragma} - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[interface:pragma][1]}{First page} - {\examplecontent[interface:pragma][2]}{Second page} - \stopcombination} - -\starttyping -\startbuffer[texletter] -... -\stopbuffer - -\setups[letter:place] -\stoptyping - - - -% Knuth interface - -\startexamplecontent[interface:knuth] - -\useletterinterface[knuth] - -\setupletterstyle[option][backgroundcolor=] - -\setuppapersize[A4][A4] - -\address -Prof.~Brian~K. Reid -Department of Electricial Engineering -Stanford University -Stanford, CA 94305 - -\body -Dear Prof.~Reid: - -I understand that you are having difficulties with -Alka-Seltzer tablets. Since there are 25~pills -per bottle, while the manufacturer's directions -recommend “plop,~plop, fizz,~fizz,” my colleagues -tell me that you have accumulated a substantial -number of bottles in which there is one tablet -left. % (See the 1978 SCRIBE User Manual, page 90.) - -\dorecurse{10} - {At present I am engaged in research on the potential - applications of isolated analgesics. If you would - be so kind as to donate your Alka||Seltzer collection - to our project, I would be more than happy to send - you preprints of any progress reports that we may - publish concerning this critical problem.\par} - -\closing -Sincerly, -R. J. Drofnats -Professor -\endletter - -\stopexamplecontent - -\start - -\useletterinterface[knuth] - -\setuppapersize[A4][A4] - -\address -Prof.~Brian~K. Reid -Department of Electricial Engineering -Stanford University -Stanford, CA 94305 - -\body -Dear Prof.~Reid: - -I understand that you are having difficulties with -Alka-Seltzer tablets. Since there are 25~pills -per bottle, while the manufacturer's directions -recommend “plop,~plop, fizz,~fizz,” my colleagues -tell me that you have accumulated a substantial -number of bottles in which there is one tablet -left. % (See the 1978 SCRIBE User Manual, page 90.) - -At present I am engaged in research on the potential -applications of isolated analgesics. If you would -be so kind as to donate your Alka||Seltzer collection -to our project, I would be more than happy to send -you preprints of any progress reports that we may -publish concerning this critical problem. - -\closing -Sincerly, -R. J. Drofnats -Professor -\endletter - -\stop - -\section{Knuth} - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[interface:knuth][1]}{First page} - {\examplecontent[interface:knuth][2]}{Second page} - \stopcombination} - -\starttyping -\address -... -\body -... -\closing -... -\endletter -\stoptyping - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-layout.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-layout.tex deleted file mode 100644 index a59efb44731..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-layout.tex +++ /dev/null @@ -1,192 +0,0 @@ -\startcomponent correspondence-letter-examples - -\environment correspondence-environment - -\chapter{Layout} - -The components for the layout of a letter can be divided into {\em letter layers} and {\em letter sections}. You can position letter layers on the page wherever you want and it is also possible to put one layer in front of or behind another layer. - -The underlying mechanism behind letter layers is \CONTEXT’s normal layer mechanism in combination with local framed environments. This is a very powerful combination and you can create complicated layouts with them. - -Letter sections, the second group of components, are not as powerful as letter layers and you only have a limited number of elements to control their layout. - -\setup[setupletterstyle:layout] - -\setup[setupletterstyle:option] - -\start - -\setupletter - [alternative=none] - -\setupletterstyle - [option] - [marking=off, - backaddress=yes] - -\setupletterstyle - [backaddress] - [bottomframe=off] - -\setupletterstyle - [head,foot,address,backaddress,reference] - [background=color, - backgroundcolor=darkgray, - backgroundoffset=-1.5pt] - -\startletter -\dontleavehmode -\stopletter - -\stop - -\section{Letter layers} - -Layers are used to position elements on a page independent of the page layout. -They are used for the header and footer, address block\footnote{The block styles -use a different structure and use a letter section for the address block.}, etc.. - -The complete list of all available layers is: - -\startitemize[packed,columns,three] -\item head -\item letternext -\item lettermain -\item foot -\item address -\item reference -\item location -\item nexthead -\item lefthead -\item righthead -\item nextfoot -\item leftfoot -\item rightfoot -\item topmark -\item botmark -\item cutmark -\item endmark -\item usermark -\item backaddress -\stopitemize - -\starttyping -\setlayer[...]{\framed{...}} -\stoptyping - -The position and layout of the layers can be changed with the \type {\setupletterstyle} command. - -\starttyping -\setupframed[...][..,..=..,..] -\stoptyping - -\setup[setupletterlayer:frame] - -\starttyping -\setuplayer[...][..,..=..,..] -\stoptyping - -\setup[setupletterlayer:layer] - -\starttyping -\getparameters[...][..,..=..,..] -\stoptyping - -\setup[setupletterlayer:option] - -\subsubject{State value} - -\starttabulate -\HL -\NC start \NC show layer on the first page \NC\NR -\NC stop \NC disable layer \NC\NR -\NC first \NC see \mono{start} \NC\NR -\NC next \NC show layer on the second and following pages \NC\NR -\NC left \NC show layer on left pages \NC\NR -\NC right \NC show layer on right pages \NC\NR -\NC leftpage \NC see \mono{left} \NC\NR -\NC rightpage \NC see \mono{right} \NC\NR -\NC page \NC use global pagenumbering for left/right pages \NC\NR -\NC subpage \NC use local pagenumbering for left/right pages \NC\NR -\HL -\stoptabulate - -\start - -\definecolor[fakerulecolor][darkgray] - -\setupletterstyle - [reference] - [alternative=none] - -\setupletterstyle - [enclosure,copy,postscript] - [location=left,width=0pt,before=\nowhitespace,after=\nowhitespace] - -\setuplabeltext - [letter:enclosure=, - letter:copy=, - letter:postscript=] - -\setupletter - [title={\blackrule[width=\hsize,height=\lineheight,color=darkgray]}, - subject={\blackrule[width=\hsize,height=\lineheight,color=darkgray]}, - opening={\blackrule[width=\hsize,height=\lineheight,color=darkgray]}, - closing={\blackrule[width=.33\hsize,height=4\lineheight,color=darkgray]}, - appendices={\blackrule[width=.33\hsize,height=3\lineheight,color=darkgray]}] - -\setlettervalue{title} {\fakewords {5} {10}} -\setlettervalue{subject} {\fakewords {5} {10}} -\setlettervalue{opening} {\fakewords {3} {5}} -\setlettervalue{content} {\fakewords{100}{150}} -\setlettervalue{closing} {\fakewords {2} {4}} -\setlettervalue{enclosure} {\fakewords {3} {6}} -\setlettervalue{copy} {\fakewords {3} {6}} -\setlettervalue{postscript}{\fakewords {3} {6}} - -\startletter -\fakewords{100}{150} -\stopletter - -\stop - -\section{Letter sections} - -\startitemize[packed,columns,three] -\item letterhead\footnote[section:blockstyle]{Only used for the blockstyle layouts.} -\item dateline\note[section:blockstyle] -\item referenceline\note[section:blockstyle] -\item specialnotation\note[section:blockstyle] -\item insideaddress\note[section:blockstyle] -\item title -\item subject -\item opening -\item content -\item closing -\item appendices -\stopitemize - -You can change the layout of a letter section with the \type {\setupletterstyle} -command, the syntax is: - -\setup[setuplettersection] - -\start - -\definecolor[fakerulecolor][darkgray] - -\setupletterstyle - [reference] - [alternative=none] - -\startletter -\fakewords{100}{150} -\stopletter - -\stop - -\section{Letter descriptions} - -\setup[setupletterdescription] - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-pagenumber.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-pagenumber.tex deleted file mode 100644 index 15a979da3ee..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-pagenumber.tex +++ /dev/null @@ -1,30 +0,0 @@ -\startcomponent correspondence-letter-pagenumer - -\environment correspondence-environment - -\start - -\startsetups letter:foot -\midaligned{Page \correspagenumber\ of \numberofcorrespages} -\stopsetups - -\startletter -\input knuth -\stopletter - -\stop - -\chapter{Pagenumbering} - -\starttyping -\correspagenumber -\numberofcorrespages -\stoptyping - -\starttyping -\startsetups letter:head -\rightaligned{Page \correspagenumber\ of \numberofcorrespages} -\stopsetups -\stoptyping - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-reference.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-reference.tex deleted file mode 100644 index 5f6e5141553..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-reference.tex +++ /dev/null @@ -1,750 +0,0 @@ -\startcomponent correspondence-letter-reference - -\environment correspondence-environment - -% Text for each example - -\startbuffer[reference] - -\setupletterstyle - [whitespace=line] - -\setupletter - [name=Willi Maier, - phone=01234-56789, - fax=3456-9853, - date=\currentdate] - -\setupletter - [fromname={Max Mustermann}, - fromaddress={Musterstraße 12\\12345 Musterstadt}] - -\setupletter - [toname={Hans Hansen}, - toaddress={Zielgasse 23\\34789 New Mustertown}] - -\setupletter - [subject={Grund des Anschreibens}, - opening={Sehr geehrte Damen und Herren,}, - closing={Mit freundlichen Grüßen}] - -\stopbuffer - - - -% Chapter intro - -\chapter{Reference line} - -The reference line is used to show information like the date and other information. - -A few styles are predefined and you can select them with: - -\starttyping -\setupletterstyle[reference][alternative=...] -\stoptyping - -By default only the current date is shown in the reference line but you can change -this with list key, you can give a single value or a comma list as argument. - -\starttyping -\setupletterstyle[reference][list=...] -\stoptyping - -For backward compatibility you could set both values also with the \type{\setupletter} -command which are passed down to the \type{\setupletterstyle} command. - -\starttyping -\setupletter - [alternative=..., - list=...] -\stoptyping - - - -% Alternative a - -\start - -\getbuffer[reference] - -\setupletter - [alternative=a, - list={name,phone,date}] - -\setupletter - [name,date,phone] - [titlestyle=\tfx] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Alternative \type{a}} - -The reference alternative \type{a} is enabled with the default style, the only -value you can see is the date. The setup in the default style for the reference -line is like this: - -\starttyping -\setupletterstyle - [reference] - [alternative=a, - list=date] -\stoptyping - -This leads to the following output, you get two lines which are aligned to the right -side with a label in the current mainlanguage on the top line and the current date -on the bottom line. - -\start - -\startelement -\letterelement[reference][a] -\stopelement - -\stop - -You can also show more elements in the reference line by writing them as arguments -to the list key. - -\starttyping -\setupletterstyle - [reference] - [list={name,phone,date}] -\stoptyping - -The values are shown in the given order and spread across the line like below. -To get this effect you need a list with at least two elements, otherwise it -is moved to the right side as you can see in the first example. - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][alternative=a,list={name,phone,date}] - -\startelement -\letterelement[reference][a] -\stopelement - -\stop - - - -% Alternative b - -\start - -\getbuffer[reference] - -\setupletter - [alternative=b, - list={yourref,yourmail,myref,mymail,line,name,room,phone,fax,line,date}] - -\setupletter - [yourref,yourmail,myref,mymail,line,name,room,phone,fax,line,date] - [titlestyle=\tfxx, - separator=: ] - -\setupletter - [yourref=, - yourmail={2880-01-15}, - myref={IV 1 - 24 00}, - mymail=, - name={Max Mustermann}, - phone={01234-56789}, - fax={3456-9853}, - date=\currentdate] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Alternative \type{b}} - -\starttyping -\setupletterstyle - [reference] - [alternative=b] - -\setupletter[date][separator=: ] -\stoptyping - -\start - -\setupletter[date][separator=: ] - -\startelement -\letterelement[reference][b] -\stopelement - -\stop - -\starttyping -\setupletterstyle - [reference] - [alternative=b, - list={name,phone,date}] - -\setupletter - [name,phone,date] - [separator=: ] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletter - [name,phone,date] - [%titlestyle=\tfxx, - separator=: ] - -\setupletterstyle[reference][list={name,phone,date}] - -\startelement -\letterelement[reference][b] -\stopelement - -\stop - -\starttyping -\setupletter - [name,phone,date] - [titlestyle=\tx, - separator=: ] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletter - [name,phone,date] - [titlestyle=\tx, - separator=: ] - -\setupletterstyle[reference][list={name,phone,date}] - -\startelement -\letterelement[reference][b] -\stopelement - -\stop - - - -% Alternative c - -\start - -\getbuffer[reference] - -\setupletter - [alternative=c, - list=reference] - -\setupletter - [reference=\rightaligned{Place, \currentdate}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Alternative \type{c}} - -\starttyping -\setupletterstyle - [reference] - [alternative=c, - list=reference] - -\setupletter[reference=\rightaligned{\currentdate}] -\stoptyping - -\start - -\setupletterstyle[reference][list=reference] - -\setupletter[reference=\rightaligned{\currentdate}] - -\startelement -\letterelement[reference][c] -\stopelement - -\stop - -\starttyping -\setupletterstyle - [reference] - [alternative=c, - list=reference] - -\setupletter - [reference=\line{\lettervalue{name}\hfill\lettervalue{date}}] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][list=reference] - -\setupletter[reference=\line{\lettervalue{name}\hfill\lettervalue{date}}] - -\startelement -\letterelement[reference][c] -\stopelement - -\stop - -You could also use the alternative \type{c} to create your own reference line. - -The following example show you a way to create own similar the alternative \type{a} -but now with a natural table and a hard coded order of the elements. - -\starttyping -\setupletterstyle - [reference] - [alternative=c, - list=reference] - -\startsetups reference:customized - - \bTABLE[frame=off,offset=0pt,width=.25\hsize] - \bTR - \bTD \labeltext{letter:name} \eTD - \bTD \labeltext{letter:phone} \eTD - \bTD \labeltext{letter:fax} \eTD - \bTD \labeltext{letter:date} \eTD - \eTR - \bTR - \bTD \lettervalue{name} \eTD - \bTD \lettervalue{phone} \eTD - \bTD \lettervalue{fax} \eTD - \bTD \lettervalue{date} \eTD - \eTR - \eTABLE - -\stopsetups - -\setupletter - [reference=\setups{reference:customized}] -\stoptyping - -The code results in the following result. - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][list=reference] - -\startsetups reference:customized -\bTABLE[frame=off,offset=0pt,width=.25\hsize] - \bTR - \bTD \labeltext{letter:name} \eTD - \bTD \labeltext{letter:phone} \eTD - \bTD \labeltext{letter:fax} \eTD - \bTD \labeltext{letter:date} \eTD - \eTR - \bTR - \bTD \lettervalue{name} \eTD - \bTD \lettervalue{phone} \eTD - \bTD \lettervalue{fax} \eTD - \bTD \lettervalue{date} \eTD - \eTR -\eTABLE -\stopsetups - -\setupletter[reference=\setups{reference:customized}] - -\startelement -\letterelement[reference][b] -\stopelement - -\stop - - -% Alternative d - -\start - -\getbuffer[reference] - -\setupletter - [alternative=d, - list={yourref,yourmail,myref,mymail,line,name,room,phone,fax,line,date}] - -\setupletter - [yourref,yourmail,myref,mymail,line,name,room,phone,fax,line,date] - [titlestyle=\tfxx, - separator=: ] - -\setupletter - [yourref=, - yourmail={2880-01-15}, - myref={IV 1 - 24 00}, - mymail=, - name={Max Mustermann}, - phone={01234-56789}, - fax={3456-9853}, - date=\currentdate] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Alternative \type{d}} - -\starttyping -\setupletterstyle - [reference] - [alternative=b] -\stoptyping - -\start - -\startelement -\letterelement[reference][d] -\stopelement - -\stop - -\starttyping -\setupletterstyle - [reference] - [alternative=d, - list={name,phone,date}] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][list={name,phone,date}] - -\startelement -\letterelement[reference][d] -\stopelement - -\stop - -\starttyping -\setupletter - [name,phone,date] - [separator=: ] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][list={name,phone,date}] - -\setupletter[name,phone,date][separator=: ] - -\startelement -\letterelement[reference][d] -\stopelement - -\stop - -\starttyping -\setupletter - [name,phone,date] - [titlestyle=\tx, - separator=: ] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][list={name,phone,date}] - -\setupletter[name,phone,date][titlestyle=\tx,separator=: ] - -\startelement -\letterelement[reference][d] -\stopelement - -\stop - - - -% Alternative e - -\start - -\getbuffer[reference] - -\setupletter - [alternative=e, - list={name,phone,date}] - -\setupletter - [name,date,phone] - [titlestyle=\tfx, - width=\dimexpr\textwidth/3\relax] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Alternative \type{e}} - -\starttyping -\setupletterstyle - [reference] - [alternative=e] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletter[date][width=.25\hsize] - -\startelement -\letterelement[reference][e] -\stopelement - -\stop - -\starttyping -\setupletterstyle - [reference] - [alternative=e, - list={name,phone,date}] - -\setupletter - [name,date,phone] - [width=.25\textwidth] -\stoptyping - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][list={name,phone,date}] - -\setupletter[name,date,phone][width=.25\hsize] - -\startelement -\letterelement[reference][e] -\stopelement - -\stop - - - -% Alternative none - -\start - -\getbuffer[reference] - -\setupletterstyle[reference][alternative=none] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Alternative \type{none}} - -The last alternative \type{none} is different from the previous alternatives. - -It disables the complete reference line and use as only alternative the values -from layout for the first page to the distance till the first line of the letter -while the other ignores this values and calculate it based on the position, height -and distance after the reference line. - -You choose in the same way as the other alternatives. - -\starttyping -\setupletterstyle - [reference] - [alternative=none] -\stoptyping - - - -% User defined line - -\start - -\getbuffer[reference] - -\defineletterelement[reference][customized] - {\setupTABLE [height=18mm,frame=off,offset=0pt]% - \setupTABLE[c][1,2] [width=50.8mm]% - \setupTABLE[c][3,4,5][width=25.4mm]% - \bTABLE - \bTR - \bTD[m=3] \labeltext{letter:fax} \\\lettervalue{fax} \eTD - \bTD \labeltext{letter:email} \\\lettervalue{email} \eTD - \eTR - \bTR - \bTD \labeltext{letter:yourref}\\\lettervalue{yourref} \eTD - \bTD \labeltext{letter:myref} \\\lettervalue{myref} \eTD - \bTD[nx=2] \labeltext{letter:phone} \\\lettervalue{phone} \eTD - \bTD \labeltext{letter:date} \\\lettervalue{date} \eTD - \eTR - \eTABLE} - -\setupletterstyle - [reference] - [alternative=customized, - voffset=\dimexpr80.4mm-\strutht\relax] - -\setupletterstyle - [firstpage] - [topspace=11.5cm] - -\setupletter - [yourref={2880-01-15}, - myref={IV 1 - 24 00}, - name={Max Mustermann}, - phone={01234-56789}, - fax={3456-9853}, - date={\currentdate[year,--,mm,--,dd]}] - -\startletter -\input knuth\par -\stopletter - -\stop - -\section{Customized reference line} - -\start\setuptyping[bodyfont=small] -\starttyping -\defineletterelement[reference][customized] - {\setupTABLE [height=18mm,frame=off,offset=0pt]% - \setupTABLE[c][1,2] [width=50.8mm]% - \setupTABLE[c][3,4,5][width=25.4mm]% - \bTABLE - \bTR - \bTD[m=3] \labeltext{letter:fax} \\\lettervalue{fax} \eTD - \bTD \labeltext{letter:email} \\\lettervalue{email} \eTD - \eTR - \bTR - \bTD \labeltext{letter:yourref}\\\lettervalue{yourref} \eTD - \bTD \labeltext{letter:myref} \\\lettervalue{myref} \eTD - \bTD[nx=2] \labeltext{letter:phone} \\\lettervalue{phone} \eTD - \bTD \labeltext{letter:date} \\\lettervalue{date} \eTD - \eTR - \eTABLE} -\stoptyping -\stop - -%\starttyping -%\defineletterelement[reference][sideline]% -% {} -%\stoptyping - -\starttyping -\setupletterstyle - [firstpage] - [topspace=11.5cm] - -\setupletterstyle - [reference] - [alternative=customized] -\stoptyping - -\page[right] - -\starttyping -\defineletterelement[reference][customized] - {\bTABLE[frame=off,offset=0pt,width=.25\hsize] - \bTR - \bTD \labeltext{letter:name} \eTD - \bTD \labeltext{letter:phone} \eTD - \bTD \labeltext{letter:fax} \eTD - \bTD \labeltext{letter:date} \eTD - \eTR - \bTR - \bTD \lettervalue{name} \eTD - \bTD \lettervalue{phone} \eTD - \bTD \lettervalue{fax} \eTD - \bTD \lettervalue{date} \eTD - \eTR - \eTABLE} -\stoptyping - -\page[left] - -\start - -\useletterstyle[dina] - -\getbuffer[reference] - -\defineletterelement[reference][sideline] - {\framed - [frame=off, - align={right,high}, - foregroundstyle=small, - width=4cm, - height=\textwidth] - {Vorname Nachname\\ - 01234/567890\\ - hans.meier@muster.de}} - -\setupletterstyle - [firstpage,secondpage] - [topspace=8cm, - width=13cm] - -\setupletterstyle - [reference] - [alternative=sideline, - hoffset=\dimexpr\backspace+\textwidth+1em\relax, - voffset=\topspace] - -\startletter -\input knuth\par -\stopletter - -\stop - -\starttyping -\defineletterelement[reference][sideline] - {\framed - [frame=off, - align={right,high}, - foregroundstyle=small, - width=4cm, - height=\textwidth] - {Vorname Nachname\\ - 01234/567890\\ - hans.meier@muster.de}} - -\setupletterstyle - [firstpage,secondpage] - [topspace=8cm, - width=13cm] - -\setupletterstyle - [reference] - [alternative=sideline, - hoffset=\dimexpr\backspace+\textwidth+1em\relax, - voffset=\topspace] -\stoptyping - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-styles.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-styles.tex deleted file mode 100644 index db2abe25426..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-styles.tex +++ /dev/null @@ -1,30 +0,0 @@ -\startcomponent correspondence-letter-styles - -\environment correspondence-environment - -\chapter{Styles} - -The already comes with a few predefined styles, to use them write the name in the second -column either as argument to {\em style} when you load the module or later in your document -with \type{\useletterstyle}. - -\starttabulate[|l|l|l|] -\NC \bf Description \NC \bf Name \NC \bf Page \NC\NR -\NC German style DIN 676 A \NC dina \NC \at[letter:example:dina] \NC\NR -\NC German style DIN 676 B \NC dinb \NC \at[letter:example:dinb] \NC\NR -\NC Dutch letter style \NC dutch \NC \at[letter:example:dutch] \NC\NR -\NC French letter style \NC french \NC \at[letter:example:french] \NC\NR -%\NC English letter style \NC english \NC \at[letter:example:english] \NC\NR -\NC Full-block \NC fullblock \NC \at[letter:example:fullblock] \NC\NR -\NC Semiblock \NC semiblock \NC \at[letter:example:semiblock] \NC\NR -\NC Modified block \NC modified \NC \at[letter:example:modified] \NC\NR -\NC Hanging intended \NC hanging \NC \at[letter:example:hanging] \NC\NR -\NC Memo style \NC memo \NC \at[letter:example:memo] \NC\NR -\NC Simplified style \NC simplified \NC \at[letter:example:simplified] \NC\NR -\NC Swiss style \NC swiss \NC \at[letter:example:swiss] \NC\NR -\NC Swiss left style \NC swissleft \NC \at[letter:example:swissleft] \NC\NR -\stoptabulate - -The result of each page can be found on the pages shown in the third column. - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-values.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-values.tex deleted file mode 100644 index aa04ff6b7e9..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-letter-values.tex +++ /dev/null @@ -1,135 +0,0 @@ -\startcomponent correspondence-letter-values - -\environment correspondence-environment - -\chapter{Values and Labels} - -\section{Values} - -When you write a letter you have to set some values for the reference line like the date -and other ones like the name and address of the addressee for the address block. This can -be done with the two commands \type{\setlettervalue} and \type{\setupletter}. - -\setup[setlettervalue]\flushatnextpar{\index{\tex{setlettervalue}}} - -\setup[setupletter:value]\flushatnextpar{\index{\tex{setupletter}}} - -The first command \type{\setlettervalue} takes two commands like \type{\setvalue} or -\type{\setvariable}. - -\starttyping -\setlettervalue{firstname} {Mike} -\setlettervalue{familyname}{Johnson} -\stoptyping - -There is also an optional argument between the name and the content of the value, -which is explained in the next section. - -Using the second command \type{\setupletter} you can set multiple values separated -by commas. It’s similar to \type{\setvariables}. The previous example will look like: - -\starttyping -\setupletter - [firstname=Mike, - familyname=Johnson] -\stoptyping - -As you can seen in the following command overview for \type{\setupletter} the command has -two arguments while we only used one in the last example. The two argument form is used -to change the layout for the values in the reference (and others) line like: - -\starttyping -\setupletter - [date,name] - [titlestyle=\tfx, - titlecolor=gray] -\stoptyping - -The complete list of arguments is: - -\setup[setupletter:setup]\flushatnextpar{\index{\tex{setupletter}}} - -\starttyping -\setupletter[..,..=..,..] -\setupletter[...,...][..,..=..,..] - -\setlettervalue{...}{...} -\stoptyping - -\section{Labels} - -When you take a look at the reference section of the examples you can see all of them -having a label above or on the left or the content. But this did only happen because the -module provides preset texts for them. - -Trying to use a nondefined label like e.g. {\em skype} you will see the content of the value -as below but no label above. - -The following code - -\starttyping -\setlettervalue{date} {\currentdate} -\setlettervalue{skype}{corres.context} - -\setupletterstyle[reference][list={skype,date}] -\stoptyping - -result in this reference line: - -\start - -\setlettervalue{date} {\currentdate} -\setlettervalue{skype}{corres.context} - -\setupletterstyle[reference][list={skype,date}] - -\startelement -\letterelement[reference][a] -\stopelement - -\stop - -The module uses \ConTeXt’s label text mechanism to define text for various languages -which can be found in the file \filename{default.nle}. To define your own text use -the \type{\setuplabeltext} command. To prevent problems with other macros the names -of the labels are prefixed with {\em letter:}.\footnote{The {\em memo} style makes -an exception to this concept and uses {\em memo:} as prefix for the label names.} - -\setup[setuplabeltext]\flushatnextpar{\index{\tex{setuplabeltext}}} - -To add a label for our currently used {\em skype} value put the following -line in your document and change the language tag to the main language you use -in your document. - -\starttyping -\setuplabeltext[en][letter:skype=Skype] -\stoptyping - -The reference line now looks like: - -\start - -\setuplabeltext[en][letter:skype=Skype] - -\setlettervalue{date} {\currentdate} -\setlettervalue{skype}{corres.context} - -\setupletterstyle[reference][list={skype,date}] - -\startelement -\letterelement[reference][a] -\stopelement - -\stop - -When you use \type{\setlettervalue} to set the content of the values the optional -argument can be used instead of \type{\setuplabeltext} to define a text for the label -in the current main language. An empty argument results in an empty label text. - -The two step setting for the value {\em skype} can the be done with this setting. - -\starttyping -\setlettervalue{skype}[Skype]{corres.context} -\stoptyping - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-resume-examples.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-resume-examples.tex deleted file mode 100644 index 161823862fb..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-resume-examples.tex +++ /dev/null @@ -1,205 +0,0 @@ -\startcomponent correspondence-resume-examples - -\environment correspondence-environment - - - -% short example for full page examples - -\startbuffer[resume:short] - -\setresumevalue{image} {\blackrule[width=25mm,height=25mm]} -\setresumevalue{firstname} {John} -\setresumevalue{familyname}{Doe} -\setresumevalue{title} {Resum\'e title (optional)} -\setresumevalue{quote} {Some quote (optional)} -\setresumevalue{street} {street and number} -\setresumevalue{town} {postcode city} -\setresumevalue{mobile} {mobile (optional)} -\setresumevalue{phone} {phone (optional)} -\setresumevalue{fax} {fax (optional)} -\setresumevalue{email} {email (optional)} -\setresumevalue{info} {additional information (optional)} - -\startresume - -\section{Education} - -\cventry{year--year}{Degree}{Institution}{City}{\it Grade}{Description} -\cventry{year--year}{Degree}{Institution}{City}{\it Grade}{Description} - -\section{Master thesis} - -\cvline{title}{\em Title} -\cvline{supervisors}{Supervisors} -\cvline{description}{\tx Short thesis abstract} - -\section{Experience} - -\subsection{Vocational} - -\cventry{year--year}{Job title}{Employer}{City}{}{Description} -%\cventry{year--year}{Job title}{Employer}{City}{}{Description} - -\subsection{Miscellaneous} - -\cventry{year--year}{Job title}{Employer}{City}{}{Description line 1\crlf Description line 2} - -\section{Languages} - -\cvlanguage{language 1}{Skill level}{Comment} -\cvlanguage{language 2}{Skill level}{Comment} -%\cvlanguage{language 3}{Skill level}{Comment} - -\stopresume - -\stopbuffer - -% long examples with two pages (included in the runnung text) - -\startbuffer[resume:long] - -\setupresumestyle[option][backgroundcolor=white,before=] - -\setresumevalue{image} {\blackrule[width=25mm,height=25mm]} -\setresumevalue{firstname} {John} -\setresumevalue{familyname}{Doe} -\setresumevalue{title} {Resum\'e title (optional)} -\setresumevalue{quote} {Some quote (optional)} -\setresumevalue{street} {street and number} -\setresumevalue{town} {postcode city} -\setresumevalue{mobile} {mobile (optional)} -\setresumevalue{phone} {phone (optional)} -\setresumevalue{fax} {fax (optional)} -\setresumevalue{email} {email (optional)} -\setresumevalue{info} {additional information (optional)} - -\startresume - -\section{Education} - -\cventry{year--year}{Degree}{Institution}{City}{\it Grade}{Description} -\cventry{year--year}{Degree}{Institution}{City}{\it Grade}{Description} - -\section{Master thesis} - -\cvline{title}{\em Title} -\cvline{supervisors}{Supervisors} -\cvline{description}{\tx Short thesis abstract} - -\section{Experience} - -\subsection{Vocational} - -\cventry{year--year}{Job title}{Employer}{City}{}{Description} -\cventry{year--year}{Job title}{Employer}{City}{}{Description} - -\subsection{Miscellaneous} - -\cventry{year--year}{Job title}{Employer}{City}{}{Description line 1\crlf Description line 2} - -\section{Languages} - -\cvlanguage{language 1}{Skill level}{Comment} -\cvlanguage{language 2}{Skill level}{Comment} -\cvlanguage{language 3}{Skill level}{Comment} - -\section{Computer skills} - -\cvcomputer{category 1}{XXX, YYY, ZZZ}{category 4}{XXX, YYY, ZZZ} -\cvcomputer{category 2}{XXX, YYY, ZZZ}{category 5}{XXX, YYY, ZZZ} -\cvcomputer{category 3}{XXX, YYY, ZZZ}{category 6}{XXX, YYY, ZZZ} - -\section{Interests} - -\cvline{hobby 1}{\small Description} -\cvline{hobby 2}{\small Description} -\cvline{hobby 3}{\small Description} - -\section{Extra 1} - -\cvlistitem{Item 1} -\cvlistitem{Item 2} -\cvlistitem[+]{Item 3} - -\section{Extra 2} - -\cvlistdoubleitem[$\circ$]{Item 1}{Item 4} -\cvlistdoubleitem[$\circ$]{Item 2}{Item 5} -\cvlistdoubleitem[$\circ$]{Item 3}{} - -\stopresume - -\stopbuffer - - - -% intro text about the résumé example - -\chapter{Résumé Examples} - - - -% moderncv classic style - -\start - -\useresumeinterface[moderncv] -\useresumestyle [classic] - -\getbuffer[resume:short] - -\stop - -\startexamplecontent[resume:classic] - -\useresumeinterface[moderncv] -\useresumestyle [classic] - -\getbuffer[resume:long] - -\stopexamplecontent - -\section{Classic} - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[resume:classic][1]}{First page} - {\examplecontent[resume:classic][2]}{Second page} - \stopcombination} - - - -% moderncv cassual style - -\start - -\useresumeinterface[moderncv] -\useresumestyle [casual] - -\getbuffer[resume:short] - -\stop - -\startexamplecontent[resume:casual] - -\useresumeinterface[moderncv] -\useresumestyle [casual] - -\getbuffer[resume:long] - -\stopexamplecontent - -\section{Casual} - -\placefigure - [force,none] - {} - {\startcombination - {\examplecontent[resume:casual][1]}{First page} - {\examplecontent[resume:casual][2]}{Second page} - \stopcombination} - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-resume-interface.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-resume-interface.tex deleted file mode 100644 index b195da5f530..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-resume-interface.tex +++ /dev/null @@ -1,237 +0,0 @@ -\startcomponent correspondence-resume-interface - -\environment correspondence-environment - -\chapter{Interface} - -\page - -\section{Default} - -\setup[resume] - -\page - -\section{moderncv} - -The moderncv interface is based on the layout of the moderncv-package for \LaTeX{} -and with the same elements and styles. The difference between the \LaTeX{} and the -\ConTeXt-version is that you don't need a \type{\maketitle} command to place the -header for each style and it is placed by default. - -%\startframedtext[width=\textwidth,framecolor=red,align=middle,corner=00] -%The current implementation of the moderncv interface is written as resume style and -%not as interface, this means you load it with \type{\useresumestyle} or as argument -%for \type{\usemodule} with the style key. -%\stopframedtext - -The available elements for the interface are described below. - -\subsubject{\tex{cvline}} - -The \type{\cvline} take two arguments, the first place the text in the left margin -and accepts only short entries, the second argument accepts longer texts which are -placed in the text area. You could change the distance after the entry with the -optional argument. - -\startnointerference -\setup[cvline] -\stopnointerference - -\starttyping -\cvline{...}{...} -\stoptyping - -The two lines - -\starttyping -\cvline{supervisors}{Supervisors} -\cvline{description}{\tx Short thesis abstract} -\stoptyping - -results in - -\start - -\useresumeinterface[moderncv] - -\startelement -\cvline{supervisors}{Supervisors} -\cvline{description}{\tx Short thesis abstract} -\stopelement - -\stop - -\subsubject{\tex{cvlistitem}} - -The \type{\cvlistitem} is similar to the \type{\cvline} command above but it -takes only one argument which is placed in the text area. In the left margin -appear a symbol like a itemize, you could change this symbol with the optional -argument before the text. - -\startnointerference -\setup[cvlistitem] -\stopnointerference - -\starttyping -\cvlistitem[<symbol>]{...} -\stoptyping - -The two example line below - -\starttyping -\cvlistitem{Item 1} -\cvlistitem[+]{Item 2} -\stoptyping - -result in the following output - -\start - -\useresumeinterface[moderncv] - -\startelement -\cvlistitem{Item 1} -\cvlistitem[+]{Item 2} -\stopelement - -\stop - -\subsubject{\tex{cvlistdoubleitem}} - -The \type{\cvlistdoubleitem} is a enhanced version of the \type{\cvlistitem} command -and place two text side by side, if you change the symbol it affects the symbol for -both texts. - -\startnointerference -\setup[cvlistdoubleitem] -\stopnointerference - -\starttyping -\cvlistdoubleitem[<symbol>]{...}{...} -\stoptyping - -As you can see in the next example you have to write the text in two command if you -want one below the other. - -\starttyping -\cvlistdoubleitem[$\circ$]{Item 1}{Item 3} -\cvlistdoubleitem[$\circ$]{Item 2}{Item 4} -\stoptyping - -You can see this in the output from the example above. - -\start - -\useresumeinterface[moderncv] - -\startelement -\cvlistdoubleitem[$\circ$]{Item 1}{Item 3} -\cvlistdoubleitem[$\circ$]{Item 2}{Item 4} -\stopelement - -\stop - -\subsubject{\tex{cventry}} - -The \type{\cventry} has six argument and prints the argument two to five in the first -line of the text with a certain format for each text and separates them with commas. -The first argument is typed in the left margin and the last in the text on a separate -line. - -\startnointerference -\setup[cventry] -\stopnointerference - -\starttyping -\cventry{...}{...}{...}{...}{...}{...} -\stoptyping - -Two possible settings for the arguments are: - -\starttyping -\cventry{year--year}{Degree}{Institution}{City}{\it Grade}{Description} -\cventry{year--year}{Job title}{Employer}{City}{}{Description} -\stoptyping - -This results in the time period in the left margin and the information in the text. - -\start - -\useresumeinterface[moderncv] - -\startelement -\cventry{year--year}{Degree}{Institution}{City}{\it Grade}{Description} -\cventry{year--year}{Job title}{Employer}{City}{}{Description} -\stopelement - -\stop - -\subsubject{\tex{cvlanguage}} - -The \type{\cvlanguage} behaves also line the \type{\cvline} command but take -a third argument which can be used for additional information in the right margin. - -\startnointerference -\setup[cvlanguage] -\stopnointerference - -\starttyping -\cvlanguage{...}{...}{...} -\stoptyping - -The following example - -\starttyping -\cvlanguage{language 1}{Skill level}{Comment} -\cvlanguage{language 2}{Skill level}{Comment} -\stoptyping - -results in: - -\start - -\useresumeinterface[moderncv] - -\startelement -\cvlanguage{language 1}{Skill level}{Comment} -\cvlanguage{language 2}{Skill level}{Comment} -\stopelement - -\stop - -\subsubject{\tex{cvcomputer}} - -The \type{\cvcomputer} command is a enhanced version of the \type{\cvlistdoubleitem} -with two explicit argument for the label text which is written on the left of each entry. - -\startnointerference -\setup[cvcomputer] -\stopnointerference - -\starttyping -\cvcomputer{...}{...}{...}{...} -\stoptyping - -As you can see in the first and third argument a label is written to describe text -category of each entry. - -\starttyping -\cvcomputer{category 1}{XXX, YYY, ZZZ}{category 3}{XXX, YYY, ZZZ} -\cvcomputer{category 2}{XXX, YYY, ZZZ}{category 4}{XXX, YYY, ZZZ} -\stoptyping - -This produce the following output. - -\start - -\useresumeinterface[moderncv] - -\startelement -\cvcomputer{category 1}{XXX, YYY, ZZZ}{category 3}{XXX, YYY, ZZZ} -\cvcomputer{category 2}{XXX, YYY, ZZZ}{category 4}{XXX, YYY, ZZZ} -\stopelement - -\stop - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence-revision.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence-revision.tex deleted file mode 100644 index f48ca8de67f..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence-revision.tex +++ /dev/null @@ -1,41 +0,0 @@ -\startcomponent correspondence-revision - -\environment correspondence-environment - -\chapter{File versions} - -The correspondence module comes as a package with many different files and each of them -has their own version tag, you can get this information from the information block at the -top of the file, \MKIV\ users get also a overview of the used files with the version at -the end of the log file. - -\start - -\setuptabulate[header=repeat] - -\starttabulatehead -\NC \bf File \NC \bf Revision \NC \bf Description \NC\NR -\stoptabulatehead - -\startluacode - -local pairs = global.pairs - -context.starttabulate( { "|l|l|l|" } ) -for k,v in pairs(thirddata.correspondence.files) do - context.NC() - context("%s",thirddata.correspondence.files[k]["name"]) - context.NC() - context("%s",thirddata.correspondence.files[k]["version"]) - context.NC() - context("%s",thirddata.correspondence.files[k]["description"]) - context.NC() - context.NR() -end -context.stoptabulate() - -\stopluacode - -\stop - -\stopcomponent diff --git a/Master/texmf-dist/source/context/third/letter/doc/correspondence.tex b/Master/texmf-dist/source/context/third/letter/doc/correspondence.tex deleted file mode 100644 index 5a91ce3cb7c..00000000000 --- a/Master/texmf-dist/source/context/third/letter/doc/correspondence.tex +++ /dev/null @@ -1,55 +0,0 @@ -\startproduct correspondence - -\environment correspondence-environment - -\startfrontmatter - -\TitlePage - -\completecontent - -\component correspondence-introduction - -\stopfrontmatter - -\startbodymatter - -\part{Letters} - -\component correspondence-letter-beginner -\component correspondence-letter-interface -\component correspondence-letter-layout -\component correspondence-letter-extension -\component correspondence-letter-values -\component correspondence-letter-background -\component correspondence-letter-pagenumber -\component correspondence-letter-styles -\component correspondence-letter-reference -\component correspondence-letter-header -\component correspondence-letter-examples - -\part{Résumés} - -\component correspondence-resume-interface -\component correspondence-resume-examples - -\stopbodymatter - -\startappendices - -\CommandList - -\component correspondence-revision -\component correspondence-labeltext - -\completeindex - -\stopappendices - -\startbackmatter - -\LastPage - -\stopbackmatter - -\stopproduct diff --git a/Master/texmf-dist/tex/context/interface/third/t-correspondence.xml b/Master/texmf-dist/tex/context/interface/third/t-correspondence.xml new file mode 100644 index 00000000000..f018524742e --- /dev/null +++ b/Master/texmf-dist/tex/context/interface/third/t-correspondence.xml @@ -0,0 +1,423 @@ +<?xml version="1.0" encoding="UTF-8"?> + +<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="en" version="2011.11.07"> + +<cd:define name="letterlayer"> + <cd:constant type="head"/> + <cd:constant type="nexthead"/> + <cd:constant type="lefthead"/> + <cd:constant type="righthead"/> + <cd:constant type="foot"/> + <cd:constant type="nextfoot"/> + <cd:constant type="leftfoot"/> + <cd:constant type="rightfoot"/> + <cd:constant type="address"/> + <cd:constant type="backaddress"/> + <cd:constant type="reference"/> + <cd:constant type="location"/> + <cd:constant type="topmark"/> + <cd:constant type="botmark"/> + <cd:constant type="cutmark"/> + <cd:constant type="endmark"/> + <cd:constant type="usermark"/> + <cd:constant type="lettermain"/> + <cd:constant type="letternext"/> +</cd:define> + +<cd:define name="lettersection"> + <cd:constant type="head"/> + <cd:constant type="date"/> + <cd:constant type="reference"/> + <cd:constant type="specialnotation"/> + <cd:constant type="address"/> + <cd:constant type="title"/> + <cd:constant type="subject"/> + <cd:constant type="opening"/> + <cd:constant type="content"/> + <cd:constant type="closing"/> + <cd:constant type="appendices"/> +</cd:define> + +<cd:define name="letterdescription"> + <cd:constant type="copy"/> + <cd:constant type="enclosure"/> + <cd:constant type="postscript"/> +</cd:define> + +<cd:command name="defineletterelement" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="defineletterelement"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1"> + <cd:constant type="layer"/> + <cd:constant type="section"/> + </cd:keywords> + <cd:keywords n="2"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:keywords n="3"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:content n="4"/> + </cd:arguments> +</cd:command> + +<cd:command name="letterelement" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="letterelement"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1"> + <cd:constant type="layer"/> + <cd:constant type="section"/> + </cd:keywords> + <cd:keywords n="2"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:keywords n="3"> + <cd:constant type="cd:name"/> + </cd:keywords> + </cd:arguments> +</cd:command> + +<cd:command name="setupletter" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletter"/> + </cd:sequence> + <cd:arguments> + <cd:assignments n="1" list="yes"> + <cd:parameter name="KEY"> + <cd:constant type="VALUE"/> + </cd:parameter> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="setupletterdescription" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletterdescription"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:assignments n="2" list="yes"> + <cd:parameter name="spacebefore"> + <cd:inherit name="blank" n="1"/> + </cd:parameter> + <cd:parameter name="spaceafter"> + <cd:inherit name="blank" n="1"/> + </cd:parameter> + <cd:parameter name="spaceinbetween"> + <cd:inherit name="blank" n="1"/> + </cd:parameter> + <cd:parameter name="before"> + <cd:constant type="cd:command"/> + </cd:parameter> + <cd:parameter name="after"> + <cd:constant type="cd:command"/> + </cd:parameter> + <cd:parameter name="headstyle"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="headcolor"> + <cd:constant type="cd:name"/> + </cd:parameter> + <!-- + <cd:parameter name="textstyle"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="textcolor"> + <cd:constant type="cd:name"/> + </cd:parameter> + --> + <cd:parameter name="width"> + <cd:constant type="fit" default="yes"/> + <cd:constant type="broad"/> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="distance"> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="location"> + <cd:constant type="left" default="yes"/> + <cd:constant type="top"/> + <cd:constant type="text"/> + </cd:parameter> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="setupletterelements" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletterelements"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:keywords n="2" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + </cd:arguments> +</cd:command> + +<cd:command name="setupletterframe" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletterframe"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:assignments n="2" list="yes"> + <cd:inherit name="setupframe" n="2"/> + </cd:assignments> + </cd:arguments> +</cd:interface> + +<cd:command name="setupletterlayer" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletterlayer"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:assignments n="2" list="yes"> + <cd:parameter name="x"> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="y"> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="preset"> + <cd:constant type="lefttop"/> + <cd:constant type="righttop"/> + <cd:constant type="leftbottom"/> + <cd:constant type="rightbottom"/> + <cd:constant type="middle"/> + <cd:constant type="middletop"/> + <cd:constant type="middlebottom"/> + <cd:constant type="middleleft"/> + <cd:constant type="middleright"/> + </cd:parameter> + <cd:parameter name="state"> + <cd:constant type="start"/> + <cd:constant type="stop"/> + <cd:constant type="next"/> + <cd:constant type="repeat"/> + <cd:constant type="left"/> + <cd:constant type="right"/> + <cd:constant type="even"/> + <cd:constant type="odd"/> + </cd:parameter> + <cd:parameter name="style"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="color"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="leftmargin"> + <cd:constant type="standard"/> + <cd:constant type="yes"/> + <cd:constant type="no"/> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="rightmargin"> + <cd:constant type="standard"/> + <cd:constant type="yes"/> + <cd:constant type="no"/> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="symbol"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="distance"> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="alternative"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="list"> + <cd:constant type="cd:text"/> + </cd:parameter> + <cd:parameter name="separator"> + <cd:constant type="cd:text"/> + </cd:parameter> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="setupletterlayout" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletterlayout"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:assignments n="2" list="yes"> + <cd:inherit name="setuplayout" n="2"/> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="setupletteroptions" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletteroptions"/> + </cd:sequence> + <cd:arguments> + <cd:assignments n="1" list="yes"> + <cd:parameter name="bodyfont"> + <cd:inherit name="setupbodyfont"/> + </cd:parameter> + <cd:parameter name="whitespace"> + <cd:inherit name="setupwhitespace"/> + </cd:parameter> + <cd:parameter name="backgroundcolor"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="backgroundimage"> + <cd:constant type="cd:file"/> + </cd:parameter> + <cd:parameter name="background"> + <cd:constant type="cd:command"/> + </cd:parameter> + <cd:parameter name="indenting"> + <cd:inherit name="setupindenting"/> + </cd:parameter> + <cd:parameter name="marking"> + <cd:constant type="yes" default="yes"/> + <cd:constant type="no"/> + </cd:parameter> + <cd:parameter name="position"> + <cd:constant type="yes"/> + <cd:constant type="no" default="yes"/> + </cd:parameter> + <cd:parameter name="option"> + <cd:constant type="test"/> + </cd:parameter> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="setuplettersection" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setuplettersection"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:assignments n="2" list="yes"> + <cd:parameter name="spacebefore"> + <cd:inherit name="blank" n="1"/> + </cd:parameter> + <cd:parameter name="spaceafter"> + <cd:inherit name="blank" n="1"/> + </cd:parameter> + <cd:parameter name="spaceinbetween"> + <cd:inherit name="blank" n="1"/> + </cd:parameter> + <cd:parameter name="style"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="color"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="leftmargin"> + <cd:constant type="standard"/> + <cd:constant type="yes"/> + <cd:constant type="no"/> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="rightmargin"> + <cd:constant type="standard"/> + <cd:constant type="yes"/> + <cd:constant type="no"/> + <cd:constant type="cd:dimension"/> + </cd:parameter> + <cd:parameter name="before"> + <cd:constant type="cd:command"/> + </cd:parameter> + <cd:parameter name="after"> + <cd:constant type="cd:command"/> + </cd:parameter> + <cd:parameter name="align"> + <cd:inherit name="setupalign" n="1"/> + </cd:parameter> + <cd:parameter name="indenting"> + <cd:inherit name="setupindenting" n="1"/> + </cd:parameter> + <cd:parameter name="alternative"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="separator"> + <cd:constant type="cd:text"/> + </cd:parameter> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="setupletterstyle" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="setupletterstyle"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:name"/> + </cd:keywords> + <cd:assignments n="2" list="yes"> + <cd:parameter name="style"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="color"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="titlestyle"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="titlecolor"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="textstyle"> + <cd:resolve name="style"/> + </cd:parameter> + <cd:parameter name="textcolor"> + <cd:constant type="cd:name"/> + </cd:parameter> + <cd:parameter name="separator"> + <cd:constant type="cd:text"/> + </cd:parameter> + <cd:parameter name="width"> + <cd:constant type="cd:dimension"/> + </cd:parameter> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="letter" type="environment" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="letter"/> + </cd:sequence> + <cd:arguments> + <cd:assignments n="1" list="yes" optional="yes"> + <cd:inherit name="setupletter" n="1"/> + </cd:assignments> + </cd:arguments> +</cd:command> + +<cd:command name="useletterstyle" file="s-cor-01.mkvi"> + <cd:sequence> + <cd:string value="useletterstyle"/> + </cd:sequence> + <cd:arguments> + <cd:keywords n="1" list="yes"> + <cd:constant type="cd:file"/> + </cd:keywords> + </cd:arguments> +</cd:command> + +</cd:interface>
\ No newline at end of file diff --git a/Master/texmf-dist/tex/context/interface/third/t-letter.xml b/Master/texmf-dist/tex/context/interface/third/t-letter.xml deleted file mode 100644 index 5b5650e2487..00000000000 --- a/Master/texmf-dist/tex/context/interface/third/t-letter.xml +++ /dev/null @@ -1,397 +0,0 @@ -<?xml version="1.0" standalone="yes"?> - -<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="en" version="2006.08.02"> - -<cd:define name="lettersection"> - <cd:constant type="letterhead"/> - <cd:constant type="dateline"/> - <cd:constant type="referenceline"/> - <cd:constant type="specialnotation"/> - <cd:constant type="insideaddress"/> - <cd:constant type="title"/> - <cd:constant type="subject"/> - <cd:constant type="opening"/> - <cd:constant type="content"/> - <cd:constant type="closing"/> - <cd:constant type="appendices"/> -</cd:define> - -<cd:define name="letterlayer"> - <cd:constant type="head"/> - <cd:constant type="foot"/> - <cd:constant type="nexthead"/> - <cd:constant type="nextfoot"/> - <cd:constant type="lefthead"/> - <cd:constant type="leftfoot"/> - <cd:constant type="righthead"/> - <cd:constant type="rightfoot"/> - <cd:constant type="address"/> - <cd:constant type="backaddress"/> - <cd:constant type="reference"/> - <cd:constant type="location"/> - <cd:constant type="topmark"/> - <cd:constant type="botmark"/> - <cd:constant type="cutmark"/> - <cd:constant type="endmark"/> - <cd:constant type="usermark"/> - <cd:constant type="letternext"/> - <cd:constant type="lettermain"/> -</cd:define> - -<cd:define name="letterdescription"> - <cd:constant type="postscript"/> - <cd:constant type="copy"/> - <cd:constant type="enclosure"/> -</cd:define> - -<cd:command name="setupletterstyle:layout" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="firstpage"/> - <cd:constant type="secondpage"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setuplayout"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletterstyle:option" file="t-letter.tex"> - <cd:sequence > - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords optional="yes"> - <cd:constant type="option"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:parameter name="marking"> - <cd:constant type="yes" default="yes"/> - <cd:constant type="no"/> - </cd:parameter> - <cd:parameter name="indenting"> - <cd:inherit name="setupindenting"/> - </cd:parameter> - <cd:parameter name="whitespace"> - <cd:inherit name="setupwhitespace"/> - </cd:parameter> - <cd:parameter name="backgroundcolor"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="backgroundimage"> - <cd:constant type="cd:file"/> - </cd:parameter> - <cd:parameter name="header"> - <cd:constant type="reset"/> - </cd:parameter> - <cd:parameter name="footer"> - <cd:constant type="reset"/> - </cd:parameter> - <cd:parameter name="before"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="after"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="pagenumber"> - <cd:constant type="cd:number"/> - </cd:parameter> - <cd:parameter name="bodyfont"> - <cd:constant type="5pt"/> - <cd:constant type="..."/> - <cd:constant type="12pt"/> - <cd:constant type="small"/> - <cd:constant type="big"/> - </cd:parameter> - <cd:parameter name="alternative"> - <cd:constant type="singlesided" default="yes"/> - <cd:constant type="doublesided"/> - </cd:parameter> - <cd:parameter name="state"> - <cd:constant type="start" default="yes"/> - <cd:constant type="stop"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setuplettersection" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:resolve name="lettersection"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:parameter name="before"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="after"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="align"> - <cd:resolve name="align"/> - </cd:parameter> - <cd:parameter name="style"> - <cd:resolve name="style"/> - </cd:parameter> - <cd:parameter name="color"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="leftmargin"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="rightmargin"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="alternative"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="separator"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="command"> - <cd:constant type="cd:oneargument"/> - </cd:parameter> - <cd:parameter name="optimize"> - <cd:constant type="yes"/> - <cd:constant type="no" default="yes"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletterlayer:layer" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:resolve name="letterlayer"/> - </cd:keywords> - <cd:keywords optional="yes"> - <cd:constant type="layer"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setuplayer"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletterlayer:frame" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:resolve name="letterlayer"/> - </cd:keywords> - <cd:keywords optional="yes"> - <cd:constant type="frame"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setupframed"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletterlayer:option" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:resolve name="letterlayer"/> - </cd:keywords> - <cd:keywords optional="yes"> - <cd:constant type="option"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:parameter name="state"> - <cd:constant type="start" default="yes"/> - <cd:constant type="stop"/> - <cd:constant type="first"/> - <cd:constant type="next"/> - <cd:constant type="left"/> - <cd:constant type="right"/> - <cd:constant type="leftpage"/> - <cd:constant type="rightpage"/> - <cd:constant type="page"/> - <cd:constant type="subpage" default="yes"/> - </cd:parameter> - <cd:parameter name="symbol"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="style"> - <cd:resolve name="style"/> - </cd:parameter> - <cd:parameter name="color"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="alternative"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="separator"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="leftmargin"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="rightmargin"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="spacebefore"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="spaceafter"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletterdescription" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:resolve name="letterdescription"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:parameter name="location"> - <cd:constant type="left" default="yes"/> - <cd:constant type="right"/> - <cd:constant type="top"/> - <cd:constant type="text"/> - </cd:parameter> - <cd:parameter name="width"> - <cd:constant type="fit"/> - <cd:constant type="broad" default="yes"/> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="distance"> - <cd:constant type="cd:dimension"/> - </cd:parameter> - <cd:parameter name="before"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="after"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="inbetween"> - <cd:constant type="cd:command"/> - </cd:parameter> - <cd:parameter name="headstyle"> - <cd:resolve name="style"/> - </cd:parameter> - <cd:parameter name="headcolor"> - <cd:constant type="cd:name"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletter:value" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletter"/> - </cd:sequence> - <cd:arguments> - <cd:assignments n="1" list="yes"> - <cd:parameter name="cd:name"> - <cd:constant type="cd:text"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupletter:setup" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setupletter"/> - </cd:sequence> - <cd:arguments> - <cd:keywords n="1" list="yes"> - <cd:constant type="cd:name"/> - </cd:keywords> - <cd:assignments n="2" list="yes"> - <cd:parameter name="titlestyle"> - <cd:resolve name="style"/> - </cd:parameter> - <cd:parameter name="titlecolor"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="textstyle"> - <cd:resolve name="style"/> - </cd:parameter> - <cd:parameter name="textcolor"> - <cd:constant type="cd:name"/> - </cd:parameter> - <cd:parameter name="separator"> - <cd:constant type="cd:text"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setlettervalue" file="t-letter.tex"> - <cd:sequence> - <cd:string value="setlettervalue"/> - </cd:sequence> - <cd:arguments> - <cd:content n="1" type="cd:name"/> - <cd:keywords n="2" optional="yes"> - <cd:constant type="cd:text"/> - </cd:keywords> - <cd:content n="3"/> - </cd:arguments> -</cd:command> - -<cd:command name="useletterinterface" file="t-letter.tex"> - <cd:sequence> - <cd:string value="useletterinterface"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="cd:name"/> - </cd:keywords> - </cd:arguments> -</cd:command> - -<cd:command name="useletterstyle" file="t-letter.tex"> - <cd:sequence> - <cd:string value="useletterstyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="cd:name"/> - </cd:keywords> - </cd:arguments> -</cd:command> - -<cd:command name="useletterextension" file="t-letter.tex"> - <cd:sequence> - <cd:string value="useletterextension"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="cd:name"/> - </cd:keywords> - </cd:arguments> -</cd:command> - -<cd:command name="letter" type="environment" file="default.nli"> - <cd:sequence> - <cd:string value="letter"/> - </cd:sequence> - <cd:arguments> - <cd:assignments optional="yes" list="yes"> - <cd:inherit name="setupletter"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -</cd:interface> diff --git a/Master/texmf-dist/tex/context/interface/third/t-resume.xml b/Master/texmf-dist/tex/context/interface/third/t-resume.xml deleted file mode 100644 index a673151dad8..00000000000 --- a/Master/texmf-dist/tex/context/interface/third/t-resume.xml +++ /dev/null @@ -1,206 +0,0 @@ -<?xml version="1.0" standalone="yes"?> - -<cd:interface xmlns:cd="http://www.pragma-ade.com/commands" name="context" language="en" version="2006.08.02"> - -<cd:command name="setupresumestyle:1" file="t-resume.tex"> - <cd:sequence> - <cd:string value="setupresumestyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="firstpage"/> - <cd:constant type="secondpage"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setuplayout"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupresumestyle:2" file="t-resume.tex"> - <cd:sequence> - <cd:string value="setupresumestyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="header"/> - <cd:constant type="footer"/> - </cd:keywords> - <cd:keywords optional="yes" list="yes"> - <cd:constant type="text"/> - <cd:constant type="margin"/> - <cd:constant type="edge"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:parameter name="lefttext"> - <cd:constant type="cd:text"/> - </cd:parameter> - <cd:parameter name="middletext"> - <cd:constant type="cd:text"/> - </cd:parameter> - <cd:parameter name="righttext"> - <cd:constant type="cd:text"/> - </cd:parameter> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupresumestyle:3" file="t-resume.tex"> - <cd:sequence> - <cd:string value="setupresumestyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="head"/> - <cd:constant type="foot"/> - </cd:keywords> - <cd:keywords optional="yes"> - <cd:constant type="layer"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setuplayer"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupresumestyle:4" file="t-resume.tex"> - <cd:sequence> - <cd:string value="setupresumestyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="head"/> - <cd:constant type="foot"/> - </cd:keywords> - <cd:keywords optional="yes"> - <cd:constant type="frame"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setupframed"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="setupresumestyle:5" file="t-resume.tex"> - <cd:sequence> - <cd:string value="setupresumestyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="cd:name"/> - </cd:keywords> - <cd:assignments list="yes"> - <cd:inherit name="setupdescriptions"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="useresumestyle" file="t-resume.tex"> - <cd:sequence> - <cd:string value="useresumestyle"/> - </cd:sequence> - <cd:arguments> - <cd:keywords list="yes"> - <cd:constant type="cd:name"/> - </cd:keywords> - </cd:arguments> -</cd:command> - -<cd:command name="useresumecolor" file="t-resume.tex"> - <cd:sequence> - <cd:string value="useresumecolor"/> - </cd:sequence> - <cd:arguments> - <cd:keywords> - <cd:constant type="cd:name"/> - </cd:keywords> - </cd:arguments> -</cd:command> - -<cd:command name="resume" type="environment" file="t-resume.tex"> - <cd:sequence> - <cd:string value="resume"/> - </cd:sequence> - <cd:arguments> - <cd:assignments optional="yes" list="yes"> - <cd:inherit name="setupresume"/> - </cd:assignments> - </cd:arguments> -</cd:command> - -<cd:command name="cvline" file="modern.nrs"> - <cd:sequence> - <cd:string value="cvline"/> - </cd:sequence> - <cd:arguments> - <cd:keywords n="1" optional="yes"> - <cd:constant type="cd:dimension"/> - </cd:keywords> - <cd:content n="2"/> - <cd:content n="3"/> - </cd:arguments> -</cd:command> - -<cd:command name="cvlistitem" file="modern.nrs"> - <cd:sequence> - <cd:string value="cvlistitem"/> - </cd:sequence> - <cd:arguments> - <cd:keywords n="1" optional="yes"> - <cd:constant type="cd:text"/> - </cd:keywords> - <cd:content n="2"/> - </cd:arguments> -</cd:command> - -<cd:command name="cvlistdoubleitem" file="modern.nrs"> - <cd:sequence> - <cd:string value="cvlistdoubleitem"/> - </cd:sequence> - <cd:arguments> - <cd:keywords n="1" optional="yes"> - <cd:constant type="cd:text"/> - </cd:keywords> - <cd:content n="2"/> - <cd:content n="3"/> - </cd:arguments> -</cd:command> - -<cd:command name="cventry" file="modern.nrs"> - <cd:sequence> - <cd:string value="cventry"/> - </cd:sequence> - <cd:arguments> - <cd:content n="1"/> - <cd:content n="2"/> - <cd:content n="3"/> - <cd:content n="4"/> - <cd:content n="5"/> - <cd:content n="6"/> - </cd:arguments> -</cd:command> - -<cd:command name="cvlanguage" file="modern.nrs"> - <cd:sequence> - <cd:string value="cvlanguage"/> - </cd:sequence> - <cd:arguments> - <cd:content n="1"/> - <cd:content n="2"/> - <cd:content n="3"/> - </cd:arguments> -</cd:command> - -<cd:command name="cvcomputer" file="modern.nrs"> - <cd:sequence> - <cd:string value="cvcomputer"/> - </cd:sequence> - <cd:arguments> - <cd:content n="1"/> - <cd:content n="2"/> - <cd:content n="3"/> - <cd:content n="4"/> - </cd:arguments> -</cd:command> - -</cd:interface> diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.lua b/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.lua new file mode 100644 index 00000000000..d46887a2242 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.lua @@ -0,0 +1,284 @@ +if not modules then modules = { } end modules ['s-mod-00'] = { + version = 1.000, + comment = "companion to mult-aux.mkiv", + author = "Wolfgang Schuster", + copyright = "Wolfgang Schuster", + license = "GNU General Public License" +} + +thirddata = thirddata or { } +thirddata.correspondence = thirddata.correspondence or { } + +local concat, toks, settings_to_array, settings_to_hash = table.concat, tex.toks, utilities.parsers.settings_to_array, utilities.parsers.settings_to_hash + +local correspondence = thirddata.correspondence +local constants = interfaces.constants +local variables = interfaces.variables + +local c_titlestyle = constants.titlestyle +local c_titlecolor = constants.titlecolor +local c_textcolor = constants.textcolor +local c_textstyle = constants.textstyle +local c_separator = constants.separator + +local v_correspondence = variables.correspondence +local v_letter = variables.letter +local v_memo = variables.memo +local v_stop = variables.stop +local v_layer = variables.layer +local v_section = variables.section +local v_color = variables.color +local v_singlesided = variables.singlesided +local v_reset = variables.reset +local v_line = variables.line +local v_top = variables.top +local v_bottom = variables.bottom +local v_off = variables.off +local v_right = variables.right +local v_page = variables.page +local v_paper = variables.paper +local v_text = variables.text +local v_start = variables.start + +-- list for the elements to be shown + +correspondence.data = { } + +function correspondence.elements_define(environment,name,list) + local index = concat({environment,name},":") + local list = settings_to_array(list) + correspondence.data[index] = list +end + +function correspondence.elements_access(environment,name) + local index = concat({environment,name},":") + local list = correspondence.data[index] + local entries = "" + if list and list ~= "" then + entries = concat(list,",") + end + context(entries) +end + +-- create synonyms for the default styles + +local patterns = { + [v_letter] = { "letter-imp-%s.mkiv", "letter-imp-%s.tex", "letter-%s.mkiv", "letter-%s.tex" }, + [v_memo] = { "memo-imp-%s.mkiv", "memo-imp-%s.tex", "memo-%s.mkiv", "memo-%s.tex" }, +} + +local function action(name,foundname) + context.startreadingfile() + context.pushendofline() + context.unprotect() + context.input(foundname) + context.protect() + context.popendofline() + context.stopreadingfile() +end + +function correspondence.file(environment,name) + local environment = environment + local name = name + commands.uselibrary { + name = name, + patterns = patterns[environment], + action = action, + } +end + +correspondence.styles = { } + +function correspondence.style(environment,value,width) + local width = width + local style = concat({environment,value},":") + correspondence.styles[style] = { width = width } +end + +-- moved from TeX to Lua because it’s easier with the lists for the sections and layers + +function correspondence.place(environment,settings) + local bodyfont = settings.bodyfont + local whitespace = settings.whitespace + local backgroundcolor = settings.backgroundcolor + context.unprotect() + context(toks.everybeforecorrespondence) + context.page() + -- page layout is controlled with the \setup…layout commands + context.setuplayout{ method = v_correspondence } + -- disable headers and footers + context.setupheader{ state = v_stop } + context.setupfooter{ state = v_stop } + -- required for the manual, manual changes for the elements can be done with the “style” key + if bodyfont ~= "" then + context.setupbodyfont{bodyfont} + end + -- can be moved to the section elements because it’s only usefull for the content + if whitespace ~= "" then + context.setupwhitespace{whitespace} + end + -- colored background is behind all other layers + if backgroundcolor ~= "" then + context.setupbackgrounds({ v_paper },{ background = v_color, backgroundcolor = backgroundcolor }) + end + -- layers + local layer = { } + for index, element in next, correspondence.data[concat({environment,v_layer},":")] or { } do + layer[index] = concat({environment,element},":") + end + local overlays = { + "correspondence:backgroundimage", + "correspondence:background", + concat(layer,","), + } + context.setupbackgrounds({ v_page },{ background = concat(overlays,",") }) + -- letters are always singlesided because the layout controlled by the module + context.setuppagenumbering{ alternative = v_singlesided, location = "" } + context.setupsubpagenumber{ way = v_text, state = v_start } + -- sections + for _, element in next, correspondence.data[concat({environment,v_section},":")] or { } do + context.correspondence_section_place({environment},{element}) + end + context.page() + context.resetsubpagenumber() + -- make sure the normal layout is restored + context.setuplayout{v_reset} + context(toks.everyaftercorrespondence) + context.protect() +end + +correspondence.letter = { } + +local function reference_a(environment,value) + local environment = environment + local value = value + local style = nil + context.vbox( function() + style = concat({environment,value},":") + context.setevalue("currentcorrespondencestyle",style) + context.framed( { frame = v_off, location = v_bottom, align = v_right, offset = "0pt" }, function() + context.usecorrespondencestylestyleandcolor(c_titlestyle,c_titlecolor) + context.setupinterlinespace() + context.lettertext(value) + context.par() + end ) + context.framed( { frame = v_off, location = v_top, align = v_right, offset = "0pt" }, function() + context.usecorrespondencestylestyleandcolor(c_textstyle,c_textcolor) + context.setupinterlinespace() + context.correspondenceparameter(value) + context.par() + end ) + end ) +end + +function correspondence.letter.reference_a(environment,list) + local environment = environment + local list = settings_to_array(list) + local style = nil + if #list == 1 then + local value = list[1] + context.rightaligned( function() reference_a(environment,value) end ) + else + context.maxaligned( function() + for index, value in next, list do + if value == "" or value == v_line then + -- ignore empty entries and the “line” keyword + else + if index ~= 1 then context.hfill() end + reference_a(environment,value) + end + end + end ) + end +end + +function correspondence.letter.reference_b(environment,list) + local environment = environment + local list = settings_to_array(list) + local style = nil + context.vtop( function() + for _, value in next, list do + if value == "" then + -- ignore empty entries in the list + elseif value == v_line then + context.blank{v_line} + else + context.hbox( function() + style = concat({environment,value},":") + context.setevalue("currentcorrespondencestyle",style) + context.begingroup() + context.usecorrespondencestylestyleandcolor(c_titlestyle,c_titlecolor) + context.lettertext(value) + context.correspondencestyleparameter(c_separator) + context.endgroup() + context.begingroup() + context.usecorrespondencestylestyleandcolor(c_textstyle,c_textcolor) + context.correspondenceparameter(value) + context.endgroup() + end ) + end + end + end ) +end + +function correspondence.letter.reference_c(environment,list) + local environment = environment + local list = settings_to_array(list) + local style = nil + for _, value in next, list do + if value == "" or value == v_line then + -- ignore empty entries and the “line” keyword + else + style = concat({environment,value},":") + context.setvalue("currentcorrespondencestyle",style) + context.usecorrespondencestylestyleandcolor(c_textstyle,c_textcolor) + context.correspondenceparameter(value) + end + end +end + +function correspondence.letter.reference_d(environment,list) + local environment = environment + local list = settings_to_array(list) + local style = nil + context.vtop( function() + context.starttabulate( { "|l|l|" }, { before = "", after = "" } ) + for _, value in next, list do + if value == "" then + -- ignore empty entries in the list + elseif value == v_line then + context.TB() + else + style = concat({environment,value},":") + context.NC() + context.setvalue("currentcorrespondencestyle",style) + context.usecorrespondencestylestyleandcolor(c_titlestyle,c_titlecolor) + context.lettertext(value) + context.EQ() + context.setvalue("currentcorrespondencestyle",style) + context.usecorrespondencestylestyleandcolor(c_textstyle,c_textcolor) + context.correspondenceparameter(value) + context.NC() + context.NR() + end + end + context.stoptabulate() + end ) +end + +function correspondence.letter.reference_e(environment,list) + local environment = environment + local list = settings_to_array(list) + local style, settings = nil + context.leftaligned( function() + for _, value in next, list do + if value == "" or value == v_line then + -- ignore empty entries and the “line” keyword + else + context.unprotect() + context.correspondence_style_width( environment, value, function() reference_a(environment,value) end ) + context.protect() + end + end + end ) +end
\ No newline at end of file diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.mkii b/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.mkii new file mode 100644 index 00000000000..7f338a9fc5d --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.mkii @@ -0,0 +1,581 @@ +%D \module +%D [ file=s-cor-00, +%D version=2011.12.06, +%D title=\CONTEXT\ User Module, +%D subtitle=Correspondence, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +% Constants and variables + +\startinterface all + \setinterfaceconstant {whitespace} {whitespace} + \setinterfaceconstant {backgroundimage} {backgroundimage} + \setinterfaceconstant {fromname} {fromname} + \setinterfaceconstant {fromaddress} {fromaddress} + \setinterfaceconstant {attention} {attention} + \setinterfaceconstant {subject} {subject} + \setinterfaceconstant {closing} {closing} + \setinterfaceconstant {signature} {signature} + \setinterfaceconstant {copy} {copy} + \setinterfaceconstant {enclosure} {enclosure} + \setinterfaceconstant {postscript} {postscript} + \setinterfaceconstant {dispatch} {dispatch} + \setinterfaceconstant {toname} {toname} + \setinterfaceconstant {toaddress} {toaddress} + \setinterfaceconstant {backaddress} {backaddress} + \setinterfaceconstant {opening} {opening} + \setinterfaceconstant {fromphone} {fromphone} + \setinterfaceconstant {fromfax} {fromfax} + \setinterfaceconstant {frommail} {frommail} + \setinterfaceconstant {fromurl} {fromurl} +\stopinterface + +\startinterface all + \setinterfacevariable {correspondence} {correspondence} + \setinterfacevariable {letter} {letter} + \setinterfacevariable {memo} {memo} + \setinterfacevariable {firsthead} {firsthead} + \setinterfacevariable {nexthead} {nexthead} + \setinterfacevariable {lefthead} {lefthead} + \setinterfacevariable {righthead} {righthead} + \setinterfacevariable {foot} {foot} + \setinterfacevariable {nextfoot} {nextfoot} + \setinterfacevariable {leftfoot} {leftfoot} + \setinterfacevariable {rightfoot} {rightfoot} + \setinterfacevariable {address} {address} + \setinterfacevariable {backaddress} {backaddress} + \setinterfacevariable {location} {location} + \setinterfacevariable {topmark} {topmark} + \setinterfacevariable {botmark} {botmark} + \setinterfacevariable {cutmark} {cutmark} + \setinterfacevariable {endmark} {endmark} + \setinterfacevariable {usermark} {usermark} + \setinterfacevariable {lettermain} {lettermain} + \setinterfacevariable {letternext} {letternext} + \setinterfacevariable {opening} {opening} + \setinterfacevariable {closing} {closing} + \setinterfacevariable {secondpage} {secondpage} + \setinterfacevariable {copy} {copy} + \setinterfacevariable {enclosure} {enclosure} + \setinterfacevariable {french} {french} + \setinterfacevariable {specialnotation} {specialnotation} + \setinterfacevariable {memomain} {memomain} + \setinterfacevariable {memonext} {memonext} + \setinterfacevariable {e} {e} + \setinterfacevariable {attention} {attention} + \setinterfacevariable {room} {room} + \setinterfacevariable {yourref} {yourref} + \setinterfacevariable {yourmail} {yourmail} + \setinterfacevariable {myref} {myref} + \setinterfacevariable {mymail} {mymail} + \setinterfacevariable {customer} {customer} + \setinterfacevariable {invoice} {invoice} + \setinterfacevariable {to} {to} + \setinterfacevariable {toname} {toname} + \setinterfacevariable {from} {from} + \setinterfacevariable {fromname} {fromname} + \setinterfacevariable {phone} {phone} + \setinterfacevariable {fax} {fax} + \setinterfacevariable {email} {email} + \setinterfacevariable {bank} {bank} + \setinterfacevariable {organization} {organization} + \setinterfacevariable {city} {city} + \setinterfacevariable {zip} {zip} + \setinterfacevariable {country} {country} + \setinterfacevariable {street} {street} + \setinterfacevariable {place} {place} + \setinterfacevariable {gbrief} {gbrief} + \setinterfacevariable {fullblock} {fullblock} + \setinterfacevariable {semiblock} {semiblock} + \setinterfacevariable {simplified} {simplified} + \setinterfacevariable {modified} {modified} +\stopinterface + +% Messages + +\definemessageconstant {correspondence} + +\startinterface all + \setinterfacemessage{correspondence}{1}{Undefined layer '--' for the '--' environment} + \setinterfacemessage{correspondence}{2}{Undefined section '--' for the '--' environment} + \setinterfacemessage{correspondence}{3}{Undefined description '--' for the '--' environment} +\stopinterface + +% Environment + +\unexpanded\def\startcorrespondence[#1]% + {\starttext + \begingroup + \def\currentcorrespondence{#1}% + \dosingleempty\dostartcorrespondence} + +\def\dostartcorrespondence[#1]% + {\iffirstargument + \setupcurrentcorrespondence[#1]% + \fi + \dostartbuffer[\currentcorrespondence][\e!start\currentcorrespondence][\e!stop\currentcorrespondence]} + +\unexpanded\def\stopcorrespondence[#1]% + {\placecorrespondence[#1]% + \endgroup + \stoptext} + +\newtoks\everydefinecorrespondence + +\appendtoks + \normalprotected\expandafter\edef\csname\e!start\currentcorrespondence\endcsname{\startcorrespondence[\currentcorrespondence]}% + \normalprotected\expandafter\edef\csname\e!stop \currentcorrespondence\endcsname{\stopcorrespondence [\currentcorrespondence]}% +\to \everydefinecorrespondence + +\unexpanded\def\correspondenceparameters#1#2#3% + {\def\currentcorrespondenceelement {#1:#2}% + \def\currentcorrespondencecontent {#1:#3:#2}% + \let\currentcorrespondencelayer \currentcorrespondenceelement + \let\currentcorrespondenceframe \currentcorrespondenceelement + \let\currentcorrespondencesection \currentcorrespondenceelement + \let\currentcorrespondencedescription\currentcorrespondenceelement} + +\unexpanded\def\definecorrespondence[#1]% + {\def\currentcorrespondence{#1}% + \the\everydefinecorrespondence} + +% Setup + + +\def\????correspondence{@@@@correspondence} + +\def\correspondenceparameter + {\namedcorrespondenceparameter\currentcorrespondence} + +\def\namedcorrespondenceparameter#1#2% + {\csname\ifcsname\????correspondence#1#2\endcsname\????correspondence#1#2\else\s!empty\fi\endcsname} + +\unexpanded\def\setupcorrespondence[#1][#2]% + {\def\currentcorrespondence{#1}% + \setupcurrentcorrespondence[#2]} + +\unexpanded\def\setupcurrentcorrespondence + {\getparameters[\????correspondence\currentcorrespondence]} + +\appendtoks + \normalprotected\expandafter\edef\csname\e!setup\currentcorrespondence\e!endsetup\endcsname{\noexpand\dodoubleargument\setupcorrespondence[\currentcorrespondence]}% +\to \everydefinecorrespondence + +% Placement + +\newtoks\everybeforecorrespondence +\newtoks\everyaftercorrespondence + +\unexpanded\def\placecorrespondence[#1]% + {\begingroup + \edef\currentcorrespondence{#1}% + \let \currentcorrespondenceoption\currentcorrespondence + \the\everybeforecorrespondence + \page + \setupheader[\c!state=\v!stop]% + \setupfooter[\c!state=\v!stop]% + \doifsomething{\correspondenceoptionparameter\c!bodyfont }{\setupbodyfont [\correspondenceoptionparameter\c!bodyfont ]}% + \doifsomething{\correspondenceoptionparameter\c!whitespace}{\setupwhitespace[\correspondenceoptionparameter\c!whitespace]}% + % backgroundcolor is applied to the paper background + \doifsomething{\correspondenceoptionparameter\c!backgroundcolor}% + {\setupbackgrounds[\v!paper][\c!background=\v!color,\c!backgroundcolor=\correspondenceoptionparameter\c!backgroundcolor]} + % layers + \let\ascii\empty + \def\addcorrespondencelayertolist##1{\addtocommalist{\currentcorrespondence:##1}\ascii} + \processcommacommand[\accesscorrespondenceelements\currentcorrespondence\v!layer,correspondence:backgroundimage,correspondence:background]\addcorrespondencelayertolist + \expanded{\setupbackgrounds[\v!page][\c!background={\ascii}]}% + % layout + \setuppagenumbering[\c!alternative=\v!singlesided,\c!location=]% + \setupsubpagenumber[\c!way=\v!by\v!text,\c!state=\v!start]% + % sections + \expanded{\processcommalistwithparameters[\accesscorrespondenceelements\currentcorrespondence\v!section]}{\placecorrespondencesection[\currentcorrespondence]}% + \page + \resetsubpagenumber + \setuplayout[\v!reset]% + \the\everyaftercorrespondence + \endgroup} + +\appendtoks + \normalprotected\expandafter\edef\csname\e!place\currentcorrespondence\endcsname{\placecorrespondence[\currentcorrespondence]}% +\to \everydefinecorrespondence + +% Layers + +\def\????correspondencelayer{@@@@correspondencelayer} +\def\????correspondenceframe{@@@@correspondenceframe} + +\def\correspondencelayerparameter + {\namedcorrespondencelayerparameter\currentcorrespondencelayer} + +\def\namedcorrespondencelayerparameter#1#2% + {\csname\ifcsname\????correspondencelayer#1#2\endcsname\????correspondencelayer#1#2\else\s!empty\fi\endcsname} + +\def\correspondenceframeparameter + {\namedcorrespondenceframeparameter\currentcorrespondenceframe} + +\def\namedcorrespondenceframeparameter#1#2% + {\csname\ifcsname\????correspondenceframe#1#2\endcsname\????correspondenceframe#1#2\else\s!empty\fi\endcsname} + +\unexpanded\def\setupcorrespondencelayer[#1][#2][#3]% + {\def\dosetupcorrespondencelayer##1% + {\edef\currentcorrespondencelayer{#1:##1}% + \setupcurrentcorrespondencelayer[#3]% + \the\everysetupcorrespondencelayer}% + \processcommalist[#2]\dosetupcorrespondencelayer} + +\unexpanded\def\setupcurrentcorrespondencelayer + {\getparameters[\????correspondencelayer\currentcorrespondencelayer]} + +\unexpanded\def\setupcorrespondenceframe[#1][#2][#3]% + {\def\dosetupcorrespondenceframe##1% + {\edef\currentcorrespondenceframe{#1:##1}% + \setupcurrentcorrespondenceframe[#3]}% + \processcommalist[#2]\dosetupcorrespondenceframe} + +\unexpanded\def\setupcurrentcorrespondenceframe + {\getparameters[\????correspondenceframe\currentcorrespondenceframe]} + +\unexpanded\def\definecorrespondencelayer[#1][#2]% + {\def\currentcorrespondencelayer{#1:#2}% + \let\currentcorrespondenceframe\currentcorrespondencelayer + \presetlocalframed[\????correspondenceframe\currentcorrespondenceframe]% + \setupcurrentcorrespondencelayer[\s!parent=\????correspondencelayer,\c!state=\v!start,\c!alternative=\s!default,\c!distance=\lineheight,\c!separator=\crlf]% + \setupcurrentcorrespondenceframe[\s!parent=\????correspondenceframe,\c!frame=\v!off,\c!offset=\zeropoint,\c!align=\v!right]% + \definelayer [#1:#2][\c!width=\overlaywidth,\c!height=\overlayheight]% + \defineoverlay[#1:#2][{\placecorrespondencelayer[#1][#2]}]} + +\newtoks\everysetupcorrespondencelayer + +\appendtoks + \setuplayer + [\currentcorrespondencelayer] + [ \c!x=\correspondencelayerparameter\c!x, + \c!y=\correspondencelayerparameter\c!y, + \c!preset=\correspondencelayerparameter\c!preset]% +\to \everysetupcorrespondencelayer + +\setvalue{correspondence_layer_state_\v!start }{\!!doneatrue \!!donebfalse \!!donecfalse} +\setvalue{correspondence_layer_state_\v!stop }{\!!doneafalse \!!donebfalse \!!donecfalse} +\setvalue{correspondence_layer_state_\v!next }{\!!doneafalse \!!donebtrue \!!donectrue } +\setvalue{correspondence_layer_state_\v!repeat}{\!!doneatrue \!!donebtrue \!!donectrue } +\setvalue{correspondence_layer_state_\v!left }{\!!doneafalse \!!donebfalse \!!donectrue } +\setvalue{correspondence_layer_state_\v!right }{\!!doneafalse \!!donebtrue \!!donecfalse} +\setvalue{correspondence_layer_state_\v!even }{\!!doneafalse \!!donebfalse \!!donectrue } +\setvalue{correspondence_layer_state_\v!odd }{\!!doneafalse \!!donebtrue \!!donecfalse} + +\unexpanded\def\placecorrespondencelayer[#1][#2]% + {\correspondenceparameters{#1}{#2}\v!layer + \executeifdefined{correspondence_layer_state_\correspondencelayerparameter\c!state}{\getvalue{correspondence_layer_state_\v!stop}} + \ifnum\correspondencepage=\plusone + \if!!donea\doplacecorrespondencelayer\fi + \else\ifodd\correspondencepage + \if!!doneb\doplacecorrespondencelayer\fi + \else + \if!!donec\doplacecorrespondencelayer\fi + \fi\fi + \tightlayer[\currentcorrespondencelayer]} + +\unexpanded\def\doplacecorrespondencelayer + {\setlayer + [\currentcorrespondencelayer] + {\localframed[\????correspondenceframe\currentcorrespondenceframe] + {\doadaptleftskip {\correspondencelayerparameter\c!leftmargin }% + \doadaptrightskip{\correspondencelayerparameter\c!rightmargin}% + \dostartattributes{\????correspondencelayer\currentcorrespondencelayer}\c!style\c!color + \doifsymboldefinedelse{\correspondencelayerparameter\c!symbol}% + {\symbol[\correspondencelayerparameter\c!symbol]} + {\directsetup\currentcorrespondencecontent}% + \dostopattributes}}} + +\unexpanded\def\checkcorrespondencelayer[#1][#2]% + {\def\currentcorrespondencelayer{#1:#2}% + \ifcsname\????correspondencelayer\currentcorrespondencelayer\s!parent\endcsname \else + \showmessage\m!correspondence{2}{#1,#2}% + \fi} + +% Sections + +\def\????correspondencesection{@@@@correspondencesection} + +\def\correspondencesectionparameter + {\namedcorrespondencesectionparameter\currentcorrespondencesection} + +\def\namedcorrespondencesectionparameter#1#2% + {\csname\ifcsname\????correspondencesection#1#2\endcsname\????correspondencesection#1#2\else\s!empty\fi\endcsname} + +\unexpanded\def\definecorrespondencesection[#1][#2]% + {\def\currentcorrespondencesection{#1:#2}% + \setupcurrentcorrespondencesection + [\s!parent=\????correspondencesection, + \c!spacebefore=\v!line, + \c!spaceafter=\v!line, + \c!spaceinbetween={\v!samepage,\v!line}, + \c!alternative=\s!default, + \c!separator=\crlf]} + +\unexpanded\def\setupcorrespondencesection[#1][#2][#3]% + {\def\dosetupcorrespondencesection##1% + {\edef\currentcorrespondencesection{#1:##1}% + \setupcurrentcorrespondencesection[#3]}% + \processcommalist[#2]\dosetupcorrespondencesection} + +\unexpanded\def\setupcurrentcorrespondencesection + {\getparameters[\????correspondencesection\currentcorrespondencesection]} + +\unexpanded\def\placecorrespondencesection[#1][#2]% + {\begingroup + \correspondenceparameters{#1}{#2}\v!section + \ifcsname\????correspondencesection\currentcorrespondencesection\s!parent\endcsname + \doifsomethingelse{\correspondencesectionparameter\c!spacebefore}{\blank[\correspondencesectionparameter\c!spacebefore]}{\endgraf}% + \correspondencesectionparameter\c!before + \doadaptleftskip {\correspondencesectionparameter\c!leftmargin }% + \doadaptrightskip{\correspondencesectionparameter\c!rightmargin}% + \doifsomething{\correspondencesectionparameter\c!align }{\setupalign [\correspondencesectionparameter\c!align ]}% + \doifsomething{\correspondencesectionparameter\c!indenting}{\setupindenting[\correspondencesectionparameter\c!indenting]}% + \dostartattributes{\????correspondencesection\currentcorrespondencesection}\c!style\c!color + \directsetup\currentcorrespondencecontent + \dostopattributes + \correspondencesectionparameter\c!after + \doifsomethingelse{\correspondencesectionparameter\c!spaceafter }{\blank[\correspondencesectionparameter\c!spaceafter ]}{\endgraf}% + \else + \showmessage\m!correspondence{2}{#1,#2}% + \fi + \endgroup} + +% Options + +\def\????correspondenceoption{@@@@correspondenceoption} + +\def\correspondenceoptionparameter + {\namedcorrespondenceoptionparameter\currentcorrespondenceoption} + +\def\namedcorrespondenceoptionparameter#1#2% + {\csname\ifcsname\????correspondenceoption#1#2\endcsname\????correspondenceoption#1#2\else\s!empty\fi\endcsname} + +\unexpanded\def\setupcorrespondenceoption[#1][#2]% + {\edef\currentcorrespondenceoption{#1}% + \setupcurrentcorrespondenceoption[#2]}% + +\unexpanded\def\setupcurrentcorrespondenceoption + {\getparameters[\????correspondenceoption\currentcorrespondenceoption]} + +\defineoverlay + [\v!correspondence:\c!backgroundimage] + [\doifsomething{\correspondenceoptionparameter\c!backgroundimage} + {\overlayfigure{\correspondenceoptionparameter\c!backgroundimage}}] + +\defineoverlay + [\v!correspondence:\c!background] + [\correspondenceoptionparameter\c!background] + +% Descriptions + +\def\????correspondencedescription{@@@@correspondencedescription} + +\def\correspondencedescriptionparameter + {\namedcorrespondencedescriptionparameter\currentcorrespondencedescription} + +\def\namedcorrespondencedescriptionparameter#1#2% + {\csname\ifcsname\????correspondencedescription#1#2\endcsname\????correspondencedescription#1#2\else\s!empty\fi\endcsname} + +\unexpanded\def\definecorrespondencedescription[#1][#2]% + {\edef\currentcorrespondencedescription{#1:#2}% + \setupcurrentcorrespondencedescription + [\s!parent=\????correspondencedescription, + \c!width=\v!fit, + \c!distance=1em]} + +\unexpanded\def\setupcorrespondencedescription[#1][#2][#3]% + {\def\dosetupcorrespondencedescription##1% + {\edef\currentcorrespondencedescription{#1:##1} + \setupcurrentcorrespondencedescription[#3]}% + \processcommalist[#2]\dosetupcorrespondencedescription} + +\unexpanded\def\setupcurrentcorrespondencedescription + {\getparameters[\????correspondencedescription\currentcorrespondencedescription]} + +\unexpanded\def\placecorrespondencedescription[#1][#2]% + {\begingroup + \edef\currentcorrespondencedescription{#1:#2}% + \ifcsname\????correspondencedescription\currentcorrespondencedescription\s!parent\endcsname + \doifsomethingelse{\correspondencedescriptionparameter\c!textcommand}\donetrue\donefalse + \ifdone + \doifsomethingelse{\correspondencedescriptionparameter\c!spacebefore}{\blank[\correspondencedescriptionparameter\c!spacebefore]}{\endgraf}% + \correspondencedescriptionparameter\c!before + \setbox\scratchbox\hbox + {\dostartattributes{\????correspondencedescription\currentcorrespondencedescription}\c!headstyle\c!headcolor + \correspondencedescriptionparameter\c!headcommand + \dostopattributes}% + \assignwidth + {\scratchdimen} + {\correspondencedescriptionparameter\c!width} + {\unhcopy\scratchbox} + {\correspondencedescriptionparameter\c!distance}% + \executeifdefined{correspondence_description_location_\correspondencedescriptionparameter\c!location}{\getvalue{correspondence_description_location_\v!left}}% + \correspondencedescriptionparameter\c!after + \doifsomethingelse{\correspondencedescriptionparameter\c!spaceafter}{\blank[\correspondencedescriptionparameter\c!spaceafter]}{\endgraf}% + \fi + \else + \showmessage\m!correspondence{3}{#1,#2}% + \fi + \endgroup} + +\setvalue{correspondence_description_location_\v!left}% + {\EveryPar{\hangindent\scratchdimen\hangafter\zerocount}% + \setbox\scratchbox\hbox to \scratchdimen{\box\scratchbox\hss}% + \noindent\llap{\box\scratchbox}\correspondencedescriptionparameter\c!textcommand} + +\setvalue{correspondence_description_location_\v!top}% + {\noindent\box\scratchbox + \doisomethingelse{\correspondencedescriptionparameter\c!spaceinbetween} + {\blank[\correspondencedescriptionparameter\c!spaceinbetween]} + {\nobreak\endgraf}% + \correspondencedescriptionparameter\c!textcommand} + +\setvalue{correspondence_description_location_\v!text}% + {\noindent\scratchbox\scratchbox\correspondencedescriptionparameter\c!textcommand} + +% Elements + +\unexpanded\long\def\definecorrespondenceelement[#1][#2][#3][#4]#5% + {\long\setvalue{correspondence_element_#1_#2_#3_#4}{#5}} + +\unexpanded\def\placecorrespondenceelement[#1][#2][#3][#4]% + {\correspondenceparameters{#1}{#3}\empty + \executeifdefined{correspondence_element_#1_#2_#3_#4}{\getvalue{correspondence_element_#1_#2_#3_\s!default}}} + +% Files + +\unexpanded\def\loadcorrespondencefile[#1][#2]% + {\processaction + [\currentcorrespondence] + [ \v!letter=>\let\doloadcorrespondencefile\doloadletterfile , + \v!memo=>\let\doloadcorrespondencefile\doloadmemofile , + \s!unknown=>\let\doloadcorrespondencefile\gobbleoneargument]% + \processcommalist[#2]\doloadcorrespondencefile} + +\def\doloadletterfile#1% + {\donefalse + \def\dodoloadletterfile##1% + {\ifdone \else + \startreadingfile + \readfile{##1}\donetrue\donefalse + \stopreadingfile + \fi}% + \dodoloadletterfile{letter-imp-#1.mkii}% + \dodoloadletterfile{letter-imp-#1.tex}% + \dodoloadletterfile{letter-#1.mkii}% + \dodoloadletterfile{letter-#1.tex}% + \ifdone \else + % style not found + \fi} + +\def\doloadmemofile#1% + {\donefalse + \def\dodoloadmemofile##1% + {\ifdone \else + \startreadingfile + \readfile{##1}\donetrue\donefalse + \stopreadingfile + \fi}% + \dodoloadmemofile{memo-imp-#1.mkii}% + \dodoloadmemofile{memo-imp-#1.tex}% + \dodoloadmemofile{memo-#1.mkii}% + \dodoloadmemofile{memo-#1.tex}% + \ifdone \else + % style not found + \fi} + +% Style + +\def\????correspondencestyle{@@@@correspondencestyle} + +\def\correspondencestyleparameter + {\namedcorrespondencestyleparameter\currentcorrespondencestyle} + +\def\namedcorrespondencestyleparameter#1#2% + {\csname\ifcsname\????correspondencestyle#1#2\endcsname\????correspondencestyle#1#2\else\s!empty\fi\endcsname} + +\unexpanded\def\setupcorrespondencestyle[#1][#2][#3]% + {\def\dosetupcorrespondencestyle##1% + {\edef\currentcorrespondencestyle{#1:##1}% + \setupcurrentcorrespondencestyle[#3]}% + \processcommalist[#2]\dosetupcorrespondencestyle} + +\unexpanded\def\setupcurrentcorrespondencestyle + {\getparameters[\????correspondencestyle\currentcorrespondencestyle]} + +\unexpanded\def\correspondencestylewidth#1#2#3% + {\edef\currentcorrespondencestyle{#1:#2}% + \edef\currentcorrespondencestylewidth{\correspondencestyleparameter\c!width}% + \hbox \ifx\currentcorrespondencestylewidth\empty \else to \correspondencestyleparameter\c!width \fi{#3\hss}} + +%D \section{Layout} +%D +%D \startitemize[packed] +%D \item firstpage, +%D \item secondpage, +%D \item leftpage and +%D \item rightpage. +%D \stopitemize + +\newcount\correspondencepage + +\appendtoks + \setuplayout[\currentcorrespondence:\v!firstpage]% + \global\correspondencepage\plusone +\to \everybeforecorrespondence + +\appendtoks + \everyaftershipout\expandafter{\the\everyaftershipout\setuplayout[\currentcorrespondence:\v!secondpage]}% + \everyaftershipout\expandafter{\the\everyaftershipout\global\advance\correspondencepage\plusone }% +\to \everybeforecorrespondence + +\unexpanded\def\definecorrespondencelayout[#1][#2]% + {\definelayout[#1:#2]} + +\unexpanded\def\setupcorrespondencelayout[#1][#2][#3]% + {\def\dosetupcorrespondencelayout##1% + {\setuplayout[#1:##1][#3]}% + \processcommalist[#2]\dosetupcorrespondencelayout} + +\appendtoks + \expanded{\definecorrespondencelayout[\currentcorrespondence][\v!firstpage ]}% + \expanded{\definecorrespondencelayout[\currentcorrespondence][\v!secondpage]}% +\to \everydefinecorrespondence + +% Lists + +\unexpanded\def\definecorrespondenceelements[#1][#2][#3]% + {\setvalue{correspondence_elements_#1_#2}{#3}} + +\def\accesscorrespondenceelements#1#2% + {\executeifdefined{correspondence_elements_#1_#2}\empty} + +% Extras + +\definesymbol[\v!cutmark][{\blackrule[\c!width=4mm,\c!height=\linewidth]}] + +\defineblankmethod[\v!samepage]{\penalty\!!tenthousand} + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.mkvi b/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.mkvi new file mode 100644 index 00000000000..476858c56ea --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-00.mkvi @@ -0,0 +1,492 @@ +%D \module +%D [ file=s-cor-00, +%D version=2011.12.02, +%D title=\CONTEXT\ User Module, +%D subtitle=Correspondence, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +% Lua functions for the core and also for the frontend modules + +\ctxloadluafile{s-cor-00} + +% Constants and variables + +\startinterface all + \setinterfaceconstant {whitespace} {whitespace} + \setinterfaceconstant {backgroundimage} {backgroundimage} + \setinterfaceconstant {fromname} {fromname} + \setinterfaceconstant {fromaddress} {fromaddress} + \setinterfaceconstant {attention} {attention} + \setinterfaceconstant {subject} {subject} + \setinterfaceconstant {closing} {closing} + \setinterfaceconstant {signature} {signature} + \setinterfaceconstant {copy} {copy} + \setinterfaceconstant {enclosure} {enclosure} + \setinterfaceconstant {postscript} {postscript} + \setinterfaceconstant {dispatch} {dispatch} + \setinterfaceconstant {toname} {toname} + \setinterfaceconstant {toaddress} {toaddress} + \setinterfaceconstant {backaddress} {backaddress} + \setinterfaceconstant {opening} {opening} + \setinterfaceconstant {fromphone} {fromphone} + \setinterfaceconstant {fromfax} {fromfax} + \setinterfaceconstant {frommail} {frommail} + \setinterfaceconstant {fromurl} {fromurl} +\stopinterface + +\startinterface all + \setinterfacevariable {correspondence} {correspondence} + \setinterfacevariable {letter} {letter} + \setinterfacevariable {memo} {memo} + \setinterfacevariable {firsthead} {firsthead} + \setinterfacevariable {nexthead} {nexthead} + \setinterfacevariable {lefthead} {lefthead} + \setinterfacevariable {righthead} {righthead} + \setinterfacevariable {foot} {foot} + \setinterfacevariable {nextfoot} {nextfoot} + \setinterfacevariable {leftfoot} {leftfoot} + \setinterfacevariable {rightfoot} {rightfoot} + \setinterfacevariable {address} {address} + \setinterfacevariable {backaddress} {backaddress} + \setinterfacevariable {location} {location} + \setinterfacevariable {topmark} {topmark} + \setinterfacevariable {botmark} {botmark} + \setinterfacevariable {cutmark} {cutmark} + \setinterfacevariable {endmark} {endmark} + \setinterfacevariable {usermark} {usermark} + \setinterfacevariable {lettermain} {lettermain} + \setinterfacevariable {letternext} {letternext} + \setinterfacevariable {opening} {opening} + \setinterfacevariable {closing} {closing} + \setinterfacevariable {secondpage} {secondpage} + \setinterfacevariable {copy} {copy} + \setinterfacevariable {enclosure} {enclosure} + \setinterfacevariable {french} {french} + \setinterfacevariable {specialnotation} {specialnotation} + \setinterfacevariable {memomain} {memomain} + \setinterfacevariable {memonext} {memonext} + \setinterfacevariable {e} {e} + \setinterfacevariable {attention} {attention} + \setinterfacevariable {room} {room} + \setinterfacevariable {yourref} {yourref} + \setinterfacevariable {yourmail} {yourmail} + \setinterfacevariable {myref} {myref} + \setinterfacevariable {mymail} {mymail} + \setinterfacevariable {customer} {customer} + \setinterfacevariable {invoice} {invoice} + \setinterfacevariable {to} {to} + \setinterfacevariable {toname} {toname} + \setinterfacevariable {from} {from} + \setinterfacevariable {fromname} {fromname} + \setinterfacevariable {phone} {phone} + \setinterfacevariable {fax} {fax} + \setinterfacevariable {email} {email} + \setinterfacevariable {bank} {bank} + \setinterfacevariable {organization} {organization} + \setinterfacevariable {city} {city} + \setinterfacevariable {zip} {zip} + \setinterfacevariable {country} {country} + \setinterfacevariable {street} {street} + \setinterfacevariable {place} {place} + \setinterfacevariable {gbrief} {gbrief} + \setinterfacevariable {fullblock} {fullblock} + \setinterfacevariable {semiblock} {semiblock} + \setinterfacevariable {simplified} {simplified} + \setinterfacevariable {modified} {modified} +\stopinterface + +% Messages + +\definemessageconstant {correspondence} + +\startinterface all + \setinterfacemessage{correspondence}{1}{Undefined layer '--' for the '--' environment} + \setinterfacemessage{correspondence}{2}{Undefined section '--' for the '--' environment} + \setinterfacemessage{correspondence}{3}{Undefined description '--' for the '--' environment} +\stopinterface + +% Environment + +\installnamespace {correspondence} +\installcommandhandler \????correspondence {correspondence} \????correspondence + +\unexpanded\def\correspondence_beg[#environment]% + {\starttext + \begingroup + \def\currentcorrespondence{#environment}% + \dosingleempty\correspondence_beg_parameters} + +\def\correspondence_beg_parameters[#parameters]% + {\iffirstargument + \setupcurrentcorrespondence[#parameters]% + \fi + \dostartbuffer[\currentcorrespondence][\e!start\currentcorrespondence][\e!stop\currentcorrespondence]} + +\unexpanded\def\correspondence_end[#environment]% + {\correspondence_place[#environment]% + \endgroup + \stoptext} + +\appendtoks + \setuevalue{\e!start\currentcorrespondence}{\correspondence_beg[\currentcorrespondence]}% + \setuevalue{\e!stop \currentcorrespondence}{\correspondence_end[\currentcorrespondence]}% +\to \everydefinecorrespondence + +\unexpanded\def\correspondence_parameters#environment#element#type% + {\def\currentcorrespondenceelement {#environment:#element}% + \def\currentcorrespondencecontent {#environment:#type:#element}% + \let\currentcorrespondencelayer \currentcorrespondenceelement + \let\currentcorrespondenceframe \currentcorrespondenceelement + \let\currentcorrespondencesection \currentcorrespondenceelement + \let\currentcorrespondencedescription\currentcorrespondenceelement} + +% Setup + +\unexpanded\def\correspondence_setup[#environment][#parameters]% + {\edef\currentcorrespondence{#environment}% + \setupcurrentcorrespondence[#parameters]} + +\appendtoks + \setuevalue{\e!setup\currentcorrespondence\e!endsetup}{\dodoubleargument\correspondence_setup[\currentcorrespondence]}% +\to \everydefinecorrespondence + +% Placement + +\newtoks\everybeforecorrespondence +\newtoks\everyaftercorrespondence + +\unexpanded\def\correspondence_place[#environment]% + {\begingroup + \edef\currentcorrespondence{#environment}% + \let \currentcorrespondenceoption\currentcorrespondence + \ctxlua{thirddata.correspondence.place("\currentcorrespondence", { + bodyfont = "\correspondenceoptionparameter\c!bodyfont", + whitespace = "\correspondenceoptionparameter\c!whitespace", + backgroundcolor = "\correspondenceoptionparameter\c!backgroundcolor", + } )}% + \endgroup} + +\appendtoks + \global\correspondence_page\zerocount +\to \everybeforecorrespondence + +\appendtoks + \setuevalue{\e!place\currentcorrespondence}{\correspondence_place[\currentcorrespondence]}% +\to \everydefinecorrespondence + +% Layers + +\installnamespace {correspondencelayer} +\installsimplecommandhandler \????correspondencelayer {correspondencelayer} \????correspondencelayer + +\installnamespace {correspondenceframe} +\installsimpleframedcommandhandler \????correspondenceframe {correspondenceframe} \????correspondenceframe + +\unexpanded\def\correspondence_layer_define[#environment][#element]% + {\def\currentcorrespondencelayer{#environment:#element}% + \let\currentcorrespondenceframe\currentcorrespondencelayer + \letcorrespondencelayerparameter\s!parent\????correspondencelayer + \letcorrespondenceframeparameter\s!parent\????correspondenceframe + \definelayer [\currentcorrespondencelayer][\c!width=\overlaywidth,\c!height=\overlayheight]% + \defineoverlay[\currentcorrespondencelayer][{\correspondence_layer_place[#environment][#element]}]} + +\unexpanded\def\correspondence_layer_setup[#environment][#elements][#parameters]% + {\def\correspondence_layer_command#element% + {\edef\currentcorrespondencelayer{#environment:#element}% + \setupcurrentcorrespondencelayer[#parameters]% + \the\everysetupcorrespondencelayer}% + \processcommalist[#elements]\correspondence_layer_command} + +\appendtoks + \setuplayer + [\currentcorrespondencelayer] + [ \c!x=\correspondencelayerparameter\c!x, + \c!y=\correspondencelayerparameter\c!y, + \c!preset=\correspondencelayerparameter\c!preset]% +\to \everysetupcorrespondencelayer + +\unexpanded\def\correspondence_frame_setup[#environment][#elements][#parameters]% + {\def\correspondence_frame_command#element% + {\edef\currentcorrespondenceframe{#environment:#element}% + \setupcurrentcorrespondenceframe[#parameters]}% + \processcommalist[#elements]\correspondence_frame_command} + +\setvalue{correspondence_layer_state_\v!start }{\!!doneatrue \!!donebfalse \!!donecfalse} +\setvalue{correspondence_layer_state_\v!stop }{\!!doneafalse \!!donebfalse \!!donecfalse} +\setvalue{correspondence_layer_state_\v!next }{\!!doneafalse \!!donebtrue \!!donectrue } +\setvalue{correspondence_layer_state_\v!repeat}{\!!doneatrue \!!donebtrue \!!donectrue } +\setvalue{correspondence_layer_state_\v!left }{\!!doneafalse \!!donebfalse \!!donectrue } +\setvalue{correspondence_layer_state_\v!right }{\!!doneafalse \!!donebtrue \!!donecfalse} +\setvalue{correspondence_layer_state_\v!even }{\!!doneafalse \!!donebfalse \!!donectrue } +\setvalue{correspondence_layer_state_\v!odd }{\!!doneafalse \!!donebtrue \!!donecfalse} + +\unexpanded\def\correspondence_layer_place[#environment][#element]% + {\correspondence_parameters{#environment}{#element}\v!layer + \expandcheckedcsname{correspondence_layer_state_}{\correspondencelayerparameter\c!state}\v!stop + \ifnum\correspondence_page=\plusone + \if!!donea\correspondence_layer_direct\fi + \else\ifodd\correspondence_page + \if!!doneb\correspondence_layer_direct\fi + \else + \if!!donec\correspondence_layer_direct\fi + \fi\fi + \tightlayer[\currentcorrespondencelayer]} + +\unexpanded\def\correspondence_layer_direct + {\setlayer + [\currentcorrespondencelayer] + {\inheritedcorrespondenceframeframed + {\usecorrespondencelayerstyleandcolor\c!style\c!color + \doadaptleftskip {\correspondencelayerparameter\c!leftmargin }% + \doadaptrightskip{\correspondencelayerparameter\c!rightmargin}% + \doifsymboldefinedelse{\correspondencelayerparameter\c!symbol}% + {\symbol[\correspondencelayerparameter\c!symbol]} + {\texsetup\currentcorrespondencecontent}}}} + +\unexpanded\def\correspondence_layer_check[#environment][#element]% + {\def\currentcorrespondencelayer{#environment:#element}% + \ifcsname\currentcorrespondencelayerhash\s!parent\endcsname \else + \showmessage\m!correspondence{2}{#element,#environment}% + \fi} + +\setupcorrespondencelayer + [ \c!state=\v!start, + \c!alternative=\s!default, + \c!distance=\lineheight, + \c!separator=\crlf] + +\setupcorrespondenceframe + [ \c!frame=\v!off, + \c!offset=\zeropoint, + \c!align=\v!right] + +% Sections + +\installnamespace {correspondencesection} +\installsimplecommandhandler \????correspondencesection {correspondencesection} \????correspondencesection + +\unexpanded\def\correspondence_section_define[#environment][#element]% + {\def\currentcorrespondencesection{#environment:#element}% + \letcorrespondencesectionparameter\s!parent\????correspondencesection} + +\unexpanded\def\correspondence_section_setup[#environment][#elements][#parameters]% + {\def\correspondence_section_command#element% + {\edef\currentcorrespondencesection{#environment:#element}% + \setupcurrentcorrespondencesection[#parameters]}% + \processcommalist[#elements]\correspondence_section_command} + +\unexpanded\def\correspondence_section_place[#environment][#element]% + {\begingroup + \correspondence_parameters{#environment}{#element}\v!section + \ifcsname\currentcorrespondencesectionhash\s!parent\endcsname + \doifsomethingelse{\correspondencesectionparameter\c!spacebefore}{\blank[\correspondencesectionparameter\c!spacebefore]}{\endgraf}% + \correspondencesectionparameter\c!before + \doadaptleftskip {\correspondencesectionparameter\c!leftmargin }% + \doadaptrightskip{\correspondencesectionparameter\c!rightmargin}% + \doifsomething{\correspondencesectionparameter\c!align }{\setupalign [\correspondencesectionparameter\c!align ]}% + \doifsomething{\correspondencesectionparameter\c!indenting}{\setupindenting[\correspondencesectionparameter\c!indenting]}% + \usecorrespondencesectionstyleandcolor\c!style\c!color + \texsetup\currentcorrespondencecontent + \correspondencesectionparameter\c!after + \doifsomethingelse{\correspondencesectionparameter\c!spaceafter }{\blank[\correspondencesectionparameter\c!spaceafter ]}{\endgraf}% + \else + \showmessage\m!correspondence{2}{#element,#environment}% + \fi + \endgroup} + +\setupcorrespondencesection + [ \c!spacebefore=\v!line, + \c!spaceafter=\v!line, + \c!spaceinbetween={\v!samepage,\v!line}, + \c!alternative=\s!default, + \c!separator=\crlf] + +% Options + +\installnamespace {correspondenceoption} +\installsimplecommandhandler \????correspondenceoption {correspondenceoption} \????correspondenceoption + +\unexpanded\def\correspondence_option_setup[#environment][#parameters]% + {\edef\currentcorrespondenceoption{#environment}% + \setupcurrentcorrespondenceoption[#parameters]}% + +\defineoverlay + [correspondence:backgroundimage] + [\doifsomething{\correspondenceoptionparameter\c!backgroundimage} + {\overlayfigure{\correspondenceoptionparameter\c!backgroundimage}}] + +\defineoverlay + [correspondence:background] + [\correspondenceoptionparameter\c!background] + +% Descriptions + +\installnamespace {correspondencedescription} +\installsimplecommandhandler \????correspondencedescription {correspondencedescription} \????correspondencedescription + +\unexpanded\def\correspondence_description_define[#environment][#element]% + {\def\currentcorrespondencedescription{#environment:#element}% + \letcorrespondencedescriptionparameter\s!parent\????correspondencedescription} + +\unexpanded\def\correspondence_description_setup[#environment][#elements][#parameters]% + {\def\correspondence_description_command#element% + {\edef\currentcorrespondencedescription{#environment:#element} + \setupcurrentcorrespondencedescription[#parameters]}% + \processcommalist[#elements]\correspondence_description_command} + +\unexpanded\def\correspondence_description_place[#environment][#element]% + {\begingroup + \edef\currentcorrespondencedescription{#environment:#element}% + \ifcsname\currentcorrespondencedescriptionhash\s!parent\endcsname + \doifsomethingelse{\correspondencedescriptionparameter\c!textcommand}\donetrue\donefalse + \ifdone + \doifsomethingelse{\correspondencedescriptionparameter\c!spacebefore}{\blank[\correspondencedescriptionparameter\c!spacebefore]}{\endgraf}% + \correspondencedescriptionparameter\c!before + \setbox\scratchbox\hbox + {\usecorrespondencedescriptionstyleandcolor\c!headstyle\c!headcolor + \correspondencedescriptionparameter\c!headcommand}% + \assignwidth + {\scratchdimen} + {\correspondencedescriptionparameter\c!width} + {\unhcopy\scratchbox} + {\correspondencedescriptionparameter\c!distance}% + \expandcheckedcsname{correspondence_description_location_}{\correspondencedescriptionparameter\c!location}\v!left + \correspondencedescriptionparameter\c!after + \doifsomethingelse{\correspondencedescriptionparameter\c!spaceafter}{\blank[\correspondencedescriptionparameter\c!spaceafter]}{\endgraf}% + \fi + \else + \showmessage\m!correspondence{3}{#element,#environment}% + \fi + \endgroup} + +\setvalue{correspondence_description_location_\v!left}% + {\EveryPar{\hangindent\scratchdimen\hangafter\zerocount}% + \setbox\scratchbox\hbox to \scratchdimen{\box\scratchbox\hss}% + \noindent\llap{\box\scratchbox}\correspondencedescriptionparameter\c!textcommand} + +\setvalue{correspondence_description_location_\v!top}% + {\noindent\box\scratchbox + \doisomethingelse{\correspondencedescriptionparameter\c!spaceinbetween} + {\blank[\correspondencedescriptionparameter\c!spaceinbetween]} + {\nobreak\endgraf}% + \correspondencedescriptionparameter\c!textcommand} + +\setvalue{correspondence_description_location_\v!text}% + {\noindent\scratchbox\scratchbox\correspondencedescriptionparameter\c!textcommand} + +\setupcorrespondencedescription + [\c!width=\v!fit, + \c!distance=1em] + +% Elements + +\unexpanded\def\correspondence_element_define[#environment][#type][#element][#name]#content% + {\setvalue{correspondence_element_#environment_#type_#element_#name}{#content}} + +\unexpanded\def\correspondence_element_place[#environment][#type][#element][#name]% + {\correspondence_parameters{#environment}{#element}\empty + \expandcheckedcsname{correspondence_element_#environment_#type_#element_}{#name}\s!default} + +% Files + +\unexpanded\def\correspondence_file_load[#environment][#names]% + {\def\correspondence_file_command#name% + {\ctxlua{thirddata.correspondence.file("#environment","#name")}}% + \processcommalist[#names]\correspondence_file_command} + +% Style + +\installnamespace {correspondencestyle} +\installsimplecommandhandler \????correspondencestyle {correspondencestyle} \????correspondencestyle + +\unexpanded\def\correspondence_style_setup[#environment][#elements][#parameters]% + {\def\correspondence_style_command#element% + {\edef\currentcorrespondencestyle{#environment:#element}% + \setupcurrentcorrespondencestyle[#parameters]}% + \processcommalist[#elements]\correspondence_style_command} + +\unexpanded\def\correspondence_style_width#environment#element#content% + {\def\currentcorrespondencestyle{#environment:#element}% + \hbox \ifzeropt\correspondencestyleparameter\c!width \else to \correspondencestyleparameter\c!width \fi{#content\hss}} + +\setupcorrespondencestyle + [\c!width=\zeropoint] + +%D \section{Layout} +%D +%D \startitemize[packed] +%D \item firstpage, +%D \item secondpage, +%D \item leftpage and +%D \item rightpage. +%D \stopitemize + +\newcount\correspondence_page + +\ifdefined\changetolayout \else \let\changetolayout\page_layouts_change \fi + +\installlayoutmethod \v!correspondence + {\global\advance\correspondence_page\plusone + \ifnum\correspondence_page=\plusone + \changetolayout{\currentcorrespondence:\v!firstpage}% + \else\ifodd\correspondence_page + \changetolayout{\currentcorrespondence:\v!rightpage}% + \else + \changetolayout{\currentcorrespondence:\v!leftpage }% + \fi\fi} + +\unexpanded\def\correspondence_layout_define + {\dotripleempty\correspondence_layout_parameters} + +\unexpanded\def\correspondence_layout_parameters[#environment][#self][#parent]% + {\ifthirdargument + \definelayout[#environment:#self][#environment:#parent]% + \else + \definelayout[#environment:#self]% + \fi} + +\unexpanded\def\correspondence_layout_setup[#environment][#elements][#parameters]% + {\def\correspondence_layout_command#element% + {\setuplayout[#environment:#element][#parameters]}% + \processcommalist[#elements]\correspondence_layout_command} + +\appendtoks + \normalexpanded{\correspondence_layout_define[\currentcorrespondence][\v!firstpage ]}% + \normalexpanded{\correspondence_layout_define[\currentcorrespondence][\v!secondpage]}% + \normalexpanded{\correspondence_layout_define[\currentcorrespondence][\v!leftpage ][\v!secondpage]}% + \normalexpanded{\correspondence_layout_define[\currentcorrespondence][\v!rightpage ][\v!secondpage]}% +\to \everydefinecorrespondence + +% Lists + +\def\correspondence_elements_define[#environment][#name][#list]% + {\ctxlua{thirddata.correspondence.elements_define("#environment","#name","#list")}} + +\def\correspondence_elements_access#environment#name% + {\ctxlua{thirddata.correspondence.elements_access("#environment","#name")}} + +% Extras + +\definesymbol[\v!cutmark][{\blackrule[\c!width=4mm,\c!height=\linewidth]}] + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-01.mkii b/Master/texmf-dist/tex/context/third/letter/base/s-cor-01.mkii new file mode 100644 index 00000000000..79f7b29b0dc --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-01.mkii @@ -0,0 +1,745 @@ +%D \module +%D [ file=s-cor-01, +%D version=2011.12.05, +%D title=\CONTEXT\ User Module, +%D subtitle=Letters, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\usemodule[cor-00] + +\startmodule[\v!letter] + +\setupmodule + [\c!style=dinb] + +% Commands + +\definecorrespondence[\v!letter] + +\def\defineletterlayer {\dodoubleargument\definecorrespondencelayer [\v!letter]} +\def\definelettersection {\dodoubleargument\definecorrespondencesection [\v!letter]} +\def\defineletterdescription {\dodoubleargument\definecorrespondencedescription [\v!letter]} + +\def\defineletterelements {\dotripleargument\definecorrespondenceelements [\v!letter]} +\def\setupletterelements {\dotripleargument\setupcorrespondenceelements [\v!letter]} + +\def\setupletterstyle {\dotripleargument\setupcorrespondencestyle [\v!letter]} +\def\setupletterlayer {\dotripleargument\setupcorrespondencelayer [\v!letter]} +\def\setupletterframe {\dotripleargument\setupcorrespondenceframe [\v!letter]} +\def\setupletterlayout {\dotripleargument\setupcorrespondencelayout [\v!letter]} +\def\setuplettersection {\dotripleargument\setupcorrespondencesection [\v!letter]} +\def\setupletterdescription {\dotripleargument\setupcorrespondencedescription [\v!letter]} +\def\setupletteroptions {\dodoubleargument\setupcorrespondenceoption [\v!letter]} +\def\setupletter {\dodoubleargument\setupcorrespondence [\v!letter]} + +\def\useletterstyle {\dodoubleargument\loadcorrespondencefile [\v!letter]} + +\def\defineletterelement {\doquadrupleargument\definecorrespondenceelement [\v!letter]} +\def\letterelement {\doquadrupleargument\placecorrespondenceelement [\v!letter]} + +\def\namedletterlayerparameter#1#2{\namedcorrespondencelayerparameter{\v!letter:#1}{#2}} +\def\namedletterframeparameter#1#2{\namedcorrespondenceframeparameter{\v!letter:#1}{#2}} + +% Layers + +\defineletterlayer [\v!head] +\defineletterlayer [\v!firsthead] +\defineletterlayer [\v!nexthead] +\defineletterlayer [\v!lefthead] +\defineletterlayer [\v!righthead] + +\defineletterlayer [\v!foot] +\defineletterlayer [\v!nextfoot] +\defineletterlayer [\v!leftfoot] +\defineletterlayer [\v!rightfoot] + +\defineletterlayer [\v!address] +\defineletterlayer [\v!backaddress] + +\defineletterlayer [\v!reference] +\defineletterlayer [\v!location] + +\defineletterlayer [\v!topmark] +\defineletterlayer [\v!botmark] +\defineletterlayer [\v!cutmark] +\defineletterlayer [\v!endmark] +\defineletterlayer [\v!usermark] + +\defineletterlayer [\v!lettermain] +\defineletterlayer [\v!letternext] + +% Section + +\definelettersection [\v!title] +\definelettersection [\v!subject] +\definelettersection [\v!opening] +\definelettersection [\v!content] +\definelettersection [\v!closing] +\definelettersection [\v!appendices] + +% Descriptions + +\defineletterdescription [\v!copy] +\defineletterdescription [\v!enclosure] +\defineletterdescription [\v!postscript] + +% Setups + +\defineletterelement[\v!layer][\v!head][\s!default] + {\correspondenceparameter\c!fromname + \doifsomething{\correspondenceparameter\c!fromname}\\ + \correspondenceparameter\c!fromaddress} + +\defineletterelement[\v!layer][\v!head][\v!left] + {\framed[\c!frame=\v!off,\c!align=\c!flushleft,\c!width=\v!broad,\c!offset=\zeropoint]\bgroup + \def\currentcorrespondencestyle{\v!letter:\c!fromname}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!style\c!color + \correspondenceparameter\c!fromname + \dostopattributes + \def\currentcorrespondencestyle{\v!letter:\c!fromaddress}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!style\c!color + \correspondenceparameter\c!fromaddress + \doifsomething{\correspondenceparameter\c!fromphone}{\\\correspondenceparameter\c!fromphone}% + \doifsomething{\correspondenceparameter\c!fromfax }{\\\correspondenceparameter\c!fromfax }% + \doifsomething{\correspondenceparameter\c!frommail }{\\\correspondenceparameter\c!frommail }% + \doifsomething{\correspondenceparameter\c!fromurl }{\\\correspondenceparameter\c!fromurl }% + \dostopattributes + \egroup} + +\defineletterelement[\v!layer][\v!head][\v!middle] + {\framed[\c!frame=\v!off,\c!align=\c!middle,\c!width=\v!broad,\c!offset=\zeropoint]\bgroup + \def\currentcorrespondencestyle{\v!letter:\c!fromname}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!style\c!color + \correspondenceparameter\c!fromname + \dostopattributes + \def\currentcorrespondencestyle{\v!letter:\c!fromaddress}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!style\c!color + \correspondenceparameter\c!fromaddress + \doifsomething{\correspondenceparameter\c!fromphone}{\\\correspondenceparameter\c!fromphone}% + \doifsomething{\correspondenceparameter\c!fromfax }{\\\correspondenceparameter\c!fromfax }% + \doifsomething{\correspondenceparameter\c!frommail }{\\\correspondenceparameter\c!frommail }% + \doifsomething{\correspondenceparameter\c!fromurl }{\\\correspondenceparameter\c!fromurl }% + \dostopattributes + \egroup} + +\defineletterelement[\v!layer][\v!head][\v!right] + {\framed[\c!frame=\v!off,\c!align=\c!flushright,\c!width=\v!broad,\c!offset=\zeropoint]\bgroup + \def\currentcorrespondencestyle{\v!letter:\c!fromname}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!style\c!color + \correspondenceparameter\c!fromname + \dostopattributes + \def\currentcorrespondencestyle{\v!letter:\c!fromaddress}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!style\c!color + \correspondenceparameter\c!fromaddress + \doifsomething{\correspondenceparameter\c!fromphone}{\\\correspondenceparameter\c!fromphone}% + \doifsomething{\correspondenceparameter\c!fromfax }{\\\correspondenceparameter\c!fromfax }% + \doifsomething{\correspondenceparameter\c!frommail }{\\\correspondenceparameter\c!frommail }% + \doifsomething{\correspondenceparameter\c!fromurl }{\\\correspondenceparameter\c!fromurl }% + \dostopattributes + \egroup} + +\defineletterelement[\v!layer][\v!head][\v!gbrief] + {\correspondenceparameter\c!fromname\hrule} + +\startsetups[\v!letter:\v!layer:\v!head] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!head][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!firsthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!firsthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!nexthead][\v!gbrief] + {\maxaligned + {\rlap{\correspondenceparameter\c!fromname} + \midaligned{\lettertext\v!page\subpagenumber\lettertext\v!of\lastsubpagenumber} + \llap{\correspondenceparameter\c!date}} + \hairline} + +\startsetups[\v!letter:\v!layer:\v!nexthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!nexthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!lefthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!lefthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!righthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!righthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!foot][\v!gbrief] + {\bTABLE[\c!frame=\v!off,\c!width=.25\hsize,\c!offset=\zeropoint] + \bTR[\c!style=\bfxx,\c!topframe=\v!on] + \bTD \lettertext\v!address \eTD + \bTD \lettertext\v!phone \eTD + \bTD \lettertext\v!email \eTD + \bTD \lettertext\v!bank \eTD + \eTR + \bTR + \bTD \correspondenceparameter\c!street \\\correspondenceparameter\c!city \eTD + \bTD \correspondenceparameter\c!phone \eTD + \bTD \correspondenceparameter\c!email \eTD + \bTD \correspondenceparameter\c!bankname\\\correspondenceparameter\c!banknumber\\\correspondenceparameter\c!accountnumber \eTD + \eTR + \eTABLE} + + +\startsetups[\v!letter:\v!layer:\v!foot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!foot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!nextfoot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!nextfoot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!leftfoot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!leftfoot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!rightfoot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!rightfoot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!address][\s!default] + {\doifsomething{\correspondenceparameter\c!dispatch}{\correspondenceparameter\c!dispatch\\}% + \doifsomething{\correspondenceparameter\c!toname }{\correspondenceparameter\c!toname \\}% + \correspondenceparameter\c!toaddress} + +\startsetups[\v!letter:\v!layer:\v!address] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!address][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!backaddress][\s!default] + {\correspondenceparameter\c!fromname + \doifsomething{\correspondenceparameter\c!fromaddress}\\ + \correspondenceparameter\c!fromaddress} + +\defineletterelement[\v!layer][\v!backaddress][\v!auto] + {\doifsomethingelse{\correspondenceparameter\c!backaddress} + {\correspondenceparameter\c!backaddress} + {\letterelement[\v!layer][\v!backaddress][\s!default]}} + +\startsetups[\v!letter:\v!layer:\v!backaddress] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!backaddress][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!reference][\s!default] + {\correspondenceparameter\c!reference} + +\def\doformatletterreferenceAandE#1% + {\def\currentcorrespondencevalue {#1}% + \def\currentcorrespondencestyle{\v!letter:#1}% + \vbox\bgroup + \framed + [\c!frame=\v!off, + \c!foregroundstyle=\correspondencestyleparameter\c!titlestyle, + \c!foregroundcolor=\correspondencestyleparameter\c!titlecolor, + \c!location=\v!bottom, + \c!align=\v!right, + \c!offset=0pt] + {\setupinterlinespace\lettertext\currentcorrespondencevalue\par}% + \framed + [\c!frame=\v!off, + \c!foregroundstyle=\correspondencestyleparameter\c!textstyle, + \c!foregroundcolor=\correspondencestyleparameter\c!textcolor, + \c!location=\v!top, + \c!align=\v!right, + \c!offset=0pt] + {\setupinterlinespace\correspondenceparameter\currentcorrespondencevalue\par}% + \egroup} + +\def\doformatletterreferenceA#1% + {\doifsomething{#1} % ignore empty entries + {\doifnot{#1}{\v!line} % and the “line” keyword + {\doformatletterreferenceAandE{#1}\hfill}}} + +\defineletterelement[\v!layer][\v!reference][\v!a] + {\hbox to \hsize\bgroup + \getcommacommandsize[\correspondencelayerparameter\c!list]% + \ifnum\commalistsize=\plusone\hfill\fi + \processcommacommand[\correspondencelayerparameter\c!list]\doformatletterreferenceA + \unskip + \egroup} + +\def\doformatletterreferenceB#1% + {\doifsomething{#1}% ignore empty entries + {\doifelse{#1}{\v!line} + {\blank[\v!line]} + {\hbox\bgroup + \def\currentcorrespondencevalue {#1}% + \def\currentcorrespondencestyle{\v!letter:#1}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!titlestyle\c!titlecolor + \lettertext\currentcorrespondencevalue + \correspondencestyleparameter\c!separator + \dostopattributes + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!textstyle\c!textcolor + \correspondenceparameter\currentcorrespondencevalue + \dostopattributes + \egroup}}} + +\defineletterelement[\v!layer][\v!reference][\v!b] + {\vtop\bgroup + \processcommacommand[\correspondencelayerparameter\c!list]\doformatletterreferenceB + \egroup} + +\def\doformatletterreferenceC#1% + {\doifsomething{#1} % ignore empty entries + {\doifnot{#1}{\v!line} % and the “line” keyword + {\def\currentcorrespondencevalue {#1}% + \def\currentcorrespondencestyle{\v!letter:#1}% + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}\c!textstyle\c!textcolor + \correspondenceparameter\currentcorrespondencevalue + \dostopattributes}}} + +\defineletterelement[\v!layer][\v!reference][\v!c] + {\hbox to \hsize\bgroup + \processcommacommand[\correspondencelayerparameter\c!list]\doformatletterreferenceC + \egroup} + +\def\doformatletterreferenceD#1% + {\doifsomething{#1}% + {\doifelse{#1}{\v!line} + {\appendtoks\TB[\v!line]\to\scratchtoks} + {\def\currentcorrespondencevalue {#1}% + \def\currentcorrespondencestyle{\v!letter:#1}% + \startexpanded + \noexpand\appendtoks + \noexpand\NC + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}{\c!titlestyle}{\c!titlecolor}% + \lettertext\currentcorrespondencevalue + \dostopattributes + \noexpand\EQ + \dostartattributes{\????correspondencestyle\currentcorrespondencestyle}{\c!textstyle }{\c!textcolor }% + \correspondenceparameter\currentcorrespondencevalue + \dostopattributes + \noexpand\NC\noexpand\NR + \noexpand\to\noexpand\scratchtoks + \stopexpanded}}} + +\defineletterelement[\v!layer][\v!reference][\v!d] + {\vtop\bgroup + \scratchtoks\emptytoks + \processcommacommand[\correspondencelayerparameter\c!list]\doformatletterreferenceD + \starttabulate[|l|l|][\c!before=,\c!after=]% + \the\scratchtoks + \stoptabulate + \egroup} + +\def\doformatletterreferenceE#1% + {\doifsomething{#1} % ignore empty entries + {\doifnot{#1}{\v!line} % and the “line” keyword + {\correspondencestylewidth\v!letter{#1}{\doformatletterreferenceAandE{#1}}}}} + +\defineletterelement[\v!layer][\v!reference][\v!e] + {\hbox to \hsize\bgroup + \processcommacommand[\correspondencelayerparameter\c!list]\doformatletterreferenceE + \egroup} + +\startsetups[\v!letter:\v!layer:\v!reference] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!reference][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!location][\v!french] + {\doifsomething{\correspondenceparameter\c!place}{\correspondenceparameter\c!place\\}% + \correspondenceparameter\c!date} + +\startsetups[\v!letter:\v!layer:\v!location] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!location][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!title][\s!default] + {\doifsomethingelse{\correspondenceparameter\c!title} + {\correspondenceparameter\c!title} + {\lettertext\v!attention\correspondenceparameter\c!attention}} + +\startsetups[\v!letter:\v!section:\v!title] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!title][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!subject][\s!default] + {\lettertext\v!subject\correspondenceparameter\c!subject} + +\startsetups[\v!letter:\v!section:\v!subject] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!subject][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!opening][\s!default] + {\doifsomethingelse{\correspondenceparameter\c!opening} + {\correspondenceparameter\c!opening} + {\correspondenceparameter\c!salutation}} + +\defineletterelement[\v!section][\v!opening][\v!french] + {\doifsomething{\correspondenceoptionparameter\c!indenting}{\setupindenting[\correspondenceoptionparameter\c!indenting]}% + \letterelement[\v!section][\v!opening][\s!default]} + +\startsetups[\v!letter:\v!section:\v!opening] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!opening][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!content][\s!default] + {\getbuffer[\v!letter]} + +\startsetups[\v!letter:\v!section:\v!content] +\letterelement[\v!section][\v!content][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!closing][\s!default] + {\correspondenceparameter\c!closing + \doifsomething{\correspondenceparameter\c!signature} + {\blank[\correspondencesectionparameter\c!spaceinbetween]% + \correspondenceparameter\c!signature}} + +\defineletterelement[\v!section][\v!closing][\v!french] + {\doifsomething{\correspondenceoptionparameter\c!indenting}{\setupindenting[\correspondenceoptionparameter\c!indenting,\v!first]}% + \correspondenceparameter\c!closing + \doifsomething{\correspondenceparameter\c!signature} + {\blank[\correspondencesectionparameter\c!spaceinbetween]% + \raggedcenter\doadaptleftskip{.5\textwidth}% + \correspondenceparameter\c!signature\endgraf}} + +\startsetups[\v!letter:\v!section:\v!closing] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!closing][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!appendices][\s!default] + {\startpacked + \expanded{\processcommalistwithparameters[\accesscorrespondenceelements\v!letter\v!description]}{\placecorrespondencedescription[\v!letter]}% + \stoppacked} + +\startsetups[\v!letter:\v!section:\v!appendices] +\letterelement[\v!section][\v!appendices][\correspondencesectionparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!place] +\placecorrespondence[\v!letter] +\stopsetups + +% Files + +\useletterstyle[default,\currentmoduleparameter\c!style] + +% Extras + +\appendtoks + \ifx\currentcorrespondence\v!letter + \doif{\correspondenceoptionparameter\c!option}\v!test{\useletterstyle[test]}% + \fi +\to \everybeforecorrespondence + +\appendtoks + \ifx\currentcorrespondence\v!letter + \doif{\correspondenceoptionparameter\c!marking}\v!no{\setupletterlayer[\v!topmark,\v!botmark,\v!cutmark,\v!endmark,\v!usermark][\c!state=\v!stop]}% + \fi +\to \everybeforecorrespondence + +\appendtoks + \ifx\currentcorrespondence\v!letter + \doif{\correspondenceoptionparameter\c!position}\v!yes + {\setbox\scratchbox\vbox{\letterelement[\v!reference][\correspondencelayerparameter\c!alternative]}% + \normalexpanded + {\setupletterlayout + [\v!firstpage] + [\c!topspace=\dimexpr\namedletterlayerparameter\v!reference\c!y+\ht\scratchbox+\namedletterlayerparameter\v!reference\c!distance\relax]}}% + \fi +\to \everybeforecorrespondence + +% Labels + +\def\setuplettertext + {\dodoubleempty\dosetuplettertext} + +\def\dosetuplettertext[#1][#2]% + {\ifsecondargument + \def\dodosetuplettertext##1{\setuplabeltext[#1][\v!letter:##1]}% + \processcommalist[#2]\dodosetuplettertext + \else + \def\dodosetuplettertext##1{\setuplabeltext [\v!letter:##1]}% + \processcommalist[#1]\dodosetuplettertext + \fi} + +\def\lettertext#1{\labeltext{\v!letter:#1}} + +% name: + +\setuplettertext[\s!en][\v!name=Name] +\setuplettertext[\s!nl][\v!name=] +\setuplettertext[\s!de][\v!name=Name] +\setuplettertext[\s!fr][\v!name=Nom] +\setuplettertext[\s!it][\v!name=] +\setuplettertext[\s!es][\v!name=] + +% room: + +\setuplettertext[\s!en][\v!room=Room] +\setuplettertext[\s!nl][\v!room=] +\setuplettertext[\s!de][\v!room=Zimmer] +\setuplettertext[\s!fr][\v!room=Salle] % Salle or Pièce +\setuplettertext[\s!it][\v!room=] +\setuplettertext[\s!es][\v!room=] + +% yourref: + +\setuplettertext[\s!en][\v!yourref=Your ref.] +\setuplettertext[\s!nl][\v!yourref=Uw kenmerk] +\setuplettertext[\s!de][\v!yourref=Ihr Zeichen] +\setuplettertext[\s!fr][\v!yourref=Vos références] +\setuplettertext[\s!it][\v!yourref=Vs./Rif.] +\setuplettertext[\s!es][\v!yourref=Su ref.] + +% yourmail: + +\setuplettertext[\s!en][\v!yourmail=Your letter of] +\setuplettertext[\s!nl][\v!yourmail=Uw brief van] +\setuplettertext[\s!de][\v!yourmail=Ihre Nachricht vom] +\setuplettertext[\s!fr][\v!yourmail=Votre lettre du] +\setuplettertext[\s!it][\v!yourmail=Vs.~lettera del] +\setuplettertext[\s!es][\v!yourmail=Su carta de] + +% myref: + +\setuplettertext[\s!en][\v!myref=Our ref.] +\setuplettertext[\s!nl][\v!myref=Ons kenmerk] +\setuplettertext[\s!de][\v!myref=Unser Zeichen] +\setuplettertext[\s!fr][\v!myref=Nos références] +\setuplettertext[\s!it][\v!myref=Ns./Rif.] +\setuplettertext[\s!es][\v!myref=Nuestra ref.] + +% mymail: + +\setuplettertext[\s!en][\v!mymail=Our letter of] +\setuplettertext[\s!nl][\v!mymail=Ons brief van] +\setuplettertext[\s!de][\v!mymail=Unsere Nachricht vom] +\setuplettertext[\s!fr][\v!mymail=Notre lettre du] +\setuplettertext[\s!it][\v!mymail=] +\setuplettertext[\s!es][\v!mymail=] + +% customer: + +\setuplettertext[\s!en][\v!customer=Customer no.] +\setuplettertext[\s!nl][\v!customer=Klant No.] +\setuplettertext[\s!de][\v!customer=Kundennummer] +\setuplettertext[\s!fr][\v!customer=Numéro de client] +\setuplettertext[\s!it][\v!customer=Nr.~cliente] +\setuplettertext[\s!es][\v!customer=No. de cliente] + +% invoice: + +\setuplettertext[\s!en][\v!invoice=Invoice no.] +\setuplettertext[\s!nl][\v!invoice=Rekening No.] +\setuplettertext[\s!de][\v!invoice=Rechnungsnummer] +\setuplettertext[\s!fr][\v!invoice=Numéro de facture] +\setuplettertext[\s!it][\v!invoice=Nr.~fattura] +\setuplettertext[\s!es][\v!invoice=No. de factura] + +% attention: + +\setuplettertext[\s!en][\v!attention=] % Attention +\setuplettertext[\s!nl][\v!attention=] +\setuplettertext[\s!de][\v!attention=] +\setuplettertext[\s!fr][\v!attention=] +\setuplettertext[\s!it][\v!attention=] +\setuplettertext[\s!es][\v!attention=] + +% subject: + +\setuplettertext[\s!en][\v!subject=] % Subject +\setuplettertext[\s!nl][\v!subject=] % Onderwerp +\setuplettertext[\s!de][\v!subject=] % Betrifft +\setuplettertext[\s!fr][\v!subject=] % Concernant or Sujet +\setuplettertext[\s!it][\v!subject=] % Oggetto +\setuplettertext[\s!es][\v!subject=] % Asunto + +% cc: + +\setuplettertext[\s!en][\v!copy=cc] +\setuplettertext[\s!nl][\v!copy=Kopie aan] +\setuplettertext[\s!de][\v!copy=Kopien an] +\setuplettertext[\s!fr][\v!copy=Copieà] +\setuplettertext[\s!it][\v!copy=Per conoscenza] +\setuplettertext[\s!es][\v!copy=Copias] + +% enclosure: + +\setuplettertext[\s!en][\v!enclosure=encl] +\setuplettertext[\s!nl][\v!enclosure=Bijlage(n)] +\setuplettertext[\s!de][\v!enclosure=Anlagen] +\setuplettertext[\s!fr][\v!enclosure=Annexes] +\setuplettertext[\s!it][\v!enclosure=Allegato] +\setuplettertext[\s!es][\v!enclosure=Adjunto] + +% to: + +\setuplettertext[\s!en][\v!to=To] +\setuplettertext[\s!nl][\v!to=Aan] +\setuplettertext[\s!de][\v!to=An] +\setuplettertext[\s!fr][\v!to=À] +\setuplettertext[\s!it][\v!to=A] +\setuplettertext[\s!es][\v!to=A] + +% toname: + +\setuplettertext[\s!en][\v!toname=To] +\setuplettertext[\s!nl][\v!toname=Aan] +\setuplettertext[\s!de][\v!toname=An] +\setuplettertext[\s!fr][\v!toname=À] +\setuplettertext[\s!it][\v!toname=A] +\setuplettertext[\s!es][\v!toname=A] + +% from: + +\setuplettertext[\s!en][\v!from=From] +\setuplettertext[\s!nl][\v!from=Van] +\setuplettertext[\s!de][\v!from=Von] +\setuplettertext[\s!fr][\v!from=De] +\setuplettertext[\s!it][\v!from=Da] +\setuplettertext[\s!es][\v!from=De] + +% fromname: + +\setuplettertext[\s!en][\v!fromname=From] +\setuplettertext[\s!nl][\v!fromname=Van] +\setuplettertext[\s!de][\v!fromname=Von] +\setuplettertext[\s!fr][\v!fromname=De] +\setuplettertext[\s!it][\v!fromname=Da] +\setuplettertext[\s!es][\v!fromname=De] + +% date: + +\setuplettertext[\s!en][\v!date=Date] +\setuplettertext[\s!nl][\v!date=Datum] +\setuplettertext[\s!de][\v!date=Datum] +\setuplettertext[\s!fr][\v!date=Date] +\setuplettertext[\s!it][\v!date=Data] +\setuplettertext[\s!es][\v!date=Fecha] + +% phone: + +\setuplettertext[\s!en][\v!phone=Phone] +\setuplettertext[\s!nl][\v!phone=Telefoon] +\setuplettertext[\s!de][\v!phone=Telefon] +\setuplettertext[\s!fr][\v!phone=Téléphone] +\setuplettertext[\s!it][\v!phone=Telefono] +\setuplettertext[\s!es][\v!phone=Teléfono] + +% fax: + +\setuplettertext[\s!en][\v!fax=Fax] +\setuplettertext[\s!nl][\v!fax=Fax] +\setuplettertext[\s!de][\v!fax=Fax] +\setuplettertext[\s!fr][\v!fax=Téléfax] % or Fax +\setuplettertext[\s!it][\v!fax=Fax] +\setuplettertext[\s!es][\v!fax=Fax] + +% email: + +\setuplettertext[\s!en][\v!email=Email] +\setuplettertext[\s!nl][\v!email=E–mail] +\setuplettertext[\s!de][\v!email=E-Mail] +\setuplettertext[\s!fr][\v!email=Courriel] % Adresse électronique +\setuplettertext[\s!it][\v!email=Email] +\setuplettertext[\s!es][\v!email=Email] + +% url: + +\setuplettertext[\s!en][\v!url=Url] +\setuplettertext[\s!nl][\v!url=URL] +\setuplettertext[\s!de][\v!url=URL] +\setuplettertext[\s!fr][\v!url=Site web] +\setuplettertext[\s!it][\v!url=Sito Web] +\setuplettertext[\s!es][\v!url=URL] + +% bank: + +\setuplettertext[\s!en][\v!bank=Bank account] +\setuplettertext[\s!nl][\v!bank=Bankrekening] +\setuplettertext[\s!de][\v!bank=Bankverbindung] +\setuplettertext[\s!fr][\v!bank=Compte en banque] +\setuplettertext[\s!it][\v!bank=Conto bancario] +\setuplettertext[\s!es][\v!bank=Cuenta bancaria] + +% organization: + +\setuplettertext[\s!en][\v!organization=Organization] +\setuplettertext[\s!nl][\v!organization=] +\setuplettertext[\s!de][\v!organization=Organisation] +\setuplettertext[\s!fr][\v!organization=] +\setuplettertext[\s!it][\v!organization=] +\setuplettertext[\s!es][\v!organization=] + +% city: + +\setuplettertext[\s!en][\v!city=City] +\setuplettertext[\s!nl][\v!city=] +\setuplettertext[\s!de][\v!city=Stadt] +\setuplettertext[\s!fr][\v!city=] +\setuplettertext[\s!it][\v!city=] +\setuplettertext[\s!es][\v!city=] + +% zip: + +\setuplettertext[\s!en][\v!zip=Zip] +\setuplettertext[\s!nl][\v!zip=] +\setuplettertext[\s!de][\v!zip=PLZ] +\setuplettertext[\s!fr][\v!zip=] +\setuplettertext[\s!it][\v!zip=] +\setuplettertext[\s!es][\v!zip=] + +% country: + +\setuplettertext[\s!en][\v!country=Country] +\setuplettertext[\s!nl][\v!country=] +\setuplettertext[\s!de][\v!country=Land] +\setuplettertext[\s!fr][\v!country=] +\setuplettertext[\s!it][\v!country=] +\setuplettertext[\s!es][\v!country=] + +% street: + +\setuplettertext[\s!en][\v!street=Street] +\setuplettertext[\s!nl][\v!street=] +\setuplettertext[\s!de][\v!street=Straße] +\setuplettertext[\s!fr][\v!street=] +\setuplettertext[\s!it][\v!street=] +\setuplettertext[\s!es][\v!street=] + +\stopmodule + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-01.mkvi b/Master/texmf-dist/tex/context/third/letter/base/s-cor-01.mkvi new file mode 100644 index 00000000000..2e8445b9d5d --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-01.mkvi @@ -0,0 +1,650 @@ +%D \module +%D [ file=s-cor-01, +%D version=2011.11.08, +%D title=\CONTEXT\ User Module, +%D subtitle=Letters, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\usemodule[cor-00] + +\startmodule[\v!letter] + +\setupmodule + [\c!style=dinb] + +% Commands + +\definecorrespondence[\v!letter] + +\def\defineletterlayer {\dodoubleargument\correspondence_layer_define [\v!letter]} +\def\definelettersection {\dodoubleargument\correspondence_section_define [\v!letter]} +\def\defineletterdescription {\dodoubleargument\correspondence_description_define [\v!letter]} + +\def\defineletterelements {\dotripleargument\correspondence_elements_define [\v!letter]} +\def\setupletterelements {\dotripleargument\correspondence_elements_define [\v!letter]} + +\def\setupletterstyle {\dotripleargument\correspondence_style_setup [\v!letter]} +\def\setupletterlayer {\dotripleargument\correspondence_layer_setup [\v!letter]} +\def\setupletterframe {\dotripleargument\correspondence_frame_setup [\v!letter]} +\def\setupletterlayout {\dotripleargument\correspondence_layout_setup [\v!letter]} +\def\setuplettersection {\dotripleargument\correspondence_section_setup [\v!letter]} +\def\setupletterdescription {\dotripleargument\correspondence_description_setup [\v!letter]} +\def\setupletteroptions {\dodoubleargument\correspondence_option_setup [\v!letter]} +\def\setupletter {\dodoubleargument\correspondence_setup [\v!letter]} + +\def\useletterstyle {\dodoubleargument\correspondence_file_load [\v!letter]} + +\def\defineletterelement {\doquadrupleargument\correspondence_element_define [\v!letter]} +\def\letterelement {\doquadrupleargument\correspondence_element_place [\v!letter]} + +\def\namedletterlayerparameter#element#key{\namedcorrespondencelayerparameter{\v!letter:#element}{#key}} +\def\namedletterframeparameter#element#key{\namedcorrespondenceframeparameter{\v!letter:#element}{#key}} + +% Layers + +\defineletterlayer [\v!head] +\defineletterlayer [\v!firsthead] +\defineletterlayer [\v!nexthead] +\defineletterlayer [\v!lefthead] +\defineletterlayer [\v!righthead] + +\defineletterlayer [\v!foot] +\defineletterlayer [\v!nextfoot] +\defineletterlayer [\v!leftfoot] +\defineletterlayer [\v!rightfoot] + +\defineletterlayer [\v!address] +\defineletterlayer [\v!backaddress] + +\defineletterlayer [\v!reference] +\defineletterlayer [\v!location] + +\defineletterlayer [\v!topmark] +\defineletterlayer [\v!botmark] +\defineletterlayer [\v!cutmark] +\defineletterlayer [\v!endmark] +\defineletterlayer [\v!usermark] + +\defineletterlayer [\v!lettermain] +\defineletterlayer [\v!letternext] + +% Section + +\definelettersection [\v!head] +\definelettersection [\v!date] +\definelettersection [\v!reference] +\definelettersection [\v!specialnotation] +\definelettersection [\v!address] +\definelettersection [\v!title] +\definelettersection [\v!subject] +\definelettersection [\v!opening] +\definelettersection [\v!content] +\definelettersection [\v!closing] +\definelettersection [\v!appendices] + +% Descriptions + +\defineletterdescription [\v!copy] +\defineletterdescription [\v!enclosure] +\defineletterdescription [\v!postscript] + +% Setups + +\defineletterelement[\v!layer][\v!head][\s!default] + {\correspondenceparameter\c!fromname + \doifsomething{\correspondenceparameter\c!fromname}\\ + \correspondenceparameter\c!fromaddress} + +\defineletterelement[\v!layer][\v!head][\v!left] + {\framed[\c!frame=\v!off,\c!align=\c!flushleft,\c!width=\v!broad,\c!offset=\zeropoint]\bgroup + \begingroup + \def\currentcorrespondencestyle{\v!letter:\c!fromname}% + \usecorrespondencestylestyleandcolor\c!style\c!color + \correspondenceparameter\c!fromname + \endgroup + \begingroup + \def\currentcorrespondencestyle{\v!letter:\c!fromaddress}% + \usecorrespondencestylestyleandcolor\c!style\c!color + \correspondenceparameter\c!fromaddress + \doifsomething{\correspondenceparameter\c!fromphone}{\\\correspondenceparameter\c!fromphone}% + \doifsomething{\correspondenceparameter\c!fromfax }{\\\correspondenceparameter\c!fromfax }% + \doifsomething{\correspondenceparameter\c!frommail }{\\\correspondenceparameter\c!frommail }% + \doifsomething{\correspondenceparameter\c!fromurl }{\\\correspondenceparameter\c!fromurl }% + \endgroup + \egroup} + +\defineletterelement[\v!layer][\v!head][\v!middle] + {\framed[\c!frame=\v!off,\c!align=\c!middle,\c!width=\v!broad,\c!offset=\zeropoint]\bgroup + \begingroup + \def\currentcorrespondencevalue{\v!letter:\c!fromname}% + \usecorrespondencestylestyleandcolor\c!style\c!color + \correspondenceparameter\c!fromname + \endgroup + \begingroup + \def\currentcorrespondencestyle{\v!letter:\c!fromaddress}% + \usecorrespondencestylestyleandcolor\c!style\c!color + \correspondenceparameter\c!fromaddress + \doifsomething{\correspondenceparameter\c!fromphone}{\\\correspondenceparameter\c!fromphone}% + \doifsomething{\correspondenceparameter\c!fromfax }{\\\correspondenceparameter\c!fromfax }% + \doifsomething{\correspondenceparameter\c!frommail }{\\\correspondenceparameter\c!frommail }% + \doifsomething{\correspondenceparameter\c!fromurl }{\\\correspondenceparameter\c!fromurl }% + \endgroup + \egroup} + +\defineletterelement[\v!layer][\v!head][\v!right] + {\framed[\c!frame=\v!off,\c!align=\c!flushright,\c!width=\v!broad,\c!offset=\zeropoint]\bgroup + \begingroup + \def\currentcorrespondencestyle{\v!letter:\c!fromname}% + \usecorrespondencestylestyleandcolor\c!style\c!color + \correspondenceparameter\c!fromname + \endgroup + \begingroup + \def\currentcorrespondencestyle{\v!letter:\c!fromaddress}% + \usecorrespondencestylestyleandcolor\c!style\c!color + \correspondenceparameter\c!fromaddress + \doifsomething{\correspondenceparameter\c!fromphone}{\\\correspondenceparameter\c!fromphone}% + \doifsomething{\correspondenceparameter\c!fromfax }{\\\correspondenceparameter\c!fromfax }% + \doifsomething{\correspondenceparameter\c!frommail }{\\\correspondenceparameter\c!frommail }% + \doifsomething{\correspondenceparameter\c!fromurl }{\\\correspondenceparameter\c!fromurl }% + \endgroup + \egroup} + +\defineletterelement[\v!layer][\v!head][\v!gbrief] + {\correspondenceparameter\c!fromname\hrule} + +\startsetups[\v!letter:\v!layer:\v!head] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!head][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!firsthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!firsthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!nexthead][\v!gbrief] + {\maxaligned + {\rlap{\correspondenceparameter\c!fromname} + \midaligned{\lettertext\v!page\subpagenumber\lettertext\v!of\lastsubpagenumber} + \llap{\correspondenceparameter\c!date}} + \hairline} + +\startsetups[\v!letter:\v!layer:\v!nexthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!nexthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!lefthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!lefthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!righthead] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!righthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!foot][\v!gbrief] + {\bTABLE[\c!frame=\v!off,\c!width=.25\hsize,\c!offset=\zeropoint] + \bTR[\c!style=\bfxx,\c!topframe=\v!on] + \bTD \lettertext\v!address \eTD + \bTD \lettertext\v!phone \eTD + \bTD \lettertext\v!email \eTD + \bTD \lettertext\v!bank \eTD + \eTR + \bTR + \bTD \correspondenceparameter\c!street \\\correspondenceparameter\c!city \eTD + \bTD \correspondenceparameter\c!phone \eTD + \bTD \correspondenceparameter\c!email \eTD + \bTD \correspondenceparameter\c!bankname\\\correspondenceparameter\c!banknumber\\\correspondenceparameter\c!accountnumber \eTD + \eTR + \eTABLE} + + +\startsetups[\v!letter:\v!layer:\v!foot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!foot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!nextfoot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!nextfoot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!leftfoot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!leftfoot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!layer:\v!rightfoot] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!rightfoot][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!address][\s!default] + {\doifsomething{\correspondenceparameter\c!dispatch}{\correspondenceparameter\c!dispatch\\}% + \doifsomething{\correspondenceparameter\c!toname }{\correspondenceparameter\c!toname \\}% + \correspondenceparameter\c!toaddress} + +\startsetups[\v!letter:\v!layer:\v!address] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!address][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!backaddress][\s!default] + {\correspondenceparameter\c!fromname + \doifsomething{\correspondenceparameter\c!fromaddress}\\ + \correspondenceparameter\c!fromaddress} + +\defineletterelement[\v!layer][\v!backaddress][\v!auto] + {\doifsomethingelse{\correspondenceparameter\c!backaddress} + {\correspondenceparameter\c!backaddress} + {\letterelement[\v!layer][\v!backaddress][\s!default]}} + +\startsetups[\v!letter:\v!layer:\v!backaddress] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!backaddress][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!reference][\s!default] + {\correspondenceparameter\c!reference} + +\defineletterelement[\v!layer][\v!reference][\v!a] % line + {\ctxlua{thirddata.correspondence.letter.reference_a("\v!letter","\correspondencelayerparameter\c!list")}} + +\defineletterelement[\v!layer][\v!reference][\v!b] % block + {\ctxlua{thirddata.correspondence.letter.reference_b("\v!letter","\correspondencelayerparameter\c!list")}} + +\defineletterelement[\v!layer][\v!reference][\v!c] % argument + {\ctxlua{thirddata.correspondence.letter.reference_c("\v!letter","\correspondencelayerparameter\c!list")}} + +\defineletterelement[\v!layer][\v!reference][\v!d] % table + {\ctxlua{thirddata.correspondence.letter.reference_d("\v!letter","\correspondencelayerparameter\c!list")}} + +\defineletterelement[\v!layer][\v!reference][\v!e] % width + {\ctxlua{thirddata.correspondence.letter.reference_e("\v!letter","\correspondencelayerparameter\c!list")}} + +\startsetups[\v!letter:\v!layer:\v!reference] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!reference][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!layer][\v!location][\v!french] + {\doifsomething{\correspondenceparameter\c!place}{\correspondenceparameter\c!place\\}% + \correspondenceparameter\c!date} + +\startsetups[\v!letter:\v!layer:\v!location] +\def\\{\correspondencelayerparameter\c!separator} +\letterelement[\v!layer][\v!location][\correspondencelayerparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!title][\s!default] + {\doifsomethingelse{\correspondenceparameter\c!title} + {\correspondenceparameter\c!title} + {\lettertext\v!attention\correspondenceparameter\c!attention}} + +\startsetups[\v!letter:\v!section:\v!title] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!title][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!subject][\s!default] + {\lettertext\v!subject\correspondenceparameter\c!subject} + +\startsetups[\v!letter:\v!section:\v!subject] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!subject][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!opening][\s!default] + {\doifsomethingelse{\correspondenceparameter\c!opening} + {\correspondenceparameter\c!opening} + {\correspondenceparameter\c!salutation}} + +\defineletterelement[\v!section][\v!opening][\v!french] + {\doifsomething{\correspondenceoptionparameter\c!indenting}{\setupindenting[\correspondenceoptionparameter\c!indenting]}% + \letterelement[\v!section][\v!opening][\s!default]} + +\startsetups[\v!letter:\v!section:\v!opening] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!opening][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!content][\s!default] + {\getbuffer[\v!letter]} + +\startsetups[\v!letter:\v!section:\v!content] +\letterelement[\v!section][\v!content][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!closing][\s!default] + {\correspondenceparameter\c!closing + \doifsomething{\correspondenceparameter\c!signature} + {\blank[\correspondencesectionparameter\c!spaceinbetween]% + \correspondenceparameter\c!signature}} + +\defineletterelement[\v!section][\v!closing][\v!french] + {\doifsomething{\correspondenceoptionparameter\c!indenting}{\setupindenting[\correspondenceoptionparameter\c!indenting,\v!first]}% + \correspondenceparameter\c!closing + \doifsomething{\correspondenceparameter\c!signature} + {\blank[\correspondencesectionparameter\c!spaceinbetween]% + \raggedcenter\doadaptleftskip{.5\textwidth}% + \correspondenceparameter\c!signature\endgraf}} + +\startsetups[\v!letter:\v!section:\v!closing] +\def\\{\correspondencesectionparameter\c!separator} +\letterelement[\v!section][\v!closing][\correspondencesectionparameter\c!alternative] +\stopsetups + +\defineletterelement[\v!section][\v!appendices][\s!default] + {\startpacked + \normalexpanded{\processcommalistwithparameters[\correspondence_elements_access\v!letter\v!description]}{\correspondence_description_place[\v!letter]}% + \stoppacked} + +\startsetups[\v!letter:\v!section:\v!appendices] +\letterelement[\v!section][\v!appendices][\correspondencesectionparameter\c!alternative] +\stopsetups + +\startsetups[\v!letter:\v!place] +\correspondence_place[\v!letter] +\stopsetups + +% Files + +\useletterstyle[default,\currentmoduleparameter\c!style] + +% Extras + +\appendtoks + \ifx\currentcorrespondence\v!letter + \doif{\correspondenceoptionparameter\c!option}\v!test{\useletterstyle[test]}% + \fi +\to \everybeforecorrespondence + +\appendtoks + \ifx\currentcorrespondence\v!letter + \doif{\correspondenceoptionparameter\c!marking}\v!no{\setupletterlayer[\v!topmark,\v!botmark,\v!cutmark,\v!endmark,\v!usermark][\c!state=\v!stop]}% + \fi +\to \everybeforecorrespondence + +\appendtoks + \ifx\currentcorrespondence\v!letter + \doif{\correspondenceoptionparameter\c!position}\v!yes + {\setbox\scratchbox\vbox{\letterelement[\v!layer][\v!reference][\correspondencelayerparameter\c!alternative]}% + \normalexpanded + {\setupletterlayout + [\v!firstpage] + [\c!topspace=\dimexpr\namedletterlayerparameter\v!reference\c!y+\ht\scratchbox+\namedletterlayerparameter\v!reference\c!distance\relax]}}% + \fi +\to \everybeforecorrespondence + +% Labels + +\definelabelclass [letter] + +% name: + +\setuplettertext[\s!en][\v!name=Name] +\setuplettertext[\s!nl][\v!name=] +\setuplettertext[\s!de][\v!name=Name] +\setuplettertext[\s!fr][\v!name=Nom] +\setuplettertext[\s!it][\v!name=] +\setuplettertext[\s!es][\v!name=] + +% room: + +\setuplettertext[\s!en][\v!room=Room] +\setuplettertext[\s!nl][\v!room=] +\setuplettertext[\s!de][\v!room=Zimmer] +\setuplettertext[\s!fr][\v!room=Salle] % Salle or Pièce +\setuplettertext[\s!it][\v!room=] +\setuplettertext[\s!es][\v!room=] + +% yourref: + +\setuplettertext[\s!en][\v!yourref=Your ref.] +\setuplettertext[\s!nl][\v!yourref=Uw kenmerk] +\setuplettertext[\s!de][\v!yourref=Ihr Zeichen] +\setuplettertext[\s!fr][\v!yourref=Vos références] +\setuplettertext[\s!it][\v!yourref=Vs./Rif.] +\setuplettertext[\s!es][\v!yourref=Su ref.] + +% yourmail: + +\setuplettertext[\s!en][\v!yourmail=Your letter of] +\setuplettertext[\s!nl][\v!yourmail=Uw brief van] +\setuplettertext[\s!de][\v!yourmail=Ihre Nachricht vom] +\setuplettertext[\s!fr][\v!yourmail=Votre lettre du] +\setuplettertext[\s!it][\v!yourmail=Vs.~lettera del] +\setuplettertext[\s!es][\v!yourmail=Su carta de] + +% myref: + +\setuplettertext[\s!en][\v!myref=Our ref.] +\setuplettertext[\s!nl][\v!myref=Ons kenmerk] +\setuplettertext[\s!de][\v!myref=Unser Zeichen] +\setuplettertext[\s!fr][\v!myref=Nos références] +\setuplettertext[\s!it][\v!myref=Ns./Rif.] +\setuplettertext[\s!es][\v!myref=Nuestra ref.] + +% mymail: + +\setuplettertext[\s!en][\v!mymail=Our letter of] +\setuplettertext[\s!nl][\v!mymail=Ons brief van] +\setuplettertext[\s!de][\v!mymail=Unsere Nachricht vom] +\setuplettertext[\s!fr][\v!mymail=Notre lettre du] +\setuplettertext[\s!it][\v!mymail=] +\setuplettertext[\s!es][\v!mymail=] + +% customer: + +\setuplettertext[\s!en][\v!customer=Customer no.] +\setuplettertext[\s!nl][\v!customer=Klant No.] +\setuplettertext[\s!de][\v!customer=Kundennummer] +\setuplettertext[\s!fr][\v!customer=Numéro de client] +\setuplettertext[\s!it][\v!customer=Nr.~cliente] +\setuplettertext[\s!es][\v!customer=No. de cliente] + +% invoice: + +\setuplettertext[\s!en][\v!invoice=Invoice no.] +\setuplettertext[\s!nl][\v!invoice=Rekening No.] +\setuplettertext[\s!de][\v!invoice=Rechnungsnummer] +\setuplettertext[\s!fr][\v!invoice=Numéro de facture] +\setuplettertext[\s!it][\v!invoice=Nr.~fattura] +\setuplettertext[\s!es][\v!invoice=No. de factura] + +% attention: + +\setuplettertext[\s!en][\v!attention=] % Attention +\setuplettertext[\s!nl][\v!attention=] +\setuplettertext[\s!de][\v!attention=] +\setuplettertext[\s!fr][\v!attention=] +\setuplettertext[\s!it][\v!attention=] +\setuplettertext[\s!es][\v!attention=] + +% subject: + +\setuplettertext[\s!en][\v!subject=] % Subject +\setuplettertext[\s!nl][\v!subject=] % Onderwerp +\setuplettertext[\s!de][\v!subject=] % Betrifft +\setuplettertext[\s!fr][\v!subject=] % Concernant or Sujet +\setuplettertext[\s!it][\v!subject=] % Oggetto +\setuplettertext[\s!es][\v!subject=] % Asunto + +% cc: + +\setuplettertext[\s!en][\v!copy=cc] +\setuplettertext[\s!nl][\v!copy=Kopie aan] +\setuplettertext[\s!de][\v!copy=Kopien an] +\setuplettertext[\s!fr][\v!copy=Copieà] +\setuplettertext[\s!it][\v!copy=Per conoscenza] +\setuplettertext[\s!es][\v!copy=Copias] + +% enclosure: + +\setuplettertext[\s!en][\v!enclosure=encl] +\setuplettertext[\s!nl][\v!enclosure=Bijlage(n)] +\setuplettertext[\s!de][\v!enclosure=Anlagen] +\setuplettertext[\s!fr][\v!enclosure=Annexes] +\setuplettertext[\s!it][\v!enclosure=Allegato] +\setuplettertext[\s!es][\v!enclosure=Adjunto] + +% to: + +\setuplettertext[\s!en][\v!to=To] +\setuplettertext[\s!nl][\v!to=Aan] +\setuplettertext[\s!de][\v!to=An] +\setuplettertext[\s!fr][\v!to=À] +\setuplettertext[\s!it][\v!to=A] +\setuplettertext[\s!es][\v!to=A] + +% toname: + +\setuplettertext[\s!en][\v!toname=To] +\setuplettertext[\s!nl][\v!toname=Aan] +\setuplettertext[\s!de][\v!toname=An] +\setuplettertext[\s!fr][\v!toname=À] +\setuplettertext[\s!it][\v!toname=A] +\setuplettertext[\s!es][\v!toname=A] + +% from: + +\setuplettertext[\s!en][\v!from=From] +\setuplettertext[\s!nl][\v!from=Van] +\setuplettertext[\s!de][\v!from=Von] +\setuplettertext[\s!fr][\v!from=De] +\setuplettertext[\s!it][\v!from=Da] +\setuplettertext[\s!es][\v!from=De] + +% fromname: + +\setuplettertext[\s!en][\v!fromname=From] +\setuplettertext[\s!nl][\v!fromname=Van] +\setuplettertext[\s!de][\v!fromname=Von] +\setuplettertext[\s!fr][\v!fromname=De] +\setuplettertext[\s!it][\v!fromname=Da] +\setuplettertext[\s!es][\v!fromname=De] + +% date: + +\setuplettertext[\s!en][\v!date=Date] +\setuplettertext[\s!nl][\v!date=Datum] +\setuplettertext[\s!de][\v!date=Datum] +\setuplettertext[\s!fr][\v!date=Date] +\setuplettertext[\s!it][\v!date=Data] +\setuplettertext[\s!es][\v!date=Fecha] + +% phone: + +\setuplettertext[\s!en][\v!phone=Phone] +\setuplettertext[\s!nl][\v!phone=Telefoon] +\setuplettertext[\s!de][\v!phone=Telefon] +\setuplettertext[\s!fr][\v!phone=Téléphone] +\setuplettertext[\s!it][\v!phone=Telefono] +\setuplettertext[\s!es][\v!phone=Teléfono] + +% fax: + +\setuplettertext[\s!en][\v!fax=Fax] +\setuplettertext[\s!nl][\v!fax=Fax] +\setuplettertext[\s!de][\v!fax=Fax] +\setuplettertext[\s!fr][\v!fax=Téléfax] % or Fax +\setuplettertext[\s!it][\v!fax=Fax] +\setuplettertext[\s!es][\v!fax=Fax] + +% email: + +\setuplettertext[\s!en][\v!email=Email] +\setuplettertext[\s!nl][\v!email=E–mail] +\setuplettertext[\s!de][\v!email=E-Mail] +\setuplettertext[\s!fr][\v!email=Courriel] % Adresse électronique +\setuplettertext[\s!it][\v!email=Email] +\setuplettertext[\s!es][\v!email=Email] + +% url: + +\setuplettertext[\s!en][\v!url=Url] +\setuplettertext[\s!nl][\v!url=URL] +\setuplettertext[\s!de][\v!url=URL] +\setuplettertext[\s!fr][\v!url=Site web] +\setuplettertext[\s!it][\v!url=Sito Web] +\setuplettertext[\s!es][\v!url=URL] + +% bank: + +\setuplettertext[\s!en][\v!bank=Bank account] +\setuplettertext[\s!nl][\v!bank=Bankrekening] +\setuplettertext[\s!de][\v!bank=Bankverbindung] +\setuplettertext[\s!fr][\v!bank=Compte en banque] +\setuplettertext[\s!it][\v!bank=Conto bancario] +\setuplettertext[\s!es][\v!bank=Cuenta bancaria] + +% organization: + +\setuplettertext[\s!en][\v!organization=Organization] +\setuplettertext[\s!nl][\v!organization=] +\setuplettertext[\s!de][\v!organization=Organisation] +\setuplettertext[\s!fr][\v!organization=] +\setuplettertext[\s!it][\v!organization=] +\setuplettertext[\s!es][\v!organization=] + +% city: + +\setuplettertext[\s!en][\v!city=City] +\setuplettertext[\s!nl][\v!city=] +\setuplettertext[\s!de][\v!city=Stadt] +\setuplettertext[\s!fr][\v!city=] +\setuplettertext[\s!it][\v!city=] +\setuplettertext[\s!es][\v!city=] + +% zip: + +\setuplettertext[\s!en][\v!zip=Zip] +\setuplettertext[\s!nl][\v!zip=] +\setuplettertext[\s!de][\v!zip=PLZ] +\setuplettertext[\s!fr][\v!zip=] +\setuplettertext[\s!it][\v!zip=] +\setuplettertext[\s!es][\v!zip=] + +% country: + +\setuplettertext[\s!en][\v!country=Country] +\setuplettertext[\s!nl][\v!country=] +\setuplettertext[\s!de][\v!country=Land] +\setuplettertext[\s!fr][\v!country=] +\setuplettertext[\s!it][\v!country=] +\setuplettertext[\s!es][\v!country=] + +% street: + +\setuplettertext[\s!en][\v!street=Street] +\setuplettertext[\s!nl][\v!street=] +\setuplettertext[\s!de][\v!street=Straße] +\setuplettertext[\s!fr][\v!street=] +\setuplettertext[\s!it][\v!street=] +\setuplettertext[\s!es][\v!street=] + +\stopmodule + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-02.mkii b/Master/texmf-dist/tex/context/third/letter/base/s-cor-02.mkii new file mode 100644 index 00000000000..ad015525424 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-02.mkii @@ -0,0 +1,375 @@ +%D \module +%D [ file=s-cor-02, +%D version=2011.12.08, +%D title=\CONTEXT\ User Module, +%D subtitle=Memos, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\usemodule[cor-00] + +\startmodule[\v!memo] + +\setupmodule + [\c!style=memo] + +% Commands + +\definecorrespondence[\v!memo] + +\def\definememolayer {\dodoubleargument\definecorrespondencelayer [\v!memo]} +\def\definememosection {\dodoubleargument\definecorrespondencesection [\v!memo]} +\def\definememodescription {\dodoubleargument\definecorrespondencedescription [\v!memo]} + +\def\definememoelements {\dotripleargument\definecorrespondenceelements [\v!memo]} +\def\setupmemoelements {\dotripleargument\setupcorrespondenceelements [\v!memo]} + +\def\setupmemostyle {\dotripleargument\setupcorrespondencestyle [\v!memo]} +\def\setupmemolayer {\dotripleargument\setupcorrespondencelayer [\v!memo]} +\def\setupmemoframe {\dotripleargument\setupcorrespondenceframe [\v!memo]} +\def\setupmemolayout {\dotripleargument\setupcorrespondencelayout [\v!memo]} +\def\setupmemosection {\dotripleargument\setupcorrespondencesection [\v!memo]} +\def\setupmemodescription {\dotripleargument\setupcorrespondencedescription [\v!memo]} +\def\setupmemooptions {\dodoubleargument\setupcorrespondenceoption [\v!memo]} +\def\setupmemo {\dodoubleargument\setupcorrespondence [\v!memo]} + +\def\usememostyle {\dodoubleargument\loadcorrespondencefile [\v!memo]} + +\def\definememoelement {\doquadrupleargument\definecorrespondenceelement [\v!memo]} +\def\memoelement {\doquadrupleargument\placecorrespondenceelement [\v!memo]} + +% Layers + +\definememolayer [\v!firsthead] +\definememolayer [\v!nexthead] +\definememolayer [\v!lefthead] +\definememolayer [\v!righthead] + +\definememolayer [\v!topmark] +\definememolayer [\v!botmark] +\definememolayer [\v!cutmark] +\definememolayer [\v!endmark] +\definememolayer [\v!usermark] + +\definememolayer [\v!memomain] +\definememolayer [\v!memonext] + +% Section + +\definememosection [\v!head] +\definememosection [\v!date] +\definememosection [\v!reference] +\definememosection [\v!specialnotation] +\definememosection [\v!address] +\definememosection [\v!title] +\definememosection [\v!opening] +\definememosection [\v!subject] +\definememosection [\v!content] +\definememosection [\v!closing] +\definememosection [\v!appendices] + +% Descriptions + +\definememodescription [\v!copy] +\definememodescription [\v!enclosure] +\definememodescription [\v!postscript] + +% Setups + +\definememoelement[\v!section][\v!head][\s!default] + {\correspondenceparameter\c!fromaddress} + +\definememoelement[\v!section][\v!head][\v!memo] + {\startpacked + \doifsomething{\correspondenceparameter\c!fromname}{\memotext\v!fromname \correspondenceparameter\c!fromname \par} + \doifsomething{\correspondenceparameter\c!date }{\memotext\v!date \correspondenceparameter\c!date \par} + \doifsomething{\correspondenceparameter\c!toname }{\memotext\v!toname \correspondenceparameter\c!toname \par} + \doifsomething{\correspondenceparameter\c!subject }{\memotext\v!subject \correspondenceparameter\c!subject \par} + \stoppacked} + +\unexpanded\def\doformatmemoheadTABLE#1#2% + {\doifsomething{\correspondenceparameter{#2}} + {\NC % label + \def\currentcorrespondencestyle{\v!memo:#1}% + \usecorrespondencestylestyleandcolor\c!titlestyle\c!titlecolor + \memotext{#1}% + \EQ % text + \def\currentcorrespondencestyle{\v!memo:#1}% + \usecorrespondencestylestyleandcolor\c!textstyle\c!textcolor + \correspondenceparameter{#2}% + \NC\NR}} + +\definememoelement[\v!section][\v!head][\v!table] + {\starttabulate[|l|p|] + \doformatmemoheadTABLE\v!fromname\c!fromname + \doformatmemoheadTABLE\v!date \c!date + \doformatmemoheadTABLE\v!toname \c!toname + \doformatmemoheadTABLE\v!subject \c!subject + \stoptabulate} + +\unexpanded\def\doformatmemoheadMARGIN#1#2% + {\doifsomething{\correspondenceparameter{#2}} + {\def\currentcorrespondencestyle{\v!memo:#1}% + \dontleavehmode\llap\bgroup % label + \usecorrespondencestylestyleandcolor\c!titlestyle\c!titlecolor + \memotext{#1}% + \hskip\leftmargindistance + \egroup + \bgroup + \usecorrespondencestylestyleandcolor\c!textstyle\c!textcolor + \correspondenceparameter{#2}% + \egroup + \par}} + +\definememoelement[\v!section][\v!head][\v!margin] + {\startpacked + \doformatmemoheadMARGIN\v!fromname\c!fromname + \doformatmemoheadMARGIN\v!date \c!date + \doformatmemoheadMARGIN\v!toname \c!toname + \doformatmemoheadMARGIN\v!subject \c!subject + \stoppacked} + +\startsetups[\v!memo:\v!section:\v!head] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!head][\correspondencesectionparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!layer:\v!firsthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!firsthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\definememoelement[\v!layer][\v!nexthead][\v!fullblock] + {\maxaligned + {\rlap{\correspondenceparameter\c!toname}% + \midaligned{\pagenumber}% + \llap{\framed[\c!frame=\v!off,\c!location=\v!top,\c!align=\v!left] + {\correspondenceparameter\c!date \\ + \correspondenceparameter\c!reference}}}} + +\definememoelement[\v!layer][\v!nexthead][\v!hanging] + {\maxaligned + {\framed[\c!frame=\v!off,\c!location=\v!top,\c!align=v!right] + {\correspondenceparameter\c!toname \\ + \correspondenceparameter\c!date \\ + \correspondenceparameter\c!reference \\ + \memotext\c!page\pagenumber}}\hss} + +\definememoelement[\v!layer][\v!nexthead][\v!semiblock] + {\maxaligned + {\rlap{\correspondenceparameter\c!toname}% + \midaligned{\pagenumber}% + \llap{\correspondenceparameter\c!date}}} + +\definememoelement[\v!layer][\v!nexthead][\v!simplified] + {\memoelement[\v!layer][\v!nexthead][\v!fullblock]} + +\definememoelement[\v!layer][\v!nexthead][\v!modified] + {\memoelement[\v!layer][\v!nexthead][\v!hanging]} + +\startsetups[\v!memo:\v!layer:\v!nexthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!nexthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!layer:\v!lefthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!lefthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!layer:\v!righthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!righthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!date][\s!default] + {\correspondenceparameter\c!date} + +\startsetups[\v!memo:\v!section:\v!date] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!date][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!reference][\s!default] + {\correspondenceparameter\c!reference} + +\startsetups[\v!memo:\v!section:\v!reference] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!reference][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!specialnotation][\s!default] + {\correspondenceparameter\c!dispatch} + +\startsetups[\v!memo:\v!section:\v!specialnotation] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!specialnotation][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!address][\s!default] + {\correspondenceparameter\c!toname + \doifsomething{\correspondenceparameter\c!toname}\\ + \correspondenceparameter\c!toaddress} + +\startsetups[\v!memo:\v!section:\v!address] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!address][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!title][\s!default] + {\correspondenceparameter\c!title} + +\startsetups[\v!memo:\v!section:\v!title] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!title][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!opening][\s!default] + {\correspondenceparameter\c!opening} + +\startmode[\v!memo:\v!section:\v!opening] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!opening][\correspondencesectionparameter\c!alternative] +\stopmode + +\definememoelement[\v!section][\v!subject][\s!default] + {\memotext\v!subject\correspondenceparameter\c!subject} + +\startsetups[\v!memo:\v!section:\v!subject] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!subject][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!content][\s!default] + {\getbuffer[\v!memo]} + +\startsetups[\v!memo:\v!section:\v!content] +\memoelement[\v!section][\v!content][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!closing][\s!default] + {\correspondenceparameter\c!closing + \doifsomething{\correspondenceparameter\c!signature} + {\blank[\correspondencesectionparameter\c!spaceinbetween]% + \correspondenceparameter\c!signature}} + +\startsetups[\v!memo:\v!section:\v!closing] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!closing][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!appendices][\s!default] + {\startpacked + \expanded{\processcommalistwithparameters[\accesscorrespondenceelements\v!memo\v!description]}{\placecorrespondencedescription[\v!memo]}% + \stoppacked} + +\startsetups[\v!memo:\v!section:\v!appendices] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!appendices][\correspondencesectionparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!place] +\placecorrespondence[\v!memo] +\stopsetups + +% Files + +\usememostyle[default,\currentmoduleparameter\c!style] + +% Extras + +\appendtoks + \ifx\currentcorrespondence\v!memo + \doif{\correspondenceoptionparameter\c!option}\v!test{\usememostyle[test]}% + \fi +\to \everybeforecorrespondence + +\appendtoks + \ifx\currentcorrespondence\v!memo + \doif{\correspondenceoptionparameter\c!marking}\v!no{\setupmemolayer[\v!topmark,\v!botmark,\v!cutmark,\v!endmark,\v!usermark][\c!state=\v!stop]}% + \fi +\to \everybeforecorrespondence + +% Labels + +\def\setupmemotext + {\dodoubleempty\dosetupmemotext} + +\def\dosetupmemotext[#1][#2]% + {\ifsecondargument + \def\dodosetupmemotext##1{\setuplabeltext[#1][\v!memo:##1]}% + \processcommalist[#2]\dodosetupmemotext + \else + \def\dodosetupmemotext##1{\setuplabeltext [\v!memo:##1]}% + \processcommalist[#1]\dodosetupmemotext + \fi} + +\def\memotext#1{\labeltext{\v!memo:#1}} + +% page: + +\setupmemotext[\s!en][\v!page=Page~] +\setupmemotext[\s!nl][\v!page=] +\setupmemotext[\s!de][\v!page=Seite~] +\setupmemotext[\s!fr][\v!page=] +\setupmemotext[\s!it][\v!page=] +\setupmemotext[\s!es][\v!page=] + +% date: + +\setupmemotext[\s!en][\v!date=Date: ] +\setupmemotext[\s!nl][\v!date=Datum: ] +\setupmemotext[\s!de][\v!date=Datum: ] +\setupmemotext[\s!fr][\v!date=Date\thinspace: ] +\setupmemotext[\s!it][\v!date=Data: ] +\setupmemotext[\s!es][\v!date=Fecha: ] + +% fromname: + +\setupmemotext[\s!en][\v!fromname=From: ] +\setupmemotext[\s!nl][\v!fromname=Van: ] +\setupmemotext[\s!de][\v!fromname=Von: ] +\setupmemotext[\s!fr][\v!fromname=De\thinspace: ] +\setupmemotext[\s!it][\v!fromname=Da: ] +\setupmemotext[\s!es][\v!fromname=De: ] + +% toname: + +\setupmemotext[\s!en][\v!toname=To: ] +\setupmemotext[\s!nl][\v!toname=Aan: ] +\setupmemotext[\s!de][\v!toname=An: ] +\setupmemotext[\s!fr][\v!toname=\Agrave\thinspace: ] +\setupmemotext[\s!it][\v!toname=A: ] +\setupmemotext[\s!es][\v!toname=A: ] + +% subject: + +\setupmemotext[\s!en][\v!subject=Subject: ] +\setupmemotext[\s!nl][\v!subject=Onderwerp: ] +\setupmemotext[\s!de][\v!subject=Betrifft: ] +\setupmemotext[\s!fr][\v!subject=Concernant\thinspace: ] +\setupmemotext[\s!it][\v!subject=Oggetto: ] +\setupmemotext[\s!es][\v!subject=Asunto: ] + +\stopmodule + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/s-cor-02.mkvi b/Master/texmf-dist/tex/context/third/letter/base/s-cor-02.mkvi new file mode 100644 index 00000000000..3b6f585ff8c --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/s-cor-02.mkvi @@ -0,0 +1,363 @@ +%D \module +%D [ file=s-cor-02, +%D version=2011.12.08, +%D title=\CONTEXT\ User Module, +%D subtitle=Memos, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\usemodule[cor-00] + +\startmodule[\v!memo] + +\setupmodule + [\c!style=memo] + +% Commands + +\definecorrespondence[\v!memo] + +\def\definememolayer {\dodoubleargument\correspondence_layer_define [\v!memo]} +\def\definememosection {\dodoubleargument\correspondence_section_define [\v!memo]} +\def\definememodescription {\dodoubleargument\correspondence_description_define [\v!memo]} + +\def\definememoelements {\dotripleargument\correspondence_elements_define [\v!memo]} +\def\setupmemoelements {\dotripleargument\correspondence_elements_define [\v!memo]} + +\def\setupmemostyle {\dotripleargument\correspondence_style_setup [\v!memo]} +\def\setupmemolayer {\dotripleargument\correspondence_layer_setup [\v!memo]} +\def\setupmemoframe {\dotripleargument\correspondence_frame_setup [\v!memo]} +\def\setupmemolayout {\dotripleargument\correspondence_layout_setup [\v!memo]} +\def\setupmemosection {\dotripleargument\correspondence_section_setup [\v!memo]} +\def\setupmemodescription {\dotripleargument\correspondence_description_setup [\v!memo]} +\def\setupmemooptions {\dodoubleargument\correspondence_option_setup [\v!memo]} +\def\setupmemo {\dodoubleargument\correspondence_setup [\v!memo]} + +\def\usememostyle {\dodoubleargument\correspondence_file_load [\v!memo]} + +\def\definememoelement {\doquadrupleargument\correspondence_element_define [\v!memo]} +\def\memoelement {\doquadrupleargument\correspondence_element_place [\v!memo]} + +% Layers + +\definememolayer [\v!firsthead] +\definememolayer [\v!nexthead] +\definememolayer [\v!lefthead] +\definememolayer [\v!righthead] + +\definememolayer [\v!topmark] +\definememolayer [\v!botmark] +\definememolayer [\v!cutmark] +\definememolayer [\v!endmark] +\definememolayer [\v!usermark] + +\definememolayer [\v!memomain] +\definememolayer [\v!memonext] + +% Section + +\definememosection [\v!head] +\definememosection [\v!date] +\definememosection [\v!reference] +\definememosection [\v!specialnotation] +\definememosection [\v!address] +\definememosection [\v!title] +\definememosection [\v!opening] +\definememosection [\v!subject] +\definememosection [\v!content] +\definememosection [\v!closing] +\definememosection [\v!appendices] + +% Descriptions + +\definememodescription [\v!copy] +\definememodescription [\v!enclosure] +\definememodescription [\v!postscript] + +% Setups + +\definememoelement[\v!section][\v!head][\s!default] + {\correspondenceparameter\c!fromaddress} + +\definememoelement[\v!section][\v!head][\v!memo] + {\startpacked + \doifsomething{\correspondenceparameter\c!fromname}{\memotext\v!fromname \correspondenceparameter\c!fromname \par} + \doifsomething{\correspondenceparameter\c!date }{\memotext\v!date \correspondenceparameter\c!date \par} + \doifsomething{\correspondenceparameter\c!toname }{\memotext\v!toname \correspondenceparameter\c!toname \par} + \doifsomething{\correspondenceparameter\c!subject }{\memotext\v!subject \correspondenceparameter\c!subject \par} + \stoppacked} + +\unexpanded\def\correspondence_memo_head_table#label#text% + {\doifsomething{\correspondenceparameter{#text}} + {\NC % label + \def\currentcorrespondencestyle{\v!memo:#label}% + \usecorrespondencestylestyleandcolor\c!titlestyle\c!titlecolor + \memotext{#label}% + \EQ % text + \def\currentcorrespondencestyle{\v!memo:#label}% + \usecorrespondencestylestyleandcolor\c!textstyle\c!textcolor + \correspondenceparameter{#text}% + \NC\NR}} + +\definememoelement[\v!section][\v!head][\v!table] + {\starttabulate[|l|p|] + \correspondence_memo_head_table\v!fromname\c!fromname + \correspondence_memo_head_table\v!date \c!date + \correspondence_memo_head_table\v!toname \c!toname + \correspondence_memo_head_table\v!subject \c!subject + \stoptabulate} + +\unexpanded\def\correspondence_memo_head_margin#label#text% + {\doifsomething{\correspondenceparameter{#text}} + {\def\currentcorrespondencestyle{\v!memo:#label}% + \dontleavehmode\llap\bgroup % label + \usecorrespondencestylestyleandcolor\c!titlestyle\c!titlecolor + \memotext{#label}% + \hskip\leftmargindistance + \egroup + \bgroup + \usecorrespondencestylestyleandcolor\c!textstyle\c!textcolor + \correspondenceparameter{#text}% + \egroup + \par}} + +\definememoelement[\v!section][\v!head][\v!margin] + {\startpacked + \correspondence_memo_head_margin\v!fromname\c!fromname + \correspondence_memo_head_margin\v!date \c!date + \correspondence_memo_head_margin\v!toname \c!toname + \correspondence_memo_head_margin\v!subject \c!subject + \stoppacked} + +\startsetups[\v!memo:\v!section:\v!head] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!head][\correspondencesectionparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!layer:\v!firsthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!firsthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\definememoelement[\v!layer][\v!nexthead][\v!fullblock] + {\maxaligned + {\rlap{\correspondenceparameter\c!toname}% + \midaligned{\pagenumber}% + \llap{\framed[\c!frame=\v!off,\c!location=\v!top,\c!align=\v!left] + {\correspondenceparameter\c!date \\ + \correspondenceparameter\c!reference}}}} + +\definememoelement[\v!layer][\v!nexthead][\v!hanging] + {\maxaligned + {\framed[\c!frame=\v!off,\c!location=\v!top,\c!align=v!right] + {\correspondenceparameter\c!toname \\ + \correspondenceparameter\c!date \\ + \correspondenceparameter\c!reference \\ + \memotext\c!page\pagenumber}}\hss} + +\definememoelement[\v!layer][\v!nexthead][\v!semiblock] + {\maxaligned + {\rlap{\correspondenceparameter\c!toname}% + \midaligned{\pagenumber}% + \llap{\correspondenceparameter\c!date}}} + +\definememoelement[\v!layer][\v!nexthead][\v!simplified] + {\memoelement[\v!layer][\v!nexthead][\v!fullblock]} + +\definememoelement[\v!layer][\v!nexthead][\v!modified] + {\memoelement[\v!layer][\v!nexthead][\v!hanging]} + +\startsetups[\v!memo:\v!layer:\v!nexthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!nexthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!layer:\v!lefthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!lefthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!layer:\v!righthead] +\def\\{\correspondencelayerparameter\c!separator} +\memoelement[\v!layer][\v!righthead][\correspondencelayerparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!date][\s!default] + {\correspondenceparameter\c!date} + +\startsetups[\v!memo:\v!section:\v!date] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!date][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!reference][\s!default] + {\correspondenceparameter\c!reference} + +\startsetups[\v!memo:\v!section:\v!reference] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!reference][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!specialnotation][\s!default] + {\correspondenceparameter\c!dispatch} + +\startsetups[\v!memo:\v!section:\v!specialnotation] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!specialnotation][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!address][\s!default] + {\correspondenceparameter\c!toname + \doifsomething{\correspondenceparameter\c!toname}\\ + \correspondenceparameter\c!toaddress} + +\startsetups[\v!memo:\v!section:\v!address] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!address][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!title][\s!default] + {\correspondenceparameter\c!title} + +\startsetups[\v!memo:\v!section:\v!title] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!title][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!opening][\s!default] + {\correspondenceparameter\c!opening} + +\startmode[\v!memo:\v!section:\v!opening] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!opening][\correspondencesectionparameter\c!alternative] +\stopmode + +\definememoelement[\v!section][\v!subject][\s!default] + {\memotext\v!subject\correspondenceparameter\c!subject} + +\startsetups[\v!memo:\v!section:\v!subject] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!subject][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!content][\s!default] + {\getbuffer[\v!memo]} + +\startsetups[\v!memo:\v!section:\v!content] +\memoelement[\v!section][\v!content][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!closing][\s!default] + {\correspondenceparameter\c!closing + \doifsomething{\correspondenceparameter\c!signature} + {\blank[\correspondencesectionparameter\c!spaceinbetween]% + \correspondenceparameter\c!signature}} + +\startsetups[\v!memo:\v!section:\v!closing] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!closing][\correspondencesectionparameter\c!alternative] +\stopsetups + +\definememoelement[\v!section][\v!appendices][\s!default] + {\startpacked + \normalexpanded{\processcommalistwithparameters[\correspondence_elements_access\v!memo\v!description]}{\correspondence_description_place[\v!memo]}% + \stoppacked} + +\startsetups[\v!memo:\v!section:\v!appendices] +\def\\{\correspondencesectionparameter\c!separator} +\memoelement[\v!section][\v!appendices][\correspondencesectionparameter\c!alternative] +\stopsetups + +\startsetups[\v!memo:\v!place] +\correspondence_place[\v!memo] +\stopsetups + +% Files + +\usememostyle[default,\currentmoduleparameter\c!style] + +% Extras + +\appendtoks + \ifx\currentcorrespondence\v!memo + \doif{\correspondenceoptionparameter\c!option}\v!test{\usememostyle[test]}% + \fi +\to \everybeforecorrespondence + +\appendtoks + \ifx\currentcorrespondence\v!memo + \doif{\correspondenceoptionparameter\c!marking}\v!no{\setupmemolayer[\v!topmark,\v!botmark,\v!cutmark,\v!endmark,\v!usermark][\c!state=\v!stop]}% + \fi +\to \everybeforecorrespondence + +% Labels + +\definelabelclass[memo] + +% page: + +\setupmemotext[\s!en][\v!page=Page~] +\setupmemotext[\s!nl][\v!page=] +\setupmemotext[\s!de][\v!page=Seite~] +\setupmemotext[\s!fr][\v!page=] +\setupmemotext[\s!it][\v!page=] +\setupmemotext[\s!es][\v!page=] + +% date: + +\setupmemotext[\s!en][\v!date=Date: ] +\setupmemotext[\s!nl][\v!date=Datum: ] +\setupmemotext[\s!de][\v!date=Datum: ] +\setupmemotext[\s!fr][\v!date=Date\thinspace: ] +\setupmemotext[\s!it][\v!date=Data: ] +\setupmemotext[\s!es][\v!date=Fecha: ] + +% fromname: + +\setupmemotext[\s!en][\v!fromname=From: ] +\setupmemotext[\s!nl][\v!fromname=Van: ] +\setupmemotext[\s!de][\v!fromname=Von: ] +\setupmemotext[\s!fr][\v!fromname=De\thinspace: ] +\setupmemotext[\s!it][\v!fromname=Da: ] +\setupmemotext[\s!es][\v!fromname=De: ] + +% toname: + +\setupmemotext[\s!en][\v!toname=To: ] +\setupmemotext[\s!nl][\v!toname=Aan: ] +\setupmemotext[\s!de][\v!toname=An: ] +\setupmemotext[\s!fr][\v!toname=\Agrave\thinspace: ] +\setupmemotext[\s!it][\v!toname=A: ] +\setupmemotext[\s!es][\v!toname=A: ] + +% subject: + +\setupmemotext[\s!en][\v!subject=Subject: ] +\setupmemotext[\s!nl][\v!subject=Onderwerp: ] +\setupmemotext[\s!de][\v!subject=Betrifft: ] +\setupmemotext[\s!fr][\v!subject=Concernant\thinspace: ] +\setupmemotext[\s!it][\v!subject=Oggetto: ] +\setupmemotext[\s!es][\v!subject=Asunto: ] + +\stopmodule + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.mkii b/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.mkii deleted file mode 100644 index 1107416f7d4..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.mkii +++ /dev/null @@ -1,547 +0,0 @@ -%D \module -%D [ file=t-correspondence, -%D version=2011.02.07, -%D title=\CONTEXT\ User Module, -%D subtitle=Correspondence, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\writestatus{loading}{Context User Module / Correspondence} - -\unprotect - -\startmodule[correspondence] - -%D I use a few extra constants and variables in my module. - -\startinterface all - \setinterfaceconstant {head} {head} - \setinterfaceconstant {foot} {foot} - \setinterfaceconstant {topmark} {topmark} - \setinterfaceconstant {botmark} {botmark} - \setinterfaceconstant {cutmark} {cutmark} - \setinterfaceconstant {endmark} {endmark} - \setinterfaceconstant {usermark} {usermark} - \setinterfaceconstant {foldmark} {foldmark} - \setinterfaceconstant {extension} {extension} - \setinterfaceconstant {interface} {interface} - \setinterfaceconstant {backgroundimage} {backgroundimage} - \setinterfaceconstant {whitespace} {whitespace} - \setinterfaceconstant {nexthead} {nexthead} - \setinterfaceconstant {lefthead} {lefthead} - \setinterfaceconstant {righthead} {righthead} - \setinterfaceconstant {nextfoot} {nextfoot} - \setinterfaceconstant {leftfoot} {leftfoot} - \setinterfaceconstant {rightfoot} {rightfoot} - \setinterfaceconstant {content} {content} - \setinterfaceconstant {backaddress} {backaddress} - \setinterfaceconstant {optimize} {optimize} - \setinterfaceconstant {opening} {opening} - \setinterfaceconstant {closing} {closing} - \setinterfaceconstant {signature} {signature} - \setinterfaceconstant {dispatch} {dispatch} - \setinterfaceconstant {appendices} {appendices} - \setinterfaceconstant {fromaddress} {fromaddress} - \setinterfaceconstant {frombank} {frombank} - \setinterfaceconstant {frommail} {frommail} - \setinterfaceconstant {fromfax} {fromfax} - \setinterfaceconstant {fromlogo} {fromlogo} - \setinterfaceconstant {fromname} {fromname} - \setinterfaceconstant {fromphone} {fromphone} - \setinterfaceconstant {fromurl} {fromurl} - \setinterfaceconstant {toname} {toname} - \setinterfaceconstant {toaddress} {toaddress} - \setinterfaceconstant {enclosure} {enclosure} - \setinterfaceconstant {copy} {copy} - \setinterfaceconstant {ps} {ps} - \setinterfaceconstant {postscript} {postscript} - \setinterfaceconstant {attention} {attention} - \setinterfaceconstant {distribution} {distribution} - \setinterfaceconstant {salutation} {salutation} - \setinterfaceconstant {addressee} {addressee} - \setinterfaceconstant {prefix} {prefix} - \setinterfaceconstant {suffix} {suffix} - \setinterfaceconstant {initials} {initials} - \setinterfaceconstant {formalname} {formalname} - \setinterfaceconstant {informalname} {informalname} - \setinterfaceconstant {yourref} {yourref} - \setinterfaceconstant {yourmail} {yourmail} - \setinterfaceconstant {myref} {myref} - \setinterfaceconstant {mymail} {mymail} - \setinterfaceconstant {customer} {customer} - \setinterfaceconstant {invoice} {invoice} - \setinterfaceconstant {subject} {subject} - \setinterfaceconstant {cc} {cc} - \setinterfaceconstant {enclosure} {enclosure} - \setinterfaceconstant {encl} {encl} - \setinterfaceconstant {phone} {phone} - \setinterfaceconstant {fax} {fax} - \setinterfaceconstant {email} {email} - \setinterfaceconstant {url} {url} - \setinterfaceconstant {bank} {bank} - \setinterfaceconstant {name} {name} - \setinterfaceconstant {room} {room} - \setinterfaceconstant {yourorder} {yourorder} - \setinterfaceconstant {ourinvoice} {ourinvoice} - \setinterfaceconstant {rulewidth} {rulewidth} - \setinterfaceconstant {fromalign} {fromalign} - \setinterfaceconstant {fromrule} {fromrule} - \setinterfaceconstant {organization} {organization} - \setinterfaceconstant {city} {city} - \setinterfaceconstant {zip} {zip} - \setinterfaceconstant {country} {country} - \setinterfaceconstant {street} {street} - \setinterfaceconstant {birthday} {birthday} - \setinterfaceconstant {skype} {skype} - \setinterfaceconstant {of} {of} - \setinterfaceconstant {contextversion} {contextversion} - \setinterfaceconstant {bankname} {bankname} - \setinterfaceconstant {banknumber} {banknumber} - \setinterfaceconstant {accountnumber} {accountnumber} -\stopinterface - -\startinterface all - \setinterfacevariable {secondpage} {secondpage} - \setinterfacevariable {foot} {foot} - \setinterfacevariable {topmark} {topmark} - \setinterfacevariable {botmark} {botmark} - \setinterfacevariable {cutmark} {cutmark} - \setinterfacevariable {endmark} {endmark} - \setinterfacevariable {option} {option} - \setinterfacevariable {foldmark} {foldmark} - \setinterfacevariable {usermark} {usermark} - \setinterfacevariable {layer} {layer} - \setinterfacevariable {firsthead} {firsthead} - \setinterfacevariable {nexthead} {nexthead} - \setinterfacevariable {lefthead} {lefthead} - \setinterfacevariable {righthead} {righthead} - \setinterfacevariable {firstfoot} {firstfoot} - \setinterfacevariable {nextfoot} {nextfoot} - \setinterfacevariable {leftfoot} {leftfoot} - \setinterfacevariable {rightfoot} {rightfoot} - \setinterfacevariable {layout} {layout} - \setinterfacevariable {place} {place} - \setinterfacevariable {initialize} {initialize} - \setinterfacevariable {finish} {finish} - \setinterfacevariable {sequence} {sequence} - \setinterfacevariable {style} {style} - \setinterfacevariable {extension} {extension} - \setinterfacevariable {interface} {interface} - \setinterfacevariable {resume} {resume} - \setinterfacevariable {letter} {letter} - \setinterfacevariable {backaddress} {backaddress} - \setinterfacevariable {reference} {reference} - \setinterfacevariable {location} {location} - \setinterfacevariable {address} {address} - \setinterfacevariable {opening} {opening} - \setinterfacevariable {closing} {closing} - \setinterfacevariable {letternext} {letternext} - \setinterfacevariable {lettermain} {lettermain} - \setinterfacevariable {special} {special} - \setinterfacevariable {notation} {notation} - \setinterfacevariable {inside} {inside} - \setinterfacevariable {optimize} {optimize} - \setinterfacevariable {file} {file} - \setinterfacevariable {e} {e} - \setinterfacevariable {data} {data} - \setinterfacevariable {sender} {sender} - \setinterfacevariable {dispatch} {dispatch} - \setinterfacevariable {enclosure} {enclosure} - \setinterfacevariable {copy} {copy} - \setinterfacevariable {nobreak} {nobreak} - \setinterfacevariable {memo} {memo} - \setinterfacevariable {addressee} {addressee} - \setinterfacevariable {french} {french} - \setinterfacevariable {simplified} {simplified} - \setinterfacevariable {fullblock} {fullblock} - \setinterfacevariable {hanging} {hanging} - \setinterfacevariable {modified} {modified} - \setinterfacevariable {semiblock} {semiblock} - \setinterfacevariable {contact} {contact} - \setinterfacevariable {handle} {handle} - \setinterfacevariable {casual} {casual} - \setinterfacevariable {classic} {classic} - \setinterfacevariable {knuth} {knuth} - \setinterfacevariable {firstname} {firstname} - \setinterfacevariable {familyname} {familyname} - \setinterfacevariable {street} {street} - \setinterfacevariable {town} {town} - \setinterfacevariable {mobile} {mobile} - \setinterfacevariable {phone} {phone} - \setinterfacevariable {fax} {fax} - \setinterfacevariable {email} {email} - \setinterfacevariable {info} {info} - \setinterfacevariable {correspondence} {correspondence} - \setinterfacevariable {resumemain} {resumemain} - \setinterfacevariable {resumenext} {resumenext} - \setinterfacevariable {black} {black} - \setinterfacevariable {gbrief} {gbrief} -\stopinterface - -\startinterface all - \setinterfaceelement {set} {set} - \setinterfaceelement {value} {value} - \setinterfaceelement {complex} {complex} - \setinterfaceelement {simple} {simple} - \setinterfaceelement {use} {use} - \setinterfaceelement {define} {define} - \setinterfaceelement {flush} {flush} -\stopinterface - -% Placeholders for the messages: -% -% 1: letter|resume / interface|style|extension / filename -% 2: letter|resume / interface|style|extension / filename -% 3: ‹number› / ‹number› -% 4: ‹file› / ‹version› - -\definemessageconstant {correspondence} - -\startinterface all - \setinterfacemessage{correspondence}{title}{correspondence} - \setinterfacemessage{correspondence}{1} {loading -- -- --} - \setinterfacemessage{correspondence}{2} {-- -- -- not found} - \setinterfacemessage{correspondence}{3} {correspage set -- processed (size --)} - \setinterfacemessage{correspondence}{4} {--: --} - \setinterfacemessage{correspondence}{5} {your context is too old, you need at last version '--'} % not used in mkii -\stopinterface - -%D Setup command for the styles - -\def\definecorrespondencesetup[#1][#2][#3]% - {\setvalue{\e!setup#1\e!endsetup}{\doquintupleempty\dosetupcorrespondencestyle[#2][#3]}} - -\def\dosetupcorrespondencestyle[#1][#2][#3][#4][#5]% - {\iffifthargument - \dodosetupcorrespondencelayer[#1][#2][#3][#4][#5]% - \else\iffourthargument - \dodosetupcorrespondencestyle[#1][#2][#3][#4]% - \else - \dosetupcorrespondenceoption[][#2][\v!option][#3]% - \fi\fi} - -\def\dodosetupcorrespondencestyle[#1][#2][#3][#4]% - {\def\dododosetupcorrespondencestyle##1% - {\csname dosetupcorrespondence\ifcsname#1:#2:##1\endcsname - \csname#1:#2:##1\endcsname - \else - \v!option - \fi\endcsname[#1][#2][##1][#4]}% - \processcommalist[#3]\dododosetupcorrespondencestyle} - -\def\dosetupcorrespondenceoption[#1][#2][#3][#4]% - {\getparameters[#2#3][#4]} - -\def\dosetupcorrespondencelayout[#1][#2][#3][#4]% - {\definelayout[#1#3][#4]} - -\def\dosetupcorrespondencesection[#1][#2][#3][#4]% - {\getparameters[#2#3][#4]} - -\def\dosetupcorrespondencedescription[#1][#2][#3][#4]% - {\getparameters[#2#3][#4]} - -\def\dosetupcorrespondencelayer[#1][#2][#3][#4]% - {\dodosetupcorrespondencelayer[#1][#2][#3][\v!layer,\v!frame,\v!option][#4]} - -\def\dodosetupcorrespondencelayer[#1][#2][#3][#4][#5]% - {\def\dododosetupcorrespondencelayer##1% - {\def\dodododosetupcorrespondencelayer####1% - {\ifcsname dosetupcorrespondencelayer####1\endcsname - \@EAEA\csname dosetupcorrespondencelayer####1\endcsname - \else - \@EA\dosetupcorrespondencelayeroption - \fi[#1][#2][##1][#5]}% - \processcommalist[#4]\dodododosetupcorrespondencelayer}% - \processcommalist[#3]\dododosetupcorrespondencelayer} - -\def\dosetupcorrespondencelayerlayer[#1][#2][#3][#4]% - {\setuplayer[#1:#3][#4]% - \getparameters[#2#3\v!layer][#4]} - -\def\dosetupcorrespondencelayerframe[#1][#2][#3][#4]% - {\getparameters[#2#3\v!frame][#4]} - -\def\dosetupcorrespondencelayeroption[#1][#2][#3][#4]% - {\getparameters[#2#3][#4]} - -%D Setup command for the values - -\def\definecorrespondencevalue - {\dodoubleargument\dodefinecorrespondencevalue} - -\def\dodefinecorrespondencevalue[#1][#2]% - {\setvalue{\e!setup#1\e!endsetup}{\dotripleempty\docorrespondencesetupvalue[#2]}% - \setvalue{\e!set#1\e!value}##1{\doquadrupleempty\docorrespondencesetvalue[#1][#2][##1]}} - -\def\docorrespondencesetupvalue[#1][#2][#3]% - {\doifelsenothing{#3} - {\getparameters[#1][#2]} - {\def\dodocorrespondencesetupvalue##1% - {\getparameters[#1##1][#3]}% - \processcommalist[#2]\dodocorrespondencesetupvalue}} - -\def\docorrespondencesetvalue[#1][#2][#3][#4]#5% - {\iffourthargument - \setuplabeltext[\currentmainlanguage][#1:#3=#4]% - \fi - \setvalue{#2#3}{#5}} - -%D Tests - -\def\correspondencevalue #1#2{\csname\ifcsname #1#2\endcsname #1#2\else\s!empty\fi\endcsname} -\def\correspondencestylevalue#1#2#3{\csname\ifcsname#1#2#3\endcsname#1#2#3\else\s!empty\fi\endcsname} - -\long\def\doifcorrespondencevalue #1#2{\doifsomething {\correspondencevalue {#1}{#2}}} -\long\def\doifelsecorrespondencevalue #1#2{\doifsomethingelse{\correspondencevalue {#1}{#2}}} -\long\def\doifcorrespondencestylevalue #1#2#3{\doifsomething {\correspondencestylevalue{#1}{#2}{#3}}} -\long\def\doifelsecorrespondencestylevalue#1#2#3{\doifsomethingelse{\correspondencestylevalue{#1}{#2}{#3}}} - -%D External files - -\def\definecorrespondencefile[#1][#2][#3]% - {\setvalue{\e!use#1#2}[##1]{\usecorrespondencefile[#1][#2][#3][##1]}} - -\def\usecorrespondencefile[#1][#2][#3][#4]% - {\def\dousecorrespondencefile##1% - {\readfile{##1.#3} - {\showmessage\m!correspondence{1}{#1,#2,##1.#3}} - {\showmessage\m!correspondence{2}{#1,#2,##1.#3}}}% - \processcommacommand[#4]\dousecorrespondencefile} - -%D Layers - -\def\definecorrespondencelayer[#1][#2]% - {\setvalue{\s!do\e!define#1\v!layer}{\dodefinecorrespondencelayer[#1][#2]}% - \setvalue{\s!do\e!set #1\v!layer}{\dosetcorrespondencelayer [#1][#2]}} - -\def\dodefinecorrespondencelayer[#1][#2][#3]% - {\def\dodododefinecorrespondencelayer##1{\dododefinecorrespondencelayer[#1][#2][##1]}% - \processaction - [#3] - [\v!foldmark=>{\processcommacommand[\csname#1!list!marking\endcsname]\dodododefinecorrespondencelayer}, - \v!header=>{\processcommacommand[\csname#1!list!header\endcsname ]\dodododefinecorrespondencelayer}, - \v!footer=>{\processcommacommand[\csname#1!list!footer\endcsname ]\dodododefinecorrespondencelayer}, - \s!unknown=>{\dododefinecorrespondencelayer[#1][#2][#3]}]} - -\def\dododefinecorrespondencelayer[#1][#2][#3]% - {\letvalue{#2\v!option#3}\v!yes - \doifundefined{#1:#2:#3} - {\letvalue{#1:#2:#3}\v!layer - \addvalue{#1!list!layers}{#3}}% - \presetlocalframed[#2#3\v!frame]% - \definelayer - [#1:#3] - [\c!width=\paperwidth, - \c!height=\paperheight]% - \dodosetupcorrespondencelayer - [#1][#2][#3][\v!option]% - [\c!state=\v!start, - \c!symbol=, - \c!list=, - \c!alternative=\v!a, - \c!rule=\v!off, - \c!rulethickness=\linewidth, - \c!separator=\crlf, - \c!offset=\zeropoint, - \c!spacebefore=\zeropoint, - \c!spaceafter=\zeropoint, - \c!leftmargin=\zeropoint, - \c!rightmargin=\zeropoint]% - \dodosetupcorrespondencelayer - [#1][#2][#3][\v!frame]% - [\c!frame=\v!off, - \c!align=\v!right, - \c!offset=\zeropoint, - \c!strut=\v!yes]% - \dodosetupcorrespondencelayer - [#1][#2][#3][\v!layer]% - [\c!state=\v!start, - \c!offset=\zeropoint, - \c!preset=\v!left\v!top]} - -\def\dosetcorrespondencelayer[#1][#2][#3]% - {\!!doneafalse % first page - \!!donebfalse % even numbered pages - \!!donecfalse % odd numbered pages - \!!donedfalse % real pagenumber - \processcommacommand[\csname#2#3\c!state\endcsname]\docorrespondencelayerstate - \doifnotvalue{#2#3\v!layer\c!state}\v!stop{\setuplayer[#1:#3][\c!state=\v!start]}% - \ifnum\if!!doned\userpageno\else\subpageno\fi=\plusone - \if!!donea\dodosetcorrespondencelayer[#1][#2][#3]\fi - \else - \ifodd\if!!doned\userpageno\else\subpageno\fi - \if!!donec\dodosetcorrespondencelayer[#1][#2][#3]\fi - \else - \if!!doneb\dodosetcorrespondencelayer[#1][#2][#3]\fi - \fi\fi} - -\def\dodosetcorrespondencelayer[#1][#2][#3]% - {\doifelsecorrespondencestylevalue{#2}{#3}\c!symbol - {\dododosetcorrespondencelayer[#1][#2][#3][\correspondencestylevalue{#2}{#3}\c!symbol]} - {\dododosetcorrespondencelayer[#1][#2][#3][\directsetup{#1:#3}]}} - -\def\dododosetcorrespondencelayer[#1][#2][#3][#4]% - {\setlayer[#1:#3] - {\localframed[#2#3\v!frame] - {\edef\currentcorrespondenceelement{#3}% - \doadaptleftskip {\correspondencestylevalue{#2}{#3}\c!leftmargin }% - \doadaptrightskip{\correspondencestylevalue{#2}{#3}\c!rightmargin}% - \doattributes{#2#3}\c!style\c!color{#4}}}} - -\def\docorrespondencelayerstate#1{\csname @@headfoot@@#1\endcsname} - -\setvalue{@@headfoot@@\v!start }{\!!doneatrue } -\setvalue{@@headfoot@@\v!stop }{\!!doneafalse\!!donebfalse\!!donecfalse} -\setvalue{@@headfoot@@\v!first }{\!!doneatrue } -\setvalue{@@headfoot@@\v!next }{\!!donebtrue\!!donectrue } -\setvalue{@@headfoot@@\v!continue }{\!!donebtrue\!!donectrue } -\setvalue{@@headfoot@@\v!repeat }{\!!doneatrue\!!donebtrue\!!donectrue } -\setvalue{@@headfoot@@\v!left }{\!!donebtrue } -\setvalue{@@headfoot@@\v!right }{\!!donectrue } -\setvalue{@@headfoot@@\v!leftpage }{\!!donebtrue } -\setvalue{@@headfoot@@\v!rightpage}{\!!donectrue } -\setvalue{@@headfoot@@\v!page }{\!!donedtrue } -\setvalue{@@headfoot@@\v!subpage }{\!!donedfalse } - -%D Sections - -\def\definecorrespondencesection[#1][#2]% - {\setvalue{\s!do\e!define#1\v!section}{\dodefinecorrespondencesection[#1][#2]}% - \setvalue{\s!do\e!set #1\v!section}{\dosetcorrespondencesection [#1][#2]}} - -\def\dodefinecorrespondencesection[#1][#2][#3]% - {\letvalue{#2\v!option#3}\v!yes - \doifundefined{#1:#2:#3} - {\letvalue{#1:#2:#3}\v!section - \addvalue{#1!list!sections}{#3}}% - \getparameters - [#2#3] - [\c!before=, - \c!after=, - \c!inbetween=, - \c!align=, - \c!leftmargin=\zeropoint, - \c!rightmargin=\zeropoint, - \c!alternative=\v!a, - \c!separator=\crlf, - \c!optimize=\v!no, - \c!command=, - \c!style=, - \c!color=]} - -\def\dosetcorrespondencesection[#1][#2][#3]% - {\begingroup - \edef\currentcorrespondenceelement{#3}% - \doifelsecorrespondencestylevalue{#2}{#3}\c!before - {\correspondencestylevalue{#2}{#3}\c!before} - \endgraf - \doadaptleftskip {\correspondencestylevalue{#2}{#3}\c!leftmargin }% - \doadaptrightskip{\correspondencestylevalue{#2}{#3}\c!rightmargin}% - \doifcorrespondencestylevalue{#2}{#3}\c!align - {\setupalign[\correspondencestylevalue{#2}{#3}\c!align]}% - \dostartattributes{#2#3}\c!style\c!color\empty - \correspondencestylevalue{#2}{#3}\c!command{\directsetup{#1:#3}}% - \dostopattributes - \doifcorrespondencestylevalue{#2}{#3}\c!after - {\endgraf\correspondencestylevalue{#2}{#3}\c!after} - \endgraf - \endgroup} - -%D Descriptions - -\def\definecorrespondencedescription[#1][#2]% - {\setvalue{\s!do\e!define#1\v!description}{\dodefinecorrespondencedescription[#1][#2]}% - \setvalue{\s!do\e!set #1\v!description}{\dosetcorrespondencedescription [#1][#2]}% - \setvalue{\s!do\e!flush #1\v!description}{\doflushcorrespondencedescription [#1][#2]}} - -\def\dodefinecorrespondencedescription[#1][#2][#3]% - {\letvalue{#2\v!option#3}\v!yes - \doifundefined{#1:#2:#3}{\letvalue{#1:#2:#3}\v!description}% - \getparameters - [#2#3] - [\c!location=\v!left, - \c!inbetween={\blank[\v!nowhite]}, - \c!before=\blank, - \c!after=\blank, - \c!width=\v!broad, - \c!headstyle=, - \c!headcolor=, - \c!distance=\zeropoint]} - -\def\dosetcorrespondencedescription[#1][#2][#3]% - {\bgroup - \doifelsecorrespondencestylevalue{#2}{#3}\c!before - {\correspondencestylevalue{#2}{#3}\c!before} - \endgraf - \scratchdimen\zeropoint - \setbox\scratchbox\hbox{\doattributes{#2#3}\c!headstyle\c!headcolor{\labeltext{#1:#3}}}% - \doifelse{\correspondencestylevalue{#2}{#3}\c!width}\v!broad - {\ifdim\wd\scratchbox>\zeropoint - \scratchdimen\dimexpr\wd\scratchbox+1em\relax - \fi} - {\doifelse{\correspondencestylevalue{#2}{#3}\c!width}\v!fit - {\ifdim\wd\scratchbox>\zeropoint - \scratchdimen\dimexpr\wd\scratchbox+\correspondencestylevalue{#2}{#3}\c!distance\relax - \fi} - {\scratchdimen\dimexpr\correspondencestylevalue{#2}{#3}\c!width+\correspondencestylevalue{#2}{#3}\c!distance\relax}}% - \executeifdefined{@@description@@\correspondencestylevalue{#2}{#3}\c!location}\gobblethreearguments{#1}{#2}{#3}% - \doifelsecorrespondencestylevalue{#2}{#3}\c!after - {\endgraf\correspondencestylevalue{#2}{#3}\c!after} - \endgraf - \egroup} - -\setvalue{@@description@@\v!left}#1#2#3% - {\EveryPar{\hangindent\scratchdimen\hangafter\zerocount}% - \setbox\scratchbox\hbox\!!to\scratchdimen{\box\scratchbox\hss}% - \noindent\llap{\box\scratchbox}\directsetup{#1:#3}} - -\setvalue{@@description@@\v!right}#1#2#3% - {\EveryPar{\hangindent-\scratchdimen\hangafter\zerocount}% - \setbox\scratchbox\hbox\!!to\scratchdimen{\hss\box\scratchbox}% - \setbox\scratchbox\hbox\!!to\!!zeropoint {\hskip\dimexpr\hsize-\scratchdimen\relax\box\scratchbox\hss}% - \noindent\rlap{\box\scratchbox}\directsetup{#1:#3}} - -\setvalue{@@description@@\v!top}#1#2#3% - {\box\scratchbox\par - \nobreak - \doifcorrespondencestylevalue{#2}{#3}\c!inbetween{\correspondencestylevalue{#2}{#3}\c!inbetween}% - \nobreak - \directsetup{#1:#3}} - -\setvalue{@@description@@\v!text}#1#2#3% - {\noindent\box\scratchbox\directsetup{#1:#3}} - -\def\doflushcorrespondencedescription[#1][#2]% - {\def\dodoflushcorrespondencedescription##1% - {\doif{\correspondencestylevalue{#2}\v!option{##1}}\v!yes{\dosetcorrespondencedescription[#1][#2][##1]}}% - \processcommacommand[\csname#1!list!descriptions\endcsname]\dodoflushcorrespondencedescription} - -%D Commands to define named elements for header, footer etc. and use them, -%D clone them or delete their content. - -\def\definecorrespondenceelement{\dotripleargument\dodefinecorrespondenceelement } -\def\resetcorrespondenceelement {\dotripleargument\doresetcorrespondenceelement } -\def\copycorrespondenceelement {\doquintupleempty\docopycorrespondenceelement } -\def\correspondenceelement {\dotripleargument\docorrespondenceelement } - -\def\dodefinecorrespondenceelement[#1][#2][#3]#4{\setvalue{#1:#2:#3}{#4}} -\def\doresetcorrespondenceelement [#1][#2][#3]{\resetvalue{#1:#2:#3}} - -\def\docopycorrespondenceelement[#1][#2][#3][#4][#5]% - {\iffifthargument - \copycsname#1:#2:#3\endcsname\csname#1:#4:#5\endcsname - \else - \copycsname#1:#2:#3\endcsname\csname#1:#2:#4\endcsname - \fi} - -\def\docorrespondenceelement[#1][#2][#3]% - {\edef\currentcorrespondenceelement{#2}% - \csname#1:#2:#3\endcsname} - -\stopmodule - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.mkiv b/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.mkiv deleted file mode 100644 index d6891763b98..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.mkiv +++ /dev/null @@ -1,856 +0,0 @@ -%D \module -%D [ file=t-correspondence, -%D version=2011.09.19, -%D title=\CONTEXT\ User Module, -%D subtitle=Correspondence, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\writestatus{loading}{Context User Module / Correspondence} - -\unprotect - -\startmodule[correspondence] - -%D I use a few extra constants and variables in my module. - -\startinterface all - \setinterfaceconstant {head} {head} - \setinterfaceconstant {foot} {foot} - \setinterfaceconstant {topmark} {topmark} - \setinterfaceconstant {botmark} {botmark} - \setinterfaceconstant {cutmark} {cutmark} - \setinterfaceconstant {endmark} {endmark} - \setinterfaceconstant {usermark} {usermark} - \setinterfaceconstant {foldmark} {foldmark} - \setinterfaceconstant {extension} {extension} - \setinterfaceconstant {interface} {interface} - \setinterfaceconstant {backgroundimage} {backgroundimage} - \setinterfaceconstant {whitespace} {whitespace} - \setinterfaceconstant {nexthead} {nexthead} - \setinterfaceconstant {lefthead} {lefthead} - \setinterfaceconstant {righthead} {righthead} - \setinterfaceconstant {nextfoot} {nextfoot} - \setinterfaceconstant {leftfoot} {leftfoot} - \setinterfaceconstant {rightfoot} {rightfoot} - \setinterfaceconstant {content} {content} - \setinterfaceconstant {backaddress} {backaddress} - \setinterfaceconstant {optimize} {optimize} - \setinterfaceconstant {opening} {opening} - \setinterfaceconstant {closing} {closing} - \setinterfaceconstant {signature} {signature} - \setinterfaceconstant {dispatch} {dispatch} - \setinterfaceconstant {appendices} {appendices} - \setinterfaceconstant {fromaddress} {fromaddress} - \setinterfaceconstant {frombank} {frombank} - \setinterfaceconstant {frommail} {frommail} - \setinterfaceconstant {fromfax} {fromfax} - \setinterfaceconstant {fromlogo} {fromlogo} - \setinterfaceconstant {fromname} {fromname} - \setinterfaceconstant {fromphone} {fromphone} - \setinterfaceconstant {fromurl} {fromurl} - \setinterfaceconstant {toname} {toname} - \setinterfaceconstant {toaddress} {toaddress} - \setinterfaceconstant {enclosure} {enclosure} - \setinterfaceconstant {copy} {copy} - \setinterfaceconstant {ps} {ps} - \setinterfaceconstant {postscript} {postscript} - \setinterfaceconstant {attention} {attention} - \setinterfaceconstant {distribution} {distribution} - \setinterfaceconstant {salutation} {salutation} - \setinterfaceconstant {addressee} {addressee} - \setinterfaceconstant {prefix} {prefix} - \setinterfaceconstant {suffix} {suffix} - \setinterfaceconstant {initials} {initials} - \setinterfaceconstant {formalname} {formalname} - \setinterfaceconstant {informalname} {informalname} - \setinterfaceconstant {yourref} {yourref} - \setinterfaceconstant {yourmail} {yourmail} - \setinterfaceconstant {myref} {myref} - \setinterfaceconstant {mymail} {mymail} - \setinterfaceconstant {customer} {customer} - \setinterfaceconstant {invoice} {invoice} - \setinterfaceconstant {subject} {subject} - \setinterfaceconstant {cc} {cc} - \setinterfaceconstant {enclosure} {enclosure} - \setinterfaceconstant {encl} {encl} - \setinterfaceconstant {phone} {phone} - \setinterfaceconstant {fax} {fax} - \setinterfaceconstant {email} {email} - \setinterfaceconstant {url} {url} - \setinterfaceconstant {bank} {bank} - \setinterfaceconstant {name} {name} - \setinterfaceconstant {room} {room} - \setinterfaceconstant {yourorder} {yourorder} - \setinterfaceconstant {ourinvoice} {ourinvoice} - \setinterfaceconstant {rulewidth} {rulewidth} - \setinterfaceconstant {fromalign} {fromalign} - \setinterfaceconstant {fromrule} {fromrule} - \setinterfaceconstant {organization} {organization} - \setinterfaceconstant {city} {city} - \setinterfaceconstant {zip} {zip} - \setinterfaceconstant {country} {country} - \setinterfaceconstant {street} {street} - \setinterfaceconstant {birthday} {birthday} - \setinterfaceconstant {skype} {skype} - \setinterfaceconstant {of} {of} - \setinterfaceconstant {contextversion} {contextversion} - \setinterfaceconstant {bankname} {bankname} - \setinterfaceconstant {banknumber} {banknumber} - \setinterfaceconstant {accountnumber} {accountnumber} -\stopinterface - -\startinterface all - \setinterfacevariable {secondpage} {secondpage} - \setinterfacevariable {foot} {foot} - \setinterfacevariable {topmark} {topmark} - \setinterfacevariable {botmark} {botmark} - \setinterfacevariable {cutmark} {cutmark} - \setinterfacevariable {endmark} {endmark} - \setinterfacevariable {option} {option} - \setinterfacevariable {foldmark} {foldmark} - \setinterfacevariable {usermark} {usermark} - \setinterfacevariable {layer} {layer} - \setinterfacevariable {firsthead} {firsthead} - \setinterfacevariable {nexthead} {nexthead} - \setinterfacevariable {lefthead} {lefthead} - \setinterfacevariable {righthead} {righthead} - \setinterfacevariable {firstfoot} {firstfoot} - \setinterfacevariable {nextfoot} {nextfoot} - \setinterfacevariable {leftfoot} {leftfoot} - \setinterfacevariable {rightfoot} {rightfoot} - \setinterfacevariable {layout} {layout} - \setinterfacevariable {place} {place} - \setinterfacevariable {initialize} {initialize} - \setinterfacevariable {finish} {finish} - \setinterfacevariable {sequence} {sequence} - \setinterfacevariable {style} {style} - \setinterfacevariable {extension} {extension} - \setinterfacevariable {interface} {interface} - \setinterfacevariable {resume} {resume} - \setinterfacevariable {letter} {letter} - \setinterfacevariable {backaddress} {backaddress} - \setinterfacevariable {reference} {reference} - \setinterfacevariable {location} {location} - \setinterfacevariable {address} {address} - \setinterfacevariable {opening} {opening} - \setinterfacevariable {closing} {closing} - \setinterfacevariable {letternext} {letternext} - \setinterfacevariable {lettermain} {lettermain} - \setinterfacevariable {special} {special} - \setinterfacevariable {notation} {notation} - \setinterfacevariable {inside} {inside} - \setinterfacevariable {optimize} {optimize} - \setinterfacevariable {file} {file} - \setinterfacevariable {e} {e} - \setinterfacevariable {data} {data} - \setinterfacevariable {sender} {sender} - \setinterfacevariable {dispatch} {dispatch} - \setinterfacevariable {enclosure} {enclosure} - \setinterfacevariable {copy} {copy} - \setinterfacevariable {nobreak} {nobreak} - \setinterfacevariable {memo} {memo} - \setinterfacevariable {addressee} {addressee} - \setinterfacevariable {french} {french} - \setinterfacevariable {simplified} {simplified} - \setinterfacevariable {fullblock} {fullblock} - \setinterfacevariable {hanging} {hanging} - \setinterfacevariable {modified} {modified} - \setinterfacevariable {semiblock} {semiblock} - \setinterfacevariable {contact} {contact} - \setinterfacevariable {handle} {handle} - \setinterfacevariable {casual} {casual} - \setinterfacevariable {classic} {classic} - \setinterfacevariable {knuth} {knuth} - \setinterfacevariable {firstname} {firstname} - \setinterfacevariable {familyname} {familyname} - \setinterfacevariable {street} {street} - \setinterfacevariable {town} {town} - \setinterfacevariable {mobile} {mobile} - \setinterfacevariable {phone} {phone} - \setinterfacevariable {fax} {fax} - \setinterfacevariable {email} {email} - \setinterfacevariable {info} {info} - \setinterfacevariable {correspondence} {correspondence} - \setinterfacevariable {resumemain} {resumemain} - \setinterfacevariable {resumenext} {resumenext} - \setinterfacevariable {black} {black} - \setinterfacevariable {gbrief} {gbrief} -\stopinterface - -\startinterface all - \setinterfaceelement {set} {set} - \setinterfaceelement {value} {value} - \setinterfaceelement {complex} {complex} - \setinterfaceelement {simple} {simple} - \setinterfaceelement {use} {use} - \setinterfaceelement {define} {define} - \setinterfaceelement {flush} {flush} -\stopinterface - -% Placeholders for the messages: -% -% 1: letter|resume / interface|style|extension / filename -% 2: letter|resume / interface|style|extension / filename -% 3: ‹number› / ‹number› -% 4: ‹file› / ‹version› - -\definemessageconstant {correspondence} - -\startinterface all - \setinterfacemessage{correspondence}{title}{correspondence} - \setinterfacemessage{correspondence}{1} {loading -- -- --} - \setinterfacemessage{correspondence}{2} {-- -- -- not found} - \setinterfacemessage{correspondence}{3} {correspage set -- processed (size --)} - \setinterfacemessage{correspondence}{4} {--: --} - \setinterfacemessage{correspondence}{5} {your context is too old, you need at last version '--'} -\stopinterface - -%D Setup command for the styles - -\def\definecorrespondencesetup[#1][#2][#3]% - {\setvalue{\e!setup#1\e!endsetup}{\doquintupleempty\dosetupcorrespondencestyle[#2][#3]}} - -\def\dosetupcorrespondencestyle[#1][#2][#3][#4][#5]% - {\iffifthargument - \dodosetupcorrespondencelayer[#1][#2][#3][#4][#5]% - \else\iffourthargument - \dodosetupcorrespondencestyle[#1][#2][#3][#4]% - \else - \dosetupcorrespondenceoption[][#2][\v!option][#3]% - \fi\fi} - -\def\dodosetupcorrespondencestyle[#1][#2][#3][#4]% - {\def\dododosetupcorrespondencestyle##1% - {\csname dosetupcorrespondence\ifcsname#1:#2:##1\endcsname - \csname#1:#2:##1\endcsname - \else - \v!option - \fi\endcsname[#1][#2][##1][#4]}% - \processcommalist[#3]\dododosetupcorrespondencestyle} - -\def\dosetupcorrespondenceoption[#1][#2][#3][#4]% - {\getparameters[#2#3][#4]} - -\def\dosetupcorrespondencelayout[#1][#2][#3][#4]% - {\definelayout[#1#3][#4]} - -\def\dosetupcorrespondencesection[#1][#2][#3][#4]% - {\getcheckedparameters[#1\v!section:#3][#2#3][#4]} - -\def\dosetupcorrespondencedescription[#1][#2][#3][#4]% - {\getcheckedparameters[#1\v!description:#3][#2#3][#4]} - -\def\dosetupcorrespondencelayer[#1][#2][#3][#4]% - {\dodosetupcorrespondencelayer[#1][#2][#3][\v!layer,\v!frame,\v!option][#4]} - -\def\dodosetupcorrespondencelayer[#1][#2][#3][#4][#5]% - {\def\dododosetupcorrespondencelayer##1% - {\def\dodododosetupcorrespondencelayer####1% - {\ifcsname dosetupcorrespondencelayer####1\endcsname - \expandafter\expandafter\csname dosetupcorrespondencelayer####1\endcsname - \else - \expandafter\dosetupcorrespondencelayeroption - \fi[#1][#2][##1][#5]}% - \processcommalist[#4]\dodododosetupcorrespondencelayer}% - \processcommalist[#3]\dododosetupcorrespondencelayer} - -\def\dosetupcorrespondencelayerlayer[#1][#2][#3][#4]% - {\setuplayer[#1:#3][#4]% - \getparameters[#2#3\v!layer][#4]} - -\def\dosetupcorrespondencelayerframe[#1][#2][#3][#4]% - {\getparameters[#2#3\v!frame][#4]} - -\def\dosetupcorrespondencelayeroption[#1][#2][#3][#4]% - {\getcheckedparameters[#1\v!layer\v!option:#3][#2#3][#4]} - -%D Setup command for the values - -\def\definecorrespondencevalue - {\dodoubleargument\dodefinecorrespondencevalue} - -\def\dodefinecorrespondencevalue[#1][#2]% - {\setvalue{\e!setup#1\e!endsetup}{\dotripleempty\docorrespondencesetupvalue[#2]}% - \setvalue{\e!set#1\e!value}##1{\doquadrupleempty\docorrespondencesetvalue[#1][#2][##1]}} - -\def\docorrespondencesetupvalue[#1][#2][#3]% - {\doifelsenothing{#3} - {\getparameters[#1][#2]} - {\def\dodocorrespondencesetupvalue##1% - {\getparameters[#1##1][#3]}% - \processcommalist[#2]\dodocorrespondencesetupvalue}} - -\def\docorrespondencesetvalue[#1][#2][#3][#4]#5% - {\iffourthargument - \setuplabeltext[\currentmainlanguage][#1:#3=#4]% - \fi - \setvalue{#2#3}{#5}} - -%D Tests - -\def\correspondencevalue #1#2{\csname\ifcsname #1#2\endcsname #1#2\else\s!empty\fi\endcsname} -\def\correspondencestylevalue#1#2#3{\csname\ifcsname#1#2#3\endcsname#1#2#3\else\s!empty\fi\endcsname} - -\long\def\doifcorrespondencevalue #1#2{\doifsomething {\correspondencevalue {#1}{#2}}} -\long\def\doifelsecorrespondencevalue #1#2{\doifsomethingelse{\correspondencevalue {#1}{#2}}} -\long\def\doifcorrespondencestylevalue #1#2#3{\doifsomething {\correspondencestylevalue{#1}{#2}{#3}}} -\long\def\doifelsecorrespondencestylevalue#1#2#3{\doifsomethingelse{\correspondencestylevalue{#1}{#2}{#3}}} - -%D External files - -\def\definecorrespondencefile[#1][#2][#3]% - {\setvalue{\e!use#1#2}[##1]{\usecorrespondencefile[#1][#2][#3][##1]}} - -\def\usecorrespondencefile[#1][#2][#3][#4]% - {\def\dousecorrespondencefile##1% - {\readfile{##1.#3} - {\showmessage\m!correspondence{1}{#1,#2,##1.#3}\registercorrespondencefile{##1.#3}} - {\showmessage\m!correspondence{2}{#1,#2,##1.#3}}}% - \processcommacommand[#4]\dousecorrespondencefile} - -% \def\usecorrespondencefile[#1][#2][#3][#4]% -% {\def\dousecorrespondencefile##1% -% {\startreadingfile -% \readfile{##1.#3} -% {\showmessage\m!correspondence{1}{#1,#2,##1.#3}\registercorrespondencefile{##1.#3}} -% {\showmessage\m!correspondence{2}{#1,#2,##1.#3}}% -% \stopreadingfile}% -% \processcommacommand[#4]\dousecorrespondencefile} - -%D Layers - -\def\correspondencelayerkeys - {\c!state,\c!symbol,\c!separator,\c!offset,\c!spacebefore,\c!list,\c!rulethickness% - \c!alternative,\c!spaceafter,\c!leftmargin,\c!rightmargin,\c!rule} - -\def\definecorrespondencelayer[#1][#2]% - {\setvalue{\s!do\e!define#1\v!layer}{\dodefinecorrespondencelayer[#1][#2]}% - \setvalue{\s!do\e!set #1\v!layer}{\dosetcorrespondencelayer [#1][#2]}} - -\def\dodefinecorrespondencelayer[#1][#2][#3]% - {\def\dodododefinecorrespondencelayer##1{\dododefinecorrespondencelayer[#1][#2][##1]}% - \processaction - [#3] - [\v!foldmark=>{\processcommacommand[\csname#1!list!marking\endcsname]\dodododefinecorrespondencelayer}, - \v!header=>{\processcommacommand[\csname#1!list!header\endcsname ]\dodododefinecorrespondencelayer}, - \v!footer=>{\processcommacommand[\csname#1!list!footer\endcsname ]\dodododefinecorrespondencelayer}, - \s!unknown=>{\dododefinecorrespondencelayer[#1][#2][#3]}]} - -\def\dododefinecorrespondencelayer[#1][#2][#3]% - {\letvalue{#2\v!option#3}\v!yes - \doifundefined{#1:#2:#3} - {\letvalue{#1:#2:#3}\v!layer - \addvalue{#1!list!layers}{#3}}% - \setvalidparameterkeys[#1\v!layer\v!option:#3][\correspondencelayerkeys]% - \presetlocalframed[#2#3\v!frame]% - \definelayer - [#1:#3] - [\c!width=\paperwidth, - \c!height=\paperheight]% - \dodosetupcorrespondencelayer - [#1][#2][#3][\v!option]% - [\c!state=\v!start, - \c!symbol=, - \c!list=, - \c!alternative=\v!a, - \c!rule=\v!off, - \c!rulethickness=\linewidth, - \c!separator=\crlf, - \c!offset=\zeropoint, - \c!spacebefore=\zeropoint, - \c!spaceafter=\zeropoint, - \c!leftmargin=\zeropoint, - \c!rightmargin=\zeropoint]% - \dodosetupcorrespondencelayer - [#1][#2][#3][\v!frame]% - [\c!frame=\v!off, - \c!align=\v!right, - \c!offset=\zeropoint, - \c!strut=\v!yes]% - \dodosetupcorrespondencelayer - [#1][#2][#3][\v!layer]% - [\c!state=\v!start, - \c!offset=\zeropoint, - \c!preset=\v!left\v!top]} - -\def\dosetcorrespondencelayer[#1][#2][#3]% - {\!!doneafalse % first page - \!!donebfalse % even numbered pages - \!!donecfalse % odd numbered pages - \!!donedfalse % real pagenumber - \processcommacommand[\csname#2#3\c!state\endcsname]\docorrespondencelayerstate - \doifnotvalue{#2#3\v!layer\c!state}\v!stop{\setuplayer[#1:#3][\c!state=\v!start]}% - \ifnum\if!!doned\userpageno\else\subpageno\fi=\plusone - \if!!donea\dodosetcorrespondencelayer[#1][#2][#3]\fi - \else - \ifodd\if!!doned\userpageno\else\subpageno\fi - \if!!donec\dodosetcorrespondencelayer[#1][#2][#3]\fi - \else - \if!!doneb\dodosetcorrespondencelayer[#1][#2][#3]\fi - \fi\fi} - -\def\dodosetcorrespondencelayer[#1][#2][#3]% - {\doifelsecorrespondencestylevalue{#2}{#3}\c!symbol - {\dododosetcorrespondencelayer[#1][#2][#3][\correspondencestylevalue{#2}{#3}\c!symbol]} - {\dododosetcorrespondencelayer[#1][#2][#3][\directsetup{#1:#3}]}} - -\def\dododosetcorrespondencelayer[#1][#2][#3][#4]% - {\setlayer[#1:#3] - {\localframed[#2#3\v!frame] - {\edef\currentcorrespondenceelement{#3}% - \doadaptleftskip {\correspondencestylevalue{#2}{#3}\c!leftmargin }% - \doadaptrightskip{\correspondencestylevalue{#2}{#3}\c!rightmargin}% - \doattributes{#2#3}\c!style\c!color{#4}}}} - -\def\docorrespondencelayerstate#1{\csname @@headfoot@@#1\endcsname} - -\setvalue{@@headfoot@@\v!start }{\!!doneatrue } -\setvalue{@@headfoot@@\v!stop }{\!!doneafalse\!!donebfalse\!!donecfalse} -\setvalue{@@headfoot@@\v!first }{\!!doneatrue } -\setvalue{@@headfoot@@\v!next }{\!!donebtrue\!!donectrue } -\setvalue{@@headfoot@@\v!continue }{\!!donebtrue\!!donectrue } -\setvalue{@@headfoot@@\v!repeat }{\!!doneatrue\!!donebtrue\!!donectrue } -\setvalue{@@headfoot@@\v!left }{\!!donebtrue } -\setvalue{@@headfoot@@\v!right }{\!!donectrue } -\setvalue{@@headfoot@@\v!leftpage }{\!!donebtrue } -\setvalue{@@headfoot@@\v!rightpage}{\!!donectrue } -\setvalue{@@headfoot@@\v!page }{\!!donedtrue } -\setvalue{@@headfoot@@\v!subpage }{\!!donedfalse } - -%D Sections - -\def\correspondencesectionkeys - {\c!before,\c!after,\c!align,\c!leftmargin,\c!rightmargin,\c!alternative,% - \c!inbetween,\c!separator,\c!optimize,\c!command,\c!style,\c!color} - -\def\definecorrespondencesection[#1][#2]% - {\setvalue{\s!do\e!define#1\v!section}{\dodefinecorrespondencesection[#1][#2]}% - \setvalue{\s!do\e!set #1\v!section}{\dosetcorrespondencesection [#1][#2]}} - -\def\dodefinecorrespondencesection[#1][#2][#3]% - {\letvalue{#2\v!option#3}\v!yes - \doifundefined{#1:#2:#3} - {\letvalue{#1:#2:#3}\v!section - \addvalue{#1!list!sections}{#3}}% - \setvalidparameterkeys[#1\v!section:#3][\correspondencesectionkeys]% - \getparameters - [#2#3] - [\c!before=, - \c!after=, - \c!inbetween=, - \c!align=, - \c!leftmargin=\zeropoint, - \c!rightmargin=\zeropoint, - \c!alternative=\v!a, - \c!separator=\crlf, - \c!optimize=\v!no, - \c!command=, - \c!style=, - \c!color=]} - -\def\dosetcorrespondencesection[#1][#2][#3]% - {\begingroup - \edef\currentcorrespondenceelement{#3}% - \doifelsecorrespondencestylevalue{#2}{#3}\c!before - {\correspondencestylevalue{#2}{#3}\c!before} - \endgraf - \doadaptleftskip {\correspondencestylevalue{#2}{#3}\c!leftmargin }% - \doadaptrightskip{\correspondencestylevalue{#2}{#3}\c!rightmargin}% - \doifcorrespondencestylevalue{#2}{#3}\c!align - {\setupalign[\correspondencestylevalue{#2}{#3}\c!align]}% - \dostartattributes{#2#3}\c!style\c!color\empty - \correspondencestylevalue{#2}{#3}\c!command{\directsetup{#1:#3}}% - \dostopattributes - \doifcorrespondencestylevalue{#2}{#3}\c!after - {\endgraf\correspondencestylevalue{#2}{#3}\c!after} - \endgraf - \endgroup} - -%D Descriptions - -\def\correspondencedescriptionkeys - {\c!location,\c!inbetween,\c!before,\c!after,\c!width,\c!headstyle,\c!headcolor,\c!distance} - -\def\definecorrespondencedescription[#1][#2]% - {\setvalue{\s!do\e!define#1\v!description}{\dodefinecorrespondencedescription[#1][#2]}% - \setvalue{\s!do\e!set #1\v!description}{\dosetcorrespondencedescription [#1][#2]}% - \setvalue{\s!do\e!flush #1\v!description}{\doflushcorrespondencedescription [#1][#2]}} - -\def\dodefinecorrespondencedescription[#1][#2][#3]% - {\letvalue{#2\v!option#3}\v!yes - \doifundefined{#1:#2:#3}{\letvalue{#1:#2:#3}\v!description}% - \setvalidparameterkeys[#1\v!description:#3][\correspondencedescriptionkeys]% - \getparameters - [#2#3] - [\c!location=\v!left, - \c!inbetween={\blank[\v!nowhite]}, - \c!before=\blank, - \c!after=\blank, - \c!width=\v!broad, - \c!headstyle=, - \c!headcolor=, - \c!distance=\zeropoint]} - -\def\dosetcorrespondencedescription[#1][#2][#3]% - {\bgroup - \doifelsecorrespondencestylevalue{#2}{#3}\c!before - {\correspondencestylevalue{#2}{#3}\c!before} - \endgraf - \scratchdimen\zeropoint - \setbox\scratchbox\hbox{\doattributes{#2#3}\c!headstyle\c!headcolor{\labeltext{#1:#3}}}% - \doifelse{\correspondencestylevalue{#2}{#3}\c!width}\v!broad - {\ifdim\wd\scratchbox>\zeropoint - \scratchdimen\dimexpr\wd\scratchbox+1em\relax - \fi} - {\doifelse{\correspondencestylevalue{#2}{#3}\c!width}\v!fit - {\ifdim\wd\scratchbox>\zeropoint - \scratchdimen\dimexpr\wd\scratchbox+\correspondencestylevalue{#2}{#3}\c!distance\relax - \fi} - {\scratchdimen\dimexpr\correspondencestylevalue{#2}{#3}\c!width+\correspondencestylevalue{#2}{#3}\c!distance\relax}}% - \executeifdefined{@@description@@\correspondencestylevalue{#2}{#3}\c!location}\gobblethreearguments{#1}{#2}{#3}% - \doifelsecorrespondencestylevalue{#2}{#3}\c!after - {\endgraf\correspondencestylevalue{#2}{#3}\c!after} - \endgraf - \egroup} - -\setvalue{@@description@@\v!left}#1#2#3% - {\EveryPar{\hangindent\scratchdimen\hangafter\zerocount}% - \setbox\scratchbox\hbox\!!to\scratchdimen{\box\scratchbox\hss}% - \noindent\llap{\box\scratchbox}\directsetup{#1:#3}} - -\setvalue{@@description@@\v!right}#1#2#3% - {\EveryPar{\hangindent-\scratchdimen\hangafter\zerocount}% - \setbox\scratchbox\hbox\!!to\scratchdimen{\hss\box\scratchbox}% - \setbox\scratchbox\hbox\!!to\!!zeropoint {\hskip\dimexpr\hsize-\scratchdimen\relax\box\scratchbox\hss}% - \noindent\rlap{\box\scratchbox}\directsetup{#1:#3}} - -\setvalue{@@description@@\v!top}#1#2#3% - {\box\scratchbox\par - \nobreak - \doifcorrespondencestylevalue{#2}{#3}\c!inbetween{\correspondencestylevalue{#2}{#3}\c!inbetween}% - \nobreak - \directsetup{#1:#3}} - -\setvalue{@@description@@\v!text}#1#2#3% - {\noindent\box\scratchbox\directsetup{#1:#3}} - -\def\doflushcorrespondencedescription[#1][#2]% - {\def\dodoflushcorrespondencedescription##1% - {\doif{\correspondencestylevalue{#2}\v!option{##1}}\v!yes{\dosetcorrespondencedescription[#1][#2][##1]}}% - \processcommacommand[\csname#1!list!descriptions\endcsname]\dodoflushcorrespondencedescription} - -%D Commands to define named elements for header, footer etc. and use them, -%D clone them or delete their content. - -\def\definecorrespondenceelement{\dotripleargument\dodefinecorrespondenceelement } -\def\resetcorrespondenceelement {\dotripleargument\doresetcorrespondenceelement } -\def\copycorrespondenceelement {\doquintupleempty\docopycorrespondenceelement } -\def\correspondenceelement {\dotripleargument\docorrespondenceelement } - -\def\dodefinecorrespondenceelement[#1][#2][#3]#4{\setvalue{#1:#2:#3}{#4}} -\def\doresetcorrespondenceelement [#1][#2][#3]{\resetvalue{#1:#2:#3}} - -\def\docopycorrespondenceelement[#1][#2][#3][#4][#5]% - {\iffifthargument - \copycsname#1:#2:#3\endcsname\csname#1:#4:#5\endcsname - \else - \copycsname#1:#2:#3\endcsname\csname#1:#2:#4\endcsname - \fi} - -\def\docorrespondenceelement[#1][#2][#3]% - {\ifdefined\currentcorrespondenceelement\else\edef\currentcorrespondenceelement{#2}\fi - \csname#1:#2:#3\endcsname} - -\def\registercorrespondencefile#1% - {\doifundefined{@@@@#1@@@@} - {\letgvalueempty{@@@@#1@@@@}% - \ctxlua{thirddata.correspondence.checkfile("#1")}}} - -%D Lua table with all macro files and their current version, it is used -%D to build the revision table in the manual. The Lua alternative is easier -%D to maintain (same folder as the other files) and allows me to store more -%D information as I can do with the TeX solution. - -\startluacode - -thirddata = thirddata or { } -thirddata.correspondence = thirddata.correspondence or { } - -local correspondence = thirddata.correspondence - -correspondence.files = { - { - name = "t-correspondence.tex", - path = "tex/context/third/letter/base/", - type = "base", - version = "2011.09.19", - description = "Core module" - } , - { - name = "t-letter.tex", - path = "tex/context/third/letter/base/", - type = "base", - version = "2010.10.06", - description = "Letter Module" - - } , - { - name = "t-resume.tex", - path = "tex/context/third/letter/base/", - type = "base", - version = "2010.09.05", - description = "Résumé Module" - } , - { - name = "default.nli", - path = "tex/context/third/letter/interface/", - type = "interface", - version = "2011.02.07", - description = "Default letter interface" - - } , - { - name = "pragma.nli", - path = "tex/context/third/letter/interface/", - type = "interface", - version = "2009.07.18", - description = "m-letter.tex Interface" - } , - { - name = "knuth.nli", - path = "tex/context/third/letter/interface/", - type = "interface", - version = "2009.10.08", - description = "letter.tex Interface" - } , - { - name = "default.nri", - path = "tex/context/third/letter/interface/", - type = "interface", - version = "2009.06.30", - description = "Default resume interface" - } , - { - name = "moderncv.nri", - path = "tex/context/third/letter/interface/", - type = "interface", - version = "2010.11.22", - description = "moderncv resume interface" - } , - { - name = "label.nle", - path = "tex/context/third/letter/extension/", - type = "extension", - version = "2010.09.09", - description = "Text labels" - } , - { - name = "corres.nle", - path = "tex/context/third/letter/extension/", - type = "extension", - version = "2009.02.13", - description = "XML-Database" - } , - { - name = "pragma.nle", - path = "tex/context/third/letter/extension/", - type = "extension", - version = "2008.01.23", - description = "Examples from m-letter.tex" - } , - { - name = "optimize.nle", - path = "tex/context/third/letter/extension/", - type = "extension", - version = "2008.12.03", - description = "Page optimation" - } , - { - name = "addrentry.nle", - path = "tex/context/third/letter/extension/", - type = "extension", - version = "2008.12.26", - description = "\tex{addrenetry} support" - } , - { - name = "dina.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2010.03.02", - description = "German style DIN 676 A" - } , - { - name = "dinb.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2010.03.02", - description = "German style DIN 676 B" - } , - { - name = "pragma.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.09.20", - description = "m-letter.tex style" - } , - { - name = "knuth.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.02.13", - description = "letter.tex style" - } , - { - name = "dutch.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.12.28", - description = "Dutch letter style" - } , - { - name = "french.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.09.20", - description = "French letter style" - } , - { - name = "english.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.03.13", - description = "English letter style" - } , - { - name = "default.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2010.03.02", - description = "Basic style" - } , - { - name = "blockstyle.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.11.29", - description = "Default block values" - } , - { - name = "fullblock.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.12.16", - description = "Full-block" - } , - { - name = "semiblock.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.12.16", - description = "Semiblock" - } , - { - name = "modified.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.12.16", - description = "Modified block" - } , - { - name = "hanging.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.12.25", - description = "Hanging intended" - } , - { - name = "memo.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.09.21", - description = "Memo style" - } , - { - name = "simplified.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.12.16", - description = "Simplified style" - } , - { - name = "swiss.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.02.14", - description = "Swiss style" - } , - { - name = "swissleft.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.02.14", - description = "Swiss left style" - } , - { - name = "gbrief.nls", - path = "tex/context/third/letter/style/", - type = "style", - version = "2010.09.09", - description = "g-brief style" - } , - { - name = "default.nrs", - path = "tex/context/third/letter/style/", - type = "style", - version = "2009.10.10", - description = "Default resume style" - } , - { - name = "classic.nrs", - path = "tex/context/third/letter/style/", - type = "style", - version = "2010.08.11", - description = "modercv classic style" - } , - { - name = "casual.nrs", - path = "tex/context/third/letter/style/", - type = "style", - version = "2010.08.11", - description = "modercv casual style" - } , - { - name = "user.ori", - path = "tex/context/third/letter/style/", - type = "style", - version = "2008.07.08", - description = "Example for user settings" - } , -} - -for k,v in global.pairs(correspondence.files) do - local file = correspondence.files[k]["name"] - correspondence[file] = { } - correspondence[file]["name"] = file - correspondence[file]["version"] = correspondence.files[k]["version"] -end - -function correspondence.checkfile(filename) - if correspondence[filename] ~= nil then - local name = correspondence[filename]["name"] - local version = correspondence[filename]["version"] - tex.sprint(tex.prtcatcodes,string.format("\\doglobal\\appendtoks\\showmessage\\m!correspondence{4}{%s,%s}\\to\\everynotabene",name,version)) - end -end - -\stopluacode - -\registercorrespondencefile{t-correspondence.tex} - -\stopmodule - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.tex b/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.tex deleted file mode 100644 index 5bc2154c315..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/base/t-correspondence.tex +++ /dev/null @@ -1,14 +0,0 @@ -%D \module -%D [ file=t-correspondence, -%D version=2011.06.17, -%D title=\CONTEXT\ User Module, -%D subtitle=Correspondence, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\loadmarkfile{t-correspondence} - -\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-letter.mkii b/Master/texmf-dist/tex/context/third/letter/base/t-letter.mkii new file mode 100644 index 00000000000..9c9b937a1c1 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/t-letter.mkii @@ -0,0 +1,30 @@ +%D \module +%D [ file=t-letter, +%D version=2011.12.15, +%D title=\CONTEXT\ User Module, +%D subtitle=Letters, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\usemodule[cor-01] + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-letter.mkiv b/Master/texmf-dist/tex/context/third/letter/base/t-letter.mkiv new file mode 100644 index 00000000000..f4ad539f72d --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/t-letter.mkiv @@ -0,0 +1,66 @@ +%D \module +%D [ file=t-letter, +%D version=2011.12.16, +%D title=\CONTEXT\ User Module, +%D subtitle=Letters, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\startinterface all + \setinterfacevariable {letter} {letter} +\stopinterface + +\def\useletterstyle {\dosingleargument\gobbleoneoptional} + +\def\setupletter {\dosingleargument\gobbleoneoptional} +\def\setupletterstyle {\dodoubleargument\gobbletwooptionals} +\def\setupletterlayer {\dodoubleargument\gobbletwooptionals} +\def\setupletterframe {\dodoubleargument\gobbletwooptionals} +\def\setupletterlayout {\dodoubleargument\gobbletwooptionals} +\def\setuplettersection {\dodoubleargument\gobbletwooptionals} +\def\setupletterdescription {\dodoubleargument\gobbletwooptionals} +\def\setupletteroptions {\dodoubleargument\gobbletwooptionals} +\def\setuplettertext {\dodoubleargument\gobbletwooptionals} + +\def\defineletterelements {\dodoubleargument\gobbletwooptionals} +\def\setupletterelements {\dodoubleargument\gobbletwooptionals} + +\def\letterelement {\dotripleargument\gobblethreeoptionals} + +\def\defineletterelement + {\dotripleargument\dodefineletterelement} + +\def\dodefineletterelement[#1][#2][#3]#4{} + +\setvalue{\e!start\v!letter}% + {\starttext + \dostartbuffer[\v!letter][\e!start\v!letter][\e!stop\v!letter]} + +\setvalue{\e!stop\v!letter}% + {\startstandardmakeup[\c!align=\v!middle,\c!style=\ttd\setupinterlinespace] + The \MKIV\ version of the \CONTEXT\ letter module requires a installation from \date[d=14,m=12,y=2011][year,.,mm,.,dd] or newer but the version you’re using is \contextversion. + \blank[2*\v!line] + You can either use the \MKII\ version of the module or install the \CONTEXT\ Suite from the http://wiki.contextgarden.net. + \stopstandardmakeup + \stoptext} + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-letter.tex b/Master/texmf-dist/tex/context/third/letter/base/t-letter.tex deleted file mode 100644 index fe2024763ff..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/base/t-letter.tex +++ /dev/null @@ -1,643 +0,0 @@ -%D \module -%D [ file=t-letter, -%D version=2011.07.08, -%D title=\CONTEXT\ User Module, -%D subtitle=Framework for Letters, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -%M \loadsetups[cont-en.xml] -%M \loadsetups[t-letter.xml] - -%D \subject{Constants and Variables} - -\writestatus{loading}{Context User Module / Framework for Letters} - -\unprotect - -\usemodule[correspondence] - -%D Before we start the real module let us introduce two namespaces -%D for the style and content setup commands. - -\def\????ld{@@@@ld} % LetterData -\def\????ls{@@@@ls} % LetterStyle - -\startmodule[letter] - -\setupmodule - [\c!style=, % default letter style - \c!extension=, % default letter extension - \c!interface=default] % default letter interface - -\ifdefined\registercorrespondencefile \registercorrespondencefile{t-letter.tex} \fi - -%D \subject{Setup commands} -%D -%D \macros -%D {setupletterstyle} -%D -%D The layout for the first page could be set with the \mono{firstpage} -%D key and the layout for the second and all following pages with the -%D \mono{secondpage} key. You could use any key and value from -%D \type{\setuplayout} to set your own letter layout. -%D -%D \showsetup{setupletterstyle:layout} -%D -%D The header and footer texts for the letter is set with the \mono{header} -%D and \mono{footer} keys, the text itself I written as argument as one of -%D the three keys. The command itself has no option to use different texts -%D for odd and even pages (if you really want this in a letter) but you could -%D solve this with the macro \type{\doifoddpageelse}, I will give you a short -%D example below. - -\setvalue{\v!letter:\????ls:\v!firstpage }{\v!layout} -\setvalue{\v!letter:\????ls:\v!secondpage}{\v!layout} - -\definecorrespondencesetup[\v!letter\v!style][\v!letter][\????ls] - -\def\setupletterlayout [#1]{\setupletterstyle[#1]} -\def\setupletterlayer [#1]{\setupletterstyle[#1][\v!layer]} -\def\setupletterframe [#1]{\setupletterstyle[#1][\v!frame]} -\def\setuplettersection [#1]{\setupletterstyle[#1]} -\def\setupletterdescription[#1]{\setupletterstyle[#1]} -\def\setupletteroptions [#1]{\setupletterstyle[#1]} - -\def\letterstyleparameter {\letterstylevalue } -\def\letterlayoutparameter {\letterstylevalue } -\def\letterlayerparameter #1{\letterstylevalue{#1\v!layer}} -\def\letterframeparameter #1{\letterstylevalue{#1\v!frame}} -\def\lettersectionparameter {\letterstylevalue } -\def\letterdescriptionparameter {\letterstylevalue } -\def\letteroptionparameter {\letterstylevalue\v!option } - -\def\correspagenumber {\subpagenumber} -\def\numberofcorrespages{\nofsubpages } - -%D \macros -%D {setupletter} - -\definecorrespondencevalue[\v!letter][\????ld] - -%D A few extra macros to test for content of the letter values, don't rely -%D on them at the moment because they could change or I will remove, rename, -%D rewrite etc. them. -%D -%D With the change of the \type{\setupletter} command it was also necessary -%D to change the definition for lettervalue tests. - -\def\doiflettervalue {\doifcorrespondencevalue \????ld} -\def\doifelselettervalue {\doifelsecorrespondencevalue \????ld} -\def\doifletterstylevalue {\doifcorrespondencestylevalue \????ls} -\def\doifelseletterstylevalue{\doifelsecorrespondencestylevalue\????ls} - -\def\defineletterelement{\definecorrespondenceelement[\v!letter]} -\def\resetletterelement {\resetcorrespondenceelement [\v!letter]} -\def\copyletterelement {\copycorrespondenceelement [\v!letter]} -\def\letterelement {\correspondenceelement [\v!letter]} - -%D \subject{Interface, Style and Extension files} -%D -%D \macros -%D {useletterextension,useletterstyle,useletterinterface} -%D -%D This module provides different types of files beside the main module. -%D -%D Two of them could be used by the user while the third is only used in -%D this file but you're free to use but you should really now what you do. -%D -%D Each of the files has it's own file extension, you have to use if you -%D want to create such a file, this has the advantage to use the same name -%D for a collection of macros. - -\definefileconstant {letterstyle} {nls} -\definefileconstant {letterextension} {nle} -\definefileconstant {letterinterface} {nli} - -%D Let us begin now to talk about the different types of files. -%D -%D \subsubject{letter interface} -%D -%D The letter interface provides the connection between the user and the -%D inner macros, it is possible to write a letter without a interface but -%D you will loose many of the nice features. The features itself are defined -%D within the interface and try to help the user to write a letter in -%D a simpler than the raw interface. -%D -%D I want to show you the difference between the default interface and the -%D raw backend with a simple example, just a opening, the content and -%D a closing text. -%D -%D The example with the default interface looks like: -%D -%D \starttyping -%D \startletter -%D [opening=Hello User, -%D closing=Good luck with your own interface] -%D I will show you how you could write a letter with my letter module -%D and the difference between the default and the raw interface. The raw -%D interface is should be only used by a high level interface and not the -%D user but you're free to do it. -%D \stopletter -%D \stoptyping -%D -%D The same example with the raw interface looks like: -%D -%D \starttyping -%D \startsetups[letter:opening] -%D Hello User -%D \stopsetups -%D -%D \startsetups[letter:content] -%D I will show you how you could write a letter with my letter module -%D and the difference between the default and the raw interface. The raw -%D interface is should be only used by a high level interface and not the -%D user but you're free to do it. -%D \stopsetups -%D -%D \startsetups[letter:closing] -%D Good luck with your own interface -%D \stopsetups -%D \stoptyping -%D -%D The interface itself is loaded with the \type{\useletterinterface} -%D command but you could also use the optional argument for \type{\usemodule} -%D to load it. The first is only used in this file but it makes sense -%D to use it also in a wrapper file for your own interface. -%D -%D \showsetup{useletterinterface} - -\definecorrespondencefile[\v!letter][\v!interface][\f!letterinterface] - -%D \subsubject{letter extension} -%D -%D The second filetype this module supports are letterextensions, you -%D could use it to save macros and other values you want to use in many -%D without the need to put it always in the real letter. -%D -%D A few reasons for a letterextension file are: -%D -%D \startitemize[packed,intro] -%D \item The letter head from your company, -%D \item your own macro for the reference line, -%D \item labels you need in different files (see \mono{label.nle}), -%D \item \unknown -%D \stopitemize -%D -%D The syntax to load a letterextension file is the same as for a interface -%D and you could also argument for \type{\usemodule}. -%D -%D \showsetup{useletterextension} - -\definecorrespondencefile[\v!letter][\v!extension][\f!letterextension] - -%D \subsubject{letter styles} -%D -%D After I mentioned above how to load a interface and extension -%D I will now come to the most important extension for the module. -%D -%D Letter styles are used to change the layout of the letter, -%D set the values for layers and enable and disable common options. -%D Although it is possible to do all these things in the letter itself -%D it is better to save often used settings in a extra file you could -%D load on demand and share between your letters. -%D -%D You could load a style file in the same way as the other to files, -%D the first is \type{\useletterstyle} and the second the optional argument -%D for \type{\usemodule}. -%D -%D \showsetup{useletterstyle} - -\definecorrespondencefile[\v!letter][\v!style][\f!letterstyle] - -%D \macros -%D {letterstylevalue,lettervalue} -%D -%D The two commands \type{\letterstylevalue} and \type{\lettervalue} could -%D be used to access the values for the keys used in the letterstyle -%D settings and the letter values for information. - -%D The rest of module contains only internal macros and other settings, -%D you don't need them as a normal user but you look at the default. - -\def\letterstylevalue{\correspondencestylevalue\????ls} - -%D The old definition of \type{\lettervalue} required two arguments. -%D -%D \starttyping -%D \def\lettervalue#1#2% -%D {\csname\????ld#1#2\endcsname} -%D \stoptyping -%D -%D The new definition needs only one arguments because \type{\setupletter} -%D needs only one argument for the values in the new version. - -\def\lettervalue{\correspondencevalue\????ld} - -\let\letter!list!layers \empty -\let\letter!list!sections \empty -\let\letter!list!descriptions\empty - -\def\letter!list!marking - {\v!topmark,\v!botmark,\v!cutmark,\v!endmark,\v!usermark} - -\def\letter!list!header - {\v!head,\v!nexthead,\v!lefthead,\v!righthead} - -\def\letter!list!footer - {\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot} - -\definecorrespondencelayer [\v!letter][\????ls] -\definecorrespondencesection [\v!letter][\????ls] -\definecorrespondencedescription[\v!letter][\????ls] - -%D \subject{Placement of the content} -%D -%D Enable the layouts for the first and second page. - -\startsetups[\v!letter:\v!layout] - - \setuplayout[\v!letter\v!firstpage] - - \appendtoks\setuplayout[\v!letter\v!secondpage]\to\everyaftershipout - -\stopsetups - -%D Header for the first page, you could use it to place the logo from your -%D company or your own address and name. - -\dodefineletterlayer[\v!header] - -\startsetups[\v!letter:\v!place:\v!head] - - \doif\@@@@lsoptionhead \v!yes{\dosetletterlayer[\v!head ]} % First page - \doif\@@@@lsoptionnexthead \v!yes{\dosetletterlayer[\v!nexthead ]} % Following pages - \doif\@@@@lsoptionlefthead \v!yes{\dosetletterlayer[\v!lefthead ]} % Left pages - \doif\@@@@lsoptionrighthead\v!yes{\dosetletterlayer[\v!righthead]} % Right pages - -\stopsetups - -%D Address - -\dodefineletterlayer[\v!address] - -\startsetups[\v!letter:\v!place:\v!address] - - \dosetletterlayer[\v!address] - -\stopsetups - -%D Could be used to place a backaddress above the normal address. - -\dodefineletterlayer[\v!backaddress] - -\startsetups[\v!letter:\v!place:\v!backaddress] - - \dosetletterlayer[\v!backaddress] - -\stopsetups - -%D Reference line - -\dodefineletterlayer[\v!reference] - -\startsetups[\v!letter:\v!place:\v!reference] - - \dosetletterlayer[\v!reference] - -\stopsetups - -%D Location field - -\dodefineletterlayer[\v!location] - -\startsetups[\v!letter:\v!place:\v!location] - - \dosetletterlayer[\v!location] - -\stopsetups - -%D Footer block, you could use it to place information about your company -%D but take care set \type {repeat=yes} if you want to place it on every page, -%D you should disable the footer for the second and following pages inb this -%D case. - -\dodefineletterlayer[\v!footer] - -\startsetups[\v!letter:\v!place:\v!foot] - - \doif\@@@@lsoptionfoot \v!yes{\dosetletterlayer[\v!foot ]} % First page - \doif\@@@@lsoptionnextfoot \v!yes{\dosetletterlayer[\v!nextfoot ]} % Following pages - \doif\@@@@lsoptionleftfoot \v!yes{\dosetletterlayer[\v!leftfoot ]} % Left pages - \doif\@@@@lsoptionrightfoot\v!yes{\dosetletterlayer[\v!rightfoot]} % Right pages - -\stopsetups - -%D Two additional layers from Hans Hagen's own letter module, it provide -%D for users who used \filename{m-letter.tex} and want to switch to my module. -%D -%D I need they also for my pragma letter interface. - -\dodefineletterlayer[\v!lettermain] - -\startsetups[\v!letter:\v!place:\v!lettermain] - - \dosetletterlayer[\v!lettermain] - -\stopsetups - -\dodefineletterlayer[\v!letternext] - -\startsetups[\v!letter:\v!place:\v!letternext] - - \dosetletterlayer[\v!letternext] - -\stopsetups - -%D Letterhead, american only - -\dodefinelettersection[\v!letter\v!head] - -\startsetups[\v!letter:\v!place:\v!letter\v!head] - - \dosetlettersection[\v!letter\v!head] - -\stopsetups - -%D Date Line, american only - -\dodefinelettersection[\v!date\v!line] - -\startsetups[\v!letter:\v!place:\v!date\v!line] - - \dosetlettersection[\v!date\v!line] - -\stopsetups - -%D Reference Line, american only - -\dodefinelettersection[\v!reference\v!line] - -\startsetups[\v!letter:\v!place:\v!reference\v!line] - - \dosetlettersection[\v!reference\v!line] - -\stopsetups - -%D Special Notation, american only - -\dodefinelettersection[\v!special\v!notation] - -\startsetups[\v!letter:\v!place:\v!special\v!notation] - - \dosetlettersection[\v!special\v!notation] - -\stopsetups - -%D Inside Address, american only - -\dodefinelettersection[\v!inside\v!address] - -\startsetups[\v!letter:\v!place:\v!inside\v!address] - - \dosetlettersection[\v!inside\v!address] - -\stopsetups - -%D Title - -\dodefinelettersection[\v!title] - -\startsetups[\v!letter:\v!place:\v!title] - - \dosetlettersection[\v!title] - -\stopsetups - -%D Subject - -\dodefinelettersection[\v!subject] - -\startsetups[\v!letter:\v!place:\v!subject] - - \dosetlettersection[\v!subject] - -\stopsetups - -%D Opening - -\dodefinelettersection[\v!opening] - -\startsetups[\v!letter:\v!place:\v!opening] - - \dosetlettersection[\v!opening] - -\stopsetups - -%D Letter content - -\dodefinelettersection[\v!content] - -\startsetups[\v!letter:\v!place:\v!content] - - \begingroup - - \doifletterstylevalue\v!option\c!indenting{\setupindenting[\@@@@lsoptionindenting]} - - \executeifdefined{\v!letter\v!content\s!start\c!optimize\@@@@lscontentoptimize}\donothing - \dosetlettersection[\v!content] - \executeifdefined{\v!letter\v!content\s!stop \c!optimize\@@@@lscontentoptimize}\donothing - - \endgroup - -\stopsetups - -%D Closing - -\dodefinelettersection[\v!closing] - -\startsetups[\v!letter:\v!place:\v!closing] - - \dosetlettersection[\v!closing] - -\stopsetups - -%D Appendices - -\dodefinelettersection[\v!appendices] - -\startsetups[\v!letter:\v!place:\v!appendices] - - \dosetlettersection[\v!appendices] - -\stopsetups - -%D Fold- and cutmarks, you enable and disable all of them independant -%D from any other or disable all marks with just one command. - -\dodefineletterlayer[\v!foldmark] - -\startsetups[\v!letter:\v!place:\v!foldmark] - - \doif\@@@@lsoptiontopmark \v!yes{\dosetletterlayer[\v!topmark ]} % Upper foldmark - \doif\@@@@lsoptionbotmark \v!yes{\dosetletterlayer[\v!botmark ]} % Lower foldmark - \doif\@@@@lsoptioncutmark \v!yes{\dosetletterlayer[\v!cutmark ]} % Cutmark - \doif\@@@@lsoptionendmark \v!yes{\dosetletterlayer[\v!endmark ]} % Endmark, a relict from the typewriter area - \doif\@@@@lsoptionusermark\v!yes{\dosetletterlayer[\v!usermark]} % Free mark, you could use it to place your own symbols - -\stopsetups - -%D Background graphic: - -\defineoverlay - [\v!letter:\c!backgroundimage] - [\doifletterstylevalue\v!option\c!backgroundimage - {\overlayfigure{\@@@@lsoptionbackgroundimage}}] - -\defineoverlay - [\v!letter:\c!background] - [\@@@@lsoptionbackground] - -\def\letter!list!backgrounds - {\v!letter:\c!backgroundimage,\v!letter:\c!background,\v!letter:\v!head,% - \v!letter:\v!letternext,\v!letter:\v!lettermain,\v!letter:\v!foot,% - \v!letter:\v!address,\v!letter:\v!reference,\v!letter:\v!location,% - \v!letter:\v!nexthead,\v!letter:\v!lefthead,\v!letter:\v!righthead,% - \v!letter:\v!nextfoot,\v!letter:\v!leftfoot,\v!letter:\v!rightfoot,% - \v!letter:\v!topmark,\v!letter:\v!botmark,\v!letter:\v!cutmark,% - \v!letter:\v!endmark,\v!letter:\v!usermark,\v!letter:\v!backaddress} - -%D Settings at the begin of every letter. - -\startsetups[\v!letter:\v!initialize] - - \@@@@lsoptionbefore - - \begingroup - - \page[\@@@@lsoptionpage] - - \setupsubpagenumber - [\c!way=\v!by\v!text, - \c!state=\v!start] - - \setuppagenumbering - [\c!alternative=\@@@@lsoptionalternative, - \c!location=] % use the header and footer option instead - - \setupheader[\c!state=\v!stop] % no header or footer lines from ConTeXt, - \setupfooter[\c!state=\v!stop] % both elements are placed with layers - - \setupbackgrounds - [\v!paper] - [\c!background=\v!color, - \c!backgroundcolor=\@@@@lsoptionbackgroundcolor] - - \setupbackgrounds - [\v!page] - [\c!setups={\v!letter:\v!place:\v!head,\v!letter:\v!place:\v!foot,\v!letter:\v!layer}, - \c!background=\letter!list!backgrounds] - - \doifletterstylevalue\v!option\c!bodyfont {\setupbodyfont [\@@@@lsoptionbodyfont ]} - \doifletterstylevalue\v!option\c!whitespace{\setupwhitespace[\@@@@lsoptionwhitespace]} - -\stopsetups - -%D Settings at the end of every letter. - -\startsetups[\v!letter:\v!finish] - - \page[\@@@@lsoptionpage] - - \setuplayout[\v!reset] - - \resetsubpagenumber - - \endgroup - - \@@@@lsoptionafter - -\stopsetups - -%D Place the letter. - -\startsetups[\v!letter:\v!place] - - \directsetup{\v!letter:\v!initialize} % Settings at the begin - \directsetup{\v!letter:\v!optimize } % Interface dependend - \directsetup{\v!letter:\v!layout } % Page layout - \directsetup{\v!letter:\v!sequence } % Place content - \directsetup{\v!letter:\v!finish } % Settings at the end - -\stopsetups - -\startsetups[\v!letter:\v!layer] - - \doif\@@@@lsoptionmarking \v!yes{\directsetup{\v!letter:\v!place:\v!foldmark }} - \doif\@@@@lsoptionbackaddress\v!yes{\directsetup{\v!letter:\v!place:\v!backaddress}} - \doif\@@@@lsoptionaddress \v!yes{\directsetup{\v!letter:\v!place:\v!address }} - \doif\@@@@lsoptionreference \v!yes{\directsetup{\v!letter:\v!place:\v!reference }} - \doif\@@@@lsoptionlocation \v!yes{\directsetup{\v!letter:\v!place:\v!location }} - \doif\@@@@lsoptionlettermain \v!yes{\directsetup{\v!letter:\v!place:\v!lettermain }} - \doif\@@@@lsoptionletternext \v!yes{\directsetup{\v!letter:\v!place:\v!letternext }} - -\stopsetups - -%D Place the letter content. - -\let\letter!order!sections\letter!list!sections - -\def\doflushlettersection#1% - {\doif{\letterstylevalue\v!option{#1}}\v!yes{\directsetup{\v!letter:\v!place:#1}}} - -\startsetups[\v!letter:\v!sequence] - - \executeifdefined{\v!letter\s!start\c!optimize\@@@@lsoptionoptimize}\donothing - \processcommacommand[\letter!order!sections]\doflushlettersection - \executeifdefined{\v!letter\s!stop \c!optimize\@@@@lsoptionoptimize}\donothing - -\stopsetups - -%D \subject{Default values} -%D -%D Default settings for the option values of the letter. - -\setupletterstyle - [\v!option] - [\c!marking=\v!yes, - \c!endmark=\v!no, - \c!usermark=\v!no, - \c!backaddress=\v!no, - \c!indenting=, - \c!whitespace=, - \c!background=, - \c!backgroundcolor=\v!white, - \c!backgroundimage=, - \c!before=, - \c!after=, - \c!page=\v!yes, - \c!pagenumber=\plusone, - \c!bodyfont=, - \c!optimize=\v!no, - \c!position=\v!yes, - \c!alternative=\v!singlesided] - -% interface always before styles and extension because users should -% start with a clean interface without predefined and unwanted values. - -\useletterinterface[\currentmoduleparameter\c!interface] -\useletterstyle [\currentmoduleparameter\c!style ] -\useletterextension[\currentmoduleparameter\c!extension] - -%D The special style \mono{user} is not included in the archive and has -%D to be written by the user itself, it can be used to set default values -%D for personal letters and to load additional extensions and styles. - -\useletterstyle[user] % don't rely on the name, it can change for the moment - -\stopmodule - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-memo.mkii b/Master/texmf-dist/tex/context/third/letter/base/t-memo.mkii new file mode 100644 index 00000000000..92a13d4fe71 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/t-memo.mkii @@ -0,0 +1,30 @@ +%D \module +%D [ file=t-memo, +%D version=2011.12.15, +%D title=\CONTEXT\ User Module, +%D subtitle=Memos, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\usemodule[cor-02] + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-memo.mkiv b/Master/texmf-dist/tex/context/third/letter/base/t-memo.mkiv new file mode 100644 index 00000000000..92c3cb45bee --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/base/t-memo.mkiv @@ -0,0 +1,66 @@ +%D \module +%D [ file=t-memo, +%D version=2011.12.16, +%D title=\CONTEXT\ User Module, +%D subtitle=Memos, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\unprotect + +\startinterface all + \setinterfacevariable {memo} {memo} +\stopinterface + +\def\usememostyle {\dosingleargument\gobbleoneoptional} + +\def\setupmemo {\dosingleargument\gobbleoneoptional} +\def\setupmemostyle {\dodoubleargument\gobbletwooptionals} +\def\setupmemolayer {\dodoubleargument\gobbletwooptionals} +\def\setupmemoframe {\dodoubleargument\gobbletwooptionals} +\def\setupmemolayout {\dodoubleargument\gobbletwooptionals} +\def\setupmemosection {\dodoubleargument\gobbletwooptionals} +\def\setupmemodescription {\dodoubleargument\gobbletwooptionals} +\def\setupmemooptions {\dodoubleargument\gobbletwooptionals} +\def\setupmemotext {\dodoubleargument\gobbletwooptionals} + +\def\definememoelements {\dodoubleargument\gobbletwooptionals} +\def\setupmemoelements {\dodoubleargument\gobbletwooptionals} + +\def\memoelement {\dotripleargument\gobblethreeoptionals} + +\def\definememoelement + {\dotripleargument\dodefinememoelement} + +\def\dodefinememoelement[#1][#2][#3]#4{} + +\setvalue{\e!start\v!memo}% + {\starttext + \dostartbuffer[\v!memo][\e!start\v!memo][\e!stop\v!memo]} + +\setvalue{\e!stop\v!memo}% + {\startstandardmakeup[\c!align=\v!middle,\c!style=\ttd\setupinterlinespace] + The \MKIV\ version of the \CONTEXT\ memo module requires a installation from \date[d=14,m=12,y=2011][year,.,mm,.,dd] or newer but the version you’re using is \contextversion. + \blank[2*\v!line] + You can either use the \MKII\ version of the module or install the \CONTEXT\ Suite from the http://wiki.contextgarden.net. + \stopstandardmakeup + \stoptext} + +\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/base/t-resume.tex b/Master/texmf-dist/tex/context/third/letter/base/t-resume.tex deleted file mode 100644 index 0fab9c57f25..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/base/t-resume.tex +++ /dev/null @@ -1,325 +0,0 @@ -%D \module -%D [ file=t-resume, -%D version=2010.09.05, -%D title=\CONTEXT\ User Module, -%D subtitle=Resumes, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\writestatus{loading}{Context User Module / Framework for Resumes} - -\unprotect - -\usemodule[correspondence] - -\def\????rd{@@@@rd} % ResumeData -\def\????rs{@@@@rs} % ResumeStyle - -\startmodule[resume] - -\setupmodule - [\c!style=, - \c!extension=, - \c!interface=default] - -\ifdefined\registercorrespondencefile \registercorrespondencefile{t-resume.tex} \fi - -%D \macros -%D {setupresumestyle} - -\setvalue{\v!resume:\????rs:\v!firstpage }{\v!layout} -\setvalue{\v!resume:\????rs:\v!secondpage}{\v!layout} - -\definecorrespondencesetup[\v!resume\v!style][\v!resume][\????rs] - -\def\correspagenumber {\subpagenumber} -\def\numberofcorrespages{\nofsubpages } - -%D \macros -%D {setupresume} - -\definecorrespondencevalue[\v!resume][\????rd] - -%D \macros -%D {doifresumevalue,doifelseresumevalue,doifresumestylevalue,doifelseresumestylevalue, -%D defineresumeelement,resetresumeelement,copyresumeelement,resumeelement} - -\def\doifresumevalue {\doifcorrespondencevalue \????rd} -\def\doifelseresumevalue {\doifelsecorrespondencevalue \????rd} -\def\doifresumestylevalue {\doifcorrespondencestylevalue \????rs} -\def\doifelseresumestylevalue{\doifelsecorrespondencestylevalue\????rs} - -\def\defineresumeelement{\definecorrespondenceelement[\v!resume]} -\def\resetresumeelement {\resetcorrespondenceelement [\v!resume]} -\def\copyresumeelement {\copycorrespondenceelement [\v!resume]} -\def\resumeelement {\correspondenceelement [\v!resume]} - -%D \macros -%D {useresumeextension,useresumestyle,useresumeinterface} - -\definefileconstant {resumestyle} {nrs} -\definefileconstant {resumeextension} {nre} -\definefileconstant {resumeinterface} {nri} - -\definecorrespondencefile[\v!resume][\v!interface][\f!resumeinterface] -\definecorrespondencefile[\v!resume][\v!extension][\f!resumeextension] -\definecorrespondencefile[\v!resume][\v!style ][\f!resumestyle ] - -%D \macros -%D {resumestylevalue,resumevalue} - -\def\resumestylevalue{\correspondencestylevalue\????rs} -\def\resumevalue {\correspondencevalue \????rd} - -\let\resume!list!layers \empty -\let\resume!list!sections \empty -\let\resume!list!descriptions\empty - -\def\resume!list!marking - {\v!topmark,\v!botmark,\v!cutmark,\v!usermark} - -\def\resume!list!header - {\v!head,\v!nexthead} - -\def\resume!list!footer - {\v!foot,\v!nextfoot} - -\definecorrespondencelayer [\v!resume][\????rs] -\definecorrespondencesection [\v!resume][\????rs] -\definecorrespondencedescription[\v!resume][\????rs] - -%D \subject{Placement of the content} -%D -%D Enable the layouts for the first and second page. - -\startsetups[\v!resume:\v!layout] - - \setuplayout[\v!resume\v!firstpage] - - \appendtoks\setuplayout[\v!resume\v!secondpage]\to\everyaftershipout - -\stopsetups - -%D Header - -\dodefineresumelayer[\v!header] - -\startsetups[\v!resume:\v!place:\v!head] - - \doif\@@@@rsoptionhead \v!yes{\dosetresumelayer[\v!head ]} % First page - \doif\@@@@rsoptionnexthead\v!yes{\dosetresumelayer[\v!nexthead]} % Following pages - -\stopsetups - -%D Footer - -\dodefineresumelayer[\v!footer] - -\startsetups[\v!resume:\v!place:\v!foot] - - \doif\@@@@rsoptionfoot \v!yes{\dosetresumelayer[\v!foot ]} % First page - \doif\@@@@rsoptionnextfoot\v!yes{\dosetresumelayer[\v!nextfoot]} % Following pages - -\stopsetups - -%D Free layers to position logos etc. - -\dodefineresumelayer[\v!resumemain] - -\startsetups[\v!resume:\v!place:\v!resumemain] - - \dosetresumelayer[\v!resumemain] - -\stopsetups - -\dodefineresumelayer[\v!resumenext] - -\startsetups[\v!resume:\v!place:\v!resumenext] - - \dosetresumelayer[\v!resumenext] - -\stopsetups - -%D Title - -\dodefineresumesection[\v!title] - -\startsetups[\v!resume:\v!place:\v!title] - - \dosetresumesection[\v!title] - -\stopsetups - -%D Resume content - -\dodefineresumesection[\v!content] - -\startsetups[\v!resume:\v!place:\v!content] - - \begingroup - - \doifresumestylevalue\v!option\c!indenting{\setupindenting[\@@@@rsoptionindenting]} - - \dosetresumesection[\v!content] - - \endgroup - -\stopsetups - -%D Appendices - -\dodefineresumesection[\v!appendices] - -\startsetups[\v!resume:\v!place:\v!appendices] - - \dosetresumesection[\v!appendices] - -\stopsetups - -%D Fold- and cutmarks, you enable and disable all of them independant -%D from any other or disable all marks with just one command. - -\dodefineresumelayer[\v!foldmark] - -\startsetups[\v!resume:\v!place:\v!foldmark] - - \doif\@@@@rsoptiontopmark \v!yes{\dosetresumelayer[\v!topmark ]} % Upper foldmark - \doif\@@@@rsoptionbotmark \v!yes{\dosetresumelayer[\v!botmark ]} % Lower foldmark - \doif\@@@@rsoptioncutmark \v!yes{\dosetresumelayer[\v!cutmark ]} % Cutmark - \doif\@@@@rsoptionusermark\v!yes{\dosetresumelayer[\v!usermark]} % Free mark, you could use it to place your own symbols - -\stopsetups - -%D Background graphic - -\defineoverlay - [\v!resume:\c!backgroundimage] - [\doifsomething\@@@@rsoptionbackgroundimage - {\overlayfigure{\@@@@rsoptionbackgroundimage}}] - -\defineoverlay - [\v!resume:\c!background] - [\@@@@rsoptionbackground] - -\def\resume!list!backgrounds - {\v!resume:\c!backgroundimage,\v!resume:\c!background,% - \v!resume:\v!resumenext,\v!resume:\v!resumemain, - \v!resume:\v!head,\v!resume:\v!foot,\v!resume:\v!nexthead,% - \v!resume:\v!nextfoot,\v!resume:\v!topmark,\v!resume:\v!botmark,% - \v!resume:\v!cutmark,\v!resume:\v!usermark} - -%D Settings at the begin of every resume. - -\startsetups[\v!resume:\v!initialize] - - \@@@@rsoptionbefore - - \begingroup - - \page[\@@@@rsoptionpage] - - \setupsubpagenumber - [\c!way=\v!by\v!text, - \c!state=\v!start] - - \setuppagenumbering - [\c!alternative=\@@@@rsoptionalternative, - \c!location=] % use the header and footer option instead - - \setupheader[\c!state=\v!stop] % no header or footer lines from ConTeXt, - \setupfooter[\c!state=\v!stop] % both elements are placed with layers - - \setupbackgrounds - [\v!paper] - [\c!background=\v!color, - \c!backgroundcolor=\@@@@rsoptionbackgroundcolor] - - \setupbackgrounds - [\v!page] - [\c!setups={\v!resume:\v!place:\v!head,\v!resume:\v!place:\v!foot,\v!resume:\v!layer}, - \c!background=\resume!list!backgrounds] - - \doifresumestylevalue\v!option\c!bodyfont {\setupbodyfont [\@@@@rsoptionbodyfont ]} - \doifresumestylevalue\v!option\c!whitespace{\setupwhitespace[\@@@@rsoptionwhitespace]} - -\stopsetups - -%D Settings at the end of every resume. - -\startsetups[\v!resume:\v!finish] - - \page[\@@@@rsoptionpage] - - \setuplayout[\v!reset] - - \resetsubpagenumber - - \endgroup - - \@@@@rsoptionafter - -\stopsetups - -%D Place the resume. - -\startsetups[\v!resume:\v!place] - - \directsetup{\v!resume:\v!initialize} % Settings at the begin - \directsetup{\v!resume:\v!optimize } % Interface dependend - \directsetup{\v!resume:\v!layout } % Page layout - \directsetup{\v!resume:\v!sequence } % Place content - \directsetup{\v!resume:\v!finish } % Settings at the end - -\stopsetups - -\startsetups[\v!resume:\v!layer] - - \doif\@@@@rsoptionmarking \v!yes{\directsetup{\v!resume:\v!place:\v!foldmark }} - \doif\@@@@rsoptionresumemain\v!yes{\directsetup{\v!resume:\v!place:\v!resumemain}} - \doif\@@@@rsoptionresumenext\v!yes{\directsetup{\v!resume:\v!place:\v!resumenext}} - -\stopsetups - -%D Place the resume content. - -\let\resume!order!sections\resume!list!sections - -\def\doflushresumesection#1% - {\doif{\resumestylevalue\v!option{#1}}\v!yes{\directsetup{\v!resume:\v!place:#1}}} - -\startsetups[\v!resume:\v!sequence] - - \processcommacommand[\resume!list!sections]\doflushresumesection - -\stopsetups - -%D \subject{Default values} - -\setupresumestyle - [\v!option] - [\c!marking=\v!yes, - \c!usermark=\v!no, - \c!indenting=, - \c!whitespace=, - \c!background=, - \c!backgroundcolor=\v!white, - \c!backgroundimage=, - \c!before=, - \c!after=, - \c!page=\v!yes, - \c!pagenumber=\plusone, - \c!bodyfont=, - \c!alternative=\v!singlesided] - -%D Default style - -\useresumeinterface[\currentmoduleparameter\c!interface] -\useresumestyle [\currentmoduleparameter\c!style ] -\useresumeextension[\currentmoduleparameter\c!extension] - -\stopmodule - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle b/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle deleted file mode 100644 index 0a7a45bbfe3..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/extension/addrentry.nle +++ /dev/null @@ -1,29 +0,0 @@ -%D \module -%D [ file=addrentry, -%D version=2008.12.26, -%D title=\CONTEXT\ Letter Extension, -%D subtitle=KOMA-Script addrentry support, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\def\addrentry#1#2#3#4#5#6#7#8#9% - {\doifsomething{#1} - {\doifelsenothing{#2} - {\setvalue{\????ld\????ld#9}{#1\\#3}} - {\setvalue{\????ld\????ld#9}{#2\space#1\\#3}}}} - -\def\adrentry#1#2#3#4#5#6#7#8% - {\addrentry{#1}{#2}{#3}{#4}{#5}{#6}{#7}{}{#8}} - -\let\adrchar\gobbleoneargument - -\definefileconstant {addressfile} {adr} - -\definecorrespondencefile[\v!address][\v!file][\f!addressfile] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/extension/corres.nle b/Master/texmf-dist/tex/context/third/letter/extension/corres.nle deleted file mode 100644 index 94c9410397a..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/extension/corres.nle +++ /dev/null @@ -1,36 +0,0 @@ -%D \module -%D [ file=corres, -%D version=2009.02.13, -%D title=\CONTEXT\ Letter Extension, -%D subtitle=XML Handling, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\usemodule[corres] - -\setupletter - [\c!prefix=\XMLflush{prefix}, - \c!suffix=\XMLflush{suffix}, - \c!initials=\XMLflush{initials}, - \c!formalname=\XMLflush{formalname}, - \c!informalname=\XMLflush{informalname}] - -\setupletter - [\c!toaddress=\XMLflush{address}] - -\startsetups[\v!letter:\v!opening] -\lettervalue\c!prefix -\doiflettervalue\c!formalname\space -\lettervalue\c!formalname -\stopsetups - -\startsetups[\v!contact:\v!handle] -\setups[\v!letter:\v!place] -\stopsetups - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/extension/label.nle b/Master/texmf-dist/tex/context/third/letter/extension/label.nle deleted file mode 100644 index 208b6a536e9..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/extension/label.nle +++ /dev/null @@ -1,326 +0,0 @@ -%D \module -%D [ file=label, -%D version=2010.09.09, -%D title=\CONTEXT\ Letter Extension, -%D subject=Labels, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -% french labels: Olivier Guéry - -\unprotect - -%D \subject{Letter} - -%D Label: name - -\setuplabeltext[\s!en][\v!letter:\c!name=Name] -\setuplabeltext[\s!nl][\v!letter:\c!name=] -\setuplabeltext[\s!de][\v!letter:\c!name=Name] -\setuplabeltext[\s!fr][\v!letter:\c!name=Nom] -\setuplabeltext[\s!it][\v!letter:\c!name=] -\setuplabeltext[\s!es][\v!letter:\c!name=] - -%D Label: room - -\setuplabeltext[\s!en][\v!letter:\c!room=Room] -\setuplabeltext[\s!nl][\v!letter:\c!room=] -\setuplabeltext[\s!de][\v!letter:\c!room=Zimmer] -\setuplabeltext[\s!fr][\v!letter:\c!room=Salle] % Salle or Pièce -\setuplabeltext[\s!it][\v!letter:\c!room=] -\setuplabeltext[\s!es][\v!letter:\c!room=] - -%D Label: yourref - -\setuplabeltext[\s!en][\v!letter:\c!yourref=Your ref.] -\setuplabeltext[\s!nl][\v!letter:\c!yourref=Uw kenmerk] -\setuplabeltext[\s!de][\v!letter:\c!yourref=Ihr Zeichen] -\setuplabeltext[\s!fr][\v!letter:\c!yourref=Vos r\eacute f\eacute rences] -\setuplabeltext[\s!it][\v!letter:\c!yourref=Vs./Rif.] -\setuplabeltext[\s!es][\v!letter:\c!yourref=Su ref.] - -%D Label: yourmail - -\setuplabeltext[\s!en][\v!letter:\c!yourmail=Your letter of] -\setuplabeltext[\s!nl][\v!letter:\c!yourmail=Uw brief van] -\setuplabeltext[\s!de][\v!letter:\c!yourmail=Ihre Nachricht vom] -\setuplabeltext[\s!fr][\v!letter:\c!yourmail=Votre lettre du] -\setuplabeltext[\s!it][\v!letter:\c!yourmail=Vs.~lettera del] -\setuplabeltext[\s!es][\v!letter:\c!yourmail=Su carta de] - -%D Label: myref - -\setuplabeltext[\s!en][\v!letter:\c!myref=Our ref.] -\setuplabeltext[\s!nl][\v!letter:\c!myref=Ons kenmerk] -\setuplabeltext[\s!de][\v!letter:\c!myref=Unser Zeichen] -\setuplabeltext[\s!fr][\v!letter:\c!myref=Nos r\eacute f\eacute rences] -\setuplabeltext[\s!it][\v!letter:\c!myref=Ns./Rif.] -\setuplabeltext[\s!es][\v!letter:\c!myref=Nuestra ref.] - -%D Label: mymail - -\setuplabeltext[\s!en][\v!letter:\c!mymail=Our letter of] -\setuplabeltext[\s!nl][\v!letter:\c!mymail=Ons brief van] -\setuplabeltext[\s!de][\v!letter:\c!mymail=Unsere Nachricht vom] -\setuplabeltext[\s!fr][\v!letter:\c!mymail=Notre lettre du] -\setuplabeltext[\s!it][\v!letter:\c!mymail=] -\setuplabeltext[\s!es][\v!letter:\c!mymail=] - -%D Label: customer - -\setuplabeltext[\s!en][\v!letter:\c!customer=Customer no.] -\setuplabeltext[\s!nl][\v!letter:\c!customer=Klant No.] -\setuplabeltext[\s!de][\v!letter:\c!customer=Kundennummer] -\setuplabeltext[\s!fr][\v!letter:\c!customer=Num\eacute ro de client] -\setuplabeltext[\s!it][\v!letter:\c!customer=Nr.~cliente] -\setuplabeltext[\s!es][\v!letter:\c!customer=No. de cliente] - -%D Label: invoice - -\setuplabeltext[\s!en][\v!letter:\c!invoice=Invoice no.] -\setuplabeltext[\s!nl][\v!letter:\c!invoice=Rekening No.] -\setuplabeltext[\s!de][\v!letter:\c!invoice=Rechnungsnummer] -\setuplabeltext[\s!fr][\v!letter:\c!invoice=Num\eacute ro de facture] -\setuplabeltext[\s!it][\v!letter:\c!invoice=Nr.~fattura] -\setuplabeltext[\s!es][\v!letter:\c!invoice=No. de factura] - -%D Label: attention - -\setuplabeltext[\s!en][\v!letter:\c!attention=] % Attention -\setuplabeltext[\s!nl][\v!letter:\c!attention=] -\setuplabeltext[\s!de][\v!letter:\c!attention=] -\setuplabeltext[\s!fr][\v!letter:\c!attention=] -\setuplabeltext[\s!it][\v!letter:\c!attention=] -\setuplabeltext[\s!es][\v!letter:\c!attention=] - -%D Label: subject - -\setuplabeltext[\s!en][\v!letter:\c!subject=] % Subject -\setuplabeltext[\s!nl][\v!letter:\c!subject=] % Onderwerp -\setuplabeltext[\s!de][\v!letter:\c!subject=] % Betrifft -\setuplabeltext[\s!fr][\v!letter:\c!subject=Concernant] % Concernant or Sujet -\setuplabeltext[\s!it][\v!letter:\c!subject=] % Oggetto -\setuplabeltext[\s!es][\v!letter:\c!subject=] % Asunto - -%D Label: cc - -\setuplabeltext[\s!en][\v!letter:\c!cc=cc] -\setuplabeltext[\s!nl][\v!letter:\c!cc=Kopie aan] -\setuplabeltext[\s!de][\v!letter:\c!cc=Kopien an] -\setuplabeltext[\s!fr][\v!letter:\c!cc=Copie \agrave] -\setuplabeltext[\s!it][\v!letter:\c!cc=Per conoscenza] -\setuplabeltext[\s!es][\v!letter:\c!cc=Copias] - -%D Label: enclosure - -\setuplabeltext[\s!en][\v!letter:\c!enclosure=encl] -\setuplabeltext[\s!nl][\v!letter:\c!enclosure=Bijlage(n)] -\setuplabeltext[\s!de][\v!letter:\c!enclosure=Anlagen] -\setuplabeltext[\s!fr][\v!letter:\c!enclosure=Annexes] -\setuplabeltext[\s!it][\v!letter:\c!enclosure=Allegato] -\setuplabeltext[\s!es][\v!letter:\c!enclosure=Adjunto] - -%D Label: to - -\setuplabeltext[\s!en][\v!letter:\c!to=To] -\setuplabeltext[\s!nl][\v!letter:\c!to=Aan] -\setuplabeltext[\s!de][\v!letter:\c!to=An] -\setuplabeltext[\s!fr][\v!letter:\c!to=\Agrave] -\setuplabeltext[\s!it][\v!letter:\c!to=A] -\setuplabeltext[\s!es][\v!letter:\c!to=A] - -%D Label: toname - -\setuplabeltext[\s!en][\v!letter:\c!toname=To] -\setuplabeltext[\s!nl][\v!letter:\c!toname=Aan] -\setuplabeltext[\s!de][\v!letter:\c!toname=An] -\setuplabeltext[\s!fr][\v!letter:\c!toname=\Agrave] -\setuplabeltext[\s!it][\v!letter:\c!toname=A] -\setuplabeltext[\s!es][\v!letter:\c!toname=A] - -%D Label: from - -\setuplabeltext[\s!en][\v!letter:\c!from=From] -\setuplabeltext[\s!nl][\v!letter:\c!from=Van] -\setuplabeltext[\s!de][\v!letter:\c!from=Von] -\setuplabeltext[\s!fr][\v!letter:\c!from=De] -\setuplabeltext[\s!it][\v!letter:\c!from=Da] -\setuplabeltext[\s!es][\v!letter:\c!from=De] - -%D Label: fromname - -\setuplabeltext[\s!en][\v!letter:\c!fromname=From] -\setuplabeltext[\s!nl][\v!letter:\c!fromname=Van] -\setuplabeltext[\s!de][\v!letter:\c!fromname=Von] -\setuplabeltext[\s!fr][\v!letter:\c!fromname=De] -\setuplabeltext[\s!it][\v!letter:\c!fromname=Da] -\setuplabeltext[\s!es][\v!letter:\c!fromname=De] - -%D Label: date - -\setuplabeltext[\s!en][\v!letter:\c!date=Date] -\setuplabeltext[\s!nl][\v!letter:\c!date=Datum] -\setuplabeltext[\s!de][\v!letter:\c!date=Datum] -\setuplabeltext[\s!fr][\v!letter:\c!date=Date] -\setuplabeltext[\s!it][\v!letter:\c!date=Data] -\setuplabeltext[\s!es][\v!letter:\c!date=Fecha] - -%D Label: phone - -\setuplabeltext[\s!en][\v!letter:\c!phone=Phone] -\setuplabeltext[\s!nl][\v!letter:\c!phone=Telefoon] -\setuplabeltext[\s!de][\v!letter:\c!phone=Telefon] -\setuplabeltext[\s!fr][\v!letter:\c!phone=T\eacute l\eacute phone] -\setuplabeltext[\s!it][\v!letter:\c!phone=Telefono] -\setuplabeltext[\s!es][\v!letter:\c!phone=Tel\eacute fono] - -%D Label: fax - -\setuplabeltext[\s!en][\v!letter:\c!fax=Fax] -\setuplabeltext[\s!nl][\v!letter:\c!fax=Fax] -\setuplabeltext[\s!de][\v!letter:\c!fax=Fax] -\setuplabeltext[\s!fr][\v!letter:\c!fax=T\eacute l\eacute fax] % or Fax -\setuplabeltext[\s!it][\v!letter:\c!fax=Fax] -\setuplabeltext[\s!es][\v!letter:\c!fax=Fax] - -%D Label: email - -\setuplabeltext[\s!en][\v!letter:\c!email=Email] -\setuplabeltext[\s!nl][\v!letter:\c!email=E--mail] -\setuplabeltext[\s!de][\v!letter:\c!email=E-Mail] -\setuplabeltext[\s!fr][\v!letter:\c!email=Courriel] % Adresse électronique -\setuplabeltext[\s!it][\v!letter:\c!email=Email] -\setuplabeltext[\s!es][\v!letter:\c!email=Email] - -%D Label: url - -\setuplabeltext[\s!en][\v!letter:\c!url=Url] -\setuplabeltext[\s!nl][\v!letter:\c!url=URL] -\setuplabeltext[\s!de][\v!letter:\c!url=URL] -\setuplabeltext[\s!fr][\v!letter:\c!url=Site web] -\setuplabeltext[\s!it][\v!letter:\c!url=Sito Web] -\setuplabeltext[\s!es][\v!letter:\c!url=URL] - -%D Label: bank - -\setuplabeltext[\s!en][\v!letter:\c!bank=Bank account] -\setuplabeltext[\s!nl][\v!letter:\c!bank=Bankrekening] -\setuplabeltext[\s!de][\v!letter:\c!bank=Bankverbindung] -\setuplabeltext[\s!fr][\v!letter:\c!bank=Compte en banque] -\setuplabeltext[\s!it][\v!letter:\c!bank=Conto bancario] -\setuplabeltext[\s!es][\v!letter:\c!bank=Cuenta bancaria] - -%D Label: organization - -\setuplabeltext[\s!en][\v!letter:\c!organization=Organization] -\setuplabeltext[\s!nl][\v!letter:\c!organization=] -\setuplabeltext[\s!de][\v!letter:\c!organization=Organisation] -\setuplabeltext[\s!fr][\v!letter:\c!organization=] -\setuplabeltext[\s!it][\v!letter:\c!organization=] -\setuplabeltext[\s!es][\v!letter:\c!organization=] - -%D Label: city - -\setuplabeltext[\s!en][\v!letter:\c!city=City] -\setuplabeltext[\s!nl][\v!letter:\c!city=] -\setuplabeltext[\s!de][\v!letter:\c!city=Stadt] -\setuplabeltext[\s!fr][\v!letter:\c!city=] -\setuplabeltext[\s!it][\v!letter:\c!city=] -\setuplabeltext[\s!es][\v!letter:\c!city=] - -%D Label: zip - -\setuplabeltext[\s!en][\v!letter:\c!zip=Zip] -\setuplabeltext[\s!nl][\v!letter:\c!zip=] -\setuplabeltext[\s!de][\v!letter:\c!zip=PLZ] -\setuplabeltext[\s!fr][\v!letter:\c!zip=] -\setuplabeltext[\s!it][\v!letter:\c!zip=] -\setuplabeltext[\s!es][\v!letter:\c!zip=] - -%D Label: country - -\setuplabeltext[\s!en][\v!letter:\c!country=Country] -\setuplabeltext[\s!nl][\v!letter:\c!country=] -\setuplabeltext[\s!de][\v!letter:\c!country=Land] -\setuplabeltext[\s!fr][\v!letter:\c!country=] -\setuplabeltext[\s!it][\v!letter:\c!country=] -\setuplabeltext[\s!es][\v!letter:\c!country=] - -%D Label: street - -\setuplabeltext[\s!en][\v!letter:\c!street=Street] -\setuplabeltext[\s!nl][\v!letter:\c!street=] -\setuplabeltext[\s!de][\v!letter:\c!street=Stra\ssharp e] -\setuplabeltext[\s!fr][\v!letter:\c!street=] -\setuplabeltext[\s!it][\v!letter:\c!street=] -\setuplabeltext[\s!es][\v!letter:\c!street=] - -%D Label: page - -\setuplabeltext[\s!en][\v!letter:\c!page=Page ] -\setuplabeltext[\s!nl][\v!letter:\c!page=] -\setuplabeltext[\s!de][\v!letter:\c!page=Seite ] -\setuplabeltext[\s!fr][\v!letter:\c!page=] -\setuplabeltext[\s!it][\v!letter:\c!page=] -\setuplabeltext[\s!es][\v!letter:\c!page=] - -%D Label: of - -\setuplabeltext[\s!en][\v!letter:\c!of= of ] -\setuplabeltext[\s!nl][\v!letter:\c!of=] -\setuplabeltext[\s!de][\v!letter:\c!of= von ] -\setuplabeltext[\s!fr][\v!letter:\c!of=] -\setuplabeltext[\s!it][\v!letter:\c!of=] -\setuplabeltext[\s!es][\v!letter:\c!of=] - -%D Label: address - -\setuplabeltext[\s!en][\v!letter:\c!address=Address] -\setuplabeltext[\s!nl][\v!letter:\c!address=] -\setuplabeltext[\s!de][\v!letter:\c!address=Adresse] -\setuplabeltext[\s!fr][\v!letter:\c!address=] -\setuplabeltext[\s!it][\v!letter:\c!address=] -\setuplabeltext[\s!es][\v!letter:\c!address=] - -%D \subject{Memo} - -%D Label: date - -\setuplabeltext[\s!en][\v!memo:\c!date=Date: ] -\setuplabeltext[\s!nl][\v!memo:\c!date=Datum: ] -\setuplabeltext[\s!de][\v!memo:\c!date=Datum: ] -\setuplabeltext[\s!fr][\v!memo:\c!date=Date\thinspace: ] -\setuplabeltext[\s!it][\v!memo:\c!date=Data: ] -\setuplabeltext[\s!es][\v!memo:\c!date=Fecha: ] - -%D Label: fromname - -\setuplabeltext[\s!en][\v!memo:\c!fromname=From: ] -\setuplabeltext[\s!nl][\v!memo:\c!fromname=Van: ] -\setuplabeltext[\s!de][\v!memo:\c!fromname=Von: ] -\setuplabeltext[\s!fr][\v!memo:\c!fromname=De\thinspace: ] -\setuplabeltext[\s!it][\v!memo:\c!fromname=Da: ] -\setuplabeltext[\s!es][\v!memo:\c!fromname=De: ] - -%D Label: toname - -\setuplabeltext[\s!en][\v!memo:\c!toname=To: ] -\setuplabeltext[\s!nl][\v!memo:\c!toname=Aan: ] -\setuplabeltext[\s!de][\v!memo:\c!toname=An: ] -\setuplabeltext[\s!fr][\v!memo:\c!toname=\Agrave\thinspace: ] -\setuplabeltext[\s!it][\v!memo:\c!toname=A: ] -\setuplabeltext[\s!es][\v!memo:\c!toname=A: ] - -%D Label: subject - -\setuplabeltext[\s!en][\v!memo:\c!subject=Subject: ] -\setuplabeltext[\s!nl][\v!memo:\c!subject=Onderwerp: ] -\setuplabeltext[\s!de][\v!memo:\c!subject=Betrifft: ] -\setuplabeltext[\s!fr][\v!memo:\c!subject=Concernant\thinspace: ] -\setuplabeltext[\s!it][\v!memo:\c!subject=Oggetto: ] -\setuplabeltext[\s!es][\v!memo:\c!subject=Asunto: ] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/extension/optimize.nle b/Master/texmf-dist/tex/context/third/letter/extension/optimize.nle deleted file mode 100644 index e606a272b2d..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/extension/optimize.nle +++ /dev/null @@ -1,38 +0,0 @@ -%D \module -%D [ file=optimize, -%D version=2008.12.03, -%D title=\CONTEXT\ Letter Extension, -%D subtitle=Alternative input method, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\newcount\letter!value!skip \letter!value!skip \plusten -\newcount\letter!value!number \letter!value!number\zerocount - -\definetwopasslist\v!letter - -\setvalue{\v!letter\s!start\c!optimize\v!yes}% - {\global\advance\letter!value!number\plusone - \gettwopassdata{\v!letter}% - \iftwopassdatafound - \letter!value!skip\twopassdata - \ctxparskip=\dimexpr\letter!value!skip\ctxparskip/10\relax - \fi} - -\setvalue{\v!letter\s!stop\c!optimize\v!yes}% - {\ifdim\pagetotal<.25\textheight - \advance\letter!value!skip\minustwo - \else\ifdim\pagetotal<.5\textheight - \advance\letter!value!skip\plustwo - \fi\fi - \lazysavetwopassdata{\v!letter}{\number\letter!value!number}{\number\letter!value!skip}} - -\setvalue{\v!letter\v!content\v!start\v!optimize\v!yes}{} -\setvalue{\v!letter\v!content\v!stop \v!optimize\v!yes}{} - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/extension/pragma.nle b/Master/texmf-dist/tex/context/third/letter/extension/pragma.nle deleted file mode 100644 index 7e73308f9ad..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/extension/pragma.nle +++ /dev/null @@ -1,50 +0,0 @@ -%D \module -%D [ file=pragma, -%D version=2008.01.23, -%D title=\CONTEXT\ Letter Extension, -%D subtitle=Pragma ADE Example Text, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D Dummies - -\startsetups[letter:test] - - \startlocalsetups [letter:head] - % nothing - \stoplocalsetups - - \startlocalsetups[letter:address] - A Fancy Name \endgraf - A Nice Address \endgraf - The Place To Go - \stoplocalsetups - - \startlocalsetups[letter:reference] - \rightaligned{\currentdate} - \stoplocalsetups - - \startlocalsetups[letter:opening] - Hi There, - \stoplocalsetups - - \startlocalsetups[letter:content] - \dorecurse{2}{\input tufte \blank} - \stoplocalsetups - - \startlocalsetups[letter:closing] - That Was Me - \stoplocalsetups - - \startlocalsetups[letter:appendices] - % nothing - \stoplocalsetups - -\stopsetups - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/interface/default.nli b/Master/texmf-dist/tex/context/third/letter/interface/default.nli deleted file mode 100644 index e85456f27a9..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/interface/default.nli +++ /dev/null @@ -1,771 +0,0 @@ -%D \module -%D [ file=default, -%D version=2011.02.07, -%D title=\CONTEXT\ Letter Interface, -%D subtitle=Default Interface, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D \subject{Reference line} -%D -%D Dimen value to save the height of the reference line. - -\ifdefined\letter!height!reference \else \newdimen\letter!height!reference \fi - -%D We come now to the new macros defined in this file, they are meant to place the -%D information about date, phone number and more information. You could select on of -%D the alternatives with \type{\setupletter[alternative=...]}. -%D -%D I define here only what I need myself but you're free to define your own -%D alternatives but try to avoid to use the same names as I do. You could also send -%D me your alternatives and I will include them. -%D -%D This is the first alternative a, it use the values from the style file without any -%D change, this is the normal layout for a DIN letter. - -\long\def\doformatreferencelista#1% - {\def\\{\egroup\hbox\bgroup}% - \setupinterlinespace\hbox\bgroup#1\egroup\par} - -\long\def\formatreferencelista#1% - {\bgroup - \convertargument#1\to\ascii - \vbox - {\vbox{\doattributes{\????ld\ascii}\c!titlestyle\c!titlecolor - {\doformatreferencelista{\labeltext{\v!letter:\ascii}}}} - \vtop{\doattributes{\????ld\ascii}\c!textstyle\c!textcolor - {\doformatreferencelista{\lettervalue\ascii}}}}% - \egroup - \hfill} - -% \defineletterelement[\v!reference][\v!a] -% {\setbox\scratchbox\hbox\!!to\hsize -% {\getcommacommandsize[\@@@@lsreferencelist]% \@@@@ldreference? -% \ifnum\commalistsize<\plustwo\hfill\fi -% \processcommacommand[\@@@@lsreferencelist]\formatreferencelista\unskip}% -% \global\letter!height!reference\htdp\scratchbox -% \box\scratchbox} - -\defineletterelement[\v!reference][\v!a] - {\setbox\scratchbox\hbox\!!to\hsize - {\getcommacommandsize[\letterstylevalue\currentcorrespondenceelement\c!list]% - \ifnum\commalistsize<\plustwo\hfill\fi - \processcommacommand[\letterstylevalue\currentcorrespondenceelement\c!list]\formatreferencelista\unskip}% - \ifx\currentcorrespondenceelement\v!reference\global\letter!height!reference\htdp\scratchbox\fi - \box\scratchbox} - -\startsetups[\v!letter:\v!reference:\v!a] - -\setupletterstyle - [\v!reference] - [\c!hoffset=\backspace, - \c!voffset=\dimexpr\letterstylevalue{\v!address\v!layer}\c!voffset+\letterstylevalue{\v!address\v!frame}\c!height+\plusthree\c!mm\relax, - \c!width=\textwidth] - -\setupletterstyle - [\v!firstpage] - [\c!topspace=\dimexpr\letterstylevalue{\v!reference\v!layer}\c!voffset+\letterstylevalue\v!reference\c!spaceafter+\letter!height!reference\relax] - -\stopsetups - -%D This is the alternative b, you could use it if you want to place the information -%D in a infoblock not just a simple line, it is also better suited if you want to -%D place more infomration. - -\long\def\formatreferencelistb#1% - {\bgroup - \doifelse{#1}\v!line - {\blank[\v!line]} - {\hbox - {\doattributes{\????ld#1}\c!titlestyle\c!titlecolor - {\labeltext{\v!letter:#1}\lettervalue{#1\c!separator}}% - \doattributes{\????ld#1}\c!textstyle\c!textcolor - {\lettervalue{#1}}}}% - \egroup} - -% \defineletterelement[\v!reference][\v!b] -% {\vtop % why not \vbox? -% {\processcommacommand[\@@@@lsreferencelist]\formatreferencelistb}} - -\defineletterelement[\v!reference][\v!b] - {\vtop{\processcommacommand[\letterstylevalue\currentcorrespondenceelement\c!list]\formatreferencelistb}} - -\startsetups[\v!letter:\v!reference:\v!b] - -\setupletterstyle - [\v!reference] - [\v!layer] - [\c!hoffset=125.7mm, - \c!voffset=\letterstylevalue{\v!address\v!layer}\c!voffset] - -\setupletterstyle - [\v!reference] - [\v!frame] - [\c!width=\dimexpr\paperwidth-\letterstylevalue{\v!reference\v!layer}\c!hoffset-\cutspace\relax, - \c!height=\v!fit] - -\stopsetups - -%D The third alternative c could used, if you want to place just a single line -%D with text and nothing more, like your place and the date. You need only the -%D following two lines in your document. -%D -%D \starttyping -%D \setupletter[alternative=c,list=reference] -%D \setupletter[reference=\rightaligned{Place, \currentdate}] -%D \stoptyping - -\long\def\formatreferencelistc#1% - {\bgroup - \convertargument#1\to\ascii - \doattributes{\????ld\ascii}\c!textstyle\c!textcolor - {\lettervalue\ascii}% - \egroup} - -% \defineletterelement[\v!reference][\v!c] -% {\hbox\!!to\hsize -% {\processcommacommand[\@@@@lsreferencelist]\formatreferencelistc}} - -\defineletterelement[\v!reference][\v!c] - {\hbox\!!to\hsize - {\processcommacommand[\letterstylevalue\currentcorrespondenceelement\c!list]\formatreferencelistc}} - -\startsetups[\v!letter:\v!reference:\v!c] - -\setups[\v!letter:\v!reference:\v!a] - -\stopsetups - -%D Alternative d, text is placed in a block like alternative bit the text -%D is put in a table. - -\long\def\doformatreferencelistd#1% - {\doifelse{#1}\v!line - {\NC\NC\NC\NR} % why did \TB not work? - {\NC \doattributes{\????ld#1}\c!titlestyle\c!titlecolor - {\labeltext{\v!letter:#1}\lettervalue{#1\c!separator}}% - \NC\doattributes{\????ld#1}\c!textstyle\c!textcolor{\lettervalue{#1}} - \NC\NR}} - -\def\formatreferencelistd#1% - {\appendtoks\doformatreferencelistd{#1}\to\scratchtoks} - -% \defineletterelement[\v!reference][\v!d] -% {\vtop % why not \vbox? -% {\scratchtoks\emptytoks -% \processcommacommand[\@@@@lsreferencelist]\formatreferencelistd -% \setuptabulate[\c!before=,\c!after=]% -% \starttabulate[|l|l|] -% \the\scratchtoks -% \stoptabulate}} - -\defineletterelement[\v!reference][\v!d] - {\vtop - {\scratchtoks\emptytoks - \processcommacommand[\letterstylevalue\currentcorrespondenceelement\c!list]\formatreferencelistd - \setuptabulate[\c!before=,\c!after=]% - \starttabulate[|l|l|] - \the\scratchtoks - \stoptabulate}} - -\startsetups[\v!letter:\v!reference:\v!d] - -\setupletterstyle - [\v!reference] - [\v!layer] - [\c!hoffset=125.7mm, - \c!voffset=\letterstylevalue{\v!address\v!layer}\c!voffset] - -\setupletterstyle - [\v!reference] - [\v!frame] - [\c!width=\dimexpr\paperwidth-\letterstylevalue{\v!reference\v!layer}\c!hoffset-\cutspace\relax, - \c!height=\v!fit] - -\stopsetups - -%D Alternative e, nearly the same as a but you can control the width of the -%D fields with the width key for \tex{setupletter}. - -\long\def\doformatreferenceliste#1% - {\def\\{\egroup\hbox\bgroup}% - \setupinterlinespace\hbox\bgroup#1\egroup\par} - -\long\def\formatreferenceliste#1% - {\bgroup - \convertargument#1\to\ascii - \doifelselettervalue{\ascii\c!width} - {\hbox\!!to\lettervalue{\ascii\c!width}} - {\hbox} - {\vbox - {\vbox{\doattributes{\????ld\ascii}\c!titlestyle\c!titlecolor - {\doformatreferenceliste{\labeltext{\v!letter:\ascii}}}} - \vtop{\doattributes{\????ld\ascii}\c!textstyle\c!textcolor - {\doformatreferenceliste{\lettervalue\ascii}}}}}% - \egroup} - -% \defineletterelement[\v!reference][\v!e] -% {\hbox\!!to\hsize -% {\processcommacommand[\@@@@lsreferencelist]\formatreferenceliste\hss}} - -\defineletterelement[\v!reference][\v!e] - {\hbox\!!to\hsize - {\processcommacommand[\letterstylevalue\currentcorrespondenceelement\c!list]\formatreferenceliste\hss}} - -\startsetups[\v!letter:\v!reference:\v!e] - -\setups[\v!letter:\v!reference:\v!a] - -\stopsetups - -%D The alternative \mono{none} could be used to disable the reference. -%D -%D The advantage is to change only the list alternative to nothing, another -%D method to get this result to use alternative c and remove all values from -%D the reference but the none key is better. - -\resetletterelement[\v!reference][\v!none] - -\startsetups[\v!letter:\v!reference:\v!none] - - % Use the topspace value from the style file - -\stopsetups - -%D \subject{Letter environment} -%D -%D \macros -%D {startletter} -%D -%D The main macro in this file, it is used to write the letter content. -%D It is also possible to set the address and a few other values like -%D the opening and closing with the optional argument, the values are -%D local in this case and not global like the values you could set with -%D \tex{setupletter}. - -\newtoks\letter!local!commands -\newtoks\letter!local!setups - -\chardef\letterenvironmentmode\zerocount - -\def\startletter - {\autostarttext - \begingroup - \dodoubleempty\dostartletter} - -\def\dostartletter[#1][#2]% - {\doifelse\@@@@lsoptionmethod\v!buffer\dostartbufferletter\dostartcontentletter[#1][#2]} - -\long\def\dostartcontentletter[#1][#2]#3\stopletter - {\ifsecondargument - \getparameters[\????ld][#1]% - \letter!local!setups{#1}% - \doifundefinedelse{\????ld\????ld#2} - {\setvalue{\????ld\c!toaddress}{#2}} - {\setvalue{\????ld\c!toaddress}{\getvalue{\????ld\????ld#2}}}% - \else\iffirstargument - \doifassignmentelse{#1} - {\getparameters[\????ld][#1]% - \letter!local!setups{#1}} - {\doifundefinedelse{\????ld\????ld#1} - {\setvalue{\????ld\c!toaddress}{#1}} - {\setvalue{\????ld\c!toaddress}{\getvalue{\????ld\????ld#1}}}}% - \fi\fi - \setbuffer[lettercontent]#3\endbuffer - \processlettervalues - \directsetup{\v!letter:\v!place}% - \endgroup - \autostoptext} - -\def\dostartbufferletter[#1][#2]% - {\def\stopletter - {\processlettervalues - \directsetup{\v!letter:\v!place}% - \endgroup - \autostoptext} - \ifsecondargument - \getparameters[\????ld][#1]% - \letter!local!setups{#1}% - \doifundefinedelse{\????ld\????ld#2} - {\setvalue{\????ld\c!toaddress}{#2}} - {\setvalue{\????ld\c!toaddress}{\getvalue{\????ld\????ld#2}}}% - \else\iffirstargument - \doifassignmentelse{#1} - {\getparameters[\????ld][#1]% - \letter!local!setups{#1}} - {\doifundefinedelse{\????ld\????ld#1} - {\setvalue{\????ld\c!toaddress}{#1}} - {\setvalue{\????ld\c!toaddress}{\getvalue{\????ld\????ld#1}}}}% - \fi\fi - \dostartbuffer[lettercontent][startletter][stopletter]} - -\def\processlettersetups#1#2% - {\ifcsname\????ld:#1:\v!setups\endcsname - \appendtocommalist{#1}\letter!list!descriptions - \fi} - -\letvalueempty{\????ld:\c!postscript:\v!setups} -\letvalueempty{\????ld:\c!copy :\v!setups} -\letvalueempty{\????ld:\c!enclosure :\v!setups} - -\def\processlettervalues - {\globalletempty\letter!list!descriptions - \global\letter!local!commands\emptytoks - \def\opening##1{\doglobal\appendtoks\setvalue{\????ld\c!opening }{##1}\to\letter!local!commands}% - \def\closing##1{\doglobal\appendtoks\setvalue{\????ld\c!closing }{##1}\to\letter!local!commands}% - \def\ps ##1{\doglobal\appendtoks\setvalue{\????ld\c!postscript}{##1}\to\letter!local!commands\doglobal\appendtocommalist\c!postscript\letter!list!descriptions}% - \def\cc ##1{\doglobal\appendtoks\setvalue{\????ld\c!copy }{##1}\to\letter!local!commands\doglobal\appendtocommalist\c!copy \letter!list!descriptions}% - \def\encl ##1{\doglobal\appendtoks\setvalue{\????ld\c!enclosure }{##1}\to\letter!local!commands\doglobal\appendtocommalist\c!enclosure \letter!list!descriptions}% - \setbox\scratchbox\vbox{\doifmodeelse\s!mkiv\settrialtypesetting\trialtypesettingtrue\getbuffer[lettercontent]}% - \doifmode{mkiv}{\processassignmentcommand[\dotoks\letter!local!setups]\processlettersetups}% only available in mkiv - \flushtoks\letter!local!commands} - -\def\gobblelettervalues - {\def\dogobblelettervalues##1{\letcsnamecs\csname##1\endcsname\gobbleoneargument}% - \processcommalist[\c!opening,\c!closing,\c!ps,\c!cc,\c!encl]\dogobblelettervalues} - -%D \macros -%D {startlettercontent} -%D -%D The letter content is saved in the value content, although I could -%D place it in the corresponding I prefer this solution because you could -%D now use it in your own macros and redefine the content setups to your -%D own wishes. - -\setupletter - [\c!content={\getbuffer[lettercontent]}] - -\def\startlettercontent - {\dostartbuffer[lettercontent][startlettercontent][stoplettercontent]} - -%D After the definition of all macros I could now put the content -%D in the corresponding setups, this is only important if you want -%D to define your own layout for header, address etc. - -\defineletterelement[\v!head][\v!a] - {\lettervalue\c!fromname - \doiflettervalue\c!fromname\\ - \lettervalue\c!fromaddress} - -\setvalue{@@head@@\c!rule\v!no }{\!!doneafalse\!!donebfalse} -\setvalue{@@head@@\c!rule\v!none }{\!!doneafalse\!!donebfalse} -\setvalue{@@head@@\c!rule\v!off }{\!!doneafalse\!!donebfalse} -\setvalue{@@head@@\c!rule\v!top }{\!!doneatrue } -\setvalue{@@head@@\c!rule\v!before}{\!!doneatrue } -\setvalue{@@head@@\c!rule\v!bottom}{\!!donebtrue } -\setvalue{@@head@@\c!rule\v!after }{\!!donebtrue } -\setvalue{@@head@@\c!rule\v!yes }{\!!donebtrue } -\setvalue{@@head@@\c!rule\v!on }{\!!donebtrue } - -\def\doletterelementheadrule - {\!!doneafalse - \!!donebfalse - \def\dodoletterelementheadrule##1{\csname @@head@@\c!rule##1\endcsname}% - \processcommacommand[\letterstylevalue\v!head\c!fromrule]\dodoletterelementheadrule} - -\defineletterelement[\v!head][\v!left] - {\normalhbox - {\framed[frame=off,location=bottom,align=right,width=\hsize] - {\doletterelementheadrule - \dostartattributes{\????ld\c!fromname}\c!style\c!color - \lettervalue\c!fromname - \if!!donea - \doifelselettervalue\c!fromlogo - {\setbox\scratchbox\hbox{\lettervalue\c!fromlogo}% - \scratchdimen\dimexpr\letterstylevalue\v!head\c!rulewidth-\wd\scratchbox\relax} - {\scratchdimen\letterstylevalue\v!head\c!rulewidth}% - \vskip-.5\lineheight\blackrule - [\c!width=\scratchdimen, - \c!height=\letterstylevalue\v!head\c!rulethickness, - \c!color=\letterstylevalue\v!head\c!rulecolor]% - \fi - \dostopattributes - \\ - \dostartattributes{\????ld\c!fromaddress}\c!style\c!color - \lettervalue\c!fromaddress - \doiflettervalue\c!fromphone{\\\lettervalue\c!fromphone}% - \doiflettervalue\c!fromfax {\\\lettervalue\c!fromfax }% - \doiflettervalue\c!frommail {\\\lettervalue\c!frommail }% - \doiflettervalue\c!fromurl {\\\lettervalue\c!fromurl }% - \if!!doneb - \ifzeropt\letterstylevalue\v!head\c!rulewidth - \scratchdimen\hsize - \else - \scratchdimen\letterstylevalue\v!head\c!rulewidth - \fi - \vskip-.5\lineheight\blackrule - [\c!width=\scratchdimen, - \c!height=\letterstylevalue\v!head\c!rulethickness, - \c!color=\letterstylevalue\v!head\c!rulecolor]% - \fi - \dostopattributes}% - \doiflettervalue\c!fromlogo{\llap{\lettervalue\c!fromlogo}}}}% - -\defineletterelement[\v!head][\v!middle] - {\normalhbox - {\framed[frame=off,location=bottom,align=middle,width=\hsize] - {\doletterelementheadrule - \dostartattributes{\????ld\c!fromname}\c!style\c!color - \lettervalue\c!fromname - \if!!donea - \ifzeropt\letterstylevalue\v!head\c!rulewidth - \scratchdimen\hsize - \else - \scratchdimen\letterstylevalue\v!head\c!rulewidth - \fi - \vskip-.5\lineheight\blackrule - [\c!width=\scratchdimen, - \c!height=\letterstylevalue\v!head\c!rulethickness, - \c!color=\letterstylevalue\v!head\c!rulecolor]% - \fi - \dostopattributes - \\ - \dostartattributes{\????ld\c!fromaddress}\c!style\c!color - \lettervalue\c!fromaddress - \doiflettervalue\c!fromphone{\\\lettervalue\c!fromphone}% - \doiflettervalue\c!fromfax {\\\lettervalue\c!fromfax }% - \doiflettervalue\c!frommail {\\\lettervalue\c!frommail }% - \doiflettervalue\c!fromurl {\\\lettervalue\c!fromurl }% - \if!!doneb - \ifzeropt\letterstylevalue\v!head\c!rulewidth - \scratchdimen\hsize - \else - \scratchdimen\letterstylevalue\v!head\c!rulewidth - \fi - \vskip-.5\lineheight\blackrule - [\c!width=\scratchdimen, - \c!height=\letterstylevalue\v!head\c!rulethickness, - \c!color=\letterstylevalue\v!head\c!rulecolor]% - \fi - \dostopattributes}}} - -\defineletterelement[\v!head][\v!right] - {\normalhbox - {\doiflettervalue\c!fromlogo{\rlap{\lettervalue\c!fromlogo}}% - \framed[frame=off,location=bottom,align=left,width=\hsize] - {\doletterelementheadrule - \dostartattributes{\????ld\c!fromname}\c!style\c!color - \lettervalue\c!fromname - \if!!donea - \ifzeropt\letterstylevalue\v!head\c!rulewidth - \scratchdimen\hsize - \else - \doifelselettervalue\c!fromlogo - {\setbox\scratchbox\hbox{\lettervalue\c!fromlogo}% - \scratchdimen\dimexpr\letterstylevalue\v!head\c!rulewidth-\wd\scratchbox\relax} - {\scratchdimen\letterstylevalue\v!head\c!rulewidth}% - \fi - \vskip-.5\lineheight\blackrule - [\c!width=\scratchdimen, - \c!height=\letterstylevalue\v!head\c!rulethickness, - \c!color=\letterstylevalue\v!head\c!rulecolor]% - \fi - \dostopattributes - \\ - \dostartattributes{\????ld\c!fromaddress}\c!style\c!color - \\\lettervalue\c!fromaddress - \doiflettervalue\c!fromphone{\\\lettervalue\c!fromphone}% - \doiflettervalue\c!fromfax {\\\lettervalue\c!fromfax }% - \doiflettervalue\c!frommail {\\\lettervalue\c!frommail }% - \doiflettervalue\c!fromurl {\\\lettervalue\c!fromurl }% - \if!!doneb - \ifzeropt\letterstylevalue\v!head\c!rulewidth - \scratchdimen\hsize - \else - \scratchdimen\letterstylevalue\v!head\c!rulewidth - \fi - \vskip-.5\lineheight\blackrule - [\c!width=\scratchdimen, - \c!height=\letterstylevalue\v!head\c!rulethickness, - \c!color=\letterstylevalue\v!head\c!rulecolor]% - \fi - \dostopattributes}}} - -\startsetups[\v!letter:\v!head] -\def\\{\letterstylevalue\v!head\c!separator} -\executeifdefined{\v!letter:\v!head:\@@@@lsheadalternative}{\getvalue{\v!letter:\v!head:\v!a}} -\stopsetups - -\startsetups[\v!letter:\v!foot] -\executeifdefined{\v!letter:\v!foot:\@@@@lsfootalternative}\donothing -\stopsetups - -\startsetups[\v!letter:\v!nexthead] -\executeifdefined{\v!letter:\v!nexthead:\@@@@lsnextheadalternative}\donothing -\stopsetups - -\startsetups[\v!letter:\v!nextfoot] -\executeifdefined{\v!letter:\v!nextfoot:\@@@@lsnextfootalternative}\donothing -\stopsetups - -\defineletterelement[\v!nexthead][\v!fullblock] - {\hbox\!!to\hsize - {\rlap{\lettervalue\c!toname}% - \midaligned{\pagenumber}% - \llap{\framed[\c!frame=\v!off,\c!location=\v!top,\c!align=\v!left] - {\lettervalue\c!date \\ - \lettervalue\c!reference}}}} - -\defineletterelement[\v!nexthead][\v!hanging] - {\hbox\!!to\hsize - {\framed[\c!frame=\v!off,\c!location=\v!top,\c!align=v!right] - {\lettervalue\c!toname \\ - \lettervalue\c!date \\ - \lettervalue\c!reference \\ - \labeltext\c!page\pagenumber}}\hss} - -\defineletterelement[\v!nexthead][\v!semiblock] - {\hbox\!!to\hsize - {\rlap{\lettervalue\c!toname}% - \midaligned{\pagenumber}% - \llap{\lettervalue\c!date}}} - -\copyletterelement[\v!nexthead][\v!simplified][\v!fullblock] -\copyletterelement[\v!nexthead][\v!modified ][\v!hanging ] - -%D \subject{Addressee field} -%D -%D The address field is separated into two different fields. -%D The upper field is meant for dispatch information, the official height -%D in germany is 3 lines but this would lead to different heights dependent -%D of the font size and the fonts own height. The lower field contains the -%D name and address of the receiver and has a height of 6 lines in germany. -%D This value will lead to the same problem as the upper field, because the -%D whole address field has a fixed height and both field should fit into -%D this space. I solved this problem by assinging the upper field 1/3 of the -%D address height and the lower field 2/3 of the address height. -%D -%D If you hace problem to put all information in the limited space you could -%D try to reduce the font size or reduce the interlinespace in the field. - -\presetlocalframed[\????ls\v!dispatch ] -\presetlocalframed[\????ls\v!addressee] - -\startsetups[\v!letter:\v!place:\v!dispatch] - - \localframed - [\????ls\v!dispatch] - {\doadaptleftskip {\letterstylevalue\v!dispatch\c!leftmargin }% - \doadaptrightskip{\letterstylevalue\v!dispatch\c!rightmargin}% - \doattributes{\????ls\v!dispatch}\c!style\c!color{\directsetup{\v!letter:\v!address:\v!dispatch}}} - -\stopsetups - -\startsetups[\v!letter:\v!place:\v!addressee] - - \localframed - [\????ls\v!addressee] - {\doadaptleftskip {\letterstylevalue\v!addressee\c!leftmargin }% - \doadaptrightskip{\letterstylevalue\v!addressee\c!rightmargin}% - \doattributes{\????ls\v!addressee}\c!style\c!color{\directsetup{\v!letter:\v!address:\v!content}}} - -\stopsetups - -\defineletterelement[\v!address][\v!a] - {\doif\@@@@lsoptiondispatch \v!yes{\directsetup{\v!letter:\v!place:\v!dispatch }}% - \doif\@@@@lsoptionaddressee\v!yes{\directsetup{\v!letter:\v!place:\v!addressee}}} - -\startsetups[\v!letter:\v!address] -\offinterlineskip\endgraf -\executeifdefined{\v!letter:\v!address:\@@@@lsaddressalternative}{\getvalue{\v!letter:\v!address:\v!a}} -\stopsetups - -\startsetups[\v!letter:\v!address:\v!dispatch] -\lettervalue\c!dispatch -\stopsetups - -\startsetups[\v!letter:\v!address:\v!content] -\def\\{\letterstylevalue\v!address\c!separator}% -\lettervalue\c!toname -\doiflettervalue\c!toname\\ -\lettervalue\c!toaddress -\stopsetups - -%D The following setups shouldn't be changed ar you will loose information -%D in the output. -%D -%D The reference line is choosen with the alternative key or if you set -%D a not defined alternative the definition a is choosen. - -\startsetups[\v!letter:\v!reference] -\executeifdefined{\v!letter:\v!reference:\@@@@lsreferencealternative}{\getvalue{\v!letter:\v!reference:\v!a}} -\stopsetups - -\resetletterelement[\v!location][\v!a] - -\setvalue{\v!letter:\v!location:\v!french}% - {\lettervalue\c!place - \doiflettervalue\c!place{\lettervalue{\c!place\c!separator}}% - \lettervalue\c!date} - -\startsetups[\v!letter:\v!location] -\executeifdefined{\v!letter:\v!location:\@@@@lslocationalternative}{\getvalue{\v!letter:\v!location:\v!a}} -\stopsetups - -\startsetups[\v!letter:\v!title] -\doifelselettervalue\c!title - {\lettervalue\c!title} - {\doiflettervalue\c!attention - {\labeltext{\v!letter:\c!attention}\lettervalue\c!attention}} -\stopsetups - -\startsetups[\v!letter:\v!subject] -\def\\{\letterstylevalue\v!subject\c!separator}% -\labeltext{\v!letter:\c!subject}\lettervalue\c!subject -\stopsetups - -\defineletterelement[\v!opening][\v!a] - {\doifelselettervalue\c!opening - {\lettervalue\c!opening} - {\doiflettervalue\c!salutation - {\lettervalue\c!salutation}}} - -\startmode[\s!mkii] -\defineletterelement[\v!opening][\v!french] - {\ExpandSecondAfter\doifsomething{\letterstylevalue\v!option\c!indenting} - {\setupindenting[\@@@@lsoptionindenting]}% - \letterelement[\v!opening][\v!a]} -\stopmode - -\startmode[\s!mkiv] -\defineletterelement[\v!opening][\v!french] - {\doifsomething{\letterstylevalue\v!option\c!indenting}{\setupindenting[\@@@@lsoptionindenting]}% - \letterelement[\v!opening][\v!a]} -\stopmode - -\startsetups[\v!letter:\v!opening] -\executeifdefined{\v!letter:\v!opening:\@@@@lsopeningalternative}{\getvalue{\v!letter:\v!opening:\v!a}} -\stopsetups - -\startsetups[\v!letter:\v!content] -\gobblelettervalues\lettervalue\c!content -\stopsetups - -%D \subject{Closing and appendices} -%D -%D It is possible to attach a signature to the closing command, before the signature -%D a skip is inserted but only if the the signature key has a value. The height of the -%D closing environment itself has a height of 4 lines to provide a free space for your -%D own handwritten signature and to have a little bit space between the closing text -%D and the appendices. - -\defineletterelement[\v!closing][\v!a] - {\lettervalue\c!closing - \doiflettervalue\c!signature{\letterstylevalue\v!closing\c!inbetween}% - \lettervalue\c!signature} - -\startmode[\s!mkii] -\defineletterelement[\v!closing][\v!french] - {\ExpandSecondAfter\doifsomething{\letterstylevalue\v!option\c!indenting} - {\setupindenting[\@@@@lsoptionindenting,\v!first]}% - \lettervalue\c!closing - \doiflettervalue\c!signature{\letterstylevalue\v!closing\c!inbetween}% - \raggedcenter\doadaptleftskip{.5\textwidth}% quick and dirty - \lettervalue\c!signature\endgraf} -\stopmode - -\startmode[\s!mkiv] -\defineletterelement[\v!closing][\v!french] - {\doifsomething{\letterstylevalue\v!option\c!indenting}{\setupindenting[\@@@@lsoptionindenting,\v!first]}% - \lettervalue\c!closing - \doiflettervalue\c!signature{\letterstylevalue\v!closing\c!inbetween}% - \raggedcenter\doadaptleftskip{.5\textwidth}% quick and dirty - \lettervalue\c!signature\endgraf} -\stopmode - -\defineletterelement[\v!closing][\v!simplified] - {\doiflettervalue\c!signature{\letterstylevalue\v!closing\c!inbetween}% - \lettervalue\c!signature} - -\startsetups[\v!letter:\v!closing] -\def\\{\letterstylevalue\v!closing\c!separator} -\executeifdefined{\v!letter:\v!closing:\@@@@lsclosingalternative}{\getvalue{\v!letter:\v!closing:\v!a}} -\stopsetups - -\startsetups[\v!letter:\v!appendices] -\let\\\crlf -\doflushletterdescription -\stopsetups - -\dodefineletterdescription[\v!enclosure] - -\startsetups[\v!letter:\v!enclosure] -\lettervalue\c!enclosure -\stopsetups - -\dodefineletterdescription[\v!copy] - -\startsetups[\v!letter:\v!copy] -\lettervalue\c!copy -\stopsetups - -\dodefineletterdescription[\v!postscript] - -\startsetups[\v!letter:\v!postscript] -\lettervalue\c!postscript -\stopsetups - -\defineletterelement[\v!backaddress][\v!yes] - {\lettervalue\c!fromname - \doiflettervalue\c!fromaddress\\ - \lettervalue\c!fromaddress} - -\resetletterelement[\v!backaddress][\v!no] - -\defineletterelement[\v!backaddress][\v!auto] - {\doifelselettervalue\c!backaddress - {\lettervalue\c!backaddress} - {\lettervalue\c!fromname - \doiflettervalue\c!fromaddress\\ - \lettervalue\c!fromaddress}} - -\startsetups[\v!letter:\v!backaddress] -\def\\{\letterstylevalue\c!backaddress\c!separator} -\executeifdefined{\v!letter:\v!backaddress:\@@@@lsbackaddressalternative}{\getvalue{\v!letter:\v!backaddress:\v!no}} -\stopsetups - -%D To prevent a pagebreak between the last line of the text and -%D the siganture a nonbreakable vertical space is necessary. -%D The vertical space is inserted in the style file with the normal -%D before and after commands where we control the distance between -%D the elements. - -\doifmodeelse{mkii} - {\defineblankmethod[\v!nobreak]{\penalty\!!tenthousand}} - {\definevspacing [\v!nobreak][\v!samepage ]} - -%D \subject{Additional settings} -%D -%D I set alternative a as default value for alternative, the only content -%D is the date with a label. f you dont want a label choose alternative c -%D or change the label. - -\startsetups[\v!letter:\v!optimize] - - \startnointerference % trial typesetting to get the heigth of the reference line - \dontcomplain - \let\currentcorrespondenceelement\v!reference - \executeifdefined{\v!letter:\v!reference:\@@@@lsreferencealternative}\donothing - \stopnointerference - - \doif\@@@@lsoptionposition\v!yes{\setups[\v!letter:\v!reference:\@@@@lsreferencealternative]} - -\stopsetups - -%D We have at the moment only the values from the core module, I use the settings -%D from the dinb file as default settings, you could replace them in your own -%D document but I won't change the default style. -%D -%D The labels are stored in a common file, you could use them in your own interface -%D but you have to live with my names. - -\useletterstyle [dinb] % layout -\useletterextension[label] % labels -\useletterextension[addrentry] % database - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/interface/default.nri b/Master/texmf-dist/tex/context/third/letter/interface/default.nri deleted file mode 100644 index 7ccb61be58b..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/interface/default.nri +++ /dev/null @@ -1,136 +0,0 @@ -%D \module -%D [ file=default, -%D version=2009.06.30, -%D title=\CONTEXT\ Resume Interface, -%D subtitle=Default Interface, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D The resume provides no own commands to write the information -%D for your curriculum vitae but you can use \CONTEXT's own -%D description, paragraph or table commands. -%D -%D I hope I can change this in the future and give the users one -%D commands which can be used to arrange the information either -%D in rows or in columns. -%D -%D \starttyping -%D \def\????sp{@@@@sp} -%D -%D \def\startcontent -%D {\dosingleempty\dostartcontent} -%D -%D \def\dostartcontent[#1]% -%D {\getparameters[\????sp][\c!alternative=\v!row,#1]% -%D \doifelse\@@@@spalternative\v!row\valign\halign\bgroup&##\cr} -%D -%D \def\stopcontent -%D {\crcr\egroup} -%D \stoptyping -%D -%D This command could be used to write the content in columns or rows, -%D the behaviour can be changed with the \type {alternative} key. -%D -%D \starttyping -%D \startcontent -%D \hsize=3cm -%D \dorecurse{10}{text } \cr -%D \hsize=3cm -%D text \cr -%D text \cr -%D \stopcontent -%D -%D \startcontent[alternative=column] -%D \vbox{\dorecurse{40}{text }} \cr -%D text \cr -%D text \cr -%D \stopcontent -%D \stoptyping - -\def\startresume - {\bgroup\dosingleempty\dostartresume} - -\long\def\dostartresume[#1]#2\stopresume - {\iffirstargument - \getparameters[\????rd][#1]% - \fi - \setbuffer[resumecontent]#2\endbuffer - \directsetup{\v!resume:\v!place}\egroup} - -\def\startresumecontent - {\dostartbuffer[resumecontent][startresumecontent][stopresumecontent]} - -\setupresume - [\c!content={\getbuffer[resumecontent]}] - -\startsetups[\v!resume:\v!content] -\resumevalue\c!content -\stopsetups - -\startsetups[\v!resume:\v!head] -\executeifdefined{\v!resume:\v!head:\@@@@rsheadalternative}\donothing -\stopsetups - -\startsetups[\v!resume:\v!foot] -\executeifdefined{\v!resume:\v!foot:\@@@@rsfootalternative}\donothing -\stopsetups - -\startsetups[\v!resume:\v!nexthead] -\executeifdefined{\v!resume:\v!nexthead:\@@@@rsnextheadalternative}\donothing -\stopsetups - -\startsetups[\v!resume:\v!nextfoot] -\executeifdefined{\v!resume:\v!nextfoot:\@@@@rsnextfootalternative}\donothing -\stopsetups - -\defineresumeelement[\v!head][\v!a] - {} - -\startsetups[\v!resume:\v!head:\v!a] - - \definelayer[resume:head:background] - - \setlayer - [resume:head:background] - [\c!preset=\v!right\v!bottom, - \c!hoffset=1cm, - \c!voffset=5mm] - {\color[white]{Resume}} % variable - - \setupresumestyle - [\v!head] - [\c!hoffset=\zeropoint, - \c!voffset=\zeropoint, - \c!width=\paperwidth, - \c!background={color,resume:head:background}, - \c!backgroundcolor=gray] - -\stopsetups - -\defineresumeelement[\v!head][\v!b] - {} - -\startsetups[\v!resume:\v!head:\v!b] - - \setupresumestyle - [\v!head] - [\c!hoffset=\zeropoint, - \c!voffset=\zeropoint, - \c!width=\paperwidth, - \c!background={color,resume:head:background}, - \c!backgroundcolor=gray] - -\stopsetups - -\startsetups[\v!resume:\v!optimize] - - \directsetup{\v!resume:\v!head:\@@@@rsheadalternative} - -\stopsetups - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/interface/knuth.nli b/Master/texmf-dist/tex/context/third/letter/interface/knuth.nli deleted file mode 100644 index cac785ba283..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/interface/knuth.nli +++ /dev/null @@ -1,70 +0,0 @@ -%D \module -%D [ file=knuth, -%D version=2009.10.08, -%D title=\CONTEXT\ Letter Interface, -%D subtitle=Lettformat Interface, % Donald Knuth's own letter format -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[knuth] - -\def\address - {\dostartbuffer[address][address][body]} - -\def\body - {\dostartbuffer[body][body][closing]} - -\def\closing - {\def\endletter{\setups[\v!letter:\v!place]}% - \dostartbuffer[closing][closing][endletter]} - -\def\annotations - {\blank[\v!line]\leftskip\zeropoint} - -\def\ps - {\let\par\space - \blank[\v!medium]\leftskip\zeropoint} - -\startsetups[\v!letter:\v!reference] - -\stopsetups - -\startsetups[\v!letter:\v!optimize] - -\stopsetups - -\startsetups[\v!letter:\v!opening] - - \obeylines - \def\par{\letterstylevalue\v!opening\c!separator} - \getbuffer[address] - -\stopsetups - -\startsetups[\v!letter:\v!content] - - \getbuffer[body] - -\stopsetups - -\startsetups[\v!letter:\v!closing] - - \leftskip\dimexpr\textwidth/13*8\relax % relative value to allow papersize changes - \obeylines - \def\par{\normalpar\vskip1cm\def\par{{\normalpar\let\par\normalpar\blank[\v!nowhite]}}} % restore \par for \blank command - \getbuffer[closing]\normalpar - -\stopsetups - -\startsetups[\v!letter:\v!nexthead] - - \getvalue{\v!letter:\v!nexthead:\v!knuth} - -\stopsetups - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/interface/moderncv.nri b/Master/texmf-dist/tex/context/third/letter/interface/moderncv.nri deleted file mode 100644 index 2e94b2ebec4..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/interface/moderncv.nri +++ /dev/null @@ -1,222 +0,0 @@ -%D \module -%D [ file=moderncv, -%D version=2010.11.22, -%D title=\CONTEXT\ Resume Interface, -%D subtitle=moderncv Interface, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D The moderncv interface enables color by default - -\setupcolors[\c!state=\v!start] - -%D Resume environment, taken from the default interface - -\def\startresume - {\bgroup\dosingleempty\dostartresume} - -\long\def\dostartresume[#1]#2\stopresume - {\iffirstargument - \getparameters[\????rd][#1]% - \fi - \setbuffer[resumecontent]#2\endbuffer - \directsetup{\v!resume:\v!place}\egroup} - -\def\startresumecontent - {\dostartbuffer[resumecontent][startresumecontent][stopresumecontent]} - -\setupresume - [\c!content={\getbuffer[resumecontent]}] - -\startsetups[\v!resume:\v!content] -\resumevalue\c!content -\stopsetups - -\startsetups[\v!resume:\v!head] -\executeifdefined{\v!resume:\v!head:\@@@@rsheadalternative}\donothing -\stopsetups - -\startsetups[\v!resume:\v!foot] -\executeifdefined{\v!resume:\v!foot:\@@@@rsfootalternative}\donothing -\stopsetups - -\startsetups[\v!resume:\v!nexthead] -\executeifdefined{\v!resume:\v!nexthead:\@@@@rsnextheadalternative}\donothing -\stopsetups - -\startsetups[\v!resume:\v!nextfoot] -\executeifdefined{\v!resume:\v!nextfoot:\@@@@rsnextfootalternative}\donothing -\stopsetups - -%D Rewrite of the LaTeX package - -\definemeasure[quotewidth] [.65\textwidth] -\definemeasure[separatorcolumnwidth] [.025\textwidth] -\definemeasure[hintscolumnwidth] [.15\textwidth] -\definemeasure[maincolumnwidth] [\dimexpr\textwidth-\measure{separatorcolumnwidth}-\measure{hintscolumnwidth}\relax] -\definemeasure[doubleitemmaincolumnwidth] [\dimexpr(\measure{maincolumnwidth}-\measure{hintscolumnwidth}-\measure{separatorcolumnwidth})/2\relax] -\definemeasure[listitemsymbolwidth] [2em] % LaTeX assingnment is not possible in ConTeXt -\definemeasure[listitemmaincolumnwidth] [\dimexpr\measure{maincolumnwidth}-\measure{listitemsymbolwidth}\relax] -\definemeasure[listdoubleitemmaincolumnwidth][\dimexpr.475\measure{listitemmaincolumnwidth}\relax] - -\def\ModerncvSectionCommand#1#2% - {\hbox to \hsize - {\hskip\dimexpr\measure{hintscolumnwidth}+\measure{separatorcolumnwidth}\relax - \vtop{\hsize\measure{maincolumnwidth}#2}}} - -\def\ModerncvSectionTextcommand - {\llap - {\blackrule[\c!width=\measure{hintscolumnwidth},\c!height=1ex,\c!depth=-.5ex,\c!color=resume:6]% - \hskip\measure{separatorcolumnwidth}}} - -\setuphead - [\v!section] - [\c!color=resume:7, - \c!incrementnumber=\v!no, - \c!before={\blank[2*\v!medium]}, - \c!after={\blank[\v!medium]}, - \c!command=\ModerncvSectionCommand, - \c!deeptextcommand=\ModerncvSectionTextcommand] - -\def\ModerncvSubsectionCommand#1#2% - {\hbox to \hsize - {\hskip\dimexpr\measure{hintscolumnwidth}+\measure{separatorcolumnwidth}\relax - \vtop{\hsize\measure{maincolumnwidth}#2}}} - -\setuphead - [\v!subsection] - [\c!color=resume:8, - \c!incrementnumber=\v!no, - \c!before={\blank[2*\v!medium]}, - \c!after={\blank[\v!medium]}, - \c!command=\ModerncvSubsectionCommand] - -%D Moderncv compatible commands for the user data. - -\def\cvline - {\dosingleempty\docvline} - -\def\docvline[#1]#2#3% - {\bgroup\dontcomplain - \starttable[s0|s0rp(\measure{hintscolumnwidth})|s0w(\measure{separatorcolumnwidth})|s0p(\measure{maincolumnwidth})|] - \NC\doifelsenothing{#2}{\space}{\setupinterlinespace\relax#2}\NC\NC\setupinterlinespace\relax#3\NC\NR - \stoptable - \egroup - \doifelsenothing{#1}{\blank[.25em]}{\blank[#1]}} - -\def\cvdoubleitem - {\dosingleempty\docvdoubleitem} - -\def\docvdoubleitem[#1]#2#3#4#5% - {\cvline - [#1] - {#2} - {\hbox\bgroup - \vtop{\hsize\measure{doubleitemmaincolumnwidth}#3}% - \hfill - \vtop{\hsize\measure{hintscolumnwidth}\raggedleft#4}% - \hskip\measure{separatorcolumnwidth}% - \vtop{\hsize\measure{doubleitemmaincolumnwidth}#5}% - \egroup}} - -\def\cvlistitem - {\dosingleempty\docvlistitem} - -\def\docvlistitem[#1]#2% default symbol is \textbullet and not \endash - {\cvline[\v!nowhite]{}{\doifelsenothing{#1}{--}{#1}~\vtop{\hsize\measure{listitemmaincolumnwidth}#2}}} - -\def\cvlistdoubleitem - {\dosingleempty\docvlistdoubleitem} - -\def\docvlistdoubleitem[#1]#2#3% - {\cvline[\v!nowhite]{}% - {\hbox\bgroup - \doifelsenothing{#1}{--}{#1}~\vtop{\hsize\measure{listdoubleitemmaincolumnwidth}#2}% - \hfill - \doifsomething{#3}{\doifelsenothing{#1}{--}{#1}~\vtop{\hsize\measure{listdoubleitemmaincolumnwidth}#3}}% - \egroup}} - -\def\cventry - {\dosingleempty\docventry} - -\def\docventry[#1]#2#3#4#5#6#7% - {\cvline - [#1] - {#2} - {{\bf#3}% - \doifsomething{#4}{, {\it#4}}% - \doifsomething{#5}{, {#5}}% - \doifsomething{#6}{, {#6}}% - .% - \doifsomething{#7}{\crlf\tx#7}}} - -\def\cvlanguage - {\dosingleempty\docvlanguage} - -\def\docvlanguage[#1]#2#3#4% - {\cvline - [#1] - {#2} - {\hbox\bgroup - \vtop{\hsize\dimexpr.225\measure{maincolumnwidth}\relax\bf#3}% - \hfill - \vtop{\hsize\dimexpr.725\measure{maincolumnwidth}\relax\raggedleft\itx#4}% - \egroup}} - -\def\cvcomputer - {\dosingleempty\docvcomputer} - -\def\docvcomputer[#1]#2#3#4#5% - {\cvdoubleitem[#1]{#2}{\tx#3}{#4}{\tx#5}} - -%D Page optimation, change the topspace to produce a distance of 2.5em -%D between the bottom of the header and the first line of text. - -\newdimen\resume!height!head - -\startsetups[\v!resume:\v!optimize] - - \setbox\scratchbox\vbox{\dontcomplain\getvalue{\v!resume:\v!head:\@@@@rsheadalternative}} - - \ifdim\htdp\scratchbox>\zeropoint - - \global\resume!height!head\htdp\scratchbox - - \setupresumestyle - [\v!firstpage] - [\c!topspace=\dimexpr\resume!height!head+\resumestylevalue{\v!head\v!layer}\c!voffset+2.5em\relax] - - \fi - -\stopsetups - -\setupresumestyle - [\v!firstpage,\v!secondpage] - [\c!backspace=20mm, - \c!width=168mm, - \c!header=0pt, - \c!footer=0pt, - \c!topspace=30mm, - \c!bottomspace=40mm, - \c!height=\v!fit] - -\setupresumestyle - [\v!head,\v!foot] - [\c!state=\v!start] - -\setupresumestyle - [\v!nexthead,\v!nextfoot] - [\c!state=\v!next] - -\setupresumestyle - [\v!option] - [\c!color=blue] - -\useresumestyle[classic] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/interface/pragma.nli b/Master/texmf-dist/tex/context/third/letter/interface/pragma.nli deleted file mode 100644 index e11cbff1dc6..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/interface/pragma.nli +++ /dev/null @@ -1,243 +0,0 @@ -%D \module -%D [ file=pragma, -%D version=2009.07.18, -%D title=\CONTEXT\ Letter Extension, -%D subtitle=Pragma Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle [pragma] % predefined layout -\useletterextension[pragma] % example text - -\setvariables - [letter:head] - [graphic=] - -\setupletterstyle - [\v!option] - [\c!backgroundimage=\getvariable{letter:head}{graphic}] - -\setvariables - [letter:style] - [opening=formal, - closing=informal] - -\setvariables - [letter:data] - [content={\getbuffer[texletter]}] - -\startsetups[letter:address] - \def\\{\endgraf}\getvariable{letter:data}{address} -\stopsetups - -\def\SomeTableEntry#1% - {\doifsomething{\getvariable{letter:data}{#1}} - {\doiftext{\labeltext{letter:table:#1}} - {\NC\labeltext{letter:table:#1}\EQ\getvariable{letter:data}{#1}\NC\NR}}} - -\startsetups[letter:reference:table] - - \setuptabulate[\c!before=,\c!after=] \blank[synchronize] - - \starttabulate[|l|p|] - \SomeTableEntry {concerns} - \SomeTableEntry {date} - \SomeTableEntry {subject} - \SomeTableEntry {reference} - \stoptabulate - -\stopsetups - -\setvariables - [letter:address] - [line=3, - hoffset=0pt, - width=25em, - noflines=10] - -\setvariables - [letter:reference] - [line=1, - noflines-min=2, - noflines-max=5, - noflines=\getvariable{letter:reference}{noflines-max}] - -\startsetups[letter:before] - - % I overload the predefined value for the address layer - - \setupletterstyle - [\v!address] - [\v!layer] - [\c!line=\getvariable{letter:address}{line}, - \c!hoffset=\dimexpr\backspace-\linewidth+\getvariable{letter:address}{hoffset}\relax, - \c!height=\getvariable{letter:address}{noflines}\lineheight] - - \setupletterstyle - [\v!address] - [\v!frame] - [\c!width=\getvariable{letter:address}{width}] - - \page - - \setupletterstyle - [\v!reference] - [\c!line=\getvariable{letter:reference}{line}, - \c!height=\getvariable{letter:reference}{noflines}\lineheight] - - \doifelsenothing{\getvariable{letter:data}{concerns} - \getvariable{letter:data}{subject}} - {\setupletterstyle[\v!reference][\c!height=\getvariable{letter:reference}{noflines-min}\lineheight]} - {\setupletterstyle[\v!reference][\c!height=\getvariable{letter:reference}{noflines-max}\lineheight]} - -\stopsetups - -\setupletterstyle - [\v!option] - [\c!before={\setups[letter:before]}] - -\startsetups[letter:reference] - - \doifsomething{\getvariable{letter:data}{concerns} - \getvariable{letter:data}{subject}} - {\setups[letter:reference:table]\blank} - - \doifsomething{\getvariable{letter:data}{residence}} - {\noindent - \hbox\!!to\hsize - {\hss - \getvariable{letter:data}{residence},\space - \getvariable{letter:data}{date}}} - -\stopsetups - -\startsetups[letter:optimize] - -\stopsetups - -\startsetups[letter:opening:unknown] - \labeltext{letter:opening:unknown} -\stopsetups - -\startsetups[letter:opening:informal] - - \doifelsenothing{\getvariable{letter:data}{informalname}} - {\labeltext{letter:opening:unknown}} - {\labeltext{letter:opening:informal}\space - \getvariable{letter:data}{informalname}}, - -\stopsetups - -\startsetups[letter:opening:formal] - - \doifelsenothing{\getvariable{letter:data}{formalname}} - {\labeltext{letter:opening:unknown}} - {\labeltext{letter:opening:formal}\space - \doifsomething{\getvariable{letter:data}{prefix}} - {\getvariable{letter:data}{prefix}\space} - \getvariable{letter:data}{formalname}}, - -\stopsetups - -\startsetups[letter:opening] - \setups[letter:opening:\getvariable{letter:style}{opening}] -\stopsetups - -\def\startlettercontent - {\dostartbuffer[texletter][startlettercontent][stoplettercontent]} - -\startsetups[letter:content] - \getvariable{letter:data}{content} -\stopsetups - -\startsetups[letter:closing:informal] - - \blank - - \doifelsenothing{\getvariable{letter:data}{greeting}} - {\noindent\labeltext{letter:greeting:informal}} - {\noindent\getvariable{letter:data}{greeting}}, - - \blank - - \noindent\getvariable{letter:data}{author} - -\stopsetups - -\startsetups[letter:closing:formal] - - \blank - - \doifelsenothing{\getvariable{letter:data}{greeting}} - {\noindent\labeltext{letter:greeting:formal}} - {\noindent\getvariable{letter:data}{greeting}}, - - \blank - - \noindent\getvariable{letter:data}{author} - -\stopsetups - -\startsetups[letter:closing] - \setups[letter:closing:\getvariable{letter:style}{closing}] -\stopsetups - -\startsetups[letter:appendices] - \getvariable{letter:data}{appendices} -\stopsetups - -%D Labels - -\setuplabeltext - [nl] - [letter:appendices=bijlage(n) : , - letter:subject=het onderwerp, - letter:opening:formal=Geachte, - letter:opening:informal=Beste, - letter:opening:unknown=LS, - letter:name:unknown=lezer, - letter:greeting:informal=Een vriendelijke groet, - letter:greeting:formal=Hoogachtend] - -\setuplabeltext - [en] - [letter:appendices=appendices : , - letter:subject=the topic, - letter:opening:formal=Dear, - letter:opening:informal=Dear, - letter:opening:unknown=LS, - letter:name:unknown=reader, - letter:greeting:informal=Regards, - letter:greeting:formal=Sincerely yours] - -\setuplabeltext - [de] - [letter:appendices=Anlagen : , - letter:subject=das Kennzeichen, - letter:opening:formal=Sehr Geehrte, - letter:opening:informal=Hallo, - letter:opening:unknown=LS, - letter:name:unknown=Leser, - letter:greeting:informal=Mit freundlichen Gr\uumlaut\ssharp en, - letter:greeting:formal=Hochachtungsvoll] - -\setuplabeltext - [nl] - [letter:table:concerns=betreft, - letter:table:date=datum, - letter:table:subject=kenmerk, - letter:table:reference=referentie] - -\setuplabeltext - [en] - [letter:table:concerns=concerns, - letter:table:date=date, - letter:table:subject=subject, - letter:table:reference=reference] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/blockstyle.nls b/Master/texmf-dist/tex/context/third/letter/style/blockstyle.nls deleted file mode 100644 index 0ae2f951209..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/blockstyle.nls +++ /dev/null @@ -1,58 +0,0 @@ -%D \module -%D [ file=blockstyle, -%D version=2008.11.29, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Blockstyle initalization, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[default] - -\def\letter!order!sections - {\v!letter\v!head,\v!date\v!line,\v!reference\v!line, - \v!special\v!notation,\v!inside\v!address,\v!title, - \v!opening,\v!subject,\v!content,\v!closing,\v!appendices} - -\setupletter - [\c!alternative=\v!none] - -\setupletterstyle - [\v!option] - [\c!backaddress=\v!no, - \c!address=\v!no, - \c!reference=\v!no, - \c!marking=\v!no] - -\startsetups[\v!letter:\v!head] -% sender information appear in a lettersection -\stopsetups - -\startsetups[\v!letter:\v!letter\v!head] -\let\\\crlf -\lettervalue\c!fromaddress -\stopsetups - -\startsetups[\v!letter:\v!date\v!line] -\lettervalue\c!date -\stopsetups - -\startsetups[\v!letter:\v!reference\v!line] -\lettervalue\c!reference -\stopsetups - -\startsetups[\v!letter:\v!special\v!notation] -\lettervalue\c!dispatch -\stopsetups - -\startsetups[\v!letter:\v!inside\v!address] -\let\\\crlf -\doiflettervalue\c!toname {\lettervalue\c!toname \crlf} -\doiflettervalue\c!toaddress{\lettervalue\c!toaddress\crlf} -\stopsetups - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/casual.nrs b/Master/texmf-dist/tex/context/third/letter/style/casual.nrs deleted file mode 100644 index 7991188e168..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/casual.nrs +++ /dev/null @@ -1,231 +0,0 @@ -%D \module -%D [ file=casual, -%D version=2010.08.11, -%D title=\CONTEXT\ Resume Style, -%D subtitle=Casual Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D You can select between different color styles for the elements. - -%D Colors (moderncv name) -%Dresume -%D \startline -%D resume:1 firstnamecolor -%D resume:2 familynamecolor -%D resume:3 titlecolor -%D resume:4 quotecolor -%D resume:5 addresscolor -%D resume:6 sectionrectanglecolor -%D resume:7 sectiontitlecolor -%D resume:8 subsectioncolor -%D resume:9 footersymbolcolor -%D \stoplines - -\startsetups resume:blue - - \definecolorgroup - [resume] - [0.65:0.65:0.65, - 0.45:0.45:0.45, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.25:0.50:0.75, - 0.20:0.40:0.65, - 0.20:0.40:0.65, - 0.25:0.50:0.75] - -\stopsetups - -\startsetups resume:orange - - \definecolorgroup - [resume] - [0.65:0.65:0.65, - 0.45:0.45:0.45, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 1.00:0.65:0.20, - 0.95:0.55:0.15, - 0.95:0.55:0.15, - 0.95:0.55:0.15] - -\stopsetups - -\startsetups resume:green - - \definecolorgroup - [resume] - [0.65:0.65:0.65, - 0.45:0.45:0.45, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.55:0.85:0.35, - 0.30:0.65:0.15, - 0.30:0.65:0.15, - 0.30:0.65:0.15] - -\stopsetups - -\startsetups resume:red - - \definecolorgroup - [resume] - [0.65:0.65:0.65, - 0.45:0.45:0.45, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 1.00:0.30:0.30, - 0.95:0.20:0.20, - 0.95:0.20:0.20, - 0.95:0.20:0.20] - -\stopsetups - -\startsetups resume:grey - - \definecolorgroup - [resume] - [0.65:0.65:0.65, - 0.45:0.45:0.45, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.75:0.75:0.75, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.35:0.35:0.35] - -\stopsetups - -\processaction - [\resumestylevalue\v!option\c!color] - [ blue=>\directsetup{resume:blue}, - orange=>\directsetup{resume:orange}, - green=>\directsetup{resume:green}, - red=>\directsetup{resume:red}, - grey=>\directsetup{resume:grey}, - \s!unknown=>\directsetup{resume:blue}] - -%D Quick and dirty solution, I will write a better one in the future - -\def\attributedresumevalue#1% - {\doattributes{\????rd#1}\c!style\c!color{\resumevalue{#1}}} - -\setvalue{\v!resume:\v!head:\v!casual}% - {\hbox to\hsize\bgroup - \framed[\c!offset=2\points,\c!strut=\v!no,\c!framecolor=resume:1]{\resumevalue{image}}% - \hfill - \hbox{\attributedresumevalue\v!firstname\space\attributedresumevalue\v!familyname}% - \egroup - \vskip-\baselineskip\blank[medium] - \blackrule[\c!height=2\linewidth,\c!width=\hsize,\c!color=resume:1] - \doifresumevalue\v!quote{\blank[\v!line]\attributedresumevalue\v!quote}} - -% see below for a better version -% -% \setvalue{\v!resume:\v!foot:\v!casual}% -% {\attributedresumevalue\v!street\space -- \attributedresumevalue\v!town\par -% \attributedresumevalue\v!mobile\quad\color[resume:9]{\symbol{bullet}}\quad -% \attributedresumevalue\v!phone \quad\color[resume:9]{\symbol{bullet}}\quad -% \attributedresumevalue\v!fax \quad\color[resume:9]{\symbol{bullet}}\quad -% \attributedresumevalue\v!email \quad\color[resume:9]{\symbol{bullet}}\quad -% \attributedresumevalue\v!info} - - -\def\resumefootalternativecasual[#1][#2]% Can I make a generic version? - {\bgroup - \def\resumefootalternativecasual##1% - {\doifresumevalue{##1}{\advance\scratchcounter\plusone}}% - \def\doresumefootsingleelement##1% - {\doifresumevalue{##1}{\attributedresumevalue{#1}}}% - \def\doresumefootmultipleelement##1% - {\doifresumevalue{##1} - {\advance\scratchcounter\plusone - \attributedresumevalue{##1} - \unless\ifnum\scratchcounter=\resumefootvalues - #2% - \fi}}% - \scratchcounter\zerocount - \processcommalist[#1]\resumefootalternativecasual - \edef\resumefootvalues{\number\scratchcounter}% - \scratchcounter\zerocount - \ifnum\resumefootvalues>0 - \ifnum\resumefootvalues=1 - \processcommalist[#1]\doresumefootsingleelement - \else - \processcommalist[#1]\doresumefootmultipleelement - \fi - \fi - \egroup} - -\setvalue{\v!resume:\v!foot:\v!casual}% - {\bgroup - \resumefootalternativecasual[street,town][~--~]\par - \resumefootalternativecasual[mobile,phone,fax,email,info][{\quad\color[resume:9]{\symbol{bullet}}\quad}]\par - \egroup} - -\setvalue{\v!resume:\v!nextfoot:\v!casual}% - {\color[resume:5]{\it\correspagenumber/\numberofcorrespages}} - -\setupresumestyle - [\v!head,\v!foot,\v!nextfoot] - [\c!alternative=\v!casual] - -\setupresumestyle - [\v!head] - [\c!hoffset=\backspace, - \c!voffset=2cm, - \c!width=\textwidth, - \c!height=3.5cm, - \c!frame=\v!off, - \c!align={\v!wide,\v!middle}, - \c!state=\v!start] - -\setupresumestyle - [\v!foot,\v!nextfoot] - [\v!option] - [\c!state={\v!first,\v!next}] - -\setupresumestyle - [\v!foot,\v!nextfoot] - [\v!frame] - [\c!frame=\v!off, - \c!width=\textwidth, - \c!height=2cm, - \c!align=\v!middle] - -\setupresumestyle - [\v!foot,\v!nextfoot] - [\v!layer] - [\c!preset=\v!left\v!bottom, - \c!hoffset=\backspace, - \c!voffset=2cm] - -\setupresumestyle - [\v!nextfoot] - [\c!align={\v!left,\v!lohi}] - -%D Default style for the user information - -\setupresume[\v!firstname] [\c!style=\c!tf\c!d,\c!color=resume:1] -\setupresume[\v!familyname][\c!style=\c!tf\c!d,\c!color=resume:2] -\setupresume[\v!quote] [\c!style=\c!tf ,\c!color=resume:4] -\setupresume[\v!street] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!town] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!mobile] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!phone] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!fax] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!email] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!info] [\c!style=\v!italic,\c!color=resume:5] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/classic.nrs b/Master/texmf-dist/tex/context/third/letter/style/classic.nrs deleted file mode 100644 index 4e04e39e2a4..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/classic.nrs +++ /dev/null @@ -1,202 +0,0 @@ -%D \module -%D [ file=classic, -%D version=2009.03.31, -%D title=\CONTEXT\ Resume Style, -%D subtitle=Classic Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D Colors (moderncv names) -%D -%D \startlines -%D classic:1 firstnamecolor -%D classic:2 familynamecolor -%D classic:3 titlecolor -%D classic:4 quotecolor -%D classic:5 addresscolor -%D classic:6 sectionrectanglecolor -%D classic:7 sectiontitlecolor -%D classic:8 subsectioncolor -%D resume:9 footersymbolcolor -%D \stoplines - -\startsetups resume:blue - - \definecolorgroup - [resume] - [0.00:0.00:0.00, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.25:0.50:0.75, - 0.25:0.50:0.75, - 0.20:0.40:0.65, - 0.20:0.40:0.65, - 0.00:0.00:0.00] - -\stopsetups - -\startsetups resume:orange - - \definecolorgroup - [resume] - [0.00:0.00:0.00, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.95:0.55:0.15, - 1.00:0.65:0.20, - 0.95:0.55:0.15, - 0.95:0.55:0.15, - 0.00:0.00:0.00] - -\stopsetups - -\startsetups resume:green - - \definecolorgroup - [resume] - [0.00:0.00:0.00, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.30:0.65:0.15, - 0.55:0.85:0.35, - 0.30:0.65:0.15, - 0.30:0.65:0.15, - 0.00:0.00:0.00] - -\stopsetups - -\startsetups resume:red - - \definecolorgroup - [resume] - [0.00:0.00:0.00, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.95:0.20:0.20, - 1.00:0.30:0.30, - 0.95:0.20:0.20, - 0.95:0.20:0.20, - 0.00:0.00:0.00] - -\stopsetups - -\startsetups resume:grey - - \definecolorgroup - [resume] - [0.00:0.00:0.00, - 0.00:0.00:0.00, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.75:0.75:0.75, - 0.35:0.35:0.35, - 0.35:0.35:0.35, - 0.00:0.00:0.00] - -\stopsetups - -\processaction - [\resumestylevalue\v!option\c!color] - [ blue=>\directsetup{resume:blue}, - orange=>\directsetup{resume:orange}, - green=>\directsetup{resume:green}, - red=>\directsetup{resume:red}, - grey=>\directsetup{resume:grey}, - \s!unknown=>\directsetup{resume:blue}] - -%D Quick and dirty solution - -\def\attributedresumevalue#1% - {\doattributes{\????rd#1}\c!style\c!color{\resumevalue{#1}}} - -\def\resumeheadalternativecassual[#1]% - {\bgroup - \def\doresumeheadalternativecassual##1% - {\doifresumevalue{##1}{\advance\scratchcounter\plusone}}% - \def\dodoresumeheadalternativecassual##1% - {\doifresumevalue{##1} - {\advance\scratchcounter\plusone - \attributedresumevalue{##1}% - \ifnum\scratchcounter<\resumeheadvalues\\\fi}}% - \scratchcounter\zerocount - \processcommalist[#1]\doresumeheadalternativecassual - \edef\resumeheadvalues{\number\scratchcounter}% - \scratchcounter\zerocount - \processcommalist[#1]\dodoresumeheadalternativecassual - \egroup} - -\setvalue{\v!resume:\v!head:\v!classic}% - {\hbox to \textwidth\bgroup - \vbox\bgroup - \hbox{\attributedresumevalue\v!firstname\space\attributedresumevalue\v!familyname} - \doifresumevalue\v!title{\blank[\v!medium]} - \hbox{\attributedresumevalue\v!title} - \egroup - \hss - \framed - [\c!location=\v!bottom,\c!align=\v!left,\c!width=\v!fit,\c!frame=\v!off] - {\resumeheadalternativecassual[street,town,mobile,phone,fax,email,info]}% - \quad - \framed[\c!offset=2\points,\c!strut=\v!no]{\resumevalue{image}}% - \egroup} - -\setvalue{\v!resume:\v!nextfoot:\v!classic}% - {\color[resume:4]{\it\correspagenumber/\numberofcorrespages}} - -\setupresumestyle - [\v!head,\v!nextfoot] - [\c!alternative=\v!classic] - -\setupresumestyle - [\v!head] - [\c!hoffset=\backspace, - \c!voffset=2cm, - \c!frame=\v!off, - \c!width=\textwidth, - \c!height=7cm] - -\setupresumestyle - [\v!nextfoot] - [\v!option] - [\c!state={\v!first,\v!next}] - -\setupresumestyle - [\v!nextfoot] - [\v!frame] - [\c!frame=\v!off, - \c!width=\textwidth, - \c!height=2cm, - \c!align={\v!left,\v!lohi}] - -\setupresumestyle - [\v!nextfoot] - [\v!layer] - [\c!preset=\v!left\v!bottom, - \c!hoffset=\backspace, - \c!voffset=2cm] - -%D Default style for the user information - -\setupresume[\v!quote] [\c!style=\v!italic,\c!color=resume:4] -\setupresume[\v!firstname] [\c!style=\c!tf\c!d,\c!color=resume:1] -\setupresume[\v!familyname][\c!style=\c!tf\c!d,\c!color=resume:2] -\setupresume[\v!title] [\c!style=\c!it\c!b,\c!color=resume:3] -\setupresume[\v!street] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!town] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!mobile] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!phone] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!fax] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!email] [\c!style=\v!italic,\c!color=resume:5] -\setupresume[\v!info] [\c!style=\v!italic,\c!color=resume:5] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/default.nls b/Master/texmf-dist/tex/context/third/letter/style/default.nls deleted file mode 100644 index 15d27f02a8f..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/default.nls +++ /dev/null @@ -1,122 +0,0 @@ -%D \module -%D [ file=default, -%D version=2010.02.28, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Blockstyle initalization, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\def\doresetletterlayer #1{\dododefinecorrespondencelayer[\v!letter][\????ls][#1]} -\def\doresetlettersection#1{\dodefinecorrespondencesection[\v!letter][\????ls][#1]} - -\processcommacommand[\letter!list!layers ]\doresetletterlayer -\processcommacommand[\letter!list!sections]\doresetlettersection - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!topspace=\dimexpr\paperheight/297*25\relax, - \c!top=\!!zeropoint, - \c!topdistance=\!!zeropoint, - \c!header=\dimexpr\paperheight/297*20\relax, - \c!headerdistance=\!!zeropoint, - \c!height=\dimexpr\paperheight/297*250\relax, - \c!footerdistance=\!!zeropoint, - \c!footer=\dimexpr\paperheight/297*20\relax, - \c!bottomdistance=\!!zeropoint, - \c!bottom=\!!zeropoint, - \c!backspace=\dimexpr\paperwidth/210*25\relax, - \c!width=\dimexpr\paperwidth/210*150\relax, - \c!bottomspace=\!!zeropoint] - -\setupletter - [\c!alternative=\v!a, - \c!list=\v!date, - \c!date=\currentdate, - \c!width=\zeropoint] - -\setupletterstyle - [\v!option] - [\c!method=\v!buffer, - \c!dispatch=\v!yes, - \c!addressee=\v!yes, - \c!backaddress=\v!no] - -\setupletterstyle - [\v!head,\v!nexthead,\v!lefthead,\v!righthead] - [\c!hoffset=\backspace, - \c!voffset=\topspace, - \c!width=\textwidth] - -\setupletterstyle - [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] - [\c!preset=\v!left\v!bottom, - \c!hoffset=\backspace, - \c!voffset=\bottomspace, - \c!width=\textwidth] - -\setupletterstyle - [\v!head] - [\c!rulewidth=\hsize, - \c!fromrule=\v!no, - \c!rulecolor=\v!black, - \c!alternative=\v!left] - -\setupletterstyle - [\v!nexthead,\v!nextfoot] - [\c!state=\v!next] - -\setupletterstyle - [\v!lefthead,\v!leftfoot] - [\c!state=\v!left] - -\setupletterstyle - [\v!righthead,\v!rightfoot] - [\c!state=\v!right] - -\setupletterstyle - [\v!reference] - [\v!option] - [\c!list=\lettervalue\c!list, - \c!alternative=\lettervalue\c!alternative, - \c!spaceafter=\plustwo\lineheight] - -\setupletterstyle - [\v!backaddress] - [\v!option] - [\c!alternative=\v!auto, - \c!separator=\textcomma\space] - -\setupletterstyle - [\v!address] - [\c!strut=\v!no] - -\setupletterstyle - [\v!dispatch,\v!addressee] - [\c!align=\v!right, - \c!width=\hsize, - \c!leftmargin=\zeropoint, - \c!rightmargin=\zeropoint, - \c!offset=\zeropoint, - \c!frame=\v!off] - -\setupletterstyle - [\v!dispatch] - [\c!location=\v!bottom, - \c!height=\dimexpr\vsize/33*9\relax] - -\setupletterstyle - [\v!addressee] - [\c!location=\v!top, - \c!height=\dimexpr\vsize/33*24\relax] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[\v!line]}, - \c!inbetween={\endgraf\blank[\v!nobreak,2*\v!line]}] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/default.nrs b/Master/texmf-dist/tex/context/third/letter/style/default.nrs deleted file mode 100644 index 5f325a07e7f..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/default.nrs +++ /dev/null @@ -1,34 +0,0 @@ -%D \module -%D [ file=default, -%D version=2009.10.10, -%D title=\CONTEXT\ Resume Style, -%D subtitle=Default Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\setupresumestyle - [\v!firstpage,\v!secondpage] - [\c!topspace=\dimexpr\paperheight/297*25\relax, - \c!top=\!!zeropoint, - \c!topdistance=\!!zeropoint, - \c!header=\dimexpr\paperheight/297*20\relax, - \c!headerdistance=\!!zeropoint, - \c!height=\dimexpr\paperheight/297*250\relax, - \c!footerdistance=\!!zeropoint, - \c!footer=\dimexpr\paperheight/297*20\relax, - \c!bottomdistance=\!!zeropoint, - \c!bottom=\!!zeropoint, - \c!backspace=\dimexpr\paperwidth/210*25\relax, - \c!width=\dimexpr\paperwidth/210*150\relax, - \c!bottomspace=\!!zeropoint] - -\setupresumestyle - [\v!nexthead,\v!nextfoot] - [\c!state=\v!next] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/dina.nls b/Master/texmf-dist/tex/context/third/letter/style/dina.nls deleted file mode 100644 index 54b87231216..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/dina.nls +++ /dev/null @@ -1,40 +0,0 @@ -%D \module -%D [ file=dina, -%D version=2007.02.11, -%D title=\CONTEXT\ Letter Style, -%D subtitle=DIN 676 A, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[dinb] - -\setupletterstyle - [\v!firstpage] - [\c!topspace=97.4mm] - -\setupletterstyle - [\v!topmark] - [\c!voffset=87mm] - -\setupletterstyle - [\v!botmark] - [\c!voffset=192mm] - -\setupletterstyle - [\v!head] - [\c!height=10.1mm] - -\setupletterstyle - [\v!address] - [\c!voffset=32mm] - -\setupletterstyle - [\v!reference] - [\c!voffset=80.4mm] % unknown value! - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/dinb.nls b/Master/texmf-dist/tex/context/third/letter/style/dinb.nls deleted file mode 100644 index 9847d1b72e7..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/dinb.nls +++ /dev/null @@ -1,134 +0,0 @@ -%D \module -%D [ file=dinb, -%D version=2009.10.10, -%D title=\CONTEXT\ Letter Style, -%D subtitle=DIN 676 B, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[default] % default values - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!topspace=114.3mm, - \c!bottomspace=30mm, % unknown value! - \c!backspace=24.1mm, - \c!header=0mm, - \c!footer=0mm, % unknown value! - \c!width=\v!middle, - \c!height=\v!middle] - -\setupletterstyle - [\v!secondpage] - [\c!topspace=20mm, - \c!bottomspace=20mm, - \c!header=10mm, - \c!footer=10mm] - -\setupletterstyle - [\v!title,\v!subject,\v!opening,\v!appendices] - [\c!before=, - \c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!title] - [\c!align=\v!middle, - \c!style=\v!bold] - -\setupletterstyle - [\v!subject] - [\c!after={\blank[2*line]}, - \c!style=\v!bold] - -\setupletterstyle - [\v!content] - [\c!after={\blank[\v!nobreak,\v!line]}] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[3*line]}] - -\setupletterstyle - [\v!topmark,\v!botmark,\v!cutmark] - [\c!state={\v!first,\v!next}, - \c!hoffset=5mm, - \c!strut=\v!no, - \c!symbol={\blackrule[\c!width=\plusfour\c!mm,\c!height=.4\points]}] - -\setupletterstyle - [\v!topmark] - [\c!voffset=105mm] - -\setupletterstyle - [\v!botmark] - [\c!voffset=210mm] - -\setupletterstyle - [\v!cutmark] - [\c!voffset=.5\paperheight, - \c!symbol={\blackrule[\c!width=\plusfour\c!mm,\c!height=.4\points]}] - -\setupletterstyle - [\v!head,\v!nexthead,\v!lefthead,\v!righthead] - [\v!layer] - [\c!hoffset=\backspace, - \c!voffset=16.9mm] - -\setupletterstyle - [\v!head,\v!nexthead,\v!lefthead,\v!righthead] - [\v!frame] - [\c!width=\textwidth, - \c!height=28.1mm] - -\setupletterstyle - [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] - [\v!layer] - [\c!voffset=20mm] % unknown value! - -\setupletterstyle - [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] - [\v!frame] - [\c!height=10mm] % unknown value! - -\setupletterstyle - [\v!address] - [\v!layer] - [\c!hoffset=\backspace, - \c!voffset=50mm] - -\setupletterstyle - [\v!address] - [\v!frame] - [\c!width=85mm, - \c!height=40mm] - -\setupletterstyle - [\v!backaddress] - [\v!option] - [\c!style=\c!tf\c!xx] - -\setupletterstyle - [\v!backaddress] - [\v!layer] - [\c!hoffset=\backspace, - \c!voffset=\dimexpr\letterstylevalue{\v!address\v!layer}\c!voffset-\letterstylevalue{\v!backaddress\v!frame}\c!height\relax] - -\setupletterstyle - [\v!backaddress] - [\v!frame] - [\c!height=5mm, - \c!width=85mm] - -\setupletterstyle - [\v!reference] - [\c!hoffset=\backspace, - \c!voffset=93.2mm, % unknown value! - \c!width=\textwidth, % unknown value! - \c!height=8.4mm] % unknown value! - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/dutch.nls b/Master/texmf-dist/tex/context/third/letter/style/dutch.nls deleted file mode 100644 index 02a6200d5e3..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/dutch.nls +++ /dev/null @@ -1,73 +0,0 @@ -%D \module -%D [ file=dutch, -%D version=2008.12.28, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Dutch NEN Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[dinb] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!topspace=105mm, - \c!bottomspace=30mm, - \c!backspace=33mm, - \c!width=\v!middle, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!topspace=20mm, - \c!header=15mm, - \c!headerdistance=15mm, - \c!height=\v!fit] - -\setupletterstyle - [\v!topmark,\v!cutmark] - [\c!state=\v!repeat, - \c!hoffset=3.5mm, - \c!symbol={\blackrule[\c!width=\plustwo\c!mm,\c!height=.4\points]}] - -\setupletterstyle - [\v!subject] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!closing] - [\v!frame] - [\c!inbetween={\blank[\v!line]}] - -\setupletterstyle - [\v!address] - [\c!voffset=55mm, - \c!height=35mm, - \c!width=80mm] - -\setupletterstyle - [\v!backaddress] - [\c!voffset=50mm, - \c!height=5mm, - \c!width=80mm, - \c!bottomframe=\v!yes] - -\setupletterstyle - [\v!dispatch] - [\c!height=\lineheight] - -\setupletterstyle - [\v!addressee] - [\c!height=\v!fit] - -\setupletterstyle - [\v!option] - [\c!botmark=\v!no, - \c!backaddress=\v!yes, - \c!state=\v!start] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/english.nls b/Master/texmf-dist/tex/context/third/letter/style/english.nls deleted file mode 100644 index 64000adb8d3..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/english.nls +++ /dev/null @@ -1,25 +0,0 @@ -%D \module -%D [ file=english, -%D version=2008.03.13, -%D title=\CONTEXT\ Letter Style, -%D subtitle=English style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D This is the second letter style for my letter module. The first -%D style was \mono{dina.nls} with its slightly different alternative -%D \mono{dinb.nls} but both count only as one style. - -\def\letter!order!sections - {\v!title,\v!opening,\v!subject,\v!content,\v!closing,\v!appendices} - -\setupletterstyle - [\v!subject] - [\c!style=] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/french.nls b/Master/texmf-dist/tex/context/third/letter/style/french.nls deleted file mode 100644 index c38e90dfa9e..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/french.nls +++ /dev/null @@ -1,87 +0,0 @@ -%D \module -%D [ file=french, -%D version=2009.09.20, -%D title=\CONTEXT\ Letter Style, -%D subtitle=French Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[dinb] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=25mm, - \c!width=\v!middle, - \c!topspace=95mm, - \c!bottomspace=25mm, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!topspace=15mm, - \c!header=10mm] - -\setupletterstyle - [\v!head] - [\c!hoffset=\backspace, - \c!voffset=25mm] - -\setupletterstyle - [\v!backaddress] - [\c!alternative=\v!no] - -\setupletterstyle - [\v!address] - [\c!hoffset=107mm, - \c!voffset=55mm] - -\setupletterstyle - [\v!addressee] - [\c!height=\vsize, - \c!location=\v!normal, - \c!align=\v!right] - -\setupletterstyle - [\v!location] - [\c!hoffset=107mm, - \c!voffset=30mm] - -\setupletterstyle - [\v!reference] - [\c!alternative=\v!none] - -\setupletterstyle - [\v!closing] - [\c!inbetween={\endgraf\blank[\v!nobreak,2*\v!line]}] - -\setupletterstyle - [\v!enclosure] - [\c!location=\v!left, - \c!width=\v!fit, - \c!headstyle=\c!tf] - -\setupletterstyle - [\v!opening] - [\c!after={\blank[2*\v!line]}] - -\setupletterstyle - [\v!content] - [\c!after={\blank[\v!nobreak,2*\v!line]}] - -\setupletterstyle - [\v!location,\v!opening,\v!closing] - [\c!alternative=\v!french] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line, - \c!cutmark=\v!no, - \c!botmark=\v!no, - \c!dispatch=\v!no] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/fullblock.nls b/Master/texmf-dist/tex/context/third/letter/style/fullblock.nls deleted file mode 100644 index 2dd224a89a1..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/fullblock.nls +++ /dev/null @@ -1,46 +0,0 @@ -%D \module -%D [ file=fullblock, -%D version=2008.12.16, -%D title=\CONTEXT\ Letter Style, -%D subtitle=full-block/complete block style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[blockstyle] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line,\v!special\v!notation, - \v!inside\v!address,\v!title,\v!opening,\v!subject,\v!content] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[2*\v!line]}] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\v!middle, - \c!topspace=1in, - \c!header=0in, - \c!footer=0in, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!header=.5in] - -\setupletterstyle - [\v!nexthead] - [\c!alternative=\v!fullblock] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/gbrief.nls b/Master/texmf-dist/tex/context/third/letter/style/gbrief.nls deleted file mode 100644 index c31c0bf5ed4..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/gbrief.nls +++ /dev/null @@ -1,71 +0,0 @@ -%D \module -%D [ file=gbrief, -%D version=2010.09.09, -%D title=\CONTEXT\ Letter Style, -%D subtitle=g-brief, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[dinb] - -\setupletterstyle - [\v!reference] - [\c!alternative=\v!a] - -\setupletterstyle - [\v!backaddress] - [\c!bottomframe=\v!on, - \c!separator={~\mathematics\cdot~}] - -\setupletterstyle - [\v!head,\v!foot,\v!nexthead] - [\c!alternative=\v!gbrief] - -\setupletterstyle - [\v!head] - [\c!style={\switchtobodyfont[20pt]\sc}] - -\defineletterelement[\v!head][\v!gbrief] - {\lettervalue\c!fromname - \hrule} - -\setupletterstyle[\v!foot][style=\txx] - -\defineletterelement[\v!foot][\v!gbrief] - {\bTABLE[\c!frame=\v!off,\c!width=.25\hsize,\c!offset=\zeropoint] - \bTR[\c!style=\bfxx,\c!topframe=\v!on] - \bTD \labeltext{\v!letter:\c!address} \eTD - \bTD \labeltext{\v!letter:\c!phone} \eTD - \bTD \labeltext{\v!letter:\c!email} \eTD - \bTD \labeltext{\v!letter:\c!bank} \eTD - \eTR - \bTR - \bTD \lettervalue\c!street \\\lettervalue\c!city \eTD - \bTD \lettervalue\c!phone \eTD - \bTD \lettervalue\c!email \eTD - \bTD \lettervalue\c!bankname \\\lettervalue\c!banknumber\\\lettervalue\c!accountnumber \eTD - \eTR - \eTABLE} - -\setupletterstyle[\v!nexthead][\c!style=\v!smallcaps] - -\defineletterelement[\v!nexthead][\v!gbrief] - {\lettervalue\c!fromname - \hfill - %\labeltext{\v!letter:\c!page}\subpagenumber\labeltext{\v!letter:\c!of}\lastsubpagenumber - \labeltext{\v!letter:\c!page}\correspagenumber\labeltext{\v!letter:\c!of}\numberofcorrespages - \hfill - \lettervalue\c!date - \hairline} - -\setupletterstyle - [\v!option] - [\c!backaddress=\v!yes, - \c!marking=\v!yes] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/hanging.nls b/Master/texmf-dist/tex/context/third/letter/style/hanging.nls deleted file mode 100644 index f6c9cff08d2..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/hanging.nls +++ /dev/null @@ -1,58 +0,0 @@ -%D \module -%D [ file=hanging, -%D version=2008.12.25, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Hanging indented style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[blockstyle] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line,\v!special\v!notation, - \v!inside\v!address,\v!title,\v!opening,\v!content] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line, - \v!date\v!line,\v!special\v!notation,\v!closing] - [\c!leftmargin=.5\textwidth] - -\setupletterstyle - [\v!content] - [\c!leftmargin=1.5em] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[2*\v!line]}] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\v!middle, - \c!topspace=1in, - \c!header=0in, - \c!footer=0in, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!header=1in] - -\setuplabeltext[\s!en][\c!page=Page~] - -\setupletterstyle - [\v!nexthead] - [\c!alternative=\v!hanging] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line, - \c!indenting={\v!yes,-1.5em}] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/knuth.nls b/Master/texmf-dist/tex/context/third/letter/style/knuth.nls deleted file mode 100644 index da6c271b639..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/knuth.nls +++ /dev/null @@ -1,50 +0,0 @@ -%D \module -%D [ file=knuth, -%D version=2009.02.19, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Letterformat Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\setuppapersize - [letter][letter] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\dimexpr\paperwidth-\plustwo\backspace\relax] - -\setupletterstyle - [\v!firstpage] - [\c!header=\zeropoint, - \c!topspace=2.2in, - \c!bottomspace=1.5in, - \c!height=\v!fit] - -\setupletterstyle - [\v!opening,\v!content] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line] - -\setvalue{\v!letter:\v!nexthead:\v!knuth}% - {\hbox\!!to\hsize - {\rlap{\lettervalue\c!toname}% - \midaligned{\currentdate}% - \llap{\labeltext\c!page\correspagenumber}}} - -\setupletterstyle - [\v!nexthead] - [\c!hoffset=\backspace, - \c!voffset=\topspace, - \c!state=\v!next, - \c!alternative=\v!knuth] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-default.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-default.mkii new file mode 100644 index 00000000000..162f7a21604 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-default.mkii @@ -0,0 +1,131 @@ +%D \module +%D [ file=letter-imp-default, +%D version=2011.10.31, +%D title=\CONTEXT\ User Module, +%D subtitle=Default letter style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\setupletter + [\c!date=\currentdate] + +\setupletterlayer + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!x=\backspace, + \c!y=\topspace] + +\setupletterframe + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!width=\textwidth] + +\setupletterlayer + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!preset=\v!left\v!bottom, + \c!x=\backspace, + \c!y=\bottomspace] + +\setupletterframe + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!width=\textwidth] + +%\setupletterlayer +% [\v!head] +% [\c!rulewidth=\hsize, +% \c!fromrule=\v!no, +% \c!rulecolor=\v!black, +% \c!alternative=\v!left] + +\setupletterlayer + [\v!nexthead,\v!nextfoot] + [\c!state=\v!next] + +\setupletterlayer + [\v!lefthead,\v!leftfoot] + [\c!state=\v!left] + +\setupletterlayer + [\v!righthead,\v!rightfoot] + [\c!state=\v!right] + +\setupletterlayer + [\v!backaddress] + [\c!alternative=\v!auto, + \c!separator=\textcomma\space] + +\setupletterlayer + [\v!reference] + [\c!alternative=\v!a, + \c!list=\v!date] + +\setuplettersection + [\v!closing] + [\c!spaceafter=\v!line, + \c!spaceinbetween={\v!samepage,2*\v!line}] + +\defineletterelements + [\v!layer] + [\v!lettermain, + \v!letternext, + \v!head, + \v!firsthead, + \v!nexthead, + \v!lefthead, + \v!righthead, + \v!foot, + \v!nextfoot, + \v!topmark, + \v!botmark, + \v!cutmark, + \v!backaddress, + \v!address, + \v!reference, + \v!location] + +\defineletterelements + [\v!section] + [\v!title, + \v!subject, + \v!opening, + \v!content, + \v!closing, + \v!appendices] + +\defineletterelements + [\v!description] + [\v!copy, + \v!enclosure, + \v!postscript] + +\setupletterdescription + [\c!copy] + [\c!headcommand=\lettertext\v!copy, + \c!textcommand=\correspondenceparameter\c!copy] + +\setupletterdescription + [\c!enclosure] + [\c!headcommand=\lettertext\v!enclosure, + \c!textcommand=\correspondenceparameter\c!enclosure] + +\setupletterdescription + [\c!postscript] + [\c!headcommand=\lettertext\v!postscript, + \c!textcommand=\correspondenceparameter\c!postscript] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-default.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-default.mkiv new file mode 100644 index 00000000000..162f7a21604 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-default.mkiv @@ -0,0 +1,131 @@ +%D \module +%D [ file=letter-imp-default, +%D version=2011.10.31, +%D title=\CONTEXT\ User Module, +%D subtitle=Default letter style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\setupletter + [\c!date=\currentdate] + +\setupletterlayer + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!x=\backspace, + \c!y=\topspace] + +\setupletterframe + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!width=\textwidth] + +\setupletterlayer + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!preset=\v!left\v!bottom, + \c!x=\backspace, + \c!y=\bottomspace] + +\setupletterframe + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!width=\textwidth] + +%\setupletterlayer +% [\v!head] +% [\c!rulewidth=\hsize, +% \c!fromrule=\v!no, +% \c!rulecolor=\v!black, +% \c!alternative=\v!left] + +\setupletterlayer + [\v!nexthead,\v!nextfoot] + [\c!state=\v!next] + +\setupletterlayer + [\v!lefthead,\v!leftfoot] + [\c!state=\v!left] + +\setupletterlayer + [\v!righthead,\v!rightfoot] + [\c!state=\v!right] + +\setupletterlayer + [\v!backaddress] + [\c!alternative=\v!auto, + \c!separator=\textcomma\space] + +\setupletterlayer + [\v!reference] + [\c!alternative=\v!a, + \c!list=\v!date] + +\setuplettersection + [\v!closing] + [\c!spaceafter=\v!line, + \c!spaceinbetween={\v!samepage,2*\v!line}] + +\defineletterelements + [\v!layer] + [\v!lettermain, + \v!letternext, + \v!head, + \v!firsthead, + \v!nexthead, + \v!lefthead, + \v!righthead, + \v!foot, + \v!nextfoot, + \v!topmark, + \v!botmark, + \v!cutmark, + \v!backaddress, + \v!address, + \v!reference, + \v!location] + +\defineletterelements + [\v!section] + [\v!title, + \v!subject, + \v!opening, + \v!content, + \v!closing, + \v!appendices] + +\defineletterelements + [\v!description] + [\v!copy, + \v!enclosure, + \v!postscript] + +\setupletterdescription + [\c!copy] + [\c!headcommand=\lettertext\v!copy, + \c!textcommand=\correspondenceparameter\c!copy] + +\setupletterdescription + [\c!enclosure] + [\c!headcommand=\lettertext\v!enclosure, + \c!textcommand=\correspondenceparameter\c!enclosure] + +\setupletterdescription + [\c!postscript] + [\c!headcommand=\lettertext\v!postscript, + \c!textcommand=\correspondenceparameter\c!postscript] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dina.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dina.mkii new file mode 100644 index 00000000000..d12264d544f --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dina.mkii @@ -0,0 +1,52 @@ +%D \module +%D [ file=letter-imp-dina, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=DIN 676 A, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayout + [\v!firstpage] + [\c!topspace=97.4mm] + +\setupletterlayer + [\v!topmark] + [\c!y=87mm] + +\setupletterlayer + [\v!botmark] + [\c!y=192mm] + +\setupletterframe + [\v!head] + [\c!height=10.1mm] + +\setupletterlayer + [\v!address] + [\c!y=32mm] + +\setupletterlayer + [\v!reference] + [\c!y=80.4mm] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dina.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dina.mkiv new file mode 100644 index 00000000000..d12264d544f --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dina.mkiv @@ -0,0 +1,52 @@ +%D \module +%D [ file=letter-imp-dina, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=DIN 676 A, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayout + [\v!firstpage] + [\c!topspace=97.4mm] + +\setupletterlayer + [\v!topmark] + [\c!y=87mm] + +\setupletterlayer + [\v!botmark] + [\c!y=192mm] + +\setupletterframe + [\v!head] + [\c!height=10.1mm] + +\setupletterlayer + [\v!address] + [\c!y=32mm] + +\setupletterlayer + [\v!reference] + [\c!y=80.4mm] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dinb.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dinb.mkii new file mode 100644 index 00000000000..fbc29a91e3c --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dinb.mkii @@ -0,0 +1,139 @@ +%D \module +%D [ file=letter-imp-dinb, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=DIN 676 B, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[default] + +\setupletterlayout + [\v!firstpage,\v!secondpage] + [\c!topspace=114.3mm, + \c!bottomspace=30mm, % unknown value! + \c!backspace=24.1mm, + \c!header=0mm, + \c!footer=0mm, % unknown value! + \c!width=\v!middle, + \c!height=\v!middle] + +\setupletterlayout + [\v!secondpage] + [\c!topspace=20mm, + \c!bottomspace=20mm, + \c!header=10mm, + \c!footer=10mm] + +\setuplettersection + [\v!title,\v!subject,\v!opening,\v!appendices] + [\c!spacebefore=, + \c!spaceafter=\v!line] + +\setuplettersection + [\v!title] + [\c!align=\v!middle, + \c!style=\v!bold] + +\setuplettersection + [\v!subject] + [\c!spaceafter={2*\v!line}, + \c!style=\v!bold] + +\setuplettersection + [\v!content] + [\c!spaceafter={\v!samepage,\v!line}] + +\setuplettersection + [\v!closing] + [\c!spaceafter={3*\v!line}] + +\setupletterlayer + [\v!topmark,\v!botmark,\v!cutmark] + [\c!state=\v!start, + \c!x=5mm, + \c!symbol=\v!cutmark] + +\setupletterframe + [\v!topmark,\v!botmark,\v!cutmark] + [\c!strut=\v!no] + +\setupletterlayer + [\v!topmark] + [\c!y=105mm] + +\setupletterlayer + [\v!botmark] + [\c!y=210mm] + +\setupletterlayer + [\v!cutmark] + [\c!y=.5\paperheight] + +\setupletterlayer + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!x=\backspace, + \c!y=16.9mm] + +\setupletterframe + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!width=\textwidth, + \c!height=28.1mm] + +\setupletterlayer + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!y=20mm] + +\setupletterframe + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!height=10mm] + +\setupletterlayer + [\v!address] + [\c!x=\backspace, + \c!y=50mm] + +\setupletterframe + [\v!address] + [\c!width=85mm, + \c!height=40mm] + +\setupletterlayer + [\v!backaddress] + [\c!x=\backspace, + \c!y=\dimexpr\namedletterlayerparameter\v!address\c!y-\namedletterframeparameter\v!backaddress\c!height\relax, + \c!style=\tfxx] + +\setupletterframe + [\v!backaddress] + [\c!height=5mm, + \c!width=85mm] + +\setupletterlayer + [\v!reference] + [\c!x=\backspace, + \c!y=93.2mm] + +\setupletterframe + [\v!reference] + [\c!width=\textwidth, + \c!height=8.4mm] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dinb.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dinb.mkiv new file mode 100644 index 00000000000..fbc29a91e3c --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dinb.mkiv @@ -0,0 +1,139 @@ +%D \module +%D [ file=letter-imp-dinb, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=DIN 676 B, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[default] + +\setupletterlayout + [\v!firstpage,\v!secondpage] + [\c!topspace=114.3mm, + \c!bottomspace=30mm, % unknown value! + \c!backspace=24.1mm, + \c!header=0mm, + \c!footer=0mm, % unknown value! + \c!width=\v!middle, + \c!height=\v!middle] + +\setupletterlayout + [\v!secondpage] + [\c!topspace=20mm, + \c!bottomspace=20mm, + \c!header=10mm, + \c!footer=10mm] + +\setuplettersection + [\v!title,\v!subject,\v!opening,\v!appendices] + [\c!spacebefore=, + \c!spaceafter=\v!line] + +\setuplettersection + [\v!title] + [\c!align=\v!middle, + \c!style=\v!bold] + +\setuplettersection + [\v!subject] + [\c!spaceafter={2*\v!line}, + \c!style=\v!bold] + +\setuplettersection + [\v!content] + [\c!spaceafter={\v!samepage,\v!line}] + +\setuplettersection + [\v!closing] + [\c!spaceafter={3*\v!line}] + +\setupletterlayer + [\v!topmark,\v!botmark,\v!cutmark] + [\c!state=\v!start, + \c!x=5mm, + \c!symbol=\v!cutmark] + +\setupletterframe + [\v!topmark,\v!botmark,\v!cutmark] + [\c!strut=\v!no] + +\setupletterlayer + [\v!topmark] + [\c!y=105mm] + +\setupletterlayer + [\v!botmark] + [\c!y=210mm] + +\setupletterlayer + [\v!cutmark] + [\c!y=.5\paperheight] + +\setupletterlayer + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!x=\backspace, + \c!y=16.9mm] + +\setupletterframe + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!width=\textwidth, + \c!height=28.1mm] + +\setupletterlayer + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!y=20mm] + +\setupletterframe + [\v!foot,\v!nextfoot,\v!leftfoot,\v!rightfoot] + [\c!height=10mm] + +\setupletterlayer + [\v!address] + [\c!x=\backspace, + \c!y=50mm] + +\setupletterframe + [\v!address] + [\c!width=85mm, + \c!height=40mm] + +\setupletterlayer + [\v!backaddress] + [\c!x=\backspace, + \c!y=\dimexpr\namedletterlayerparameter\v!address\c!y-\namedletterframeparameter\v!backaddress\c!height\relax, + \c!style=\tfxx] + +\setupletterframe + [\v!backaddress] + [\c!height=5mm, + \c!width=85mm] + +\setupletterlayer + [\v!reference] + [\c!x=\backspace, + \c!y=93.2mm] + +\setupletterframe + [\v!reference] + [\c!width=\textwidth, + \c!height=8.4mm] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dutch.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dutch.mkii new file mode 100644 index 00000000000..c9987383d5b --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dutch.mkii @@ -0,0 +1,79 @@ +%D \module +%D [ file=letter-imp-dutch, +%D version=2011.11.01, +%D title=\CONTEXT\ Letter Style, +%D subtitle=Dutch style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayout + [\v!firstpage,\v!secondpage] + [\c!topspace=105mm, + \c!bottomspace=30mm, + \c!backspace=33mm, + \c!width=\v!middle, + \c!height=\v!middle] + +\setupletterlayout + [\v!secondpage] + [\c!topspace=20mm, + \c!header=15mm, + \c!headerdistance=15mm, + \c!height=\v!middle] + +\setupletterlayer + [\v!topmark,\v!cutmark] + [\c!state=\v!repeat, + \c!x=3.5mm] + +\setuplettersection + [\v!subject] + [\c!spaceafter=\v!line] + +\setuplettersection + [\v!closing] + [\c!spaceinbetween=\v!line] + +\setupletterlayer + [\v!address] + [\c!y=55mm] + +\setupletterframe + [\v!address] + [\c!height=35mm, + \c!width=80mm] + +\setupletterlayer + [\v!backaddress] + [\c!y=50mm] + +\setupletterframe + [\v!backaddress] + [\c!width=80mm, + \c!height=5mm, + \c!bottomframe=\v!on] + +\setupletterlayer + [\v!botmark] + [\c!state=\v!stop] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dutch.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dutch.mkiv new file mode 100644 index 00000000000..c9987383d5b --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-dutch.mkiv @@ -0,0 +1,79 @@ +%D \module +%D [ file=letter-imp-dutch, +%D version=2011.11.01, +%D title=\CONTEXT\ Letter Style, +%D subtitle=Dutch style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayout + [\v!firstpage,\v!secondpage] + [\c!topspace=105mm, + \c!bottomspace=30mm, + \c!backspace=33mm, + \c!width=\v!middle, + \c!height=\v!middle] + +\setupletterlayout + [\v!secondpage] + [\c!topspace=20mm, + \c!header=15mm, + \c!headerdistance=15mm, + \c!height=\v!middle] + +\setupletterlayer + [\v!topmark,\v!cutmark] + [\c!state=\v!repeat, + \c!x=3.5mm] + +\setuplettersection + [\v!subject] + [\c!spaceafter=\v!line] + +\setuplettersection + [\v!closing] + [\c!spaceinbetween=\v!line] + +\setupletterlayer + [\v!address] + [\c!y=55mm] + +\setupletterframe + [\v!address] + [\c!height=35mm, + \c!width=80mm] + +\setupletterlayer + [\v!backaddress] + [\c!y=50mm] + +\setupletterframe + [\v!backaddress] + [\c!width=80mm, + \c!height=5mm, + \c!bottomframe=\v!on] + +\setupletterlayer + [\v!botmark] + [\c!state=\v!stop] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-french.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-french.mkii new file mode 100644 index 00000000000..85731b9cf71 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-french.mkii @@ -0,0 +1,93 @@ +%D \module +%D [ file=letter-imp-french, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=French style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayout + [\v!firstpage,\v!secondpage] + [\c!backspace=25mm, + \c!width=\v!middle, + \c!topspace=95mm, + \c!bottomspace=25mm, + \c!height=\v!fit] + +\setupletterlayout + [\v!secondpage] + [\c!topspace=15mm, + \c!header=10mm] + +\setupletterlayer + [\v!cutmark,\v!botmark] + [\c!state=\v!stop] + +\setupletterlayer + [\v!head] + [\c!x=\backspace, + \c!y=25mm] + +\setupletterlayer + [\v!backaddress] + [\c!state=\v!stop] + +\setupletterlayer + [\v!address] + [\c!x=107mm, + \c!y=55mm] + +\setupletterlayer + [\v!location] + [\c!x=107mm, + \c!y=30mm] + +\setupletterlayer + [\v!reference] + [\c!state=\v!stop] + +\setuplettersection + [\v!closing] + [\c!spaceinbetween={\v!samepage,2*\v!line}] + +\setupletterdescription + [\v!enclosure] + [\c!location=\v!left, + \c!width=\v!fit, + \c!headstyle=\tf] + +\setuplettersection + [\v!opening] + [\c!spaceafter={2*\v!line}] + +\setuplettersection + [\v!content] + [\c!spaceafter={\v!samepage,2*\v!line}] + +\setuplettersection + [\v!location,\v!opening,\v!closing] + [\c!alternative=\v!french] + +\setupletteroptions + [\c!whitespace=\v!line] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-french.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-french.mkiv new file mode 100644 index 00000000000..85731b9cf71 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-french.mkiv @@ -0,0 +1,93 @@ +%D \module +%D [ file=letter-imp-french, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=French style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayout + [\v!firstpage,\v!secondpage] + [\c!backspace=25mm, + \c!width=\v!middle, + \c!topspace=95mm, + \c!bottomspace=25mm, + \c!height=\v!fit] + +\setupletterlayout + [\v!secondpage] + [\c!topspace=15mm, + \c!header=10mm] + +\setupletterlayer + [\v!cutmark,\v!botmark] + [\c!state=\v!stop] + +\setupletterlayer + [\v!head] + [\c!x=\backspace, + \c!y=25mm] + +\setupletterlayer + [\v!backaddress] + [\c!state=\v!stop] + +\setupletterlayer + [\v!address] + [\c!x=107mm, + \c!y=55mm] + +\setupletterlayer + [\v!location] + [\c!x=107mm, + \c!y=30mm] + +\setupletterlayer + [\v!reference] + [\c!state=\v!stop] + +\setuplettersection + [\v!closing] + [\c!spaceinbetween={\v!samepage,2*\v!line}] + +\setupletterdescription + [\v!enclosure] + [\c!location=\v!left, + \c!width=\v!fit, + \c!headstyle=\tf] + +\setuplettersection + [\v!opening] + [\c!spaceafter={2*\v!line}] + +\setuplettersection + [\v!content] + [\c!spaceafter={\v!samepage,2*\v!line}] + +\setuplettersection + [\v!location,\v!opening,\v!closing] + [\c!alternative=\v!french] + +\setupletteroptions + [\c!whitespace=\v!line] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-gbrief.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-gbrief.mkii new file mode 100644 index 00000000000..856295a7785 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-gbrief.mkii @@ -0,0 +1,56 @@ +%D \module +%D [ file=letter-imp-gbrief, +%D version=2011.11.01, +%D title=\CONTEXT\ Letter Style, +%D subtitle=g-brief, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayer + [\v!reference] + [\c!alternative=\v!a] + +\setupletterlayer + [\v!backaddress] + [\c!separator={~\mathematics\cdot~}] + +\setupletterframe + [\v!backaddress] + [\c!bottomframe=\v!on] + +\setupletterlayer + [\v!head,\v!foot,\v!nexthead] + [\c!alternative=\v!gbrief] + +\setupletterlayer + [\v!head] + [\c!style={\switchtobodyfont[20pt]\sc}] + +\setupletterlayer + [\v!foot] + [\c!style=\txx] + +\setupletterlayer + [\v!nexthead] + [\c!style=\v!smallcaps] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-gbrief.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-gbrief.mkiv new file mode 100644 index 00000000000..856295a7785 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-gbrief.mkiv @@ -0,0 +1,56 @@ +%D \module +%D [ file=letter-imp-gbrief, +%D version=2011.11.01, +%D title=\CONTEXT\ Letter Style, +%D subtitle=g-brief, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayer + [\v!reference] + [\c!alternative=\v!a] + +\setupletterlayer + [\v!backaddress] + [\c!separator={~\mathematics\cdot~}] + +\setupletterframe + [\v!backaddress] + [\c!bottomframe=\v!on] + +\setupletterlayer + [\v!head,\v!foot,\v!nexthead] + [\c!alternative=\v!gbrief] + +\setupletterlayer + [\v!head] + [\c!style={\switchtobodyfont[20pt]\sc}] + +\setupletterlayer + [\v!foot] + [\c!style=\txx] + +\setupletterlayer + [\v!nexthead] + [\c!style=\v!smallcaps] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swiss.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swiss.mkii new file mode 100644 index 00000000000..417f9a71290 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swiss.mkii @@ -0,0 +1,54 @@ +%D \module +%D [ file=letter-imp-swiss, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=Swiss style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayer + [\v!head] + [\c!y=8mm] + +\setupletterlayer + [\v!address,\v!backaddress] + [\c!preset=\v!right\v!top, + \c!x=8mm] + +\setupletterframe + [\v!address,\v!backaddress] + [\c!width=90mm] + +%\setupletterlayer +% [\v!reference] +% [\c!y=98.5mm, +% \c!spaceafter=\v!line] + +\setupletterlayer + [\v!reference] + [\c!y=98.5mm] + +\setupletterlayer + [\v!foldmark] + [\c!state=\v!stop] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swiss.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swiss.mkiv new file mode 100644 index 00000000000..417f9a71290 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swiss.mkiv @@ -0,0 +1,54 @@ +%D \module +%D [ file=letter-imp-swiss, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=Swiss style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayer + [\v!head] + [\c!y=8mm] + +\setupletterlayer + [\v!address,\v!backaddress] + [\c!preset=\v!right\v!top, + \c!x=8mm] + +\setupletterframe + [\v!address,\v!backaddress] + [\c!width=90mm] + +%\setupletterlayer +% [\v!reference] +% [\c!y=98.5mm, +% \c!spaceafter=\v!line] + +\setupletterlayer + [\v!reference] + [\c!y=98.5mm] + +\setupletterlayer + [\v!foldmark] + [\c!state=\v!stop] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swissleft.mkii b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swissleft.mkii new file mode 100644 index 00000000000..f705d7275a2 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swissleft.mkii @@ -0,0 +1,58 @@ +%D \module +%D [ file=letter-imp-swissleft, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=Swiss left style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayer + [\v!head] + [\c!y=8mm] + +\setupletterlayer + [\v!address] + [\c!x=20mm, + \c!y=40.5mm] + +\setupletterlayer + [\v!backaddress] + [\c!x=20mm] + +\setupletterframe + [\v!address,\v!backaddress] + [\c!width=100mm] + +%\setupletterlayer +% [\v!reference] +% [\c!y=89mm, +% \c!spaceafter=\v!line] + +\setupletterlayer + [\v!reference] + [\c!y=89mm] + +\setupletterlayer + [\v!foldmark] + [\c!state=\v!stop] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swissleft.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swissleft.mkiv new file mode 100644 index 00000000000..f705d7275a2 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-swissleft.mkiv @@ -0,0 +1,58 @@ +%D \module +%D [ file=letter-imp-swissleft, +%D version=2011.10.29, +%D title=\CONTEXT\ Letter Style, +%D subtitle=Swiss left style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\useletterstyle[dinb] + +\setupletterlayer + [\v!head] + [\c!y=8mm] + +\setupletterlayer + [\v!address] + [\c!x=20mm, + \c!y=40.5mm] + +\setupletterlayer + [\v!backaddress] + [\c!x=20mm] + +\setupletterframe + [\v!address,\v!backaddress] + [\c!width=100mm] + +%\setupletterlayer +% [\v!reference] +% [\c!y=89mm, +% \c!spaceafter=\v!line] + +\setupletterlayer + [\v!reference] + [\c!y=89mm] + +\setupletterlayer + [\v!foldmark] + [\c!state=\v!stop] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/letter-imp-test.mkiv b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-test.mkiv new file mode 100644 index 00000000000..4696fe862cb --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/letter-imp-test.mkiv @@ -0,0 +1,48 @@ +%D \module +%D [ file=letter-imp-test, +%D version=2011.10.29, +%D title=\CONTEXT\ User Module, +%D subtitle=Test style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\defineletterelement[\v!head ][\v!test]{\v!head } +\defineletterelement[\v!nexthead ][\v!test]{\v!nexthead } +\defineletterelement[\v!lefthead ][\v!test]{\v!lefthead } +\defineletterelement[\v!righthead][\v!test]{\v!righthead} + +\setupletterlayer + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!alternative=\v!test] + +\definecolor[\v!letter:\v!head ][r=1.0,g=1.0,b=0.0,t=0.5,a=1] +\definecolor[\v!letter:\v!nexthead ][r=0.0,g=1.0,b=1.0,t=0.5,a=1] +\definecolor[\v!letter:\v!lefthead ][r=1.0,g=0.0,b=1.0,t=0.5,a=1] +\definecolor[\v!letter:\v!righthead][r=0.0,g=1.0,b=0.0,t=0.5,a=1] + +\setupletterframe + [\v!head,\v!nexthead,\v!lefthead,\v!righthead] + [\c!foregroundstyle=\WORD\tt, + \c!foregroundcolor=\currentcorrespondenceframe, + \c!framecolor=\currentcorrespondenceframe, + \c!offset=1ex, + \c!frame=\v!on] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-default.mkii b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-default.mkii new file mode 100644 index 00000000000..aa65a86c10e --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-default.mkii @@ -0,0 +1,46 @@ +%D \module +%D [ file=memo-imp-default, +%D version=2011.10.29, +%D title=\CONTEXT\ User Module, +%D subtitle=Default memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\setupmemo + [\c!date=\currentdate] + +\setupmemooptions + [\c!marking=\v!no] + +\definememoelements + [\v!section] + [\v!head + \v!date, + \v!reference, + \v!specialnotation, + \v!address, + \v!title, + \v!opening, + \v!subject, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-default.mkiv b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-default.mkiv new file mode 100644 index 00000000000..aa65a86c10e --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-default.mkiv @@ -0,0 +1,46 @@ +%D \module +%D [ file=memo-imp-default, +%D version=2011.10.29, +%D title=\CONTEXT\ User Module, +%D subtitle=Default memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\setupmemo + [\c!date=\currentdate] + +\setupmemooptions + [\c!marking=\v!no] + +\definememoelements + [\v!section] + [\v!head + \v!date, + \v!reference, + \v!specialnotation, + \v!address, + \v!title, + \v!opening, + \v!subject, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-margin.mkii b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-margin.mkii new file mode 100644 index 00000000000..69cbf589459 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-margin.mkii @@ -0,0 +1,55 @@ +%D \module +%D [ file=memo-imp-memo, +%D version=2011.11.07, +%D title=\CONTEXT\ Memo Style, +%D subtitle=Memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\usememostyle[default] + +\setupmemolayout + [\v!firstpage,\v!secondpage] + [\c!backspace=1in, + \c!width=\v!middle, + \c!topspace=1in, + \c!header=0in, + \c!footer=0in, + \c!height=\v!fit] + +\setupmemosection + [\v!head] + [\c!alternative=\v!margin] + +\setupmemooptions + [\c!whitespace=\v!line] + +\setupmemostyle + [\v!fromname,\v!date,\v!toname,\v!subject] + [\c!titlestyle=\tx] + +\definememoelements + [\v!section] + [\v!head, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-margin.mkiv b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-margin.mkiv new file mode 100644 index 00000000000..69cbf589459 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-margin.mkiv @@ -0,0 +1,55 @@ +%D \module +%D [ file=memo-imp-memo, +%D version=2011.11.07, +%D title=\CONTEXT\ Memo Style, +%D subtitle=Memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\usememostyle[default] + +\setupmemolayout + [\v!firstpage,\v!secondpage] + [\c!backspace=1in, + \c!width=\v!middle, + \c!topspace=1in, + \c!header=0in, + \c!footer=0in, + \c!height=\v!fit] + +\setupmemosection + [\v!head] + [\c!alternative=\v!margin] + +\setupmemooptions + [\c!whitespace=\v!line] + +\setupmemostyle + [\v!fromname,\v!date,\v!toname,\v!subject] + [\c!titlestyle=\tx] + +\definememoelements + [\v!section] + [\v!head, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-memo.mkii b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-memo.mkii new file mode 100644 index 00000000000..3fa41dc5679 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-memo.mkii @@ -0,0 +1,55 @@ +%D \module +%D [ file=memo-imp-memo, +%D version=2011.11.01, +%D title=\CONTEXT\ Memo Style, +%D subtitle=Memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\usememostyle[default] + +\setupmemolayout + [\v!firstpage,\v!secondpage] + [\c!backspace=1in, + \c!width=\v!middle, + \c!topspace=1in, + \c!header=0in, + \c!footer=0in, + \c!height=\v!fit] + +\setupmemosection + [\v!head] + [\c!alternative=\v!memo] + +\setupmemosection + [\v!closing] + [\c!leftmargin=.5\textwidth] + +\setupmemooptions + [\c!whitespace=\v!line] + +\definememoelements + [\v!section] + [\v!head, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-memo.mkiv b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-memo.mkiv new file mode 100644 index 00000000000..3fa41dc5679 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-memo.mkiv @@ -0,0 +1,55 @@ +%D \module +%D [ file=memo-imp-memo, +%D version=2011.11.01, +%D title=\CONTEXT\ Memo Style, +%D subtitle=Memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\usememostyle[default] + +\setupmemolayout + [\v!firstpage,\v!secondpage] + [\c!backspace=1in, + \c!width=\v!middle, + \c!topspace=1in, + \c!header=0in, + \c!footer=0in, + \c!height=\v!fit] + +\setupmemosection + [\v!head] + [\c!alternative=\v!memo] + +\setupmemosection + [\v!closing] + [\c!leftmargin=.5\textwidth] + +\setupmemooptions + [\c!whitespace=\v!line] + +\definememoelements + [\v!section] + [\v!head, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-table.mkii b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-table.mkii new file mode 100644 index 00000000000..aa5bb0ce90f --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-table.mkii @@ -0,0 +1,51 @@ +%D \module +%D [ file=memo-imp-memo, +%D version=2011.11.07, +%D title=\CONTEXT\ Memo Style, +%D subtitle=Memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\usememostyle[default] + +\setupmemolayout + [\v!firstpage,\v!secondpage] + [\c!backspace=1in, + \c!width=\v!middle, + \c!topspace=1in, + \c!header=0in, + \c!footer=0in, + \c!height=\v!fit] + +\setupmemosection + [\v!head] + [\c!alternative=\v!table] + +\setupmemooptions + [\c!whitespace=\v!line] + +\definememoelements + [\v!section] + [\v!head, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo-imp-table.mkiv b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-table.mkiv new file mode 100644 index 00000000000..aa5bb0ce90f --- /dev/null +++ b/Master/texmf-dist/tex/context/third/letter/style/memo-imp-table.mkiv @@ -0,0 +1,51 @@ +%D \module +%D [ file=memo-imp-memo, +%D version=2011.11.07, +%D title=\CONTEXT\ Memo Style, +%D subtitle=Memo style, +%D author=Wolfgang Schuster, +%D date=\currentdate, +%D copyright=Wolfgang Schuster, +%D license=GNU General Public License] + +%C Copyright (C) 2011 Wolfgang Schuster +%C +%C This program is free software: you can redistribute it and/or modify +%C it under the terms of the GNU General Public License as published by +%C the Free Software Foundation, either version 3 of the License, or +%C any later version. +%C +%C This program is distributed in the hope that it will be useful, +%C but WITHOUT ANY WARRANTY; without even the implied warranty of +%C MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%C GNU General Public License for more details. +%C +%C You should have received a copy of the GNU General Public License +%C along with this program. If not, see <http://www.gnu.org/licenses/>. + +\usememostyle[default] + +\setupmemolayout + [\v!firstpage,\v!secondpage] + [\c!backspace=1in, + \c!width=\v!middle, + \c!topspace=1in, + \c!header=0in, + \c!footer=0in, + \c!height=\v!fit] + +\setupmemosection + [\v!head] + [\c!alternative=\v!table] + +\setupmemooptions + [\c!whitespace=\v!line] + +\definememoelements + [\v!section] + [\v!head, + \v!content, + \v!closing, + \v!appendices] + +\endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/memo.nls b/Master/texmf-dist/tex/context/third/letter/style/memo.nls deleted file mode 100644 index ce68d3b56c9..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/memo.nls +++ /dev/null @@ -1,72 +0,0 @@ -%D \module -%D [ file=memo, -%D version=2009.09.21, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Memo style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[blockstyle] - -\def\letter!order!sections - {\v!date\v!line,\v!reference\v!line,\v!inside\v!address, - \v!letter\v!head,\v!special\v!notation,\v!title, - \v!opening,\v!subject,\v!content,\v!closing,\v!appendices} - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line, - \v!special\v!notation,\v!inside\v!address, - \v!title,\v!subject] - [\c!before={\blank[\v!nowhite]}, - \c!after={\blank[\v!nowhite]}] - -\setupletterstyle - [\v!subject,\v!content,\v!closing] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!closing] - [\c!leftmargin=.5\textwidth] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\v!middle, - \c!topspace=1in, - \c!header=0in, - \c!footer=0in, - \c!height=\v!fit] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line, - \c!opening=\v!no, - \c!reference\c!line=\v!no, - \v!special\v!notation=\v!no, - \c!title=\v!no] - -\startsetups[\v!letter:\v!date\v!line] -\labeltext{\v!memo:\c!date}\lettervalue\c!date -\stopsetups - -\startsetups[\v!letter:\v!letter\v!head] -\let\\\crlf -\labeltext{\v!memo:\c!fromname}\lettervalue\c!fromname -\stopsetups - -\startsetups[\v!letter:\v!inside\v!address] -\let\\\crlf -\labeltext{\v!memo:\c!toname}\lettervalue\c!toname -\stopsetups - -\startsetups[\v!letter:subject] -\let\\\crlf -\labeltext{\v!memo:\c!subject}\lettervalue\c!subject -\stopsetups - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/modified.nls b/Master/texmf-dist/tex/context/third/letter/style/modified.nls deleted file mode 100644 index 013f346cf86..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/modified.nls +++ /dev/null @@ -1,53 +0,0 @@ -%D \module -%D [ file=modified, -%D version=2008.12.16, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Block/Modified block style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[blockstyle] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line,\v!special\v!notation, - \v!inside\v!address,\v!title,\v!opening,\v!content] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line, - \v!date\v!line,\v!special\v!notation,\v!closing] - [\c!leftmargin=.5\textwidth] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[2*\v!line]}] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\v!middle, - \c!topspace=1in, - \c!header=0in, - \c!footer=0in, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!header=1in] - -\setuplabeltext[\s!en][\c!page=Page~] - -\setupletterstyle - [\v!nexthead] - [\c!alternative=\v!hanging] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/pragma.nls b/Master/texmf-dist/tex/context/third/letter/style/pragma.nls deleted file mode 100644 index 8409988713c..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/pragma.nls +++ /dev/null @@ -1,100 +0,0 @@ -%D \module -%D [ file=pragma, -%D version=2009.09.20, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Pragma Style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[default] - -\setupcolors - [\c!state=\v!start] - -\setuplayout - [\c!grid=\v!yes] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!grid=\v!yes, - \c!topspace=2cm, - \c!bottomspace=2cm, - \c!backspace=2cm, - \c!header=0mm, - \c!footer=1cm, - \c!width=\v!middle, - \c!height=\v!middle] - -\startmode[*letter] - - \setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!topspace=1in, - \c!bottomspace=1in, - \c!backspace=1in, - \c!footer=1in] - -\stopmode - -\setupletterstyle - [\v!option] - [\c!marking=\v!no, - \c!head=\v!no, - \c!foot=\v!no, - \c!backaddress=\v!no, - \c!whitespace=\v!big] - -\setupletterstyle - [\v!address] - [\v!layer] - [\c!line=3, - \c!height=10\lineheight, - \c!hoffset=\dimexpr\backspace-\linewidth\relax, - \c!voffset=\dimexpr\topspace+\headerheight\relax, - \c!preset=, - \c!location=\v!grid] - -\setupletterstyle - [\v!address] - [\v!frame] - [\c!location=\v!top, - \c!width=\textwidth] - -\setupletterstyle - [\v!reference] - [\c!hoffset=\dimexpr\backspace-\linewidth, - \c!voffset=\dimexpr\letterstylevalue{\v!address\v!layer}\c!voffset+\letterstylevalue{\v!address\v!layer}\v!height\relax, - \c!width=\dimexpr\textwidth+2\linewidth, - \c!height=3\lineheight] - -\setupletterstyle - [\v!reference] - [\v!layer] - [\c!preset=, - \c!location=\v!grid] - -\setupletterstyle - [\v!reference] - [\v!frame] - [\c!location=\v!top] - -\startsetups[letter:title:before] - \startlinecorrection - \blank[\the\dimexpr\letterstylevalue\v!reference\c!voffset+\letterstylevalue\v!reference\c!height-\letterstylevalue{\v!address\v!layer}\c!voffset\relax] - \stoplinecorrection -\stopsetups - -\setupletterstyle - [\v!title] - [\c!before={\setups[letter:title:before]}] - -\setupletterstyle - [\v!subject,\v!opening,\v!content,\v!closing] - [\c!after={\blank[\v!line]}] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/semiblock.nls b/Master/texmf-dist/tex/context/third/letter/style/semiblock.nls deleted file mode 100644 index b4820f252fc..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/semiblock.nls +++ /dev/null @@ -1,52 +0,0 @@ -%D \module -%D [ file=semiblock, -%D version=2008.12.16, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Semiblock style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[blockstyle] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line,\v!special\v!notation, - \v!inside\v!address,\v!title,\v!opening,\v!subject,\v!content] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line, - \v!date\v!line,\v!special\v!notation,\v!closing] - [\c!leftmargin=.5\textwidth] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[2*\v!line]}] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\v!middle, - \c!topspace=1in, - \c!header=0in, - \c!footer=0in, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!header=.5in] - -\setupletterstyle - [\v!nexthead] - [\c!alternative=\v!semiblock] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line, - \c!indenting={\v!yes,\v!medium,\v!first}] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/simplified.nls b/Master/texmf-dist/tex/context/third/letter/style/simplified.nls deleted file mode 100644 index eb25062e024..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/simplified.nls +++ /dev/null @@ -1,51 +0,0 @@ -%D \module -%D [ file=simplified, -%D version=2008.12.16, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Simplified style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[blockstyle] - -\setupletterstyle - [\v!letter\v!head,\v!reference\v!line,\v!special\v!notation, - \v!inside\v!address,\v!title,\v!opening,\v!subject,\v!content] - [\c!after={\blank[\v!line]}] - -\setupletterstyle - [\v!closing] - [\c!after={\blank[2*\v!line]}] - -\setupletterstyle - [\v!firstpage,\v!secondpage] - [\c!backspace=1in, - \c!width=\v!middle, - \c!topspace=1in, - \c!header=0in, - \c!footer=0in, - \c!height=\v!fit] - -\setupletterstyle - [\v!secondpage] - [\c!header=.5in] - -\setupletterstyle - [\v!nexthead] - [\c!alternative=\v!simplified] - -\setupletterstyle - [\v!closing] - [\c!alternative=\v!simplified] - -\setupletterstyle - [\v!option] - [\c!whitespace=\v!line, - \c!opening=\v!no] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/swiss.nls b/Master/texmf-dist/tex/context/third/letter/style/swiss.nls deleted file mode 100644 index 11889e7cdee..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/swiss.nls +++ /dev/null @@ -1,40 +0,0 @@ -%D \module -%D [ file=swiss, -%D version=2009.02.14, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Swiss style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[dinb] - -\setupletterstyle - [\v!head] - [\c!voffset=8mm] - -\setupletterstyle - [\v!address,\v!backaddress] - [\v!layer] - [\c!preset=\v!right\v!top, - \c!hoffset=8mm] - -\setupletterstyle - [\v!address,\v!backaddress] - [\v!frame] - [\c!width=90mm] - -\setupletterstyle - [\v!reference] - [\c!voffset=98.5mm, - \c!spaceafter=\lineheight] - -\setupletterstyle - [\v!option] - [\c!foldmark=\v!no] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/swissleft.nls b/Master/texmf-dist/tex/context/third/letter/style/swissleft.nls deleted file mode 100644 index 881b42d73f5..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/swissleft.nls +++ /dev/null @@ -1,45 +0,0 @@ -%D \module -%D [ file=swissleft, -%D version=2009.02.14, -%D title=\CONTEXT\ Letter Style, -%D subtitle=Swiss left style, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -\useletterstyle[dinb] - -\setupletterstyle - [\v!head] - [\c!voffset=8mm] - -\setupletterstyle - [\v!address] - [\v!layer] - [\c!hoffset=20mm, - \c!voffset=40.5mm] - -\setupletterstyle - [\v!backaddress] - [\v!layer] - [\c!hoffset=20mm] - -\setupletterstyle - [\v!address,\v!backaddress] - [\v!frame] - [\c!width=100mm] - -\setupletterstyle - [\v!reference] - [\c!voffset=89mm, - \c!spaceafter=\lineheight] - -\setupletterstyle - [\v!option] - [\c!foldmark=\v!no] - -\protect \endinput diff --git a/Master/texmf-dist/tex/context/third/letter/style/user.ori b/Master/texmf-dist/tex/context/third/letter/style/user.ori deleted file mode 100644 index beaaf4e9405..00000000000 --- a/Master/texmf-dist/tex/context/third/letter/style/user.ori +++ /dev/null @@ -1,59 +0,0 @@ -%D \module -%D [ file=user, -%D version=2008.07.08, -%D title=\CONTEXT\ Letter Style, -%D subtitle=User Settings, -%D author=Wolfgang Schuster, -%D date=\currentdate, -%D copyright=Wolfgang Schuster, -%D email=schuster.wolfgang@googlemail.com, -%D license=Public Domain] - -\unprotect - -%D You could use this file to set default values for your own letters. -%D To enable the values rename the file to \mono{user.nls} and place in -%D a directory in your local TeX tree where ConTeXt is able to find it. -%D -%D This style file is loaded together with the main module and the default -%D interface but after the default styles and after every style loaded -%D with the optional argument for \tex{usemodule} but additional styles -%D which you load after \tex{usemodule} could overwrite the values in this -%D style, to take care of this you could either load this module again -%D in your document or set the values directly in your files after -%D the styles are loaded. - -%D Change the interface. - -% \useletterinterface[pragma] -% \useletterinterface[knuth] - -%D Load your default styles. - -% \useletterstyle[default] -% \useletterstyle[dina] -% \useletterstyle[dinb] -% \useletterstyle[dutch] -% \useletterstyle[memo] -% \useletterstyle[hanging] -% \useletterstyle[modified] -% \useletterstyle[fullblock] -% \useletterstyle[semiblock] -% \useletterstyle[blockstyle] -% \useletterstyle[simplified] - -% \useletterstyle[simplified] - -%D You could preload extension files you normally use in your documents. - -% \useletterextension[corres] -% \useletterextension[optimize] -% \useletterextension[addrentry] - -%D You can change the default to your own preferences. - -% \setupletterstyle -% [\v!option] -% [\c!backaddress=\v!yes] - -\protect \endinput diff --git a/Master/tlpkg/tlpsrc/context-letter.tlpsrc b/Master/tlpkg/tlpsrc/context-letter.tlpsrc index 1178cbb0169..f24f544933b 100644 --- a/Master/tlpkg/tlpsrc/context-letter.tlpsrc +++ b/Master/tlpkg/tlpsrc/context-letter.tlpsrc @@ -1,3 +1,3 @@ category ConTeXt -runpattern +f texmf-dist/tex/context/interface/third/t-resume.xml +runpattern +f texmf-dist/tex/context/interface/third/t-correspondence.xml depend context |