Source Browser ?

1%D \module
2%D   [       file=symb-nav,
3%D        version=1998.07.20,
4%D          title=\CONTEXT\ Symbol Libraries,
5%D       subtitle=Navigational Symbols,
6%D         author=Hans Hagen,
7%D           date=\currentdate,
8%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9%C
10%C This module is part of the \CONTEXT\ macro||package and is
11%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12%C details.
13
14\unprotect
15
16\definesymbol [\v!first]           [\symbol{\v!firstpage}]
17\definesymbol [\v!previous]        [\symbol{\v!previouspage}]
18\definesymbol [\v!next]            [\symbol{\v!nextpage}]
19\definesymbol [\v!last]            [\symbol{\v!lastpage}]
20\definesymbol [\v!backward]        [\symbol{\v!previouspage}]
21\definesymbol [\v!forward]         [\symbol{\v!nextpage}]
22\definesymbol [\v!nowhere]         [\symbol{bullet}]
23\definesymbol [\v!somewhere]       [\startoverlay{\symbol\v!previouspage}{\symbol\v!nextpage}\stopoverlay]
24
25\definefontsynonym [ContextNavigation] [contnav]
26
27\permanent\protected\def\ContextNavigationGlyph{\getnamedglyphdirect{ContextNavigation}} % #1
28
29\startsymbolset [navigation 1]
30
31    \definesymbol [\v!firstpage]       [\ContextNavigationGlyph{char03}]
32    \definesymbol [\v!previouspage]    [\ContextNavigationGlyph{char01}]
33    \definesymbol [\v!nextpage]        [\ContextNavigationGlyph{char02}]
34    \definesymbol [\v!lastpage]        [\ContextNavigationGlyph{char04}]
35
36    \definesymbol [\v!PreviousJump]    [\ContextNavigationGlyph{char05}]
37    \definesymbol [\v!NextJump]        [\ContextNavigationGlyph{char06}]
38
39    \definesymbol [\v!CloseDocument]   [\ContextNavigationGlyph{char07}]
40
41    \definesymbol [\v!firstsubpage]    [\ContextNavigationGlyph{char03}]
42    \definesymbol [\v!previoussubpage] [\ContextNavigationGlyph{char01}]
43    \definesymbol [\v!nextsubpage]     [\ContextNavigationGlyph{char02}]
44    \definesymbol [\v!lastsubpage]     [\ContextNavigationGlyph{char04}]
45
46    \definesymbol [\v!StartSound]      [\ContextNavigationGlyph{char02}]
47    \definesymbol [\v!PauseSound]      [\ContextNavigationGlyph{char08}]
48    \definesymbol [\v!StopSound]       [\ContextNavigationGlyph{char07}]
49
50    \definesymbol [\v!StartMovie]      [\ContextNavigationGlyph{char02}]
51    \definesymbol [\v!PauseMovie]      [\ContextNavigationGlyph{char08}]
52    \definesymbol [\v!StopMovie]       [\ContextNavigationGlyph{char07}]
53
54    \definesymbol [\v!StartRendering]  [\ContextNavigationGlyph{char02}]
55    \definesymbol [\v!PauseRendering]  [\ContextNavigationGlyph{char08}]
56    \definesymbol [\v!StopRendering]   [\ContextNavigationGlyph{char07}]
57    \definesymbol [\v!ResumeRendering] [\ContextNavigationGlyph{char02}]
58
59\stopsymbolset
60
61\startsymbolset [navigation 2]
62
63    \definesymbol [\v!firstpage]       [\ContextNavigationGlyph{char67}]
64    \definesymbol [\v!previouspage]    [\ContextNavigationGlyph{char65}]
65    \definesymbol [\v!nextpage]        [\ContextNavigationGlyph{char66}]
66    \definesymbol [\v!lastpage]        [\ContextNavigationGlyph{char68}]
67
68    \definesymbol [\v!PreviousJump]    [\ContextNavigationGlyph{char69}]
69    \definesymbol [\v!NextJump]        [\ContextNavigationGlyph{char6a}]
70
71    \definesymbol [\v!CloseDocument]   [\ContextNavigationGlyph{char6b}]
72
73    \definesymbol [\v!firstsubpage]    [\ContextNavigationGlyph{char67}]
74    \definesymbol [\v!previoussubpage] [\ContextNavigationGlyph{char65}]
75    \definesymbol [\v!nextsubpage]     [\ContextNavigationGlyph{char66}]
76    \definesymbol [\v!lastsubpage]     [\ContextNavigationGlyph{char68}]
77
78    \definesymbol [\v!StartSound]      [\ContextNavigationGlyph{char66}]
79    \definesymbol [\v!PauseSound]      [\ContextNavigationGlyph{char6c}]
80    \definesymbol [\v!StopSound]       [\ContextNavigationGlyph{char6b}]
81
82    \definesymbol [\v!StartMovie]      [\ContextNavigationGlyph{char66}]
83    \definesymbol [\v!PauseMovie]      [\ContextNavigationGlyph{char6c}]
84    \definesymbol [\v!StopMovie]       [\ContextNavigationGlyph{char6b}]
85
86    \definesymbol [\v!StartRendering]  [\ContextNavigationGlyph{char66}]
87    \definesymbol [\v!PauseRendering]  [\ContextNavigationGlyph{char6c}]
88    \definesymbol [\v!StopRendering]   [\ContextNavigationGlyph{char6b}]
89    \definesymbol [\v!ResumeRendering] [\ContextNavigationGlyph{char66}]
90
91\stopsymbolset
92
93\startsymbolset [navigation 3]
94
95    \definesymbol [\v!firstpage]       [\ContextNavigationGlyph{charcb}]
96    \definesymbol [\v!previouspage]    [\ContextNavigationGlyph{charc9}]
97    \definesymbol [\v!nextpage]        [\ContextNavigationGlyph{charca}]
98    \definesymbol [\v!lastpage]        [\ContextNavigationGlyph{charcc}]
99
100    \definesymbol [\v!PreviousJump]    [\ContextNavigationGlyph{charcd}]
101    \definesymbol [\v!NextJump]        [\ContextNavigationGlyph{charce}]
102
103    \definesymbol [\v!CloseDocument]   [\ContextNavigationGlyph{charcf}]
104
105    \definesymbol [\v!firstsubpage]    [\ContextNavigationGlyph{charcb}]
106    \definesymbol [\v!previoussubpage] [\ContextNavigationGlyph{charc9}]
107    \definesymbol [\v!nextsubpage]     [\ContextNavigationGlyph{charca}]
108    \definesymbol [\v!lastsubpage]     [\ContextNavigationGlyph{charcc}]
109
110    \definesymbol [\v!StartSound]      [\ContextNavigationGlyph{charca}]
111    \definesymbol [\v!PauseSound]      [\ContextNavigationGlyph{chard0}]
112    \definesymbol [\v!StopSound]       [\ContextNavigationGlyph{charcf}]
113
114    \definesymbol [\v!StartMovie]      [\ContextNavigationGlyph{charca}]
115    \definesymbol [\v!PauseMovie]      [\ContextNavigationGlyph{chard0}]
116    \definesymbol [\v!StopMovie]       [\ContextNavigationGlyph{charcf}]
117
118    \definesymbol [\v!StartRendering]  [\ContextNavigationGlyph{charca}]
119    \definesymbol [\v!PauseRendering]  [\ContextNavigationGlyph{chard0}]
120    \definesymbol [\v!StopRendering]   [\ContextNavigationGlyph{charcf}]
121    \definesymbol [\v!ResumeRendering] [\ContextNavigationGlyph{charca}]
122
123\stopsymbolset
124
125\protect
126
127\continueifinputfile{symb-imp-nav.mkiv}
128
129\starttext
130    \showsymbolset[navigation 1]\page
131    \showsymbolset[navigation 2]\page
132    \showsymbolset[navigation 3]\page
133    \ContextNavigationGlyph{char03}\quad
134    \ContextNavigationGlyph{char67}\quad
135    \ContextNavigationGlyph{charcb}
136\stoptext
137