فرمان صوتی

[abbas2142 557]

با سلام

 

من می خواستم واسه برنامه ام اگه بشه فرمان صوتی بذارم و بگم اگه کاربر مثلا گفت سلام یه مسیج باکس بده یا یه دکمه اون دستوری که بهش دادم رو فعال کنه !!!

 

می شه ؟؟؟؟؟

[msajad 501]

با کتابخونه tts میشه

[Elyas Erfani 3,582]

دروووووود

میتونید از سرویس گوگل‌ Voice هم استفاده کنید ک‌ بنده طرز ارسال پیامک باهاشو تو انجمن گذاشتم

ابتدا کتابخانه Phone رو فعال کنید . بعدش در Sub Process Global :

Dim vr As VoiceRecognition

حال میایم ی String یا رشته میذاریم ک متنو بریزه اونتو

در Sub Globals :

Dim e As String

ودر قسمت اکتیویتی کریت مینویسیم :

vr.Initialize("vr")

If vr.IsSupported = False Then

ToastMessageShow("گوشی شما از برنامه پشتیبانی نمی کند !" , False)

ExitApplication

Else If vr.IsSupported = True Then

vr.Language = "fa"

vr.Prompt = "فرمان صوتی"

End If

و در اخرهم ساب vr_result رو ایجاد میکنیم تا متن مورد نظرو بریزه توی رشته یا String و اونو توی مسیج باکس نمایش بده :

Sub vr_Result (Success As Boolean, Texts As List)

If Success = True Then

e.text = Texts.Get(0)

MsgBox(e,"فرمان صوتی")

Else

ToastMessageShow("لطفا دوباره امتحان کنید" , False)

End If

End Sub

موفق باشی

[abbas2142 557]

من می خوام آفلاین باشه

 

این گوگل Voice  ،،، افلاین هستش ؟؟؟؟

 

من می خوام بگم مثلا وقتی کاربر گفت پخش یا سلام یه کاری انجام بده ،،، فارسی

[Elyas Erfani 3,582]

من می خوام آفلاین باشه

 

این گوگل Voice  ،،، افلاین هستش ؟؟؟؟

 

من می خوام بگم مثلا وقتی کاربر گفت پخش یا سلام یه کاری انجام بده ،،، فارسی

 

 

خیر گوگل وویس انلاینه

[abbas2142 557]

بیا بالا ،،، کسی هست ؟؟؟؟

 

روش آفلاین فرمان صوتی رو بدونه

[abbas2142 557]

خوب روش آفلاین وجود داره ؟؟؟؟؟؟؟؟؟