اولین بار است که به اینجا می‌آیید؟ راهنمای سایت را بخوانید!
Close Sidebar
وب‌سایت پرسش و پاسخ پارسی‌لاتک جایی برای پرسش و پاسخ درباره سیستم حروف‌چینی لاتک و بسته زی‌پرشین است. در اینجا می‌توانید سوال‌های خود را بپرسید و به سوال‌های دیگران پاسخ دهید.

محبوب‌ترین برچسب‌ها

رفع خطا جدول مراجع xepersian ریاضی‌نویسی شکل فونت فهرست مطالب شماره‌گذاری منابع bidi پانویس بیب‌تک tikz تک‌لایو parsilatex بیمر اسلاید زی‌پرشین پاورقی سربرگ bibtex نماد فرمول‌نویسی رسم شکل قالب ارجاع‌دهی biditexmaker هدر ویرایشگر beamer واژه‌نامه اندازه فونت texstudio عنوان فصل ماتریس اعمال نشدن تغییرات در پی‌دی‌اف رسم جدول bidipresentation شماره صفحه حاشیه رنگ عنوان شکل اسلاید فارسی محیط قضیه گراف مکان شکل tikzpicture حروف‌چینی کد شماره فصل enumerate tabriz_thesis نمایه align زیرنویس شکل کادر itemize listings الگوریتم عدم اجرا نیم‌فاصله متن لاتین و فارسی فهرست اشکال بسته فاصله بین خطوط قالب پایان‌نامه فرمول نصب تک‌لایو فارسی‌تک hyperref شماره فرمول glossaries کپشن نمودار حروف‌چینی چندستونی فونت فارسی و انگلیسی ماکرونویسی خروجی biditools شماره پاورقی پیوست‌ فاصله‌گذاری فرمول چندضابطه‌ای لاتک سوال امتحانی subfigure extrafootnotefeatures header texmaker pdf tex biditufte-book تصویر شمارنده texlive2015 longtable زیرنویس خطا رسم نمودار شماره‌گذاری صفحات پایان نامه دیاگرام فهرست جداول میک‌تک texlive2016 تنظیم جدول kashida texworks caption اندیس lollipop iust-thesis multicol فصل‌نویسی شعر سوال چهارگزینه‌ای بولد تورفتگی آکولاد اعداد فارسی فاصله عمودی xindy چپ‌چینی اوبونتو میکروسافت ورد قاب geometry fancyhdr تک لایو 2015 عنوان بخش به‌روزرسانی بسته aimc46 صفر توخالی فرمول طولانی بیرون‌زدگی texlive کاما وسط‌چینی پوستر شماره گذاری فاصله سطرها نوشتافت شکست خط tex-programming فونت اعداد pgfplots قرآن tabriz-thesis ایتالیک winedt جستجوی معکوس xelatex فلش جایابی تصویر tcolorbox قالب کتاب پاراگراف‌بندی بازیابی اطلاعات هایپرلینک فهرست نمادها شمارنده فصل محیط ریاضی رسم کادر جداکننده جدول طولانی فهرست تصاویر شماره‌گذاری فرمول algorithm2e font فونت بولد proof equation bidipoem eps جدول افقی عکس به‌روزرسانی پانویس چندستونی کمک مالی فاصله خطوط حروف‌چینی شعر زیرشکل minipage قلم پانویس پاراگرافی ltrfootnote پیوست computeautoilg متن فارسی و انگلیسی فرمول چندخطی neveshtuft غلط‌گیری املایی تک‌پارسی پیکان لاتکس tabular baselineskip شماره قسمت قسمت عنوان جدول
15 نفر آنلاین
1 عضو و 14 مهمان در سایت حاضرند
بازدید امروز: 8770
بازدید دیروز: 10871
بازدید کل: 20626115

تغییر خودکار فونت تمامی اعداد متن به قلمی خاص ( که صفر توخالی دارد)

0 رای
5,945 بازدید

