اين اجد اداة مساعد الأوفس ؟؟؟؟

السلام عليكم ورحمة الله بركاته

الأداه هي AGENTCTL.DLL

وهناك رابط في توقيعي بعنوان المساعد نور

فيه ربط هذه الأداة مع الفيجوال بيسك

و السلام عليكم

الأخ الفاضل ...

أنت تحتاج إلى تحميل أدوات برمجة (Microsoft Agent SDK) بالغضافة لمجموعة ادوات أخرى تجدها فى (Microsoft Agent download page for developers) وعند الإنتهاء من البرنامج ولضمان عمله على أى جهاز كمبيوتر، يجب أن يحتوى على بعض الأدوات موجودة فى (Microsoft Agent download page for end-users) ولمزيد من الشرح راجع صفحة (Microsoft Agent) ولإستخدام أكثر من (Agent) فى نفس الوقت راجع مثال (Scripting with Microsoft Agent)

شكراً

اخي المزمجر

جزاك الله عني خيرا

اخي -Eng. Usama El Mokadem

جزاك الله عني خيرا هذا الذي اريده تماما .... جاري التحميل

لكن بقي سؤال واحد اين اجد شخصيات Agent

سلامي

.

الأخ الفاضل ...

إليك بعض المواقع قد تجد فيها بعض الشخصيات:

http://www.msagentring.org/chars.htm

http://mydevotion.com/ss/sschars.asp

برنامج محرر الشخصيات مفيد فى تصميم الحركات ace.exe أو من Agent Character Editor

برنامج مساعد جداً: MASH

أرجوا أن يكون هذا ما تريده

شكراً

جاري التحميل والتجربة جزاك الله عني كل خير

لو عندك ميكروسوفت أوفيس

ففيها عدة شخصيات

وهي تظهر مع الاوفيس

تستطيع استخدامها

السلام عليكم ..

شكرا لكم جميعا لهذه المعلومات ..

عند تحميل الشخصيات .. كيف يمكنني استعراضها بعد تحميلها في السي ؟؟ يفتح بأي برنامج؟

ومالذي يمكنني تعديله في برنامج Agent Character Editor .. وهل هناك شرح لهذا البرنامج؟

حيث إني أضفت شخصيات برامج الاوفس ولم يقبل البرنامج ..؟؟

والسلام خير الختام ..

استعرض خصائص الملف فترى الشخصية كشكل

ابحث عن الملفات ذات اللاحقة acs

و تستطيع استخدام أي واحد تريد مع كامل الحركات

بما أن لدي بعض الوقت سأ جهز مثال بسيط إن شاء الله

السلام عليكم :D

هذا مثال بسيط و هو تطويرو تبسيط للمثال في توقيعي

'المارد
Dim x As IAgentCtlCharacter
Private Sub Form_Load()
	'من المسار
	Dim path
	Dim file
	path = App.path
	If Right(path, 1) <> "\" Then path = path + "\"
	'   'NOUR'ضع الملف في المسار وسميه
	file = path + "NOUR.acs"
	Agent1.Characters.Load "x", file
	Set x = Agent1.Characters("x")
	x.Show
	x.Speak "السلام عليكم و رحمة الله و بركاته"
	x.Speak "المزمجر: لا تنسونا من دعوة صالحة"

	x.Play "Greet"

	'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&
	'إظهار كافة الحركات للمارد
	Dim Animation As Variant
	For Each Animation In x.AnimationNames
		List1.AddItem Animation
	Next
End Sub

Private Sub List1_Click()
	x.Stop
	x.Play List1.Text
	Text1.Text = List1.Text
End Sub

NOUR_help.rar

الأخ الفاضل ...

MSAgent.zip

بأستخدام (MS-VB 6.0)

مرفق مثال بسيط للتوضيح، وهو يحتاج لوجود الملف (Merlin.acs) - مرفق منفصلاً لأن حجمه كبير - وإذا كان هذا الملف موجود فلا داعى لإعادة تحميله، كذلك يمكن استخدام أى شخصية أخرى موجوده عندك غير (Merlin)

شكراً

Merlin.zip

اخي المزمجر انا استخدمت برنامجك اللي عملت

البرنامج : برنامج المساعد نور :أحاديث نبوية عن طريق جني الاوفيس

لكن مشكلته انه يقرأ بالمعكوس كما انه لاينطق بطريقة صحيحة...

وانت واعدتنا بأن تجهز مثال

شكرا...

اقتباس

لكن مشكلته انه يقرأ بالمعكوس كما انه لاينطق بطريقة صحيحة...

ربما تستخدم نظام أجنبي

وانت واعدتنا بأن تجهز مثال

ذكرني !

اخي المزمجر ان كنت متواجد فأرجوك وأتوسل اليك اذا كنت تعرف حل لمشكلتي في موضوع كتبته عن مشكله في عمل التقارير ... ارجوك ساعدني

هذا الرابط : /index.php?showtopic=122211

وعن مشكلة رسئل التنبيه .. الرابط : /index.php?showtopic=122258