Artificial Intelligence - هوش مصنوعی  
انجمن را در گوگل محبوب کنيد :

بازگشت   Artificial Intelligence - هوش مصنوعی > مقدمات هوش مصنوعی > پروژه های هوش مصنوعی در ایران


 
تبليغات سايت
Iranian Association for the Advancement of Artificial Intelligence
ارسال تاپيک جديد  پاسخ
 
LinkBack (20) ابزارهاي تاپيک نحوه نمايش
قديمي ۰۲-۱۳-۱۳۸۷, ۱۰:۲۴ قبل از ظهر   #21 (لینک دائم)
عضو فوق فعال
 
آواتار soroosh-ab
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
پست ها: 40
تشكرها: 10
11 تشكر در 7 پست
پيش فرض

واقعآ ممنون بخاطر کمک هایی که می کنی ...........

بیشتر مشکلاتم حل شد !

اما هنوز نمی دونم چطوری به VB بگم که مسیج هایی که میاد رو با مسیج هایی که توی Table مسیج در دیتا بیس هست مقایسه کنه و اگه وجود داشت که از ردیف Answer , جواب پی ام رو ارسال کنه و اگه وجود نداشت یه پی ام مخصوص ارسال کنه

و یه مشکل دیگه که نمیتونم یه کدی بنویسم که مثلآ اگه پی ام به صورت :
كد:
/pm L9E3 salam
دریافت کرد به این معنی هست که بعد از فاصله اول آیدی یه نفره و بعد از فاصله دوم متن پی ام که باید به اون آیدی بده !
نمونه ی این کد در دلفی و رویا به صورت :
كد:
if Req = '/pm' then begin
      VarsRoYa.SendStr:='<#459cfe><font face="tahoma"><b>/pm "ID Doostet" "Peyghamet"'+
      #13+#10'Mesal :<#459cfe> <font face="tahoma"><b>/pm "robot_download" "Salam"' ;
     if VarsRoya.ListParam.Count<3 then  exit;
        req:=cut(VarsRoya.UserPM[1],False);
        VarsRoYa.UserPM:=Cut(VarsRoya.ListParam.Strings[1],False);
        Res:=Cut(VarsRoya.ListParam.Strings[2],False);
        varsRoYa.sendstr:=format('<font size="12" face="tahoma">:-$salam %s joon Yeki Behem Goft Behet Begam : '+res+' Goft IDsho Behet Nagam:-$',[VarsRoYa.UserPM]);
    end;
soroosh-ab آفلاين است   پاسخ با نقل قول

  #ADS
نشان دهنده تبلیغات
تبليغگر
 
 
 
تاريخ عضويت: -
محل سكونت: -
سن: 2010
پست ها: -
 

نشان دهنده تبلیغات is online  
قديمي ۰۲-۱۳-۱۳۸۷, ۱۰:۵۰ قبل از ظهر   #22 (لینک دائم)
Administrator
 
آواتار Siavash
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
محل سكونت: تهران
پست ها: 179
تشكرها: 27
439 تشكر در 108 پست
My Mood: Mehrabon
پيش فرض

دوست عزیز لطف کنید ساختار Table مورد نظرتون رو بگید! چند ستون داره؟ اسم و جنس هر ستون چی هست؟

برای مشکل دومتون از این کد می تونید استفاده کنید:
كد:
Dim arrPM() As String
'message = "/pm neol3ot Salam khoobi?"
If Left(message, 3) = "/pm" Then
    arrPM = Split(message, " ", 3)
    If UBound(arrPM) = 2 Then
        sckYahoo.SendData PM_Send(tUser.Text, arrPM(1), arrPM(2))
    End If
End If
اگر مشکلی تو این بخش دارید حتما بپرسید...
__________________
Siavash آفلاين است   پاسخ با نقل قول
از Siavash تشكر كرده است:
m0riiii (۰۶-۱۹-۱۳۸۸)
قديمي ۰۲-۱۳-۱۳۸۷, ۱۱:۱۳ قبل از ظهر   #23 (لینک دائم)
عضو فوق فعال
 
آواتار soroosh-ab
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
پست ها: 40
تشكرها: 10
11 تشكر در 7 پست
پيش فرض

اسم جدول (Table) مورد نظر Message هست و دارای 2 ستون هست : Requst ( که مسیجی که دریافت می کنه باید با این مطابقت داشته باشه ) و Response ( همون جوابی که باید ارسال کنه ) که هر دو ستون از نوع Text هستن