یکی از مشکلاتی که با بسیاری از قلم‌ها وجود دارد این است که متاسفانه صفر آن‌ها به صورت نقطه نگاشته شده است در حالیکه همگی می‌دانیم که صفر پارسی توخالی است. برای رفع این مشکل از راه حلی که دکتر وفا در تصحیحی که برای استایل پایان‌نامه دانشگاه خواجه نصیر ارائه داده‌اند استفاده شده است.

منتهی چند مشکل وجود دارد که با کد زیر نشان داده شده است. ابتدا کد و خروجی آن را ملاحظه نمایید و سپس به بررسی مشکلات بپردازیم.

\documentclass{article}

\usepackage{xepersian}
\settextfont{XB Niloofar}
\defpersianfont\yasfont{Yas}

\makeatletter
    \if@bidi@csundef{bidi@digits}{% 
        \newcount\bidi@digits
        \XeTeXinterchartokenstate=\@ne
        \newXeTeXintercharclass\bidi@digits@charclass
        \bidi@digits=`\0 \loop \XeTeXcharclass \bidi@digits \bidi@digits@charclass \ifnum\bidi@digits<`\9 \advance\bidi@digits \@ne \repeat
        \bidi@digits=`\۰ \loop \XeTeXcharclass \bidi@digits \bidi@digits@charclass \ifnum\bidi@digits<`\۹ \advance\bidi@digits \@ne \repeat
    }{}
    \newXeTeXintercharclass\qom@leftparen@charclass
    \newXeTeXintercharclass\qom@rightparen@charclass
    \XeTeXcharclass `\( \qom@leftparen@charclass
    \XeTeXcharclass `\) \qom@rightparen@charclass
    \XeTeXcharclass `\[ \qom@leftparen@charclass
    \XeTeXcharclass `\] \qom@rightparen@charclass
    \ifdim\the\XeTeXversion\XeTeXrevision\p@>0.99993\p@
      \chardef\qom@alloc@intercharclass@top=4095
    \else
      \chardef\qom@alloc@intercharclass@top=255
    \fi
    \XeTeXinterchartoks \qom@alloc@intercharclass@top \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \qom@alloc@intercharclass@top = {\EndSwitchDigitFont}
    \XeTeXinterchartoks \qom@leftparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \qom@rightparen@charclass = {\EndSwitchDigitFont}
    \if@bidi@csundef{if@nonlatin}{%
        \newcommand*{\BeginSwitchDigitFont}{\if@Latin\else\yasfont \fi}
        \newcommand*{\EndSwitchDigitFont}{\if@Latin\else\setpersianfont \fi\egroup}
    }{%
        \newcommand*{\BeginSwitchDigitFont}{\if@nonlatin\yasfont \fi}
        \newcommand*{\EndSwitchDigitFont}{\if@nonlatin\setpersianfont \fi}
    }
\makeatother
\begin{document}

 102030405060708090100 

 [1020]
(3040)

{\yasfont  [1030]} 

[10[20[30[40]50]60]70]

(10(20(30(40)50)60)70)

\end{document}

enter image description here

همانطوری که پیداست در سطر اول و دوم خروجی مشکلی وجود ندارد.
اما سطر سوم همانطوری که انتظار می‌رود باید تماما با قلم Yas نگاشته شود ولی به سبب کدی که در فوق وجود دارد بخش براکت بستهٔ آن با قلم متن پارسی نگاشته می‌شود (که همان نیلوفر است).
و اما در دو مورد آخر مشکلی کمی حادتر می‌گردد و آن هم اینکه در حالت استفاده از پرانتز/براکت‌های تودرتو با توجه به کدی نوشته شده است فقط بخش باز آن تغییر قلم داده و بخش بسته اثری نمی‌پذیرد که طبیعی هم است. و البته اگر به خود پرانتز/براکت باز توجه نمایید باز متوجه تغییر قلم می‌شوید.

سوال این است که آیا کد فوق را می‌توان به گونه‌ای اصلاح نمود که این نکات را نیز برآورده نماید.

