Source Browser ?

1
%D \module
2
%D   [       file=publ-imp-apa,
3
%D        version=2013.12.12,
4
%D          title=APA bibliography style,
5
%D       subtitle=Publications,
6
%D         author=Alan Braslau and 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 therefore copyrighted
11
%D by \PRAGMA. See mreadme.pdf for details.
12
13
\startbtxrenderingdefinitions
[
apa
]
14
15
\ifdefined
\c!translate
 
\else
 
\def
\c!translate
{
translate
}
 
\fi
16
17
%D Reference:
18
%D \startTEX
19
%D @Book{APA2010,
20
%D     title    ={Publication Manual of the American Psychological Association},
21
%D     year     ={2010},
22
%D     edition  ={Sixth},
23
%D     address  ={Washington, DC},
24
%D     publisher={American Psychological Association},
25
%D     Xpages   ={291},
26
%D     url      ={http://www.apa.org/books/},
27
%D }
28
%D \stopTEX
29
30
% set ALL specific APA compliant values
31
32
\definebtx
33  
[
apa
]
34  
[
\c!default
=
default
,
35   
\c!specification
=
apa
,
36   
\c!otherstext
=
{
\btxspace
\btxlabeltext
{
others
}}
,
37   
%c!journalconversion=\v!normal,
38   
\c!monthconversion
=
\v!month
,
39   
\c!stopper
:
initials
=
{
.
 
}
,
 
% with a (breakable) space
40   
\c!separator
:
names
:
2
=
{
\btxcomma
}
,
 
% aka namesep - in this namespace
41   
\c!separator
:
names
:
3
=
{
\btxcomma
\btxnobreakspace
\textampersand\space
}
,
 
% comma separated list
42   
\c!separator
:
names
:
4
=
{
\btxnobreakspace
\textampersand\space
}
]
 
% last of two, no comma!
43
44
% First, define list and rendering parameters
45
46
% The APA style sorts the unnumbered rendered list by authoryear
47
48
\definebtxrendering
49  
[
apa
]
50  
[
\c!specification
=
apa
,
51   
\c!sorttype
=
authoryear
,
52   
\c!numbering
=
\v!no
]
53
54
\setupbtxlist
55  
[
apa
]
56  
[
\c!alternative
=
\v!paragraph
,
57   
\c!align
=
{
normal
,
verytolerant
,
stretch
}
,
58  
%\c!width=\v!fit,
59  
%\c!distance=.5\emwidth,
60   
\c!margin
=
3
.
5
\emwidth
]
61
62
\definebtx
63  
[
apa
:
\s!list
]
64  
[
apa
]
65  
[
\c!otherstext
=
{
\btxcomma
\btxnobreakspace
\textellipsis\space
}
,
66   
\c!etallimit
=
7
,
67   
\c!etaldisplay
=
6
,
68   
\c!etaloption
=
last
,
69   
\c!authorconversion
=
invertedshort
]
70
71
% First, we define a namespace for a few special fields
72
73
\definebtx
74  
[
apa
:
\s!list
:
author
]
75  
[
apa
:
\s!list
]
76
77
\definebtx
78  
[
apa
:
\s!list
:
withauthor
]
79  
[
apa
:
\s!list
:
author
]
80
81
\definebtx
82  
[
apa
:
\s!list
:
editor
]
83  
[
apa
:
\s!list
:
author
]
84
85
\definebtx
86  
[
apa
:
\s!list
:
ineditor
]
87  
[
apa
:
\s!list
:
editor
]
88  
[
\c!authorconversion
=
normalshort
]
89
90
\definebtx
91  
[
apa
:
\s!list
:
translator
]
92  
[
apa
:
\s!list
:
author
]
93  
[
\c!authorconversion
=
normalshort
]
94
95
\definebtx
96  
[
apa
:
\s!list
:
director
]
97  
[
apa
:
\s!list
:
author
]
98
99
\definebtx
100  
[
apa
:
\s!list
:
producer
]
101  
[
apa
:
\s!list
:
author
]
102
103
\definebtx
104  
[
apa
:
\s!list
:
suffix
]
105  
[
apa
:
\s!list
]
106
107
\definebtx
108  
[
apa
:
\s!list
:
url
]
109  
[
apa
:
\s!list
]
110
111
\definebtx
112  
[
apa
:
\s!list
:
doi
]
113  
[
apa
:
\s!list
]
114
115
\definebtx
116  
[
apa
:
\s!list
:
\s!page
]
117  
[
apa
:
\s!list
]
118  
[
\c!separator
:
2
=
{
\btxcomma
}
,
119   
\c!separator
:
3
=
{
\btxcomma
\btxlabeltext
{
and
}
\space
}
,
120   
\c!separator
:
4
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
,
121   
\c!left
=
{
\btxleftparenthesis
}
,
122   
\c!right
=
{
\btxrightparenthesis
}
,
123   
\c!command
=
{
\wordright
}
]
124
125
\definebtx
126  
[
apa
:
\s!list
:
numbering
]
127  
[
apa
:
\s!list
]
128  
[
\c!right
=
{
\btxspace
}
]
129
130
\definebtx
131  
[
apa
:
\s!list
:
numbering
:
default
]
132  
[
apa
:
\s!list
:
numbering
]
133
134
\definebtx
135  
[
apa
:
\s!list
:
numbering
:
num
]
136  
[
apa
:
\s!list
:
numbering
]
137  
[
\c!stopper
=
{
.
}
]
138
139
\definebtx
140  
[
apa
:
\s!list
:
numbering
:
short
]
141  
[
apa
:
\s!list
:
numbering
]
142
143
\definebtx
144  
[
apa
:
\s!list
:
numbering
:
tag
]
145  
[
apa
:
\s!list
:
numbering
]
146
147
\definebtx
148  
[
apa
:
\s!list
:
numbering
:
index
]
149  
[
apa
:
\s!list
:
numbering
]
150
151
% Next, we define a namespace for each category
152
153
%D In order to be able to get journals expanded (or normalized or abbreviated) you need
154
%D to load a list:
155
%D
156
%D \starttyping
157
%D \btxloadjournallist[journals.txt] % the jabref list
158
%D \stoptyping
159
160
\definebtx
161  
[
apa
:
\s!list
:
journal
]
162  
[
apa
:
\s!list
]
163  
[
\c!style
=
\v!italic
]
164  
%command=\btxexpandedjournal] % btxabbreviatedjournal
165
166
\definebtx
167  
[
apa
:
\s!list
:
volume
]
168  
[
apa
:
\s!list
]
169  
[
\c!style
=
\v!italic
]
170
171
\definebtx
172  
[
apa
:
\s!list
:
title
]
173  
[
apa
:
\s!list
]
174  
[
\c!style
=
\v!italic
,
175   
\c!command
=
\Word
,
176   
\c!translate
=
\v!yes
]
177
178
\definebtx
179  
[
apa
:
\s!list
:
title
:
article
]
180  
[
apa
:
\s!list
:
title
]
181  
[
\c!style
=]
 
% journal is set in italics
182
183
\definebtx
184  
[
apa
:
\s!list
:
title
:
magazine
]
185  
[
apa
:
\s!list
:
title
]
186
187
\definebtx
188  
[
apa
:
\s!list
:
title
:
newspaper
]
189  
[
apa
:
\s!list
:
title
]
190
191
\definebtx
192  
[
apa
:
\s!list
:
title
:
periodical
]
193  
[
apa
:
\s!list
:
title
]
194
195
\definebtx
196  
[
apa
:
\s!list
:
title
:
standard
]
197  
[
apa
:
\s!list
:
title
]
198
199
\definebtx
200  
[
apa
:
\s!list
:
title
:
book
]
201  
[
apa
:
\s!list
:
title
]
202
203
\definebtx
204  
[
apa
:
\s!list
:
booktitle
:
inbook
]
205  
[
apa
:
\s!list
:
title
]
206
207
\definebtx
208  
[
apa
:
\s!list
:
title
:
inbook
]
209  
[
apa
:
\s!list
:
title
]
210  
[
\c!style
=]
 
% booktitle is set in italics
211
212
\definebtx
213  
[
apa
:
\s!list
:
booktitle
:
incollection
]
214  
[
apa
:
\s!list
:
title
]
215
216
\definebtx
217  
[
apa
:
\s!list
:
title
:
incollection
]
218  
[
apa
:
\s!list
:
title
]
219  
[
\c!style
=]
 
% booktitle is set in italics
220
221
\definebtx
222  
[
apa
:
\s!list
:
title
:
proceedings
]
223  
[
apa
:
\s!list
:
title
]
224
225
\definebtx
226  
[
apa
:
\s!list
:
booktitle
:
inproceedings
]
227  
[
apa
:
\s!list
:
title
]
228
229
\definebtx
230  
[
apa
:
\s!list
:
title
:
inproceedings
]
231  
[
apa
:
\s!list
:
title
]
232  
[
\c!style
=]
 
% booktitle is set in italics
233
234
\definebtx
235  
[
apa
:
\s!list
:
booktitle
:
conference
]
236  
[
apa
:
\s!list
:
title
]
237
238
\definebtx
239  
[
apa
:
\s!list
:
title
:
conference
]
240  
[
apa
:
\s!list
:
title
]
241  
[
\c!style
=]
 
% booktitle is set in italics
242
243
\definebtx
244  
[
apa
:
\s!list
:
title
:
thesis
]
245  
[
apa
:
\s!list
:
title
]
246
247
\definebtx
248  
[
apa
:
\s!list
:
title
:
phdthesis
]
249  
[
apa
:
\s!list
:
title
]
250
251
\definebtx
252  
[
apa
:
\s!list
:
title
:
mastersthesis
]
253  
[
apa
:
\s!list
:
title
]
254
255
\definebtx
256  
[
apa
:
\s!list
:
title
:
booklet
]
257  
[
apa
:
\s!list
:
title
]
258
259
\definebtx
260  
[
apa
:
\s!list
:
title
:
manual
]
261  
[
apa
:
\s!list
:
title
]
262
263
\definebtx
264  
[
apa
:
\s!list
:
title
:
techreport
]
265  
[
apa
:
\s!list
:
title
]
266
267
\definebtx
268  
[
apa
:
\s!list
:
title
:
unpublished
]
269  
[
apa
:
\s!list
:
title
]
270
271
\definebtx
272  
[
apa
:
\s!list
:
title
:
patent
]
273  
[
apa
:
\s!list
:
title
]
274
275
\definebtx
276  
[
apa
:
\s!list
:
title
:
electronic
]
277  
[
apa
:
\s!list
:
title
]
278
279
\definebtx
280  
[
apa
:
\s!list
:
title
:
music
]
281  
[
apa
:
\s!list
:
title
]
282
283
\definebtx
284  
[
apa
:
\s!list
:
title
:
film
]
285  
[
apa
:
\s!list
:
title
]
286
287
\definebtx
288  
[
apa
:
\s!list
:
title
:
other
]
289  
[
apa
:
\s!list
:
title
]
290
291
\definebtx
292  
[
apa
:
\s!list
:
title
:
misc
]
293  
[
apa
:
\s!list
:
title
]
294
295
\definebtx
296  
[
apa
:
\s!list
:
title
:
literal
]
297  
[
apa
:
\s!list
:
title
]
298
299
\definebtx
300  
[
apa
:
\s!list
:
type
]
301  
[
\c!command
=
\Word
]
302
303
% Then define and set cite parameters.
304
305
\definebtx
306  
[
apa
:
\s!cite
]
307  
[
apa
]
308  
[
\c!alternative
=
authoryear
,
309   
\c!otherstext
=
{
\btxcomma
\btxlabeltext
{
others
}}
,
310   
\c!etallimit
=
5
,
311   
\c!etaldisplay
=
1
,
 
% TODO: when 2-4, show all first time, etaldisplay subsequently...
312   
\c!authorconversion
=
\v!name
,
313   
\c!sorttype
=
normal
,
 
% \v!normal ?
314   
\c!style
=
,
315   
\c!compress
=
\v!yes
,
 
% note that cite sorts only work with compress=yes.
316   
\c!separator
:
names
:
3
=
{
\btxcomma
\btxlabeltext
{
and
}
\space
}
,
 
% not \textampersand
317   
\c!separator
:
names
:
4
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
]
 
% not \textampersand
318
319
\definebtx
320  
[
apa
:
\s!cite
:
name
]
321  
[
apa
:
\s!cite
]
322  
[
\c!authorconversion
=
\v!name
]
323
324
\definebtx
325  
[
apa
:
\s!cite
:
inverted
]
326  
[
apa
:
\s!cite
]
327  
[
\c!authorconversion
=
\v!invertedshort
]
328
329
\definebtx
330  
[
apa
:
\s!cite
:
invertedshort
]
331  
[
apa
:
\s!cite
]
332  
[
\c!authorconversion
=
\v!invertedshort
]
333
334
\definebtx
335  
[
apa
:
\s!cite
:
normalshort
]
336  
[
apa
:
\s!cite
]
337  
[
\c!authorconversion
=
\v!normalshort
]
338
339
\definebtx
340  
[
apa
:
\s!cite
:
normal
]
341  
[
apa
:
\s!cite
]
342  
[
\c!authorconversion
=
\v!normal
]
343
344
\definebtx
345  
[
apa
:
\s!cite
:
author
]
346  
[
apa
:
\s!cite
]
347
348
\definebtx
349  
[
apa
:
\s!cite
:
editor
]
350  
[
apa
:
\s!cite
:
author
]
351
352
\definebtx
353  
[
apa
:
\s!cite
:
translator
]
354  
[
apa
:
\s!cite
:
author
]
355
356
\definebtx
357  
[
apa
:
\s!cite
:
organization
]
358  
[
apa
:
\s!cite
]
359
360
\definebtx
361  
[
apa
:
\s!cite
:
authoryear
]
362  
[
apa
:
\s!cite
:
author
]
363  
[
\c!left
=
{
(
}
,
364   
\c!right
=
{
)
}
,
365   
\c!inbetween
=
{
\btxcomma
}
,
366   
\c!separator
:
names
:
3
=
{
\btxcomma
\textampersand\space
}
,
367   
\c!separator
:
names
:
4
=
{
\btxspace
\textampersand\space
}
]
368
369
\definebtx
370  
[
apa
:
\s!cite
:
default
]
371  
[
apa
:
\s!cite
:
authoryear
]
372
373
\definebtx
374  
[
apa
:
\s!cite
:
authoryears
]
375  
[
apa
:
\s!cite
:
author
]
376  
[
\c!left
=
,
 
% these two settings are perhaps redundant?
377   
\c!right
=
,
378   
\c!inbetween
=
{
\btxspace
}
]
379
380
\definebtx
381  
[
apa
:
\s!cite
:
authornum
]
382  
[
apa
:
\s!cite
:
author
]
383  
[
\c!left
=
{
(
}
,
384   
\c!right
=
{
)
}
,
385   
\c!separator
:
names
:
3
=
{
\btxcomma
\textampersand\space
}
,
386   
\c!separator
:
names
:
4
=
{
\btxspace
\textampersand\space
}
]
387
388
\definebtx
389  
[
apa
:
\s!cite
:
author
:
num
]
 
% todo
390  
[
apa
:
\s!cite
:
authornum
]
391  
[
\c!left
=
{
\btxspace
[
}
,
392   
\c!right
=
{
]
}
]
393
394
\definebtx
395  
[
apa
:
\s!cite
:
author
:
year
]
 
% todo
396  
[
apa
:
\s!cite
]
397
398
\definebtx
399  
[
apa
:
\s!cite
:
author
:
years
]
 
% todo
400  
[
apa
:
\s!cite
:
authoryears
]
401  
[
\c!inbetween
=
,
402   
\c!left
=
{
\btxspace
(
}
,
403   
\c!right
=
{
)
}
]
404
405
\definebtx
406  
[
apa
:
\s!cite
:
lefttext
]
407  
[
apa
:
\s!cite
]
408  
[
\c!left
=
,
409   
\c!right
=
{
\btxspace
}
]
410
411
\definebtx
412  
[
apa
:
\s!cite
:
righttext
]
413  
[
apa
:
\s!cite
]
414  
[
\c!left
=
{
\btxcomma
}
,
415   
\c!right
=]
416
417
\definebtx
418  
[
apa
:
\s!cite
:
year
]
419  
[
apa
:
\s!cite
]
420  
[
\c!separator
:
2
=
{
\btxcomma
}
,
 
% :0 and :1 - between items of a list
421   
\c!separator
:
3
=
{
\btxcomma
\btxlabeltext
{
and
}
\space
}
,
 
% not \textampersand
422   
\c!separator
:
4
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
]
 
% not \textampersand
423
424
\definebtx
425  
[
apa
:
\s!cite
:
title
]
426  
[
apa
:
\s!cite
]
427  
[
\c!separator
:
2
=
{
\btxcomma
}
,
 
% :0 and :1 - between items of a list
428   
\c!separator
:
3
=
{
\btxcomma
\btxlabeltext
{
and
}
\space
}
,
 
% not \textampersand
429   
\c!separator
:
4
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
,
 
% not \textampersand
430   
\c!command
=
{
\language
[
\currentbtxlanguage
]
}
,
 
% BAH
431   
\c!sorttype
=
none
,
432   
\c!style
=
\v!italic
]
433
434
\definebtx
435  
[
apa
:
\s!cite
:
subtitle
]
436  
[
apa
:
\s!cite
:
title
]
437
438
\definebtx
439  
[
apa
:
\s!cite
:
booktitle
]
440  
[
apa
:
\s!cite
:
title
]
441
442
\definebtx
443  
[
apa
:
\s!cite
:
subbooktitle
]
444  
[
apa
:
\s!cite
:
booktitle
]
445
446
% Will these get used?
447
448
\definebtx
449  
[
apa
:
\s!cite
:
title
:
inbook
]
450  
[
apa
:
\s!cite
:
title
]
451  
[
\c!style
=]
 
% not italic
452
453
\definebtx
454  
[
apa
:
\s!cite
:
title
:
incollection
]
455  
[
apa
:
\s!cite
:
title
:
inbook
]
456
457
\definebtx
458  
[
apa
:
\s!cite
:
title
:
inproceedings
]
459  
[
apa
:
\s!cite
:
title
:
inbook
]
460
461
\definebtx
462  
[
apa
:
\s!cite
:
subtitle
:
inbook
]
463  
[
apa
:
\s!cite
:
title
:
inbook
]
464
465
\definebtx
466  
[
apa
:
\s!cite
:
subtitle
:
incollection
]
467  
[
apa
:
\s!cite
:
title
:
incollection
]
468
469
\definebtx
470  
[
apa
:
\s!cite
:
subtitle
:
inproceedings
]
471  
[
apa
:
\s!cite
:
title
:
inproceedings
]
472
473
474
\definebtx
475  
[
apa
:
\s!cite
:
tag
]
476  
[
apa
:
\s!cite
]
477  
[
\c!left
=
{
[
}
,
478   
\c!right
=
{
]
}
]
479
480
\definebtx
481  
[
apa
:
\s!cite
:
index
]
482  
[
apa
:
\s!cite
]
483  
[
\c!left
=
{
[
}
,
484   
\c!right
=
{
]
}
]
485
486
\definebtx
487  
[
apa
:
\s!cite
:
page
]
488  
[
apa
:
\s!cite
]
489  
[
\c!left
=
,
490   
\c!right
=
,
491   
\c!separator
:
2
=
{
\btxcomma
}
,
 
% :0 and :1 - between items of a list
492   
\c!separator
:
3
=
{
\btxcomma
\btxlabeltext
{
and
}
\space
}
,
 
% not \textampersand
493   
\c!separator
:
4
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
]
 
% not \textampersand
494
495
\definebtx
496  
[
apa
:
\s!cite
:
pages
]
497  
[
apa
:
\s!cite
:
page
]
498
499
\definebtx
500  
[
apa
:
\s!cite
:
keywords
]
501  
[
apa
:
\s!cite
]
502
503
\definebtx
504  
[
apa
:
\s!cite
:
short
]
505  
[
apa
:
\s!cite
]
506  
[
\c!left
=
{
[
}
,
507   
\c!right
=
{
]
}
]
508
509
\definebtx
510  
[
apa
:
\s!cite
:
category
]
511  
[
apa
:
\s!cite
]
512
513
\definebtx
514  
[
apa
:
\s!cite
:
url
]
515  
[
apa
:
\s!cite
]
516  
[
\c!left
=
{
(
}
,
517   
\c!right
=
{
)
}
]
518
519
\definebtx
520  
[
apa
:
\s!cite
:
doi
]
521  
[
apa
:
\s!cite
:
url
]
522
523
\definebtx
524  
[
apa
:
\s!cite
:
num
]
525  
[
apa
:
\s!cite
]
526  
[
\c!left
=
{
[
}
,
527   
\c!right
=
{
]
}
,
528   
\c!separator
:
2
=
{
,
}
,
 
% no space
529   
\c!separator
:
3
=
\btxparameter
{
\c!separator
:
2
}
,
530   
\c!separator
:
4
=
\btxparameter
{
\c!separator
:
2
}
]
531
532
\definebtx
533  
[
apa
:
\s!cite
:
textnum
]
534  
[
apa
:
\s!cite
:
num
]
535  
[
\c!left
=
{
Ref
.
\nbsp
}
,
536   
\c!right
=
,
537   
\c!separator
:
2
=
{
\btxcomma
}
,
538   
\c!separator
:
3
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
,
539   
\c!separator
:
4
=
{
\btxspace
\btxlabeltext
{
and
}
\space
}
]
540
541
\definebtx
542  
[
apa
:
\s!cite
:
entry
]
543  
[
apa
:
\s!cite
]
544  
[
\c!left
=
,
545   
\c!right
=
,
546   
\c!inbetween
=
{
\btxspace
}
,
547   
\c!separator
:
2
=
{
\btxsemicolon
}
,
548   
\c!separator
:
3
=
\btxparameter
{
\c!separator
:
2
}
,
549   
\c!separator
:
4
=
\btxparameter
{
\c!separator
:
2
}
]
550
551
% Now we setup for the details of the renderings
552
553
%D Sometimes we have verbose injections in an entry and these can be language
554
%D dependent, so we use labels.
555
%D
556
%D Because we want to mix rendering (in the manual) we need a namespace in label
557
%D texts:
558
559
\setupbtxlabeltext
560  
[
en
]
561  
[
apa
:
number
=
{
No
.
}
,
562   
apa
:
edition
=
{
ed
.
}
,
563   
apa
:
Editor
=
{
Ed
.
}
,
564   
apa
:
Editors
=
{
Eds
.
}
,
565   
apa
:
Volume
=
{
Vol
.
}
,
566   
apa
:
Volumes
=
{
Vols
.
}
,
567   
apa
:
nd
=
{
n
.
d
.
}
,
     
% no date
568   
apa
:
supplement
=
{
Suppl
.
}
,
           
% Supplement (not used?)
569   
apa
:
MotionPicture
=
{
Motion
 
picture
}
,
570   
apa
:
Writer
=
Writer
,
571   
apa
:
Writers
=
Writers
,
572   
apa
:
Producer
=
Producer
,
573   
apa
:
Producers
=
Producers
,
574   
apa
:
Director
=
Director
,
575   
apa
:
Directors
=
Directors
,
576   
apa
:
Recordedby
=
{
Recorded
 
by
}
,
577   
apa
:
Author
=
Author
,
578   
apa
:
Translator
=
{
Trans
.
}
,
           
% Translator(s)
579   
apa
:
Advanced
=
{
Advanced
 
online
 
publication
}
,
580   
apa
:
Retrieved
=
{
Retrieved
 
from
}
]
 
% {Available from}]
581
582
\setupbtxlabeltext
583  
[
nl
]
584  
[
apa
:
number
=
{
Nr
.
}
,
585   
apa
:
edition
=
{
ed
.
}
,
 
% editie
586   
apa
:
Editor
=
Editor
,
 
% Ed./Eds.
587   
apa
:
Editors
=
Editors
,
588   
apa
:
Volume
=
{
Vol
.
}
,
589   
apa
:
Volumes
=
{
Vols
.
}
,
590   
apa
:
nd
=
{
g
.
d
.
}
      
% geen datum
591   
apa
:
supplement
=
Supplement
,
592   
apa
:
MotionPicture
=
Film
,
 
% ?
593   
apa
:
Writer
=
Scenarioschrijver
,
 
% ?
594   
apa
:
Writers
=
Schrijvers
,
 
% ?
595   
apa
:
Producer
=
Producent
,
   
% ?
596   
apa
:
Producers
=
Producents
,
 
% ?
597   
apa
:
Director
=
Directeur
,
598   
apa
:
Directors
=
Directeurs
,
599   
apa
:
Recordedby
=
{
Opgenomen
 
door
}
,
 
% ?
600   
apa
:
Author
=
Auteur
,
601   
apa
:
Translator
=
Vertaler
,
602   
apa
:
Advanced
=
{
Geavanceerde
 
online
 
publicatie
}
,
603   
apa
:
Retrieved
=
{
Ontvangen
 
van
}
]
 
