diff options
author | Karl Berry <karl@freefriends.org> | 2011-12-20 01:25:08 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-12-20 01:25:08 +0000 |
commit | 2cfea0950314eb4d80bd86bdf9a815125d383bc3 (patch) | |
tree | 88b9f827cb0b22e0650a05845bbdf112ae468f22 /Master/texmf-dist/tex/context | |
parent | 36507098ab9c39ef18545302af29295ecc153f8c (diff) |
context-letter (19dec11)
git-svn-id: svn://tug.org/texlive/trunk@24882 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context')
76 files changed, 5891 insertions, 6612 deletions
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 |