ويرايش شده توسط soroosh-ab; ۰۲-۱۳-۱۳۸۷ در ساعت ۰۲:۵۸ بعد از ظهر دليل: مشکل حل شد
soroosh-ab آفلاين است   پاسخ با نقل قول
قديمي ۰۲-۱۳-۱۳۸۷, ۱۲:۵۷ بعد از ظهر   #24 (لینک دائم)
Administrator
 
آواتار Siavash
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
محل سكونت: تهران
پست ها: 179
تشكرها: 27
439 تشكر در 108 پست
My Mood: Mehrabon
پيش فرض

تصحیح شد!... message بود، ببخشید من روی کامپیوتری که داشتم کار می کردم VB نصب نداشتم... ولی فکر کنم الآن باید کار کنه! دوباره به کد رجوع کنید...
__________________
Siavash آفلاين است   پاسخ با نقل قول
قديمي ۰۲-۱۳-۱۳۸۷, ۰۲:۵۸ بعد از ظهر   #25 (لینک دائم)
عضو فوق فعال
 
آواتار soroosh-ab
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
پست ها: 40
تشكرها: 10
11 تشكر در 7 پست
پيش فرض

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

باز هم تشکر می کنم
soroosh-ab آفلاين است   پاسخ با نقل قول
قديمي ۰۲-۱۳-۱۳۸۷, ۰۴:۴۸ بعد از ظهر   #26 (لینک دائم)
Administrator
 
آواتار Siavash
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
محل سكونت: تهران
پست ها: 179
تشكرها: 27
439 تشكر در 108 پست
My Mood: Mehrabon
پيش فرض سورس کد روبات یاهو مسنجر

این تقریبا سورس یک روبات یاهو! مسنجر هست.
می تونید بهش کلمه ی جدید یاد بدید، یا کلمه ی مورد نیاز رو پاک کنید.

یک سویچ ساده مثل همین /pm هم توش هست.
فايل ضميمه
نوع فايل: zip SMClient.zip (60.0 كيلو بايت, 375 نمايش)
__________________
Siavash آفلاين است   پاسخ با نقل قول
از Siavash تشكر كرده اند:
Farzadt (۱۲-۱۷-۱۳۸۷), m0riiii (۰۶-۱۹-۱۳۸۸), sanaz.pbc (۱۱-۲۸-۱۳۸۷), tahanagmi (۰۶-۲۱-۱۳۸۷)
قديمي ۰۲-۱۴-۱۳۸۷, ۰۲:۴۹ قبل از ظهر   #27 (لینک دائم)
عضو فوق فعال
 
آواتار Ashkan_yazdgroup
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
پست ها: 21
تشكرها: 0
2 تشكر در 2 پست
Wink

نقل قول:
نوشته اصلي بوسيله Siavash نمايش پست
آخرین ورژن سورس کد jYMSG در ضمیمه قابل دریافت هست...
با سلام متشكرم كه خيلي سريع به مشكلات ما رسيدگي ميكنيد

اما بايد بگم يه خرده چون تخصصي حرف مي زنيد بنده متوجه نميشم كه چه بايد بكنم
از آقا سياوش درخواست دارم در مورد فايلي (سورس کد jYMSG ) كه گذاشتيد براي مبتدي هاي علاقه مندي مثل من بيشتر توضيح دهيد و اينكه چجوري و توسط چه برنامه اي آن را اجرا كنم

باز هم تشكر ميكنم منتظر راهنماييتون هستم

يك سوال ديگر : آيا سايفر رو هم ميتوان مانند رويا از امكاناتي چونhelp/ بهره مند كرد ؟
Ashkan_yazdgroup آفلاين است   پاسخ با نقل قول
قديمي ۰۲-۱۴-۱۳۸۷, ۰۵:۲۵ قبل از ظهر   #28 (لینک دائم)
عضو فوق فعال
 
آواتار soroosh-ab
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
پست ها: 40
تشكرها: 10
11 تشكر در 7 پست
پيش فرض

سلام اشکان جان .
جواب سئوال دومت خیلی واضح ! بله به راحتی میشه اینکار و کرد !
هرکدوم از این دستوراتی که خودمون برای رویا میذاشتیم یک روش خواصی دازه ! مثلآ help چیز خاصی نداره و فقط یک پی ام معمولیه که معرفی میکنه دستورات رو !
soroosh-ab آفلاين است   پاسخ با نقل قول
قديمي ۰۲-۱۴-۱۳۸۷, ۰۲:۱۸ بعد از ظهر   #29 (لینک دائم)
عضو جدید
 