% {Beschikbaar vanaf}]
604
605
\setupbtxlabeltext
606  
[
fr
]
607  
[
apa
:
number
=
{
N
\high
{
o
}}
,
608   
apa
:
edition
=
{
édition
}
,
609   
apa
:
Editor
=
Éditeur
,
610   
apa
:
Editors
=
Éditeurs
,
611   
apa
:
Volume
=
Volume
,
612   
apa
:
Volumes
=
Volumes
,
613   
apa
:
nd
=
{
s
.
d
.
}
,
     
% sans date
614   
apa
:
supplement
=
Supplément
,
615   
apa
:
MotionPicture
=
{
Film
 
cinématographique
}
,
616   
apa
:
Writer
=
Scénariste
,
617   
apa
:
Writers
=
Scénaristes
,
618   
apa
:
Producer
=
Producteur
,
619   
apa
:
Producers
=
Producteurs
,
620   
apa
:
Director
=
Réalisateur
,
621   
apa
:
Directors
=
Réalisateurs
,
622   
apa
:
Recordedby
=
{
Enregistré
 
par
}
,
623   
apa
:
Author
=
Auteur
,
624   
apa
:
Translator
=
Traducteur
,
625   
apa
:
Advanced
=
{
Publication
 
en
 
ligne
 
anticipée
}
,
626   
apa
:
Retrieved
=
{
Téléchargé
 
de
}
]
 
