1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
|
%%%%%%%%%%%%%%%%%%%% arabsymb.mf %%%%%%%%%%%%%%%%%%%%
% 18.10.1998 22:33:10
% code assignments for arabic font in ArabTeX
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% (c) Klaus Lagally
% Institut fuer Informatik
% Universitaet Stuttgart
% 21.05.97
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
nashcode := oct "1"; % file has been read
%%%%%%%%%%%%%%%%%% connection forms %%%%%%%%%%%%%%%%%%
f_iso := oct "0"; % isolated
f_end := oct "1"; % final
f_mid := oct "2"; % medial
f_beg := oct "3"; % initial
%%%%%%%%%%%%%%%%%% diacritical marks %%%%%%%%%%%%%%%%%
ttah_dia := oct "010"; % for urdu
one_dot_up := oct "011"; %
two_dots_down := oct "012"; %
fatha := oct "013"; %
kasra := oct "013"; %
damma := oct "014"; %
hamza := oct "015"; %
madda := oct "016"; %
shadda := oct "017"; %
two_dots_up := oct "020"; %
three_dots_up := oct "021"; %
three_dots_down := oct "022"; %
fathatan := oct "023"; %
kasratan := oct "023"; %
dammatan := oct "024"; %
sukun := oct "025"; %
wasla := oct "026"; %
quran_alif := oct "027"; %
bow_dia := oct "030"; % for kurdish
e_dia := oct "040"; % for pashto
zwarakay := oct "040"; % for pashto
one_dot_down := oct "056"; % period
h_dia := oct "146"; % for urdu
ammad := oct "146"; % for pashto
%%%%%%%%%%%%%%%%%% letters %%%%%%%%%%%%%%%%%%%%%%%%%%
hamza_iso := oct "132"; % 132 040 040
alif := oct "100"; % 100,101
alif_iso := alif; % 100
alif_end := oct "101"; %
bah_s := oct "110"; % 110-113
gim := oct "140"; % 140-143
hhah := oct "150"; % 150-153
khah := oct "160"; % 160-163
tsah := oct "170"; % 170-173
dal := oct "130"; % 130,131
rah := oct "120"; % 120,121
zay := oct "122"; % 122,123
zhah := oct "124"; % 124,125
sin := oct "200"; % 200-203
shin := oct "210"; % 210-213
sad := oct "220"; % 220-223
dad := oct "230"; % 230-233
kaf_w := oct "234"; % 234-237 wide kaf
ttah := oct "240"; % 240-243
zzah := oct "244"; % 244-247
ain := oct "250"; % 250-253
fah_s := oct "254"; % 254-257 fah family
fah := oct "362"; % 362,363
qaf := oct "364"; % 364,365
vah := oct "366"; % 366,367
kaf_s := oct "270"; % 270-273 kaf family
kaf := oct "274"; % 274,275
gaf_s := oct "300"; % 300-303 gaf family
gaf := oct "304"; % 304,305
lam := oct "310"; % 310-313
mim := oct "320"; % 320-323
nun := oct "340"; % 340,341
hah := oct "350"; % 350-354
waw := oct "360"; % 360,361
yah := oct "370"; % 370,371
bah := bah_s; %
%%%%%%%%%%%%%%%%%% special characters %%%%%%%%%%%%%%%%%%%
block := oct "000"; % 000-003
tatwil := oct "004"; % 004-007
rquotes := oct "042"; % 042
period := oct "056"; % 056
lquotes := oct "134"; % 134
space_spec := oct "044"; % 046,047 carrier for dots
no_break := oct "046"; % 046 no space but breaks ligatures
break := oct "047"; % 047 small space, breaks connection
%%%%%%%%%%%%%%%%%% ligatures %%%%%%%%%%%%%%%%%%%%%%%%%%
bah_spec_gim := oct "027"; % 031 medial bah before gim
bah_beg_gim := oct "030"; % 032 initial (!) bah before gim
g_to_mb := oct "031"; % 033 medial bah to gim
bah_high := oct "032"; % 034,035 before sin, sad
bah_spec := oct "034"; % 036,037 bah before final rah, nun
lam_spec_low := oct "072"; % 074 medial lam for 'allah'
alif_spec_mim := oct "075"; % 076 final alif after mim
lam_alif := oct "102"; % 102,103
lam_alif_iso := lam_alif; % 102
lam_alif_end := oct "103"; %
bah_end_hah := oct "102"; % 104,105 bah before final hah
bah_spec_yah := oct "104"; % 106,107 bah before gim, with tie;
% also bah before yah
gim_spec := oct "143"; % 144,145 from above
gim_close := oct "144"; % 146,147 closed gim
hhah_spec := oct "153"; % 154,155 from above
khah_spec := oct "163"; % 164,165 from above
rah_k := oct "166"; % 166,167 kurdish rah
tsah_spec := oct "173"; % 174,175 from above
sin_spec := oct "202"; % 204,205 short form
shin_spec := oct "204"; % 206,207 short form
sad_spec := oct "222"; % 224,225 short form
dad_spec := oct "224"; % 226,227 short form
kaf_spec := oct "274"; % 276,277 short form
gaf_spec := oct "304"; % 306,307 short form
lam_on_gim := oct "312"; % 314 initial (!) lam before gim
lam_long := oct "312"; % 315 initial lam before yah
lam_spec_yah := oct "314"; % 316 before final yah ?
lam_spec_mim := oct "314"; % 317 initial lam before medial mim
mim_spec_high := oct "322"; % 324 from above
mim_spec := oct "324"; % 325-327 final; medial after lam;
% also before gim
mim_spec_mim := oct "325"; % 330 initial mim before mim
mim_lam_gim := oct "327"; % 331 medial mim between lam and gim
lam_spec_hah := oct "330"; % 333 initial lam before medial hah
mim_spec_long := oct "332"; % 334 medial mim after lam, vocalized
mm_to_b := oct "333"; % 335 bah to medial mim
bah_mid_mim := oct "334"; % 336,337 bah before medial mim
mim_spec_alif := oct "342"; % 344 medial mim before alif
er_to_s := oct "343"; % 345 sin to final rah
bah_end_mim := oct "344"; % 346 medial bah before final mim
bah_beg_mim := oct "345"; % 347 initial (!) bah before final mim
hah_urd := oct "353"; % 353,354 two-eyed hah,
% see hah and hah_spec_lam
hah_spec_lam := oct "352"; % 354 medial hah after initial lam
hah_spec := oct "354"; % 355-357 final short hah;
% also medial hah after sin
yah_spec := oct "371"; % 372 ligature for final yah
%%%%%%%%%%%%%%%%%% ties %%%%%%%%%%%%%%%%%%%%%%%%%%
g_to_s := bah_spec_gim; % = sin to gim
em_to_s := bah_end_mim; % = sin to final mim
mh_to_s := bah_end_hah; % = sin to medial hah or final mim
g_to_bb := bah_beg_gim; % = initial bah to gim
em_to_bb := bah_beg_mim; % = initial bah to final mim
%%%%%%%%%%%%%%%%%% others %%%%%%%%%%%%%%%%%%%%%%%%%%
bah_p := oct "114"; % 114-117 bah family with loop
rah_p := oct "126"; % 126,127 rah with loop
dal_p := oct "136"; % 136,137 dal with loop
rah_s := oct "156"; % 156,157 rah with two dots
sin_p := oct "214"; % 214,215 sin with two dots
kaf_p_s := oct "260"; % 260-263 kaf family with loop
kaf_p := oct "264"; % 264,265 kaf with loop and mark
kaf_p_spec := oct "264"; % 266,267 short form of kaf with loop
nun_p := oct "342"; % 342,343 nun with loop
yah_h := oct "373"; % 373,374 yah with hook
yah_h_spec := oct "374"; % 375 ligature for final yah with hook
yah_p := oct "376"; % 376,377 long yah
%%%%%%%%%%%%%%%%% EOF %%%%%%%%%%%%%%%%%%%%%%%%%%
endinput;
|