آواتار c++m
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
پست ها: 3
تشكرها: 1
0 تشكر در 0 پست
پيش فرض

سلام
خیلی خوبه
من تاحالا در این زمینه کار نکردم
اما خوشم اومد ازش
فکر کنم این مثالها و این صحبتها خیلی با یه روبات سطح بالا مثل مثلاneol3ot فاصله داشته باشه ؟
درست می گم؟

بعدش اینکه من اون فایلی رو که به عنوان یه نمونه سورس گذاشته بودید رو گرفتم اما
بزرگترین مشکلش VB6 بودنشه
در هر صورت ممنون
اگه سوالی داشتم که حتما دارم بازم میپرسم
c++m آفلاين است   پاسخ با نقل قول
قديمي ۰۲-۱۴-۱۳۸۷, ۰۵:۳۲ بعد از ظهر   #30 (لینک دائم)
Administrator
 
آواتار Siavash
 
تاريخ عضويت: ارديبهشت ۱۳۸۷
محل سكونت: تهران
پست ها: 179
تشكرها: 27
439 تشكر در 108 پست
My Mood: Mehrabon
پيش فرض

از اونجایی که به نظر من VB6 آسونترین زبان برنامه نویسی برای کسانی که تازه شروع به کار کردن بود این کد رو توی VB6 نوشتم. به راحتی می تونید اون رو تبدیل به VB .Net کنید، خود تبدیل کننده ی .Net این کار رو انجام میده.
در صورتی که با جاوا آشنایی دارید از jYMSG می تونید استفاده کنید، همچنین در صورتی که با C++ آشنایی دارید از پروژه ی Pidgin یا همون gaim قدیمی می تونید استفاده کنید که سورس اون در sf.net قابل دریافت هست.

در جواب اشکان: استفاده از jYMSG برای افرادی که مبتدی هستند فکر نکنم زیاد درست باشه. چون این سورس کاملا Object Oriented هست و درکش برای افرادی که هنوز مثال های زیاد در این زمینه ندیدند کمی سخته.
در جواب سوال دومتون: اگر از یک زبان برنامه نویسی مثل Java یا VB یا ... استفاده کنید روبات شما هر کاری می تونه بکنه تقریبا و هیچ محدودیتی ندارید (همون طور که دوستمون سروش گفتند). در کد VB که به عنوان مثال قرار دادم یک سویچ ساده مثل /pm هم تعریف شده تا ببینید به چه صورت می تونید این کار رو انجام بدید.
کار با این سورس خیلی ساده هست، کافیه نرم افزار VB6 که در پکیج Visual Studio 6.0 هست رو نصب کنید و فایل prjYahoo رو باز کنید، و دکمه ی مثلث رو بزنید، بعد می تونید کلمات یا جملات جدید به روبات یاد بدید (بعد از هر بار کلمه Add کردن برای Update شدن لیست دکمه ی Refresh رو بزنید). همچنین در سورس کد قسمت GetPM می تونید سویچ های جدید مثل /learn و /help و ... رو به روباتتون اضافه کنید.

در جواب c++m: ساختن یک روبات مثل neol3ot خیلی سخت نیست. یک روبات بسیار هوشمند تر از neol3ot می تونه بشه، البته neol3ot برای زمان خودش که 3-4 سال پیش هست روبات نسبتا خوبی بود. برای اینکه یک روبات مثل neol3ot داشته باشید باید یک سری فیلتر ها قبل از پردازش جملات به روبات اضافه کنید و به جای مقایسه کردن دقیق جمله ی کاربر روبات باید از هر جمله یک مفهوم رو دریافت کنه و با توجه به اون مفهوم جواب بده.
__________________
Siavash آفلاين است   پاسخ با نقل قول
از Siavash تشكر كرده اند:
Farzadt (۱۲-۱۷-۱۳۸۷), irancms (۱۲-۹-۱۳۸۷), m0riiii (۰۶-۱۹-۱۳۸۸)
پاسخ

Tags
bot, robot, ياهو, ياهو مسنجر, یاهو, یاهو مسنجر, yahoo, yahoo messenger, بات, بات ياهو مسنجر, بات سختگو, روبات, روبات یاهو مسنجر