% {Disponible à}]
627
628
\setupbtxlabeltext
629  
[
de
]
630  
[
apa
:
number
=
{
Nr
.
}
,
631   
apa
:
edition
=
Auf
\/
lage
,
632   
apa
:
Editor
=
Herausgeber
,
 
% Hrsg./Hg.
633   
apa
:
Editors
=
Herausgeber
,
634   
apa
:
Volume
=
Band
,
        
% Bd.
635   
apa
:
Volumes
=
{
Bände
}
,
636   
apa
:
nd
=
{
o
.
D
.
}
,
          
% ohne Datum (mostly: o.J. / ohne Jahr)
637   
apa
:
supplement
=
{
Beilage
}
,
          
% Supplement
638   
apa
:
MotionPicture
=
Kinofilm
,
 
% ?
639   
apa
:
Writer
=
Drehbuchautor
,
   
% ?
640   
apa
:
Writers
=
Schriftsteller
,
 
% ?
641   
apa
:
Producer
=
Producer
,
      
% ?
642   
apa
:
Producers
=
Produzenten
,
  
% ?
643   
apa
:
Director
=
Director
,
      
% ?
644   
apa
:
Directors
=
Directors
,
    
% ?
645   
apa
:
Recordedby
=
{
per
 
Einschreiben
}
,
 
% ?
646   
apa
:
Author
=
Autor
,
647   
apa
:
Translator
=
{
Übersetzer
}
,
       
% Übers.
648   
apa
:
Advanced
=
{
Erweiterte
 
Online
-
Publikation
}
,
649   
apa
:
Retrieved
=
{
heruntergeladen
 
von
}
]
650
651
% thanks: Andrea Valle
652
653
\setupbtxlabeltext
654  
[
it
]
655  
[
apa
:
number
=
{
Nº
}
,
656   
apa
:
edition
=
{
ed
.
}
,
 
% edizione
657   
apa
:
Editor
=
{
A
 
cura
 
di
}
,
658   
apa
:
Editors
=
{
A
 
cura
 
di
}
,
659   
apa
:
Volume
=
{
Vol
.
}
,
  
% Volume
660   
apa
:
Volumes
=
{
Vol
.
}
,
 
% Volumi
661   
apa
:
nd
=
{
s
.
d
.
}
,
     
% senza data
662   
apa
:
supplement
=
{
Supplemento
}
,
663   
apa
:
MotionPicture
=
Film
,
 
% ?
664   
apa
:
Writer
=
Sceneggiatore
,
 
% ?
665   
apa
:
Writers
=
Scrittori
,
 
% ?
666   
apa
:
Producer
=
Produttore
,
667   
apa
:
Producers
=
Produttori
,
668   
apa
:
Director
=
Direttore
,
669   
apa
:
Directors
=
Direttori
,
670   
apa
:
Recordedby
=
{
Registrato
 
da
}
,
671   
apa
:
Author
=
Autore
,
672   
apa
:
Translator
=
{
Trad
.
}
,
                        
% Translator(s)
673   
apa
:
Advanced
=
{
Pre
-
pubblicazione
 
on
 
line
}
,
674   
apa
:
Retrieved
=
{
Accessible
 
online
}
]
675
676
\setupbtxlabeltext
677  
[
es
]
678  
[
apa
:
number
=
{
Nº
}
,
679   
apa
:
edition
=
{
ed
.
}
,
 
% edición
680   
apa
:
Editor
=
Editor
,
 
% Ed./Eds.
681   
apa
:
Editors
=
Editores
,
682   
apa
:
Volume
=
{
Vol
.
}
,
   
% Volumen
683   
apa
:
Volumes
=
{
Vols
.
}
,
 
% Volúmenes
684   
apa
:
nd
=
{
s
.
f
.
}
,
     
% sin fecha
685   
apa
:
supplement
=
Suplemento
,
686   
apa
:
MotionPicture
=
Cinematográfica
,
687   
apa
:
Writer
=
Guionista
,
 
% ?
688   
apa
:
Writers
=
Escritores
,
 
% ?
689   
apa
:
Producer
=
Productor
,
690   
apa
:
Producers
=
Productores
,
691   
apa
:
Director
=
Director
,
692   
apa
:
Directors
=
Directores
,
693   
apa
:
Recordedby
=
{
Grabada
 
por
}
,
694   
apa
:
Author
=
Autor
,
695   
apa
:
Translator
=
Traductor
,
696   
apa
:
Advanced
=
{
Publicación
 
en
 
línea
 
avanzada
}
,
697   
apa
:
Retrieved
=
{
Obtenido
 
de
}
]
 
