1 files changed, 199 insertions, 0 deletions
diff --git a/doc/context/manuals/allkind/mcommon.tex b/doc/context/manuals/allkind/mcommon.tex
new file mode 100644
index 000000000..f0c22cff4
--- /dev/null
+++ b/doc/context/manuals/allkind/mcommon.tex
@@ -0,0 +1,199 @@
+% content=tex
+%
+% copyright=pragma-ade readme=readme.pdf licence=cc-by-nc-sa
+
+\startenvironment mcommon
+
+% modules
+
+\usemodule[abr-02]
+
+% layout
+
+\startmode[screen]
+  \setuppapersize[S6][S6]
+  \setupinteraction[state=start]
+  \setupinteractionscreen[options=max]
+\stopmode
+
+\setuplayout
+  [footer=0cm,
+   width=middle,
+   height=middle]
+
+% fonts
+
+\startmode[atpragma]
+
+    \startMPenvironment[global]
+      \usetypescriptfile[type-buy]
+      \usetypescript[lucida][texnansi]
+      \setupbodyfont[lucida,10pt]
+    \stopMPenvironment
+
+    \setupbodyfont[11pt]
+
+\stopmode
+
+\startnotmode[atpragma]
+
+    \startMPenvironment[global]
+      \usetypescript[palatino][ec]
+      \setupbodyfont[palatino,10pt]
+    \stopMPenvironment
+
+    \setupbodyfont[11pt]
+
+\stopnotmode
+
+\definefont [BigFont] [SansBold at 60pt]
+\definefont [MedFont] [SansBold at 30pt]
+
+% colors
+
+\setupcolors
+  [state=start]
+
+\definecolor [NopColor] [r=.6,g=.4,b=.5]
+\definecolor [AltColor] [r=.4,g=.6,b=.5]
+\definecolor [TheColor] [r=.4,g=.5,b=.6]
+\definecolor [TmpColor] [r=.6,g=.5,b=.4]
+
+\definecolor [red]   [NopColor]
+\definecolor [green] [AltColor]
+\definecolor [blue]  [TheColor]
+\definecolor [yellow][TmpColor]
+
+% spacing
+
+\setupwhitespace
+  [big]
+
+\setuptolerance
+  [verytolerant,stretch]
+
+% verbatim
+
+\setuptype
+  [color=AltColor]
+
+\setuptyping
+  [color=AltColor]
+
+% structure
+
+\setupitemize
+  [each]
+  [color=TheColor]
+
+\definedescription
+  [switch]
+  [headstyle=type,
+   headcolor=TheColor,
+   location=serried,
+   width=broad]
+
+\defineenumeration
+  [topic]
+  [location=serried,
+   width=broad,
+   headstyle=,
+   headcolor=TheColor,
+   text=,
+   left={[},
+   right={]}]
+
+\setuphead
+  [section]
+  [style=\ss\bfb,
+   color=TheColor]
+
+\setuplist
+  [section]
+  [alternative=c,
+   color=TheColor,
+   textcolor=black,
+   pagecolor=black]
+
+% whatever
+
+\setupsystem
+  [random=medium]
+
+\setupfloats
+  [ntop=100]
+
+\setupinteraction
+  [style=,
+   color=NopColor,
+   contrastcolor=NopColor]
+
+% tables and frames
+
+\setuptabulate
+  [rulethickness=.5pt,
+   rulecolor=AltColor]
+
+\setuptables
+  [rulethickness=.5pt,
+   rulecolor=AltColor]
+
+\setupframedtexts
+  [rulethickness=.5pt,
+   framecolor=TheColor,
+   width=\textwidth]
+
+% quick reference things
+
+\usemodule[set-11] \loadsetups
+
+\setupframedtexts
+  [setuptext]
+  [rulethickness=.5pt,
+   framecolor=AltColor]
+
+% basic titlepage and colofon, a bit old fashioned approach, but let's not
+% modernize everything now
+
+\def\TitlePage#1#2#3#4#5% number/name angle title author screen
+  {\doifnumberelse{#1}
+     {\ifcase#1
+        \defineoverlay
+          [logo]
+          [\useMPgraphic{titlepage}{width=\overlaywidth,height=\overlayheight}]
+      \else
+        \startMPrun
+          logo_type := #1 ; mpgraph := #1 ; input mp-cont ;
+        \stopMPrun
+        \defineoverlay
+          [logo]
+          [{\externalfigure
+              [\MPrunfile{#1}]
+              [width=\overlaywidth,height=\overlayheight]}]
+      \fi}
+     {\defineoverlay
+        [logo]
+        [\useMPgraphic{#1}{width=\overlaywidth,height=\overlayheight}]}
+   \setupbackgrounds
+     [page]
+     [background=logo]
+   \definecolor[Gray][s=#5]
+   \startstandardmakeup
+     \dontcomplain
+     \BigFont \setupinterlinespace \vfill \setupalign[left] \let\\=\par
+     \ifcase#2\relax
+       \noindent\color[Gray]{#3}\par
+     \else
+       \noindent\rotate[rotation=#2]{\color[Gray]{#3}}\par
+     \fi
+   \stopstandardmakeup
+   \setupbackgrounds
+     [page]
+     [background=]}
+
+\def\ColofonPage
+  {\startstandardmakeup
+     \vfill \setups [pragma-colofon]
+   \stopstandardmakeup}
+
+\stopenvironment