aboutsummaryrefslogtreecommitdiff
path: root/arabluatex.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'arabluatex.dtx')
-rw-r--r--arabluatex.dtx26
1 files changed, 24 insertions, 2 deletions
diff --git a/arabluatex.dtx b/arabluatex.dtx
index 5788d62..c13d563 100644
--- a/arabluatex.dtx
+++ b/arabluatex.dtx
@@ -1514,8 +1514,8 @@ vowels (see ยง~3).
1514% \begin{quote} 1514% \begin{quote}
1515% |wa-"ust"u`mila| \arb[novoc]{wa-"ust"u`mila} 1515% |wa-"ust"u`mila| \arb[novoc]{wa-"ust"u`mila}
1516% \arb[trans]{wa-"ust"u`mila}, |huwa| |"inhazama| \arb[novoc]{huwa 1516% \arb[trans]{wa-"ust"u`mila}, |huwa| |"inhazama| \arb[novoc]{huwa
1517% "inhazama} \arb[trans]{huwa "inhazama}, |al-"intiqA.du| 1517% "inhazama} \arb[trans]{huwa "inhazama}, |al-"intiqA.d-u|
1518% \arb[novoc]{al-"intiqA.du} \arb[trans]{al-"intiqA.du}. 1518% \arb[novoc]{al-"intiqA.d-u} \arb[trans]{al-"intiqA.d-u}.
1519% \end{quote} 1519% \end{quote}
1520% \end{compactenum} 1520% \end{compactenum}
1521% 1521%
@@ -2698,6 +2698,7 @@ wa-ya.sIru ta.hta 'l-jild-i
2698\RequirePackage{luacode} 2698\RequirePackage{luacode}
2699\RequirePackage{xparse} 2699\RequirePackage{xparse}
2700\RequirePackage{environ} 2700\RequirePackage{environ}
2701\RequirePackage{xkeyval}
2701% \end{macrocode} 2702% \end{macrocode}
2702% The following boolean will be set to |true| in |RL| mode: 2703% The following boolean will be set to |true| in |RL| mode:
2703% \begin{macrocode} 2704% \begin{macrocode}
@@ -2964,6 +2965,27 @@ wa-ya.sIru ta.hta 'l-jild-i
2964 \else \fi\fi\fi\fi}[\par] 2965 \else \fi\fi\fi\fi}[\par]
2965% \end{macrocode} 2966% \end{macrocode}
2966% \end{environment} 2967% \end{environment}
2968% \begin{environment}{arbverse}
2969% \changes{v1.6}{2016/11/30}{New environment \texttt{arbverse} for
2970% typesetting Arabic poetry} The environment |arbverse| shall
2971% receive different options. Let us define them first.
2972% \begin{macrocode}
2973\newlength{\al@bayt@width}
2974\setlength{\al@bayt@width}{.3\textwidth}
2975\define@key[al]{verse}{width}{\setlength{\al@bayt@width}{#1}}
2976\define@key[al]{verse}{metre}{#1}
2977\define@boolkey[al]{verse}{utf}[true]{}
2978\define@choicekey[al]{verse}{mode}{fullvoc, voc, novoc,
2979 trans}{\def\al@mode{#1}}
2980\presetkeys[al]{verse}{utf=false}{}
2981\NewDocumentEnvironment{arbverse}{O{} O{}}%
2982{\par\bgroup\setkeys[al]{verse}[metre]{#1}%
2983 \ifx\al@mode\al@mode@trans%
2984 \ifal@verse@utf\setRL\else\setLR\fi%
2985 \else\setRL\fi%
2986}{\\\setkeys[al]{verse}[width,utf,mode]{#1}\egroup\par}
2987% \end{macrocode}
2988% \end{environment}
2967% \begin{macro}{\abjad} \cs{abjad}\marg{number} expresses its argument 2989% \begin{macro}{\abjad} \cs{abjad}\marg{number} expresses its argument
2968% in Arabic letters in accordance with the \arb[trans]{'abjad} 2990% in Arabic letters in accordance with the \arb[trans]{'abjad}
2969% arrangement of the alphabet. \meta{number} must be between 1 and 2991% arrangement of the alphabet. \meta{number} must be between 1 and