Source Browser ?

1
%D \module
2
%D   [      file=s-faq-00,
3
%D        version=1997.21.08,
4
%D          title=\CONTEXT\ Style File,
5
%D       subtitle=FAQ Common Macros,
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
\usemodule
[
abr
-
0
1
]
15
16
\defineblock
[
question
]
17
\defineblock
[
answer
]
18
19
\def
\ScreenFAQ
     
{
fs
-
\TagOfFAQ
-
\LanguageOfFAQ
}
20
\def
\PaperFAQ
      
{
fp
-
\TagOfFAQ
-
\LanguageOfFAQ
}
21
\def
\FileNameOfFAQ
 
{
fa
-
\TagOfFAQ
-
\LanguageOfFAQ
}
22
23
\language
24  
[
\HyphenationOfFAQ
]
25
26
\setupwhitespace
27  
[
big
]
28
29
\setupbodyfont
30  
[
ams
]
31
32
\setuptolerance
33  
[
tolerant
]
34
35
\setupregister
36  
[
index
]
37  
[
indicator
=
no
]
38
39
\setupframedtexts
40  
[
width
=
\hsize
]
41
42
\setupblock
43  
[
question
]
44  
[
before
=
\startframedtext
,
45   
after
=
\stopframedtext
]
 
46
47
\setupblock
48  
[
answer
]
49  
[
after
=
\EndAnswer
]
50
51
\def
\EndAnswer
   
{}
52
53
\def
\AuthorOfFAQ
 
{}
54
\def
\IndexOfFAQ
  
{}
55
56
\def
\FrequentlyAskedQuestion
#
1
#
2
%
57  
{
\page
58   
\doglobal
\increment
\CurrentNOfFAQ
59   
\pagereference
[
faq
:
\CurrentNOfFAQ
]
60   
\gdef
\IndexOfFAQ
{
#
1
}
61   
\gdef
\AuthorOfFAQ
{
#
2
}}
62
63
\newcounter
\CurrentNOfFAQ
64
65
\setuplabeltext
 
[
nl
]
 
[
FAQ
=
Vaak
 
gestelde
 
vragen
]
66
\setuplabeltext
 
[
du
]
 
[
FAQ
=
Oft
 
gestellte
 
Fragen
]
67
\setuplabeltext
 
[
en
]
 
[
FAQ
=
Frequently
 
Asked
 
Questions
]
68
69
\setuplabeltext
 
[
nl
]
 
[
about
=
over
]
70
\setuplabeltext
 
[
du
]
 
[
about
=
zu
]
71
\setuplabeltext
 
[
en
]
 
[
about
=
about
]
72
73
\setuplabeltext
 
[
nl
]
 
[
version
=
Versie
]
74
\setuplabeltext
 
[
du
]
 
[
version
=
Version
]
75
\setuplabeltext
 
[
en
]
 
[
version
=
Version
]
76
77
\setuplabeltext
 
[
nl
]
 
[
goback
=
terug
]
78
\setuplabeltext
 
[
du
]
 
[
goback
=
zur
\"
uck
]
79
\setuplabeltext
 
[
en
]
 
[
goback
=
go
 
back
]
80
81
\setuplabeltext
 
[
nl
]
 
[
paper
=
papier
]
82
\setuplabeltext
 
[
du
]
 
[
paper
=
Papier
]
83
\setuplabeltext
 
[
en
]
 
[
paper
=
paper
]
84
85
\setuplabeltext
 
[
nl
]
 
[
faqs
=
FAQ
'
s
]
86
\setuplabeltext
 
[
du
]
 
[
faqs
=
FAQs
]
87
\setuplabeltext
 
[
en
]
 
[
faqs
=
FAQ
'
s
]
88
89
\setuplabeltext
 
[
nl
]
 
[
index
=
index
]
90
\setuplabeltext
 
[
du
]
 
[
index
=
Index
]
91
\setuplabeltext
 
[
en
]
 
[
index
=
index
]
92
93
\endinput
94