LinkBacks (?)
LinkBack to this Thread: http://artificial.ir/intelligence/thread2.html
نوشته شده توسط For Type تاريخ
سایفر روبات (Cypher Robot) - آموزش مقاله كتاب دانلود- باشگاه مهندسان ایران This thread Refback ۰۳-۱۵-۱۳۸۹ ۰۳:۴۳ قبل از ظهر
دانلود بازار به روز ترین و قدرتمندترین سایت دانلود فارسی زبان مرجع نرم افزار ... - DarkError.com ا This thread Refback ۱۲-۶-۱۳۸۸ ۰۱:۴۸ بعد از ظهر
سورس This thread Refback ۰۶-۳۰-۱۳۸۸ ۰۴:۰۱ بعد از ظهر
سایفر روبات (Cypher Robot) - Sat98 Professional Forums This thread Refback ۰۶-۲۷-۱۳۸۸ ۱۱:۰۸ قبل از ظهر
ايراني روبوت یاهو This thread Refback ۰۶-۲۷-۱۳۸۸ ۰۲:۱۸ قبل از ظهر
ساخت روبات یاهو مسنجر This thread Refback ۰۶-۲۷-۱۳۸۸ ۰۱:۳۶ قبل از ظهر
یاران ***************** باران - وب لاگ This thread Refback ۰۵-۱۷-۱۳۸۸ ۰۳:۴۹ بعد از ظهر
Artificial Intelligence - &#1607;&#1608;&#1588; &#1605;&#1589;&#1606;&#1608;&#1593;&#1740; - صفحه اصلي This thread Refback ۰۴-۳۱-۱۳۸۸ ۰۲:۲۷ بعد از ظهر
یاران ***************** باران - وب لاگ This thread Refback ۰۴-۱۸-۱۳۸۸ ۰۸:۳۰ بعد از ظهر
یاران - وب لاگ This thread Refback ۱۲-۸-۱۳۸۷ ۰۹:۴۱ قبل از ظهر
روبات یاهو مسنجر This thread Refback ۱۱-۲۲-۱۳۸۷ ۰۱:۵۳ بعد از ظهر
» » ترفند This thread Refback ۱۰-۲۶-۱۳۸۷ ۰۳:۵۸ بعد از ظهر
سیاوش محمودیان - بلاگ ها This thread Refback ۰۷-۲۳-۱۳۸۷ ۱۲:۰۹ بعد از ظهر
نئو - لیست وبلاگ ها This thread Refback ۰۷-۱۹-۱۳۸۷ ۱۰:۰۳ قبل از ظهر
نئو - پروفایل This thread Refback ۰۷-۱۴-۱۳۸۷ ۱۱:۴۰ قبل از ظهر
نئو - لیست وبلاگ ها This thread Refback ۰۷-۱۱-۱۳۸۷ ۰۷:۴۳ بعد از ظهر
نئو - وب لاگ This thread Refback ۰۷-۱۱-۱۳۸۷ ۰۷:۳۸ بعد از ظهر
نئو - پروفایل This thread Refback ۰۷-۱۱-۱۳۸۷ ۰۷:۳۲ بعد از ظهر
سیاوش محمودیان - بلاگ - ساخت روبات یاهو مسنجر - قسمت اول This thread Refback ۰۷-۱۱-۱۳۸۷ ۱۲:۱۴ قبل از ظهر
سیاوش محمودیان - بلاگ - ساخت روبات یاهو مسنجر - قسمت دوم This thread Refback ۰۷-۱۰-۱۳۸۷ ۰۵:۴۰ بعد از ظهر


كاربران در حال ديدن تاپيک: 1 (0 عضو و 1 مهمان)
 
ابزارهاي تاپيک
نحوه نمايش

قوانين ارسال
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is فعال
شکلکها فعال است
كد [IMG] فعال است
كدهاي HTML غير فعال است
Trackbacks are فعال
Pingbacks are فعال
Refbacks are فعال




زمان محلي شما با تنظيم GMT +3.5 هم اکنون ۰۳:۳۵ بعد از ظهر ميباشد.


Powered by vBulletin® Version 3.8.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Search Engine Friendly URLs by vBSEO 3.1.0 ©2007, Crawlability, Inc.

Teach and Learn at Hexib | Sponsored by www.Syavash.com and Product In Review

استفاده از مطالب انجمن در سایر سایت ها، تنها با ذکر انجمن هوش مصنوعي به عنوان منبع و لینک مستقیم به خود مطلب مجاز است

Inactive Reminders By Icora Web Design