% {Disponible desde}]
698
699
700
\setupbtxlabeltext
701  
[
sv
]
702  
[
apa
:
number
=
{
nr
.
}
,
703   
apa
:
edition
=
{
Utgåva
}
,
704   
apa
:
Editor
=
Redaktör
,
705   
apa
:
Editors
=
Redaktörer
,
706   
apa
:
Volume
=
Band
,
707   
apa
:
Volumes
=
Band
,
708   
apa
:
nd
=
{
u
.
å
.
}
,
                  
% utan årtal
709   
apa
:
supplement
=
Bilaga
,
          
% Supplement
710   
apa
:
MotionPicture
=
Spelfilm
,
     
% ?
711   
apa
:
Writer
=
{
Manusförfattare
}
,
   
% Assuming for a movie
712   
apa
:
Writers
=
{
Manusförfattare
}
,
  
%
713   
apa
:
Producer
=
Producent
,
         
% Assuming for a movie
714   
apa
:
Producers
=
Producenter
,
      
%
715   
apa
:
Director
=
{
Regissör
}
,
        
% Assuming for a movie
716   
apa
:
Directors
=
{
Regissörer
}
,
     
%
717   
apa
:
Recordedby
=
{
Inspelad
 
av
}
,
   
% Assuming for a movie
718   
apa
:
Author
=
{
Författare
}
,
719   
apa
:
Translator
=
{
Översättare
}
,
720   
apa
:
Advanced
=
{
Avancerad
 
onlinepublikation
}
,
 
% ?
721   
apa
:
Retrieved
=
{
Hämtad
 
från
}
]
722
723
% cite setups
724
725
% The following differs from the default returning n.d. if year is empty
726
727
\startsetups
 
btx
:
apa
:
cite
:
author
:
year
728    
\ifx
\currentbtxfirst
\empty
729        
\def
\currentbtxfirst
{
\fastsetup
{
\s!btx
:
apa
:
nd
}}
730    
\fi
731    
\fastsetup
{
\s!btx
:
\s!cite
:
author
:
year
}
732
\stopsetups
733
734
\startsetups
 
btx
:
apa
:
cite
:
author
:
years
735    
\ifx
\currentbtxfirst
\empty
736        
\def
\currentbtxfirst
{
\fastsetup
{
\s!btx
:
apa
:
nd
}}
737    
\fi
738    
\fastsetup
{
\s!btx
:
\s!cite
:
author
:
years
}
739
\stopsetups
740
741
% these setups need to be explicitly defined in order to get cite rendering
742
743
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
organization
744    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
745
\stopsetups
746
747
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
subtitle
748    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
749
\stopsetups
750
751
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
booktitle
752    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
753
\stopsetups
754
755
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
subbooktitle
756    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
757
\stopsetups
758
759
% are these needed?
760
761
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
title
:
inbook
762    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
763
\stopsetups
764
765
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
title
:
incollection
766    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
767
\stopsetups
768
769
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
title
:
inproceedings
770    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
771
\stopsetups
772
773
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
subtitle
:
inbook
774    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
775
\stopsetups
776
777
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
subtitle
:
incollection
778    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
779
\stopsetups
780
781
\startsetups
 
\s!btx
:
apa
:
\s!cite
:
subtitle
:
inproceedings
782    
\fastsetup
{
\s!btx
:
\s!cite
:
normal
}
783
\stopsetups
784
785
% used in publ-imp-page.mkvi
786
787
\startsetups
 
btx
:
apa
:
list
:
page
-
or
-
pages
788    
\ifx
\currentbtxlastpage
\empty
789        
\btxlabeltext
{
p
}
790    
\else
791        
\btxlabeltext
{
pp
}
792    
\fi
793    
\btxnbsp
794
\stopsetups
795
796
% The sameauthor feature may not be APA compliant
797
% (there is nothing in the manual cited above).
798
% It can be removed using the command:
799
% \resetsetups [apa:list:sameauthor]
800
801
% :rule, :empty or :ditto ...
802
803
\startsetups
 
apa
:
list
:
sameauthor
804    
\fastsetup
{
apa
:
list
:
sameauthor
:
rule
}
805
\stopsetups
806
807
\startsetups
 
apa
:
list
:
sameauthor
:
rule
808    
\blackrule
809      
[
\c!width
=
\dimexpr
\listparameter
\c!margin
-
\interwordspace
\relax
,
810       
\c!height
=
1
.
5
\linewidth
]
% \linewidth is just too thin with respect to font strokes...
811
\stopsetups
812
813
\startsetups
 
[
apa
:
list
:
sameauthor
:
\v!empty
]
814    
\kern\dimexpr
\listparameter
\c!margin
-
\interwordspace
\relax
815
\stopsetups
816
817
% horrible !
818
819
\startsetups
 
