PDA

View Full Version : تبدیل نوشتار (عدد) به گفتار فارسی در سیستم گویا



bahman.net
سه شنبه 13 تیر 1385, 01:06 صبح
با سلام
من خیلی تو این سایت و جاهای دیگه گشتم ولی چیزی که بتونه کمکم کنه نتونستم پیدا کنم اگه کسی کامپوننتی یاچیزی که به درد بخوره داره بگذاره تا مشکل ما هم حل بشه خیلی ضروریه. هر روشی رو امتحان کردم به نظرم غیر از این روش راه دیگه ای نباشه چون دامنه اعداد خیلی زیاده

ghafoori
سه شنبه 13 تیر 1385, 07:14 صبح
دوست عزیز در تبدیل عدد به حرف ما ان را 3رقم 3 رقم از سمت راست جدا میکردیم حالا کافی بود ان سه رقم را تبدیل حروف کنیم بهد طبق ان بهش هزاز یا میلیون نسبت دهیم شما فقط کافی است بتونید یک عدد سه رقمی را تبدیل به عدد بکنید بعد همچی درست میشود
من مثال تبدیل عدد به حرف را براتون میزارم شما فقط کافی است بجای چاپ حروف صدای ان را پخش کنید وی بی 2005 هم توابع ساده ای برای پخش صدا دارد کلا شما باید 41 صدا برای تلفظ اعداد را داشته باشید تا تریلیون هم بتونید تلفظ کنید


one(0) = "صفر" : one(1) = "یک" : one(2) = "دو" : one(3) = "سه" : one(4) = "چهار"
one(5) = "پنج" : one(6) = "شش" : one(7) = "هفت" : one(8) = "هشت" : one(9) = "نه"

two(0) = "ده" : two(1) = "یازده" : two(2) = "دوازده" : two(3) = "سیزده" : two(4) = "چهرده"
two(5) = "پانزده" : two(6) = "شانزده" : two(7) = "هفده" : two(8) = "هیجده" : two(9) = "نوزده"

Three(2) = "بیست" : Three(3) = "سی" : Three(4) = "چهل" : Three(5) = "پنجاه"
Three(6) = "شصت" : Three(7) = "هفتاد" : Three(8) = "هشتاد" : Three(9) = "نود"

Hundred(1) = "یکصد" : Hundred(2) = "دویست" : Hundred(3) = "سیصد"
Hundred(4) = "چهارصد" : Hundred(5) = "پانصد" : Hundred(6) = "ششصد"
Hundred(7) = "هفتصد" : Hundred(8) = "هشتصد" : Hundred(9) = "نه صد"

Thousand = "هزار" : lakh = " هزار" : Crore = " میلیون" : Billion = "بیلیون"
Million = "میلیون" : Trillion = "تریلیون"
به ازا هر کدام یک صدا
کد برنامه vb2005و vb2003:
4234

اما activex ان بصورت فارسی ناقابل 260000 تومان است:چشمک:

bahman.net
چهارشنبه 14 تیر 1385, 01:47 صبح
از جوابتون ممنونم باز هم اگه کسی بتونه کمک کنه بگه تا استفاده کنیم

bahman.net
پنج شنبه 15 تیر 1385, 02:02 صبح
میشه در این مورد بیشتر توضیح بدی
وی بی 2005 هم توابع ساده ای برای پخش صدا دارد کلا شما باید 41 صدا برای تلفظ اعداد را داشته باشید تا تریلیون هم بتونید تلفظ کنید

:

ghafoori
پنج شنبه 15 تیر 1385, 08:24 صبح
با دستور زیر شما میتوانید براحتی یک صدا از نوع wave را پخش کنید این متد میتوانید ادرس فایل یا یک stream یا ارایه ای از بایت را بگیرد و ان را پخش کند



my.Computer.Audio.Play()

bahman.net
شنبه 17 تیر 1385, 00:53 صبح
خیلی ممنون خیلی کمکم کرد

65mojir
پنج شنبه 23 شهریور 1385, 17:51 عصر
-------------------ممنون

Peyman_Ranjbar
جمعه 24 شهریور 1385, 07:33 صبح
FarsiLibrary (http://www.codeproject.com/useritems/FarsiLibrary.asp)

اینو امتحان کن
این کارو برات انجام میده.
تو قسمت demo دکمه دوم از سمت چپ