فایل‌های پیوست
سوال شده آذر 4, 1396 توسط سید جواد (4,427 امتیاز)
اگر کد را بخوانید و آن را بفهمید متوجه می‌شوید که اصلاح آن بسیار ساده است.
وفای عزیز از اینکه همیشه آدم را به فکر وا می‌دارید سپاسگزارم

افزودن قطعه زیر تمامی مشکلات را حل نمود بجز آن حالتی که قلم متن یاس باشد که با کد فوق براکت بسته به قلم متن بازگردانده خواهد شد.

    \XeTeXinterchartoks \qom@rightparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \qom@leftparen@charclass = {\EndSwitchDigitFont}
@وفا

خواهشمند است پاسخ مرا ملاحظه نموده و درستی یا نادرستی آن را ابلاغ نمایید.

4 پاسخ

0 رای
 
بهترین پاسخ

این پرسش و پاسخ را ببینید. کدهای موجود در این پرسش و پاسخ ‌های آن دیگر کار نخواهند کرد و با خطا مواجه می‌شوند چنانچه از نسخه 32.0 بسته bidi و نسخه 20.1 بسته xepersian استفاده کنید.

پاسخ داده شده دی 11, 1396 توسط وفا (24,380 امتیاز)
انتخاب شده دی 11, 1396 توسط سید جواد
ممنون از لطف همیشگی ولی اگر نظرتان را در رابطه با کد پاسخ بفرمایید خیلی سپاسگزارم.
کد بدی است.
پاسخ بروز شد.
بسیار عالی ... کدتان مثل همیشه تر و تمیز و فشرده.

وفای عزیز جمله «کد بدی است» دانشجو را چنانکه باید، هدایت نخواهد کرد! او نیاز به توضیح بیشتری از جانب استاد دارد.
0 رای

با تشکر از وفای عزیز

بنظر راه حل زیر مشکلات سوال فوق را مرتفع نماید. هر چند کد زیر مشکلاتم را در مساله فوق حل نمود ولی امید است که وفا درستی یا نادرستی آن را تایید فرمایند.

کافی است قطعه کد زیر را جایگزین کد معادل آن در سوال نمود.

\XeTeXinterchartoks \qom@alloc@intercharclass@top \bidi@digits@charclass = {\BeginSwitchDigitFont}
\XeTeXinterchartoks \bidi@digits@charclass \qom@alloc@intercharclass@top = {\EndSwitchDigitFont}
\XeTeXinterchartoks \qom@leftparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
\XeTeXinterchartoks \bidi@digits@charclass \qom@rightparen@charclass = {\EndSwitchDigitFont}
\XeTeXinterchartoks \qom@rightparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
\XeTeXinterchartoks \bidi@digits@charclass \qom@leftparen@charclass = {\EndSwitchDigitFont}
\if@bidi@csundef{if@nonlatin}{%
    \newcommand*{\BeginSwitchDigitFont}{\edef\currentfont{\the\font}\if@Latin\else\yasfont \fi}
    \newcommand*{\EndSwitchDigitFont}{\if@Latin\else\currentfont \fi}
}{%
    \newcommand*{\BeginSwitchDigitFont}{\edef\currentfont{\the\font}\if@nonlatin\yasfont \fi}
    \newcommand*{\EndSwitchDigitFont}{\if@nonlatin\currentfont \fi}
}

نهایتاً خروجی به صورت زیر خواهد بود که همان مطلوب مساله است.

enter image description here

پاسخ داده شده آذر 5, 1396 توسط سید جواد (4,427 امتیاز)
0 رای

این یکی بنظر خودم خیلی بهتر از قبلی عمل می‌کند. فقط اینکه نمیدانم آیا در حالتی که متن لاتین با قلم پارسی نیز نگاشته می‌شود این تغییر را بدهم یا خیر --به A4 در متن توجه نمایید که با همان قلم Tahoma نگاشته شده است.

\documentclass{article}