apa
:
list
:
sameauthor
:
ditto
820    
\inframed
821      
[
\c!width
=
\dimexpr
\listparameter
\c!margin
-
\interwordspace
\relax
,
822       
\c!frame
=
\v!off
,
823       
\c!align
=
\v!middle
]
824      
{
\doubleprime
}
825
\stopsetups
826
827
%D Instead of texdefinitions without arguments, we could have used setups but in my
828
%D editor (hh, scite) the commands stand out better. It also saves an additional
829
%D component in the name (e.g. common:) because commands and setups have a different
830
%D namespace, so similar calls don't clash. Performance of definitions is somewhat
831
%D better.
832
833
%D We use "texdefinitions" (with eventual arguments) for helpers that are used
834
%D in the rendering "setups" defined for each category below.
835
836
%D Note that \btxdoif... and \btxflush rely on the definitions in
837
%D publ-imp-apa.lua: fields that are not listed as required nor optional are
838
%D IGNORED. We also make heavy use of the notion of sets - comma-separated lists
839
%D of alternative fields to be used in hierarchal order. For example:
840
%D author = { "author", "editor", "publisher", "title" }, will return the
841
%D author field if it exists; if not, the editor field will be returned, if it
842
%D exists; if not, the publisher field will be returned, if it exists; if not,
843
%D the title field will be returned, it it exists; if not, nothing will be
844
%D returned. In lua syntax, it can be understood as
845
%D author or editor or publisher or title or ""
846
847
% #title can be title or booktitle
848
849
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
translated
-
title
 
#
title
850    
\ifx
\currentbtxlanguage
\empty
851        
% no need for an extra
852    
\else\ifx
\mainbtxlanguage
\currentbtxlanguage
853        
% no need for an extra
854    
\else
855        
\btxdoif
 
{
#
title
:
\mainbtxlanguage
}
 
{
856            
\begingroup
857                
\language
[
\mainbtxlanguage
]
858                
\btxleftbracket
859                
\btxusecommand
 
[
apa
:
\s!list
:
#
title
:
\currentbtxcategory
]
 
{
860                    
\btxflush
{
#
title
:
\mainbtxlanguage
}
861                
}
862                
\btxrightbracket
863            
\endgroup
864        
}
865    
\fi\fi
866
\stoptexdefinition
867
868
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
composed
-
title
 
#
title
869    
\btxstartstyleandcolor
[
apa
:
\s!list
:
#
title
:
\currentbtxcategory
]
870        
\begingroup
871            
\language
[
\currentbtxlanguage
]
872            
\btxusecommand
 
[
apa
:
\s!list
:
#
title
:
\currentbtxcategory
]
 
{
873                
\btxflush
{
#
title
}
874                
\btxdoif
 
{
sub
#
title
}
 
{
875                    
\btxcolon
876                    
\btxflush
{
sub
#
title
}
877                
}
878            
}
879        
\endgroup
880        
% which namespace?
881        
%\doif{\btxparameter{translate}}\v!yes {
882            
\texdefinition
{
btx
:
apa
:
translated
-
title
}{
#
title
}
883        
%}
884    
\btxstopstyleandcolor
885
\stoptexdefinition
886
887
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
title
888    
\setmode
{
btx
:
apa
:
title
-
placed
}
889    
% we make the title active, opening "file"
890    
\btxdoifelse
 
{
file
}
 
{
891        
\texdefinition
{
btx
:
format
:
inject
}
892            
{
url
(
file
:
\btxflush
{
file
}
)
}
893            
{
894                
\texdefinition
{
btx
:
apa
:
composed
-
title
}{
title
}
895            
}
896    
}
 
{
897        
\texdefinition
{
btx
:
apa
:
composed
-
title
}{
title
}
898    
}
899    
\btxdoif
 
{
title
}
 
{
900        
% A book might have an editor AND an author
901        
\doif
 
{
\currentbtxcategory
}
 
{
book
}
 
{
902            
\doifnot
 
{
\btxfoundname
{
author
}}
 
{
editor
}
 
{
903                
\btxdoif
 
{
ineditor
}
 
{
 
% ineditor specific authorconversion
904                    
\btxleftparenthesis
905                    
\btxflush
{
ineditor
}
906                    
\btxcomma
907                    
\btxsingularorplural
 
{
ineditor
}
 
{
908                        
\btxlabeltext
{
apa
:
Editor
}
909                    
}
 
{
910                        
\btxlabeltext
{
apa
:
Editors
}
911                    
}
912                    
\btxrightparenthesis
913                
}
914            
}
915        
}
916        
\btxdoif
 
{
translator
}
 
{
917            
\btxleftparenthesis
918                
\btxflush
{
translator
}
919                
\btxcomma
920                
\btxlabeltext
{
apa
:
Translator
}
921            
\btxrightparenthesis
922        
}
923        
\btxperiod
924        
% TODO: this period may NOT be wanted, as in: Title (2nd ed.).
925    
}
926
\stoptexdefinition
927
928
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
title
-
if
-
not
-
placed
929    
\doifelsemode
 
{
btx
:
apa
:
title
-
placed
}
 
{
930        
\resetmode
{
btx
:
apa
:
title
-
placed
}
931    
}
 
{
932        
\btxdoif
 
{
title
}
 
{
933            
\btxspace
934            
\texdefinition
 
{
btx
:
apa
:
title
}
935        
}
936    
}
937
\stoptexdefinition
938
939
\startsetups
 
btx
:
apa
:
nd
940    
\btxlabeltext
{
apa
:
nd
}
941
\stopsetups
942
943
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
suffixedyear
944    
\btxdoifelse
 
{
year
}
 
{
945        
\btxflush
{
year
}
946        
\btxflushsuffix
947        
\btxdoif
 
{
month
}
 
{
 
% month and day optional in publ-imp-apa.lua
948            
\btxcomma
949            
\btxflush
{
month
}
950            
\btxdoif
 
{
day
}
 
{
951                
\btxspace
952                
\btxflush
{
day
}
953            
}
954        
}
955    
}
 
{
956        
\fastsetup
{
btx
:
apa
:
nd
}
957        
% Hans: the following won't work but should.
958        
\btxdoif
 
{
suffix
}
 
{
959            
\btxspace
960            
\btxflushsuffix
961            
% Hans: similarly, why can't \btxflush{suffix} be made to work?
962        
}
963    
}
964
\stoptexdefinition
965
966
% #author may be author(set) or editor
967
968
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
author
-
or
-
editor
 
#
author
969    
\btxdoifelse
 
{
#
author
}
 
{
970        
\btxstartstyleandcolor
[
apa
:
\s!list
:
#
author
]
971            
\btxusecommand
[
apa
:
\s!list
:
#
author
]
{
972                
\btxflush
{
#
author
}
973            
}
974        
\btxstopstyleandcolor
975        
% use \processaction [] [] here?
976        
\doifelse
 
{
\btxfoundname
{
#
author
}}
 
{
editor
}
 
{
977            
\btxleftparenthesis
978            
\btxsingularorplural
 
{
editor
}
 
{
979                
\btxlabeltext
{
apa
:
Editor
}
980            
}
 
{
981                
\btxlabeltext
{
apa
:
Editors
}
982            
}
983            
\btxrightparenthesis
984        
}
 
{
\doif
 
{
\btxfoundname
{
#
author
}}
 
{
ineditor
}
 
{
985            
\btxleftparenthesis
986            
\btxsingularorplural
 
{
ineditor
}
 
{
987                
\btxlabeltext
{
apa
:
Editor
}
988            
}
 
{
989                
\btxlabeltext
{
apa
:
Editors
}
990            
}
991            
\btxrightparenthesis
992        
}
 
}
993        
\doif
 
{
\currentbtxcategory
}
 
{
film
}
 
{
994            
\btxleftparenthesis
995            
\doifelse
 
{
\btxfoundname
{
#
author
}}
 
{
director
}
 
{
996                
\btxsingularorplural
 
{
director
}
 
{
997                    
\btxlabeltext
{
apa
:
Director
}
998                
}
 
{
999                    
\btxlabeltext
{
apa
:
Directors
}
1000                
}
1001            
}
 
{
1002                
\doif
 
{
\btxfoundname
{
#
author
}}
 
{
author
}
 
{
1003                    
\btxsingularorplural
 
{
author
}
 
{
1004                        
\btxlabeltext
{
apa
:
Writer
}
1005                    
}
 
{
1006                        
\btxlabeltext
{
apa
:
Writers
}
1007                    
}
1008                
}
1009                
\doif
 
{
\btxfoundname
{
#
author
}}
 
{
producer
}
 
{
1010                    
\btxsingularorplural
 
{
producer
}
 
{
1011                        
\btxlabeltext
{
apa
:
Producer
}
1012                    
}
 
{
1013                        
\btxlabeltext
{
apa
:
Producers
}
1014                    
}
1015                
}
1016                
\btxdoif
 
{
director
}
 
{
1017                    
\btxrightparenthesis
1018                    
\removeunwantedspaces
1019                    
\btxparameter
{
\c!separator
:
names
:
3
}
1020                    
\btxstartstyleandcolor
[
apa
:
\s!list
:
director
]
1021                        
\btxusecommand
[
apa
:
\s!list
:
director
]
{
1022                            
\btxflush
{
director
}
1023                        
}
1024                    
\btxstopstyleandcolor
1025                    
\btxleftparenthesis
1026                    
\btxsingularorplural
 
{
director
}
 
{
1027                        
\btxlabeltext
{
apa
:
Director
}
1028                    
}
 
{
1029                        
\btxlabeltext
{
apa
:
Directors
}
1030                    
}
1031                
}
1032            
}
1033            
\btxrightparenthesis
1034        
}
1035        
\btxdoif
 
{
withauthor
}
 
{
1036            
\btxleftparenthesis
1037            
\btxlabeltext
{
with
}
1038            
\btxspace
1039            
\btxstartstyleandcolor
[
apa
:
\s!list
:
withauthor
]
1040                
\btxusecommand
[
apa
:
\s!list
:
withauthor
]
{
1041                    
\btxflush
{
withauthor
}
1042                
}
1043            
\btxstopstyleandcolor
1044            
\btxrightparenthesis
1045        
}
1046    
}
 
