Source Browser ?

1% language=us runpath=texruns:manuals/bidi
2
3\startenvironment bidi-style
4
5\usemodule[abr-04]
6
7\dontcomplain
8
9\startbuffer[preamble-fonts]
10\definefontfallback
11  [Serif] [scheherazaderegular*arabic]
12  [arabic] [force=yes,rscale=1.5]
13\definefontfallback
14  [SerifBold] [scheherazadebold*arabic]
15  [arabic] [force=yes,rscale=1.5]
16\definefontfallback
17  [SerifItalic] [scheherazaderegular*arabic]
18  [arabic] [force=yes,rscale=1.5]
19\definefontfallback
20  [SerifBoldItalic] [scheherazadebold*arabic]
21  [arabic] [force=yes,rscale=1.5]
22
23\definefontfallback
24  [Serif] [sileot*hebrew]
25  [hebrew] [force=yes]
26\definefontfallback
27  [SerifBold] [sileot*hebrew]
28  [hebrew] [force=yes]
29\definefontfallback
30  [SerifItalic] [sileot*hebrew]
31  [hebrew] [force=yes]
32\definefontfallback
33  [SerifBoldItalic] [sileot*hebrew]
34  [hebrew] [force=yes]
35
36\definefontfallback
37  [Mono] [almfixed*none]
38  [arabic] [force=yes]
39
40\definefontfallback
41  [Mono] [sileot*none]
42  [hebrew] [force=yes,factor=1] % factor forces a monospace
43
44\setupbodyfont
45  [dejavu,10pt]
46\stopbuffer
47
48\startbuffer[preamble-languages]
49\setuplanguage[ar][font=arabic,bidi=right]
50\setuplanguage[he][font=hebrew,bidi=right]
51\stopbuffer
52
53\getbuffer[preamble-fonts]
54\getbuffer[preamble-languages]
55
56\setuplayout
57  [backspace=15mm,
58   topspace=15mm,
59   footer=0pt,
60   width=middle,
61   height=middle]
62
63% \setuptyping
64%   [color=middleblue]
65%
66% \setuptype
67%   [color=middleblue]
68
69\usemodule[scite]
70
71\setuptyping
72  [option=TEX]
73
74\setuptype
75  [option=TEX]
76
77\definecolor
78  [maincolor]
79  [middleblue]
80
81\setupwhitespace
82  [big]
83
84\setuphead
85  [color=darkyellow]
86
87\setuphead
88  [chapter]
89  [style=\bfc]
90
91\setuphead
92  [section]
93  [style=\bfb]
94
95\setuphead
96  [subsection]
97  [style=\bfa]
98
99%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
100
101\startluacode
102    local report = logs.reporter("directions","check")
103    local line   = 0
104    function nodes.tracers.checkdirections(head)
105        line = line + 1
106        report("line: %i",line)
107        for n in nodes.traverse_id(nodes.nodecodes.dir,head) do
108            report("  %s (%i,%i)",n.dir,n.subtype,n.direction)
109        end
110        return head, false
111    end
112
113    nodes.tasks.appendaction("contributers","after","nodes.tracers.checkdirections")
114    nodes.tasks.disableaction("contributers","nodes.tracers.checkdirections")
115\stopluacode
116
117\installtextracker
118   {directions.check}
119   {\ctxlua{nodes.tasks.enableaction("contributers","nodes.tracers.checkdirections")}}
120   {\ctxlua{nodes.tasks.disableaction("contributers","nodes.tracers.checkdirections")}}
121
122% \enabletrackers[directions.check]
123% \disabletrackers[directions.check]
124
125\stopenvironment
126