\usepackage{xepersian}
\settextfont{Tahoma}
\defpersianfont\yasfont{Yas}

\makeatletter
    \if@bidi@csundef{bidi@digits}{% 
        \newcount\bidi@digits
        \XeTeXinterchartokenstate=\@ne
        \newXeTeXintercharclass\bidi@digits@charclass
        \bidi@digits=`\0 \loop \XeTeXcharclass \bidi@digits \bidi@digits@charclass \ifnum\bidi@digits<`\9 \advance\bidi@digits \@ne \repeat
        \bidi@digits=`\۰ \loop \XeTeXcharclass \bidi@digits \bidi@digits@charclass \ifnum\bidi@digits<`\۹ \advance\bidi@digits \@ne \repeat
    }{}
    \newif\if@q@verbatim
    \bidi@appto\verbatim@font{\@q@verbatimtrue}
    \bidi@appto\ttfamily{\@q@verbatimtrue}
    \newXeTeXintercharclass\q@leftparen@charclass
    \newXeTeXintercharclass\q@rightparen@charclass
    \XeTeXcharclass `\( \q@leftparen@charclass
    \XeTeXcharclass `\) \q@rightparen@charclass
    \XeTeXcharclass `\[ \q@leftparen@charclass
    \XeTeXcharclass `\] \q@rightparen@charclass
    \XeTeXcharclass `\{ \q@leftparen@charclass
    \XeTeXcharclass `\} \q@rightparen@charclass
    \XeTeXcharclass `\« \q@leftparen@charclass
    \XeTeXcharclass `\» \q@rightparen@charclass       
    \XeTeXcharclass `\، \q@leftparen@charclass    
    \XeTeXcharclass `\, \q@leftparen@charclass
    \XeTeXcharclass `\؛ \q@leftparen@charclass          
    \XeTeXcharclass `\; \q@leftparen@charclass          
    \XeTeXcharclass `\: \q@leftparen@charclass          
    \XeTeXcharclass `\. \q@leftparen@charclass     
    \ifdim\the\XeTeXversion\XeTeXrevision\p@>0.99993\p@
      \chardef\q@alloc@intercharclass@top=4095
    \else
      \chardef\q@alloc@intercharclass@top=255
    \fi
    \XeTeXinterchartoks \q@alloc@intercharclass@top \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@alloc@intercharclass@top = {\EndSwitchDigitFont}
    \XeTeXinterchartoks \q@leftparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@rightparen@charclass = {\EndSwitchDigitFont}
    \XeTeXinterchartoks \q@rightparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@leftparen@charclass = {\EndSwitchDigitFont}    
    \if@bidi@csundef{if@nonlatin}{%
        \newcommand*{\BeginSwitchDigitFont}{\if@q@verbatim\else%
        \global\edef\currentfont{\the\font}\if@Latin\else\yasfont \fi\fi}
        \newcommand*{\EndSwitchDigitFont}{\if@q@verbatim\else\if@Latin\else\currentfont \fi\fi}
    }{%
        \newcommand*{\BeginSwitchDigitFont}{\if@q@verbatim\else%
        \global\edef\currentfont{\the\font}\if@nonlatin\yasfont \fi\fi}
        \newcommand*{\EndSwitchDigitFont}{\if@q@verbatim\else\if@nonlatin\currentfont \fi\fi}
    }

\makeatother
\begin{document}

\begin{equation}
123 x +  y 10010
\end{equation}

$1210$
90000

\begin{equation}
12
\end{equation}

\[
12010
\]

102030405060708090100 

10,20,30,40,50,60,70,80,90,100  10، ۰،

     دارای ۴ اگه خط دستور باشد، ابتدا خط ۱، بعد خط ۲، بعد خط ۳ و در آخر، خط ۴ پردازش می‌شود.7080[1020](3040)

\verb!\ali1!\verb!chapter1!

    پانویس\footnote{این یک خط \lr{A4} است و پس 3. بارای 
  و  2 , و  3,4, 5 و  ۴۵  ست و این متنی دیگر است. }
  گفت ۳: ۳4 143 من کتاب دارم. 