{
1047        
\texdefinition
{
btx
:
apa
:
title
}
1048    
}
1049
\stoptexdefinition
1050
1051
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
authoryear
1052    
% we make the authoryear active, pointing to the citation
1053    
\texdefinition
{
btx
:
format
:
inject
}
1054        
{
internal
(
\currentbtxinternal
)
}
1055        
{
1056            
\doifelsesetups
{
apa
:
list
:
sameauthor
}
 
{
1057                
\btxdoifelsesameasprevious
 
{
author
}
 
{
1058                    
\fastsetup
{
apa
:
list
:
sameauthor
}
1059                
}
 
{
1060                    
\texdefinition
{
btx
:
apa
:
author
-
or
-
editor
}
 
{
author
}
1061                
}
1062            
}
 
{
1063                
\texdefinition
{
btx
:
apa
:
author
-
or
-
editor
}
 
{
author
}
1064            
}
1065            
\btxleftparenthesis
1066            
\texdefinition
{
btx
:
apa
:
suffixedyear
}
1067            
\btxrightparenthesis
1068        
}
1069    
% outside of interaction
1070    
\btxperiod
1071    
\doif
 
{
\btxfoundname
{
author
}}
 
{
title
}
 
{
1072        
\setmode
{
btx
:
apa
:
title
-
placed
}
1073    
}
1074
\stoptexdefinition
1075
1076
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
editor
-
in
1077    
\btxdoif
 
{
booktitle
}
 
{
1078        
\btxlabeltext
{
In
}
1079        
\btxspace
1080        
\doifnot
 
{
\btxfoundname
{
author
}}
 
{
editor
}
 
{
1081            
\texdefinition
{
btx
:
apa
:
author
-
or
-
editor
}
 
{
ineditor
}
1082            
\btxcomma
1083        
}
1084        
\texdefinition
{
btx
:
apa
:
composed
-
title
}{
booktitle
}
1085        
\btxperiod
1086    
}
1087
\stoptexdefinition
1088
1089
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
organization
-
if
-
not
-
author
1090    
\btxdoif
 
{
organization
}
 
{
1091        
\doifnot
 
{
\btxfoundname
{
author
}}
 
{
organization
}
 
{
1092            
\btxspace
1093            
\btxflush
{
organization
}
1094            
\btxcomma
1095        
}
1096    
}
1097
\stoptexdefinition
1098
1099
% TODO: The title is terminated with period. However,
1100
% we probably don't want this before the parenthesis.
1101
1102
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
leftparenthesis
-
or
-
comma
1103    
\doifelsemode
 
{
btx
:
apa
:
editionset
-
is
-
empty
}
 
{
1104        
\btxleftparenthesis
1105        
\resetmode
{
btx
:
apa
:
editionset
-
is
-
empty
}
1106    
}
 
{
1107        
\btxcomma
1108    
}
1109
\stoptexdefinition
1110
1111
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
editionset
1112    
\setmode
{
btx
:
apa
:
editionset
-
is
-
empty
}
1113    
\doif
 
{
\currentbtxcategory
}
 
{
techreport
}
 
{
1114        
\texdefinition
{
btx
:
apa
:
leftparenthesis
-
or
-
comma
}
1115        
\btxdoifelse
 
{
type
}
 
{
1116            
\btxusecommand
 
[
apa
:
\s!list
:
type
]
 
{
1117                
\btxflush
{
type
}
1118            
}
1119        
}
 
{
1120            
\btxlabeltext
{
technicalreport
}
1121        
}
1122    
}
1123    
\btxdoif
 
{
volume
}
 
{
1124        
\texdefinition
{
btx
:
apa
:
leftparenthesis
-
or
-
comma
}
1125        
\btxoneorrange
 
{
volume
}
 
{
1126            
\btxlabeltext
{
apa
:
Volume
}
1127        
}
 
{
1128            
\btxlabeltext
{
apa
:
Volumes
}
1129        
}
1130        
\btxspace
1131        
\btxflush
{
volume
}
1132    
}
1133    
\btxdoif
 
{
number
}
 
{
1134        
\texdefinition
{
btx
:
apa
:
leftparenthesis
-
or
-
comma
}
1135        
\btxlabeltext
{
apa
:
number
}
1136        
\btxspace
1137        
\btxflush
{
number
}
1138    
}
1139    
\btxdoif
 
{
edition
}
 
{
1140        
\texdefinition
{
btx
:
apa
:
leftparenthesis
-
or
-
comma
}
1141        
\btxflush
{
edition
}
1142        
\btxspace
1143        
\btxlabeltext
{
apa
:
edition
}
1144    
}
1145    
\btxdoif
 
{
pages
}
 
{
1146        
\texdefinition
{
btx
:
apa
:
leftparenthesis
-
or
-
comma
}
1147        
\btxoneorrange
 
{
pages
}
 
{
1148            
\btxlabeltext
{
p
}
1149        
}
 
{
1150            
\btxlabeltext
{
pp
}
1151        
}
1152        
\btxnbsp
1153        
\btxflush
{
pages
}
1154    
}
1155    
\doifnotmode
 
{
btx
:
apa
:
editionset
-
is
-
empty
}
 
{
1156        
\btxrightparenthesisperiod
1157    
}
1158
\stoptexdefinition
1159
1160
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
journal
1161    
\btxstartstyleandcolor
[
apa
:
\s!list
:
journal
]
1162        
\btxusecommand
 
[
apa
:
\s!list
:
journal
]
 
{
1163            
\btxflush
{
journal
}
1164        
}
1165    
\btxstopstyleandcolor
1166
\stoptexdefinition
1167
1168
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
volume
1169    
\btxstartstyleandcolor
[
apa
:
\s!list
:
volume
]
1170        
\btxflush
{
volume
}
1171    
\btxstopstyleandcolor
1172
\stoptexdefinition
1173
1174 
% this could be simplified!
1175
1176
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
journal
-
volume
-
number
-
pages
1177    
\btxdoif
 
{
journal
}
 
