1 files changed, 263 insertions, 0 deletions
diff --git a/tex/context/base/mkiv/symb-imp-mvs.mkiv b/tex/context/base/mkiv/symb-imp-mvs.mkiv
new file mode 100644
index 000000000..9902fc9e8
--- /dev/null
+++ b/tex/context/base/mkiv/symb-imp-mvs.mkiv
@@ -0,0 +1,263 @@
+%D \module
+%D   [       file=symb-mvs,
+%D        version=2010.12.08, % 2000.03.30,
+%D          title=\CONTEXT\ Symbol Libraries,
+%D       subtitle=Martin Vogels Symbole,
+%D         author=Hans Hagen,
+%D           date=\currentdate,
+%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
+%C
+%C This module is part of the \CONTEXT\ macro||package and is
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
+
+\definefontsynonym [MartinVogel] [marvosym.ttf]
+
+\def\MartinVogelSymbol{\getnamedglyphdirect{MartinVogel}} % #1
+
+\startsymbolset [astronomic]
+
+    \definesymbol [Sun]                [\MartinVogelSymbol{Sun}]
+    \definesymbol [Moon]               [\MartinVogelSymbol{Moon}]
+    \definesymbol [Mercury]            [\MartinVogelSymbol{Mercury}]
+    \definesymbol [Venus]              [\MartinVogelSymbol{Venus}]
+    \definesymbol [Mars]               [\MartinVogelSymbol{Mars}]
+    \definesymbol [Jupiter]            [\MartinVogelSymbol{Jupiter}]
+    \definesymbol [Saturn]             [\MartinVogelSymbol{Saturn}]
+    \definesymbol [Uranus]             [\MartinVogelSymbol{Uranus}]
+    \definesymbol [Neptune]            [\MartinVogelSymbol{Neptune}]
+    \definesymbol [Pluto]              [\MartinVogelSymbol{Pluto}]
+
+\stopsymbolset
+
+\startsymbolset [zodiac]
+
+    \definesymbol [Aries]              [\MartinVogelSymbol{Aries}]
+    \definesymbol [Taurus]             [\MartinVogelSymbol{Taurus}]
+    \definesymbol [Gemini]             [\MartinVogelSymbol{Gemini}]
+    \definesymbol [Cancer]             [\MartinVogelSymbol{Cancer}]
+    \definesymbol [Leo]                [\MartinVogelSymbol{Leo}]
+    \definesymbol [Virgo]              [\MartinVogelSymbol{Virgo}]
+    \definesymbol [Libra]              [\MartinVogelSymbol{Libra}]
+    \definesymbol [Scorpio]            [\MartinVogelSymbol{Scorpio}]
+    \definesymbol [Sagittarius]        [\MartinVogelSymbol{Sagittarius}]
+    \definesymbol [Capricorn]          [\MartinVogelSymbol{Capricorn}]
+    \definesymbol [Aquarius]           [\MartinVogelSymbol{Aquarius}]
+    \definesymbol [Pisces]             [\MartinVogelSymbol{Pisces}]
+
+\stopsymbolset
+
+\startsymbolset [europe]
+
+    \definesymbol [EUR]                [\MartinVogelSymbol{EUR}]
+    \definesymbol [EURhv]              [\MartinVogelSymbol{EurHv}]
+    \definesymbol [EURcr]              [\MartinVogelSymbol{EurCr}]
+    \definesymbol [EURtm]              [\MartinVogelSymbol{EurTm}]
+    \definesymbol [EURdig]             [\MartinVogelSymbol{EurDig}]
+    \definesymbol [CEsign]             [\MartinVogelSymbol{CESign}]
+
+\stopsymbolset
+
+\startsymbolset [martinvogel 1]
+
+    \definesymbol [MVZero]             [\MartinVogelSymbol{MVZero}]
+    \definesymbol [MVOne]              [\MartinVogelSymbol{MVOne}]
+    \definesymbol [MVTwo]              [\MartinVogelSymbol{MVTwo}]
+    \definesymbol [MVThree]            [\MartinVogelSymbol{MVThree}]
+    \definesymbol [MVFour]             [\MartinVogelSymbol{MVFour}]
+    \definesymbol [MVFive]             [\MartinVogelSymbol{MVFive}]
+    \definesymbol [MVSix]              [\MartinVogelSymbol{MVSix}]
+    \definesymbol [MVSeven]            [\MartinVogelSymbol{MVSeven}]
+    \definesymbol [MVEight]            [\MartinVogelSymbol{MVEight}]
+    \definesymbol [MVNine]             [\MartinVogelSymbol{MVNine}]
+
+    \definesymbol [MVAt]               [\MartinVogelSymbol{MVAt}]
+    \definesymbol [MVArrowDown]        [\MartinVogelSymbol{MVArrowDown}]
+    \definesymbol [MVComma]            [\MartinVogelSymbol{MVComma}]
+    \definesymbol [MVDivision]         [\MartinVogelSymbol{MVDivision}]
+    \definesymbol [MVLeftBracket]      [\MartinVogelSymbol{MVLeftBracket}]
+    \definesymbol [MVMinus]            [\MartinVogelSymbol{MVMinus}]
+    \definesymbol [MVMultiplication]   [\MartinVogelSymbol{MVMultiplication}]
+    \definesymbol [MVPeriod]           [\MartinVogelSymbol{MVPeriod}]
+    \definesymbol [MVPlus]             [\MartinVogelSymbol{MVPlus}]
+    \definesymbol [MVRightArrow]       [\MartinVogelSymbol{MVRightArrow}]
+    \definesymbol [MVRightBracket]     [\MartinVogelSymbol{MVRightBracket}]
+    \definesymbol [MVspace]            [\MartinVogelSymbol{MVspace}]
+
+\stopsymbolset
+
+% Office signs, crosses, circles, arrows (names as in file)
+
+\startsymbolset [martinvogel 2]
+
+    \definesymbol [AngleSign]          [\MartinVogelSymbol{AngleSign}]
+    \definesymbol [Ankh]               [\MartinVogelSymbol{Ankh}]
+    \definesymbol [ArrowOver]          [\MartinVogelSymbol{ArrowOver}]
+    \definesymbol [AtForty]            [\MartinVogelSymbol{AtForty}]
+    \definesymbol [AtNinetyFive]       [\MartinVogelSymbol{AtNinetyFive}]
+    \definesymbol [AtSixty]            [\MartinVogelSymbol{AtSixty}]
+    %definesymbol [BOLogo]             [\MartinVogelSymbol{BOLogo}]
+    %definesymbol [BOLogoL]            [\MartinVogelSymbol{BOLogoL}]
+    %definesymbol [BOLogoP]            [\MartinVogelSymbol{BOLogoP}]
+    \definesymbol [BSEFree]            [\MartinVogelSymbol{BSEFree}]
+    \definesymbol [BarOver]            [\MartinVogelSymbol{BarOver}]
+    \definesymbol [Bat]                [\MartinVogelSymbol{Bat}]
+    \definesymbol [Beam]               [\MartinVogelSymbol{Beam}]
+    \definesymbol [Bearing]            [\MartinVogelSymbol{Bearing}]
+    \definesymbol [Bicycle]            [\MartinVogelSymbol{Bicycle}]
+    \definesymbol [Biohazard]          [\MartinVogelSymbol{Biohazard}]
+    \definesymbol [Bleech]             [\MartinVogelSymbol{Bleech}]
+    \definesymbol [Bouquet]            [\MartinVogelSymbol{Bouquet}]
+    \definesymbol [CeltCross]          [\MartinVogelSymbol{CeltCross}]
+    \definesymbol [CheckedBox]         [\MartinVogelSymbol{CheckedBox}]
+    \definesymbol [CircPipe]           [\MartinVogelSymbol{CircPipe}]
+    \definesymbol [CircSteel]          [\MartinVogelSymbol{CircSteel}]
+    \definesymbol [CircledA]           [\MartinVogelSymbol{CircledA}]
+    \definesymbol [CleaningA]          [\MartinVogelSymbol{CleaningA}]
+    \definesymbol [CleaningF]          [\MartinVogelSymbol{CleaningF}]
+    \definesymbol [CleaningFF]         [\MartinVogelSymbol{CleaningFF}]
+    \definesymbol [CleaningP]          [\MartinVogelSymbol{CleaningP}]
+    \definesymbol [CleaningPP]         [\MartinVogelSymbol{CleaningPP}]
+    \definesymbol [ClockLogo]          [\MartinVogelSymbol{ClockLogo}]
+    \definesymbol [Coffeecup]          [\MartinVogelSymbol{Coffeecup}]
+    \definesymbol [ComputerMouse]      [\MartinVogelSymbol{ComputerMouse}]
+    \definesymbol [Conclusion]         [\MartinVogelSymbol{Conclusion}]
+    \definesymbol [Congruent]          [\MartinVogelSymbol{Congruent}]
+    \definesymbol [Corresponds]        [\MartinVogelSymbol{Corresponds}]
+    \definesymbol [Cross]              [\MartinVogelSymbol{Cross}]
+    \definesymbol [CrossedBox]         [\MartinVogelSymbol{CrossedBox}]
+    \definesymbol [CutLeft]            [\MartinVogelSymbol{CutLeft}]
+    \definesymbol [CutLine]            [\MartinVogelSymbol{CutLine}]
+    \definesymbol [CutRight]           [\MartinVogelSymbol{CutRight}]
+    \definesymbol [CuttingLine]        [\MartinVogelSymbol{CuttingLine}]
+    \definesymbol [Deleatur]           [\MartinVogelSymbol{Deleatur}]
+    \definesymbol [Divides]            [\MartinVogelSymbol{Divides}]
+    \definesymbol [DividesNot]         [\MartinVogelSymbol{DividesNot}]
+    \definesymbol [EMail]              [\MartinVogelSymbol{EMail}]
+    \definesymbol [Earth]              [\MartinVogelSymbol{Earth}]
+    \definesymbol [EmailCT]            [\MartinVogelSymbol{EmailCT}]
+    \definesymbol [Equivalence]        [\MartinVogelSymbol{Equivalence}]
+    \definesymbol [Estatically]        [\MartinVogelSymbol{Estatically}]
+    \definesymbol [EstimatedSign]      [\MartinVogelSymbol{EstimatedSign}]
+    \definesymbol [Explosionsafe]      [\MartinVogelSymbol{Explosionsafe}]
+    \definesymbol [EyesDollar]         [\MartinVogelSymbol{EyesDollar}]
+    \definesymbol [FAX]                [\MartinVogelSymbol{FAX}]
+    \definesymbol [FEMALE]             [\MartinVogelSymbol{FEMALE}]
+    \definesymbol [Fax]                [\MartinVogelSymbol{Fax}]
+    \definesymbol [Female]             [\MartinVogelSymbol{Female}]
+    \definesymbol [FemaleFemale]       [\MartinVogelSymbol{FemaleFemale}]
+    \definesymbol [FemaleMale]         [\MartinVogelSymbol{FemaleMale}]
+    \definesymbol [FixedBearing]       [\MartinVogelSymbol{FixedBearing}]
+    \definesymbol [FlatSteel]          [\MartinVogelSymbol{FlatSteel}]
+    \definesymbol [Florin]             [\MartinVogelSymbol{Florin}]
+    \definesymbol [Football]           [\MartinVogelSymbol{Football}]
+    \definesymbol [Forward]            [\MartinVogelSymbol{Forward}]
+    \definesymbol [ForwardToEnd]       [\MartinVogelSymbol{ForwardToEnd}]
+    \definesymbol [ForwardToIndex]     [\MartinVogelSymbol{ForwardToIndex}]
+    \definesymbol [Frowny]             [\MartinVogelSymbol{Frowny}]
+    \definesymbol [Gentsroom]          [\MartinVogelSymbol{Gentsroom}]
+    \definesymbol [HERMAPHRODITE]      [\MartinVogelSymbol{HERMAPHRODITE}]
+    \definesymbol [HandWash]           [\MartinVogelSymbol{HandWash}]
+    \definesymbol [Heart]              [\MartinVogelSymbol{Heart}]
+    \definesymbol [Hermaphrodite]      [\MartinVogelSymbol{Hermaphrodite}]
+    \definesymbol [HexaSteel]          [\MartinVogelSymbol{HexaSteel}]
+    \definesymbol [HollowBox]          [\MartinVogelSymbol{HollowBox}]
+    \definesymbol [IRONING]            [\MartinVogelSymbol{IRONING}]
+    \definesymbol [Industry]           [\MartinVogelSymbol{Industry}]
+    \definesymbol [Info]               [\MartinVogelSymbol{Info}]
+    \definesymbol [Ironing]            [\MartinVogelSymbol{Ironing}]
+    \definesymbol [Keyboard]           [\MartinVogelSymbol{Keyboard}]
+    \definesymbol [LSteel]             [\MartinVogelSymbol{LSteel}]
+    \definesymbol [Ladiesroom]         [\MartinVogelSymbol{Ladiesroom}]
+    \definesymbol [LargerOrEqual]      [\MartinVogelSymbol{LargerOrEqual}]
+    \definesymbol [Laserbeam]          [\MartinVogelSymbol{Laserbeam}]
+    \definesymbol [LeftScissors]       [\MartinVogelSymbol{LeftScissors}]
+    \definesymbol [LeftTorque]         [\MartinVogelSymbol{LeftTorque}]
+    \definesymbol [LessOrEqual]        [\MartinVogelSymbol{LessOrEqual}]
+    \definesymbol [Letter]             [\MartinVogelSymbol{Letter}]
+    \definesymbol [Lightning]          [\MartinVogelSymbol{Lightning}]
+    \definesymbol [Lineload]           [\MartinVogelSymbol{Lineload}]
+    \definesymbol [LooseBearing]       [\MartinVogelSymbol{LooseBearing}]
+    \definesymbol [MALE]               [\MartinVogelSymbol{MALE}]
+    \definesymbol [Male]               [\MartinVogelSymbol{Male}]
+    \definesymbol [MaleMale]           [\MartinVogelSymbol{MaleMale}]
+    \definesymbol [ManFace]            [\MartinVogelSymbol{ManFace}]
+    \definesymbol [MineSign]           [\MartinVogelSymbol{MineSign}]
+    \definesymbol [Mobilefone]         [\MartinVogelSymbol{Mobilefone}]
+    \definesymbol [MoveDown]           [\MartinVogelSymbol{MoveDown}]
+    \definesymbol [MoveUp]             [\MartinVogelSymbol{MoveUp}]
+    \definesymbol [MultiplicationDot]  [\MartinVogelSymbol{MultiplicationDot}]
+    \definesymbol [Mundus]             [\MartinVogelSymbol{Mundus}]
+    \definesymbol [Neutral]            [\MartinVogelSymbol{Neutral}]
+    \definesymbol [NoBleech]           [\MartinVogelSymbol{NoBleech}]
+    \definesymbol [NoBreakSpace]       [\MartinVogelSymbol{NoBreakSpace}]
+    \definesymbol [NoChemicalCleaning] [\MartinVogelSymbol{NoChemicalCleaning}]
+    \definesymbol [NoIroning]          [\MartinVogelSymbol{NoIroning}]
+    \definesymbol [NoTumbler]          [\MartinVogelSymbol{NoTumbler}]
+    \definesymbol [NoWash]             [\MartinVogelSymbol{NoWash}]
+    \definesymbol [NotCongruent]       [\MartinVogelSymbol{NotCongruent}]
+    \definesymbol [OktoSteel]          [\MartinVogelSymbol{OktoSteel}]
+    \definesymbol [PackingWaste]       [\MartinVogelSymbol{PackingWaste}]
+    \definesymbol [ParallelPort]       [\MartinVogelSymbol{ParallelPort}]
+    \definesymbol [PeaceDove]          [\MartinVogelSymbol{PeaceDove}]
+    \definesymbol [Pfund]              [\MartinVogelSymbol{Pfund}]
+    \definesymbol [Pickup]             [\MartinVogelSymbol{Pickup}]
+    \definesymbol [PointingHand]       [\MartinVogelSymbol{PointingHand}]
+    \definesymbol [Printer]            [\MartinVogelSymbol{Printer}]
+    \definesymbol [Radioactivity]      [\MartinVogelSymbol{Radioactivity}]
+    \definesymbol [RectPipe]           [\MartinVogelSymbol{RectPipe}]
+    \definesymbol [RectSteel]          [\MartinVogelSymbol{RectSteel}]
+    \definesymbol [Recycling]          [\MartinVogelSymbol{Recycling}]
+    \definesymbol [Rewind]             [\MartinVogelSymbol{Rewind}]
+    \definesymbol [RewindToIndex]      [\MartinVogelSymbol{RewindToIndex}]
+    \definesymbol [RewindToStart]      [\MartinVogelSymbol{RewindToStart}]
+    \definesymbol [RightScissors]      [\MartinVogelSymbol{RightScissors}]
+    \definesymbol [RightTorque]        [\MartinVogelSymbol{RightTorque}]
+    \definesymbol [RoundedLSteel]      [\MartinVogelSymbol{RoundedLSteel}]
+    \definesymbol [RoundedTSteel]      [\MartinVogelSymbol{RoundedTSteel}]
+    \definesymbol [RoundedTTSteel]     [\MartinVogelSymbol{RoundedTTSteel}]
+    \definesymbol [SerialInterface]    [\MartinVogelSymbol{SerialInterface}]
+    \definesymbol [SerialPort]         [\MartinVogelSymbol{SerialPort}]
+    \definesymbol [Shilling]           [\MartinVogelSymbol{Shilling}]
+    \definesymbol [ShortFifty]         [\MartinVogelSymbol{ShortFifty}]
+    \definesymbol [ShortForty]         [\MartinVogelSymbol{ShortForty}]
+    \definesymbol [ShortNinetyfive]    [\MartinVogelSymbol{ShortNinetyfive}]
+    \definesymbol [ShortSixty]         [\MartinVogelSymbol{ShortSixty}]
+    \definesymbol [ShortThirty]        [\MartinVogelSymbol{ShortThirty}]
+    \definesymbol [Smiley]             [\MartinVogelSymbol{Smiley}]
+    \definesymbol [SoftHyphen]         [\MartinVogelSymbol{SoftHyphen}]
+    \definesymbol [SpecialForty]       [\MartinVogelSymbol{SpecialForty}]
+    \definesymbol [SquarePipe]         [\MartinVogelSymbol{SquarePipe}]
+    \definesymbol [SquareSteel]        [\MartinVogelSymbol{SquareSteel}]
+    \definesymbol [Stopsign]           [\MartinVogelSymbol{Stopsign}]
+    \definesymbol [StrikingThrough]    [\MartinVogelSymbol{StrikingThrough}]
+    \definesymbol [TSteel]             [\MartinVogelSymbol{TSteel}]
+    \definesymbol [TTSteel]            [\MartinVogelSymbol{TTSteel}]
+    \definesymbol [Telephone]          [\MartinVogelSymbol{Telefon}]
+    \definesymbol [ToBottom]           [\MartinVogelSymbol{ToBottom}]
+    \definesymbol [ToTop]              [\MartinVogelSymbol{ToTop}]
+    \definesymbol [Tumbler]            [\MartinVogelSymbol{Tumbler}]
+    \definesymbol [Valve]              [\MartinVogelSymbol{Valve}]
+    \definesymbol [WashCotton]         [\MartinVogelSymbol{WashCotton}]
+    \definesymbol [WashSynthetics]     [\MartinVogelSymbol{WashSynthetics}]
+    \definesymbol [WashWool]           [\MartinVogelSymbol{WashWool}]
+    \definesymbol [Wheelchair]         [\MartinVogelSymbol{Wheelchair}]
+    \definesymbol [WomanFace]          [\MartinVogelSymbol{WomanFace}]
+    \definesymbol [WritingHand]        [\MartinVogelSymbol{WritingHand}]
+    \definesymbol [YinYang]            [\MartinVogelSymbol{YinYang}]
+    \definesymbol [arrowOver]          [\MartinVogelSymbol{arrowOver}]
+    \definesymbol [barOver]            [\MartinVogelSymbol{barOver}]
+    \definesymbol [fax]                [\MartinVogelSymbol{fax}]
+    %definesymbol [hyphen]             [\MartinVogelSymbol{hyphen}]
+    \definesymbol [ironing]            [\MartinVogelSymbol{ironing}]
+    %definesymbol [nonmarkingreturn]   [\MartinVogelSymbol{nonmarkingreturn}]
+
+\stopsymbolset
+
+%D \showsymbolset[astronomic]
+%D \showsymbolset[zodiac]
+%D \showsymbolset[europe]
+%D \showsymbolset[martinvogel 1]
+%D \showsymbolset[martinvogel 2]
+
+\endinput