\verb!\include{chapter1}a1! یک متن 

\verb!\include[1]{chapter1}a1! یک متن 

\lr{include\{chapter[1]\}a1}

include[1]{chapter1}a1

{\yasfont  [1030]} [10[20[30[40]50]60]70](10(20(30(40)50)60)70)

  این یک خط A4 است و سپس a3. بارای 
  2, 3,4, 5  ۴۵ 
\begin{verbatim}
hi this is 234 test [asdf 14123]
\end{verbatim}
\begin{LTR}
\begin{verbatim}
hi this is 234 test [asdf 14123]
\end{verbatim}
\end{LTR}
\end{document}

enter image description here

پی‌نوشت: هنوز منتظرم تا دکتر خلیقی نظر خود را در رابطه با پاسخ اعلام فرمایند.

پاسخ داده شده آذر 8, 1396 توسط سید جواد (4,427 امتیاز)
در همین پاسخ اگر از بسته setspace استفاده شود و سپس دستور \doublespacing بکار رود از آن نقطه به بعد قلم به یاس تغییر خواهد کرد! علت را در نمی‌یابم.
در بهترین پاسخ این مشکل رفع شده است.
0 رای

بنظرم کد زیر برای تغییر فونت ارقام به صورت خودکار بدون هیچ مشکلی کار می‌کند. اشکال راه قبل این بود که فراموش شده بود تا قلم مورد نظر در محدوده خاصی اعمال شود.

\documentclass{article}
\usepackage{setspace}
\usepackage{xepersian}
\settextfont{Tahoma}
\defpersianfont\yasfont{Yas}

\makeatletter
    \if@bidi@csundef{bidi@digits}{% 
        \newcount\bidi@digits
        \XeTeXinterchartokenstate=\@ne
        \newXeTeXintercharclass\bidi@digits@charclass
        \bidi@digits=`\0 \loop \XeTeXcharclass \bidi@digits \bidi@digits@charclass \ifnum\bidi@digits<`\9 \advance\bidi@digits \@ne \repeat
        \bidi@digits=`\۰ \loop \XeTeXcharclass \bidi@digits \bidi@digits@charclass \ifnum\bidi@digits<`\۹ \advance\bidi@digits \@ne \repeat
    }{}
    \newif\if@q@verbatim
    \bidi@appto\verbatim@font{\@q@verbatimtrue}
    \bidi@appto\ttfamily{\@q@verbatimtrue}
    \newXeTeXintercharclass\q@leftparen@charclass
    \newXeTeXintercharclass\q@rightparen@charclass
    \XeTeXcharclass `\( \q@leftparen@charclass
    \XeTeXcharclass `\) \q@rightparen@charclass
    \XeTeXcharclass `\[ \q@leftparen@charclass
    \XeTeXcharclass `\] \q@rightparen@charclass
    \XeTeXcharclass `\{ \q@leftparen@charclass
    \XeTeXcharclass `\} \q@rightparen@charclass
    \XeTeXcharclass `\« \q@leftparen@charclass
    \XeTeXcharclass `\» \q@rightparen@charclass
    \XeTeXcharclass `\\ \q@rightparen@charclass              
    \XeTeXcharclass `\، \q@leftparen@charclass    
    \XeTeXcharclass `\, \q@leftparen@charclass
    \XeTeXcharclass `\؛ \q@leftparen@charclass          
    \XeTeXcharclass `\; \q@leftparen@charclass          
    \XeTeXcharclass `\: \q@leftparen@charclass          
    \XeTeXcharclass `\. \q@leftparen@charclass     
    \XeTeXcharclass `\- \q@leftparen@charclass       
    \ifdim\the\XeTeXversion\XeTeXrevision\p@>0.99993\p@
      \chardef\q@alloc@intercharclass@top=4095
    \else
      \chardef\q@alloc@intercharclass@top=255
    \fi
    \chardef\q@CharNormal=0
    \XeTeXinterchartoks \q@alloc@intercharclass@top \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@alloc@intercharclass@top = {\EndSwitchDigitFont}
    \XeTeXinterchartoks \q@leftparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@rightparen@charclass = {\EndSwitchDigitFont}
    \XeTeXinterchartoks \q@rightparen@charclass \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@leftparen@charclass = {\EndSwitchDigitFont}    
    \XeTeXinterchartoks \q@CharNormal \bidi@digits@charclass = {\BeginSwitchDigitFont}
    \XeTeXinterchartoks \bidi@digits@charclass \q@CharNormal = {\EndSwitchDigitFont}     
    \if@bidi@csundef{if@nonlatin}{%
        \newcommand*{\BeginSwitchDigitFont}{\if@q@verbatim\else%
        \global\edef\currentfont{\the\font}\if@Latin\else\bgroup\yasfont \fi\fi}
        \newcommand*{\EndSwitchDigitFont}{\if@q@verbatim\else\if@Latin\else\egroup\currentfont \fi\fi}
    }{%
        \newcommand*{\BeginSwitchDigitFont}{\if@q@verbatim\else%
        \global\edef\currentfont{\the\font}\if@nonlatin\bgroup\yasfont \fi\fi}
        \newcommand*{\EndSwitchDigitFont}{\if@q@verbatim\else\if@nonlatin\egroup\currentfont \fi\fi}
    }\makeatother