{
1178        
\btxspace
1179        
\texdefinition
{
btx
:
apa
:
journal
}
1180        
\btxdoifelse
 
{
volume
}
 
{
1181            
\btxcomma
1182            
\texdefinition
{
btx
:
apa
:
volume
}
1183            
\btxdoif
 
{
number
}
 
{
1184                
%\btxleftparenthesis
1185                
(
\btxflush
{
number
}
1186                
\btxrightparenthesis
1187            
}
1188        
}
 
{
1189            
\btxdoif
 
{
number
}
 
{
1190                
\btxcomma
1191                
\btxleftparenthesis
1192                
\btxflush
{
number
}
1193                
\btxrightparenthesis
1194            
}
1195        
}
1196        
\btxdoif
 
{
pages
}
 
{
1197            
\btxcomma
1198            
\doif
 
{
\currentbtxcategory
}
 
{
newspaper
}
 
{
1199                
\btxoneorrange
 
{
pages
}
 
{
1200                    
\btxlabeltext
{
p
}
1201                
}
 
{
1202                    
\btxlabeltext
{
pp
}
1203                
}
1204                
\btxnbsp
1205            
}
1206            
\btxflush
{
pages
}
1207        
}
1208        
\btxperiod
1209        
\doifnot
 
{
\currentbtxcategory
}
 
{
newspaper
}
 
{
1210            
\btxdoifnot
 
{
volume
}
 
{
1211                
\btxdoifnot
 
{
number
}
 
{
1212                    
\btxdoifnot
 
{
pages
}
 
{
1213                        
\btxdoif
 
{
doi
}
 
{
%set: doi or url
1214                            
\btxspace
1215                            
\btxlabeltext
{
apa
:
Advanced
}
1216                            
\btxperiod
1217                        
}
1218                    
}
1219                
}
1220            
}
1221        
}
1222    
}
1223
\stoptexdefinition
1224
1225
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
wherefrom
-
publisher
1226    
\btxdoifelse
 
{
address
}
 
{
1227        
\btxflush
{
address
}
1228        
\btxdoif
 
{
country
}
 
{
1229            
\btxcomma
1230            
\btxflush
{
country
}
1231        
}
1232        
\btxcolon
1233    
}
 
{
1234        
\btxdoif
 
{
country
}
 
{
1235            
\btxflush
{
country
}
1236            
\btxcolon
1237        
}
1238    
}
1239    
\doifelse
 
{
\btxfoundname
{
author
}}
 
{
\btxfoundname
{
publisher
}}
 
{
1240        
\btxlabeltext
{
apa
:
Author
}
1241    
}
 
{
1242        
\btxdoifelse
 
{
publisher
}
 
{
1243            
\btxflush
{
publisher
}
1244        
}
 
{
1245            
\btxlabeltext
{
apa
:
Author
}
1246        
}
1247    
}
1248    
\btxperiod
1249
\stoptexdefinition
1250
1251
\definebreakpoints
[
doi
]
1252
\definebreakpoint
 
[
doi
][
:
][
nleft
=
3
,
type
=
1
]
1253
\definebreakpoint
 
[
doi
][
/
][
nleft
=
3
,
type
=
1
]
1254
\definebreakpoint
 
[
doi
][
-
][
nleft
=
3
,
type
=
1
]
1255
\definebreakpoint
 
[
doi
][
.
][
nleft
=
3
,
type
=
1
]
1256
1257
% use \btxentry here?
1258
1259
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
url
1260    
\begingroup
1261        
\setbreakpoints
[
doi
]
1262        
\ifconditional
\btxinteractive
1263            
\goto
 
{
1264                
\hyphenatedurl
{
\btxflush
{
url
}}
1265            
}
 
[
1266                
url
(
\btxflush
{
url
}
)
1267            
]
1268        
\else
1269            
\hyphenatedurl
{
\btxflush
{
url
}}
1270        
\fi
1271    
\endgroup
1272
\stoptexdefinition
1273
1274
% use \btxentry here?
1275
1276
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
doi
1277    
\begingroup
1278        
\setbreakpoints
[
doi
]
1279        
\ifconditional
\btxinteractive
1280            
\goto
 
{
1281                
\hyphenatedurl
{
doi
:
\btxflush
{
doi
}}
1282            
}
 
[
1283                
url
(
http
:
//
dx
.
doi
.
org
/
\btxflush
{
doi
}
)
1284            
]
1285        
\else
1286            
\hyphenatedurl
{
doi
:
\btxflush
{
doi
}}
1287        
\fi
1288    
\endgroup
1289
\stoptexdefinition
1290
1291
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
note
1292    
\btxdoif
 
{
note
}
 
{
1293        
\btxleftparenthesis
1294        
\btxflush
{
note
}
1295        
\btxrightparenthesis
1296    
}
1297
\stoptexdefinition
1298
1299
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
url
-
doi
-
note
1300    
\doif
 
{
\btxfoundname
{
doi
}}
 
{
url
}
 
{
1301        
\btxspace
1302        
\btxlabeltext
{
apa
:
Retrieved
}
1303        
\btxspace
1304        
\texdefinition
{
btx
:
apa
:
url
}
1305    
}
1306    
\doif
 
{
\btxfoundname
{
doi
}}
 
{
doi
}
 
{
1307        
\btxspace
1308        
\texdefinition
{
btx
:
apa
:
doi
}
1309    
}
1310    
\texdefinition
{
btx
:
apa
:
note
}
1311    
\removeunwantedspaces
1312
\stoptexdefinition
1313
1314
\starttexdefinition
 
unexpanded
 
btx
:
apa
:
type
1315    
\btxdoif
 
{
type
}
 
{
1316        
\btxleftbracket
1317        
\btxflush
{
type
}
1318        
\btxrightbracketperiod
1319    
}
1320
\stoptexdefinition
1321
1322
% Then setups, by category
1323
1324
% An article from a journal
1325
% Required fields: author or organization or editor or title, journal, (year).
1326
% Optional fields: volume, number, pages, type, doi, url, note.
1327
% Note that bibtex (and tools) do not include editor (e.g. special issue or section)
1328
1329
\startsetups
 
btx
:
apa
:
list
:
article
1330    
\texdefinition
{
btx
:
apa
:
authoryear
}
1331    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1332    
\texdefinition
{
btx
:
apa
:
type
}
1333    
\texdefinition
{
btx
:
apa
:
journal
-
volume
-
number
-
pages
}
1334    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1335
\stopsetups
1336
1337
% An article from a magazine.
1338
% Required fields: author or title, journal, (year).
1339
% Optional fields: number, pages, type, month, day, doi, url, note.
1340
1341
\startsetups
 
btx
:
apa
:
list
:
magazine
1342    
\fastsetup
{
btx
:
apa
:
list
:
article
}
1343
\stopsetups
1344
1345
% An article from a newspaper.
1346
% Required fields: author or title, journal, (year).
1347
% Optional fields: volume, number, pages, type, month, day, doi, url, note.
1348
1349
\startsetups
 
btx
:
apa
:
list
:
newspaper
1350    
\fastsetup
{
btx
:
apa
:
list
:
article
}
1351
\stopsetups
1352
1353
% A complete issue of a periodical, such as a special issue of a journal.
1354
% Required fields: title, year
1355
% Optional fields: editor, publisher, subtitle, series, volume, number, month, organization, doi, url, issn, note
1356
1357
% needs to be tuned...
1358
1359
\startsetups
 
btx
:
apa
:
list
:
periodical
1360    
\fastsetup
{
btx
:
apa
:
list
:
article
}
1361
\stopsetups
1362
1363
% National and international standards issued by a standards body
1364
% Required fields: author, institution, or organization, year, title
1365
% Optional fields: subtitle, doi, url, note
1366
1367
\startsetups
 
btx
:
apa
:
list
:
standard
1368    
\texdefinition
{
btx
:
apa
:
authoryear
}
1369    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1370    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1371
\stopsetups
1372
1373
% A book with an explicit publisher.
1374
% Required fields: author or editor or publisher, title, (year).
1375
% Optional fields: volume or number, series, address, edition, month, day, note.
1376
% APA ignores: month, day
1377
1378
% todo: series?
1379
1380
\startsetups
 
btx
:
apa
:
list
:
book
1381    
\texdefinition
{
btx
:
apa
:
authoryear
}
1382    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1383    
\texdefinition
{
btx
:
apa
:
type
}
1384    
\texdefinition
{
btx
:
apa
:
editionset
}
1385    
\texdefinition
{
btx
:
apa
:
wherefrom
-
publisher
}
1386    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1387
\stopsetups
1388
1389
% There is some debate about how inbook should differ from incollection
1390
1391
% A part of a book, which may be a chapter (or section or whatever) and/or a range of pages.
1392
% (note that inbook is handled differently by bibtex and biblatex)
1393
% Required fields: author or editor, title, chapter and/or pages, publisher, year.
1394
% Optional fields: volume or number, series, type, address, edition, month, note.
1395
% We add optional: booktitle.
1396
% APA ignores: chapter, month
1397
1398
\startsetups
 
btx
:
apa
:
list
:
inbook
1399    
\texdefinition
{
btx
:
apa
:
authoryear
}
1400    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1401    
\texdefinition
{
btx
:
apa
:
type
}
1402    
\texdefinition
{
btx
:
apa
:
editor
-
in
}
1403    
\texdefinition
{
btx
:
apa
:
editionset
}
1404    
\texdefinition
{
btx
:
apa
:
wherefrom
-
publisher
}
1405    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1406
\stopsetups
1407
1408
% A part of a book having its own title.
1409
% Required fields: author, title, booktitle, publisher, year.
1410
% Optional fields: editor, volume or number, series, type, chapter, pages, address, edition, month, note.
1411
% APA ignores: chapter, month
1412
1413
\startsetups
 
btx
:
apa
:
list
:
incollection
1414    
\fastsetup
{
btx
:
apa
:
list
:
inbook
}
1415
\stopsetups
1416
1417
% The proceedings of a conference.
1418
% Required fields: title, year.
1419
% Optional fields: editor, volume or number, series, address, month, organization, publisher, note.
1420
% todo: series?
1421
1422
\startsetups
 
btx
:
apa
:
list
:
proceedings
1423    
\fastsetup
{
btx
:
apa
:
list
:
book
}
1424
\stopsetups
1425
1426
% An article in a conference proceedings.
1427
% Required fields: author, title, booktitle, year.
1428
% Optional fields: editor, volume or number, series, pages, address, month, organization, publisher, note.
1429
1430
\startsetups
 
btx
:
apa
:
list
:
inproceedings
1431    
\texdefinition
{
btx
:
apa
:
authoryear
}
1432    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1433    
\texdefinition
{
btx
:
apa
:
editor
-
in
}
1434    
\texdefinition
{
btx
:
apa
:
editionset
}
1435    
\texdefinition
{
btx
:
apa
:
organization
-
if
-
not
-
author
}
1436    
\texdefinition
{
btx
:
apa
:
wherefrom
-
publisher
}
1437    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1438
\stopsetups
1439
1440
\startsetups
 
btx
:
apa
:
list
:
conference
1441    
\fastsetup
{
btx
:
apa
:
list
:
inproceedings
}
1442
\stopsetups
1443
1444
% A thesis.
1445
% Required fields: author, title, school, year.
1446
% Optional fields: type, address, month, note.
1447
1448
\startsetups
 
btx
:
apa
:
list
:
thesis
1449    
\texdefinition
{
btx
:
apa
:
authoryear
}
1450    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1451    
\btxleftparenthesis
1452    
\btxdoifelse
 
{
type
}
 
{
1453        
\btxusecommand
 
[
apa
:
\s!list
:
type
]
 
{
1454            
\btxflush
{
type
}
1455        
}
1456    
}
 
{
1457        
\btxlabeltext
{
\currentbtxcategory
}
1458    
}
1459    
\btxrightparenthesis
1460    
\btxdoif
 
{
school
}
 
{
1461        
\btxperiod
1462        
\btxflush
{
school
}
1463    
}
1464    
\btxdoif
 
{
address
}
 
{
1465        
\btxdoifelse
 
{
school
}
 
{
1466            
\btxcomma
1467        
}
 
{
1468            
\btxperiod
1469        
}
1470        
\btxflush
{
address
}
1471        
\btxdoif
 
{
country
}
 
{
1472            
\btxcomma
1473            
\btxflush
{
country
}
1474        
}
1475    
}
1476    
\btxperiod
1477    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1478
\stopsetups
1479
1480
\startsetups
 
btx
:
apa
:
list
:
phdthesis
1481    
\fastsetup
{
btx
:
apa
:
list
:
thesis
}
1482
\stopsetups
1483
1484
\startsetups
 
btx
:
apa
:
list
:
mastersthesis
1485    
\fastsetup
{
btx
:
apa
:
list
:
thesis
}
1486
\stopsetups
1487
1488
% A work that is printed and bound, but without a named publisher or sponsoring institution.
1489
% Required field: title.
1490
% Optional fields: author, howpublished, address, month, year, note.
1491
1492
\startsetups
 
btx
:
apa
:
list
:
booklet
1493    
\fastsetup
{
btx
:
apa
:
list
:
book
}
1494
\stopsetups
1495
1496
% Technical documentation.
1497
% Required field: title.
1498
% Optional fields: author, organization, address, edition, month, year, note.
1499
1500
\startsetups
 
btx
:
apa
:
list
:
manual
1501    
\fastsetup
{
btx
:
apa
:
list
:
book
}
1502
\stopsetups
1503
1504
% A report published by a school or other institution, usually numbered within a series.
1505
% Required fields: author, title, institution, year.
1506
% Optional fields: type, number, address, month, note.
1507
1508
\startsetups
 
btx
:
apa
:
list
:
techreport
1509    
\fastsetup
{
btx
:
apa
:
list
:
book
}
1510
\stopsetups
1511
1512
% A document having an author and title, but not formally published.
1513
% Required fields: author, title, note.
1514
% Optional fields: month, year.
1515
1516
\startsetups
 
btx
:
apa
:
list
:
unpublished
1517    
\fastsetup
{
btx
:
apa
:
list
:
book
}
1518
\stopsetups
1519
1520
% A patent. Note that this category was not defined with BIBTEX. Below from JabRef:
1521
% Required fields: nationality, number, year, yearfiled
1522
% Optional fields: author, title, assignee, address, type, number, day, dayfiled, month, monthfiled, note, url
1523
% Also optional: publisher
1524
1525
% todo: yearfiled, monthfiled, dayfiled
1526
1527
\startsetups
 
btx
:
apa
:
list
:
patent
1528    
\texdefinition
{
btx
:
apa
:
authoryear
}
1529    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1530    
\begingroup
1531        
\it
1532        
\btxdoif
 
{
nationality
}
 
{
1533            
\btxspace
1534            
\btxflush
{
nationality
}
1535        
}
1536        
\btxspace
1537        
\btxdoifelse
{
type
}{
1538            
\btxflush
{
type
}
1539        
}{
1540            
\btxlabeltext
{
patent
}
1541        
}
1542        
\btxdoif
 
{
number
}
 
{
1543            
\btxspace
1544            
\btxlabeltext
{
apa
:
number
}
1545            
\btxspace
1546            
\btxflush
{
number
}
1547        
}
1548        
\btxperiod
1549        
\italiccorrection
1550    
\endgroup
1551    
\texdefinition
{
btx
:
apa
:
wherefrom
-
publisher
}
1552    
\texdefinition
{
btx
:
apa
:
url
}
1553    
\texdefinition
{
btx
:
apa
:
note
}
1554
\stopsetups
1555
1556
% Electronic. Note that this category was not defined with BIBTEX. Below from JabRef:
1557
% Required fields: title
1558
% Optional fields: address, author, howpublished, month, note, organization, url, year, doi
1559
% Also optional: type
1560
1561
% Like Misc below but includes organization.
1562
1563
\startsetups
 
btx
:
apa
:
list
:
electronic
1564    
\texdefinition
{
btx
:
apa
:
authoryear
}
1565    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1566    
\texdefinition
{
btx
:
apa
:
type
}
1567    
\texdefinition
{
btx
:
apa
:
organization
-
if
-
not
-
author
}
1568    
\btxdoif
 
{
howpublished
}
 
{
1569        
\btxspace
1570        
\btxflush
{
howpublished
}
1571        
\btxperiod
1572    
}
1573    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1574
\stopsetups
1575
1576
% Film. Note that this category was not defined with BIBTEX.
1577
% Required fields: producer, director, title, year, address, publisher
1578
% Optional fields: subtitle, type, note, url, doi
1579
1580
\startsetups
 
btx
:
apa
:
list
:
film
1581    
\texdefinition
{
btx
:
apa
:
authoryear
}
1582    
\texdefinition
 
{
btx
:
apa
:
title
}
1583    
\btxleftbracket
1584        
\btxdoifelse
 
{
type
}
 
{
1585            
\btxflush
{
type
}
1586        
}
 
{
1587            
\btxlabeltext
{
apa
:
MotionPicture
}
1588        
}
1589    
\btxrightbracketperiod
1590    
\texdefinition
{
btx
:
apa
:
wherefrom
-
publisher
}
1591    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1592
\stopsetups
1593
1594
% Music. Note that this category was not defined with BIBTEX.
1595
% Required fields: composer, artist, title, album, year, address, publisher
1596
% Optional fields: subtitle, type, note, url, doi
1597
1598
\startsetups
 
btx
:
apa
:
list
:
music
1599    
\texdefinition
{
btx
:
apa
:
authoryear
}
1600    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1601    
\doifnot
 
{
\btxfoundname
{
author
}}
 
{
artist
}
 
{
1602        
\btxdoif
 
{
artist
}
 
{
1603            
\btxleftbracket
1604            
\btxlabeltext
{
apa
:
Recordedby
}
1605            
\btxspace
1606            
\btxflush
{
artist
}
1607            
\btxrightbracketperiod
1608        
}
1609    
}
1610    
\doifnot
 
{
\btxfoundname
{
title
}}
 
{
album
}
 
{
1611        
\btxdoif
 
{
album
}
 
{
1612            
\btxlabeltext
{
In
}
1613            
\btxspace
1614            
\btxflush
{
album
}
1615            
\btxperiod
1616        
}
1617    
}
1618    
\texdefinition
{
btx
:
apa
:
type
}
1619    
\texdefinition
{
btx
:
apa
:
wherefrom
-
publisher
}
1620    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1621
\stopsetups
1622
1623
% Other. Note that this category was not defined with BIBTEX. Below from JabRef:
1624
% Required fields: author or title, year
1625
% Optional fields: note, doi, url
1626
1627
\startsetups
 
btx
:
apa
:
list
:
other
1628    
\fastsetup
{
btx
:
apa
:
list
:
book
}
1629
\stopsetups
1630
1631
% Use this category when nothing else fits.
1632
% Required fields: none.
1633
% Optional fields: author, title, howpublished, month, year, note.
1634
1635
\startsetups
 
btx
:
apa
:
list
:
misc
1636    
\texdefinition
{
btx
:
apa
:
authoryear
}
1637    
\texdefinition
{
btx
:
apa
:
title
-
if
-
not
-
placed
}
1638    
\btxdoif
 
{
howpublished
}
 
{
1639        
\btxspace
1640        
\btxflush
{
howpublished
}
1641        
\btxperiod
1642    
}
1643    
\texdefinition
{
btx
:
apa
:
url
-
doi
-
note
}
1644
\stopsetups
1645
1646
% If all else fails to match:
1647
1648
\startsetups
 
btx
:
apa
:
list
:
literal
1649    
%\btxleftparenthesis
1650    
\removeunwantedspaces
(
1651    
\btxflush
{
tag
}
1652    
\btxrightparenthesis
1653    
\btxdoif
 
{
text
}
 
{
1654        
\btxflush
{
text
}
1655    
}
1656
\stopsetups
1657
1658
% HH: an example of setting up translations using a sub rendering. Keep it here
1659
% till we find another spot as otherwise I forget about it and I don't want to
1660
% waste hours reinventing a wheel when something like this is needed.
1661
%
1662
% \definebtx
1663
%   [apa:cite:title:translated]
1664
%   [apa:cite:title]
1665
%   [left=\btxleftbracket,
1666
%    right=\btxrightbracket,
1667
%    style=\v!bolditalic]
1668
%
1669
% \startsetups btx:apa:cite:title
1670
%     % need to add concat, etc.
1671
%     \btxcitereference
1672
%     \currentbtxfirst
1673
%     \doifmode {btx:apa:translatedtitles} {
1674
%         \ifx\currentbtxlanguage\empty
1675
%             % no need for an extra
1676
%         \else\ifx\mainbtxlanguage\currentbtxlanguage
1677
%             % no need for an extra
1678
%         \else
1679
%             \btxdoif {title:\mainbtxlanguage} {
1680
%                 \btxstartciterendering[title:translated]
1681
%                     \language[\mainbtxlanguage]
1682
%                     \btxflush{title:\mainbtxlanguage}
1683
%                 \btxstopciterendering
1684
%             }
1685
%         \fi\fi
1686
%     }
1687
% \stopsetups
1688
1689
\stopbtxrenderingdefinitions
1690