\def\test{\small}

\begin{document}
%\show\normalsize



    سلام  )۲  خدانگهدار ۰۹۸۷۸ 

{\par   گفت ۳: ۳4 143 من کتاب دارم. }

\begin{equation}
123 x +  y 10010
\end{equation}

$1210$
90000

\begin{equation}
12
\end{equation}

\[
12010
\]

TeXLive2015

A09456

102030405060708090100 

10,20,30,40,50,60,70,80,90,100  10، ۰،

     دارای ۴ خط دستور است، ابتدا خط ۱، بعد خط ۲، بعد خط ۳ و در آخر، خط ۴.7080[1020](3040)

\verb!\ali1!\verb!chapter1!
 \doublespacing 

    پانویس\footnote{این یک خط \lr{A4} است و پس 3. بارای 
  و  2 , و  3,4, 5 و  ۴۵  ست و این متنی دیگر است. }

\verb!\include{chapter1}a1! یک متن 

\verb!\include[1]{chapter1}a1! یک متن 

\lr{include\{chapter[1]\}a1}

include[1]{chapter1}a1

{\yasfont  [1030]} [10[20[30[40]50]60]70](10(20(30(40)50)60)70)

  این یک خط A4 است و سپس a3. بارای 
  2, 3,4, 5  ۴۵ 
\begin{verbatim}
hi this is 234 test [asdf 14123]
\end{verbatim}
\begin{LTR}
\begin{verbatim}
hi this is 234 test [asdf 14123]
\end{verbatim}
\end{LTR}

\begin{latin}
\begin{thebibliography}{9}
\bibitem{Gonzalez02book}
Gonzalez, R.C., and Woods, R.E. {\em Digital Image Processing}, 3rd ed.,
Prentice-Hall, Inc., Upper Saddle River, NJ, USA, 2006.
\end{thebibliography}
\end{latin}
\end{document}

enter image description here

پاسخ داده شده آذر 20, 1396 توسط سید جواد (4,427 امتیاز)
متاسفانه روش فوق در صورت استفاده از گزینه Kashida ممکن است مشکلاتی را به همراه داشته باشد خصوصا آنجایی که عدد به کلمه قبل یا بعد خود بچسبد.
من گزینه کشیده را با نسخه 32.0 بسته bidi و نسخه 20.1 بسته xepersian امتحان نکردم. اگر می‌توانید آن را آزمایش کنید و اگر مشکلی وجود داشت در GitHub گزارش کنید.
پرسش و پاسخ زیر را ببینید:

http://qa.parsilatex.com/28472
...