Artificial Intelligence - هوش مصنوعی

Artificial Intelligence - هوش مصنوعی (http://artificial.ir/intelligence/)
-   پروژه های هوش مصنوعی در ایران (http://artificial.ir/intelligence/forum42.html)
-   -   سایفر روبات (Cypher Robot) (http://artificial.ir/intelligence/thread2.html)

r-co ۰۷-۲۶-۱۳۸۷ ۰۶:۳۰ بعد از ظهر

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

r-co ۰۷-۲۶-۱۳۸۷ ۰۷:۱۲ بعد از ظهر

Message Example
 
اینم یه مثال واسه آقا سیاوش درباره پست های قبلی
که سوالو بصورت عکس و دیتابیس گفتم البته همون سوال پست قبلیام بود
Download For Mr Siavash

r-co ۰۷-۲۶-۱۳۸۷ ۰۷:۳۳ بعد از ظهر

SMClient v1.3.2
 
SMClient v1.3.2 تنها چیزی که بهش اضافه شده status/ هست کا بازدن status/ آیدی پی ام دهنده تو استاتوس نشون می ده
status/

Download SMClient v1.3.2

r-co ۰۷-۲۶-۱۳۸۷ ۱۰:۵۹ بعد از ظهر

Ye Moshkel Asasi
 
سیاوش تو این نسخه جدید مشکلی وجود داره که اگه برطرف کنی عالی میشه
تو نسخه های قبلی با نوشتن کد پایین بات جواب می داد ولی الان جواب نمی ده
---------------------------------------------------------------------------------
If Left(Message, 6) = "testpm" Then
"Response = "Test Pm Ok
End If
---------------------------------------------------------------------------------

mjanbazi ۰۷-۲۶-۱۳۸۷ ۱۱:۱۵ بعد از ظهر

نقل قول:

نوشته اصلي بوسيله r-co (پست 478)
سیاوش تو این نسخه جدید مشکلی وجود داره که اگه برطرف کنی عالی میشه
تو نسخه های قبلی با نوشتن کد پایین بات جواب می داد ولی الان جواب نمی ده
---------------------------------------------------------------------------------
If Left(Message, 6) = "testpm" Then
"Response = "Test Pm Ok
End If
---------------------------------------------------------------------------------

rco جان به اینصورت این کارو انجام بده شما sckyahoo.senddata رو نمی زنی معلومه جواب نمی ده باید جوابو براش ارسال کنی این خطو اضافه کن جواب می ده
If Left(Message, 5) = "/
time" Then((Response = "Now Time IS:" & str(Time
( sckYahoo.SendData sendPM(tUser.Text, PersonId, Response)
End If

Siavash ۰۷-۲۷-۱۳۸۷ ۱۲:۰۴ قبل از ظهر

نقل قول:

نوشته اصلي بوسيله r-co (پست 476)
اینم یه مثال واسه آقا سیاوش درباره پست های قبلی
که سوالو بصورت عکس و دیتابیس گفتم البته همون سوال پست قبلیام بود
Download For Mr Siavash

مشكلتون رو متوجه شدم... در اولين فرصت يك نمونه براتون قرار ميدم...

نقل قول:

نوشته اصلي بوسيله r-co (پست 477)
SMClient v1.3.2 تنها چیزی که بهش اضافه شده status/ هست کا بازدن status/ آیدی پی ام دهنده تو استاتوس نشون می ده
status/

Download SMClient v1.3.2

بابت اضافه كردن اين قابليت ممنون!

نقل قول:

نوشته اصلي بوسيله r-co (پست 478)
سیاوش تو این نسخه جدید مشکلی وجود داره که اگه برطرف کنی عالی میشه
تو نسخه های قبلی با نوشتن کد پایین بات جواب می داد ولی الان جواب نمی ده
---------------------------------------------------------------------------------
If Left(Message, 6) = "testpm" Then
"Response = "Test Pm Ok
End If
---------------------------------------------------------------------------------

دليل اين مشكلتون اين هست كه در بخش سويچ ها قرار داديد اين شرط رو. شرط اول براي سويچ ها اين هست كه اولين كاراكتر اون / باشه اما testpm با / شروع نميشه!
پس يا بايد شرط رو خارج از اون شرط قرار بديد يا بايد با / شروع كنيد نام سويچ رو، مثلاً /testpm

r-co ۰۷-۲۷-۱۳۸۷ ۱۰:۴۰ قبل از ظهر

مثال برای Sendpm
 
سیاوش من همین کدsendpm رو تونسخه های قبلی قرار می دادم به راحتی جواب می داد ولی تو این نسخه اینطوری نیست. من یه نمونه از هر دو رو واسه دانلود گذاشتم(هم نسخه قدیم هم جدید) ببینیش حتما مشکل رو می فهمی....؟
در SMClient v1.2.4 کار می کنه ولی در SMClient 1.3.2 کار نمی کنه ؟؟؟؟؟؟؟
Download For Siavash

Siavash ۰۷-۲۷-۱۳۸۷ ۰۶:۵۷ بعد از ظهر

اتفاقاً اين به خاطر باگي بود كه در نسخه ي قبل وجود داشت! يعني كار درست در نسخه ي جديد داره انجام ميشه. دليلش هم اين هست كه جواب شما با جواب تهي جايگزين ميشه. براي برطرف كردن اين مشكل از Else بايد استفاده كنيد. يا اينكه اون بخش رو با اين كد تعويض كنيد:
كد:

If Left(Message, 6) = "sendpm" Then
    Response = "Test Send Pm OK"
    sckYahoo.SendData sendPM(tUser.Text, PersonId, Response)
    Exit Sub
End If

دليل اينكه اين اتفاق مي افته اين هست كه ابتدا شما مقدار Response رو تغيير ميديد و بعد در خط هاي بعد مقدار Response رو با استفاده از getResponse ميخواد بدست بياره كه به خاطر پيدا نشدن جواب و تهي بودن اون مقدار "" داخل Response ريخته مي شه و در نتيجه بات فكر مي كنه كه جوابي موجود نبوده.
در ورژن قبلي وقتي جوابي پيدا نميشد تابع getResponse با ارور از تابع خارج مي شد (كه به خاطر استفاده از On error به تا انتهاي تابع getResponse نمي رفت و مقدار تهي جايگزين جواب نميشد) و در 1.3.1 اين مشكل حل شده.
انشاالله در نسخه ي بعدي ساختار بخش GetPM رو كمي تغيير ميدم تا ساده تر بشه به اون امكانات جديد اضافه كرد.

r-co ۰۷-۲۷-۱۳۸۷ ۰۸:۵۴ بعد از ظهر

Ama iN Code Dar Hado Andazeye Gabli Nist
 
به نظر من سیستم قبلی ارسال پی ام مثلاsendpmدر مثال های قبلی خیلی بهتر از این نمونه جدید هست. اگه بشه در نسخه جدید مانند سری قبلی باشه خیلی عالی تره تا اینی که الان هست-- تغییر در این سیستم موجب میشه که ما کلی از کدارو تغییر بدیم--

Siavash ۰۷-۲۷-۱۳۸۷ ۰۹:۱۲ بعد از ظهر

دوست خوب!
در اون حالت در هر بار سوالي كه كاربر مي پرسيد و در بانك اطلاعاتي وجود نداشت يك Error‌داخلي توليد ميشد. اين اصلاً از نظر برنامه نويسي درست نبود. در حال حاضر هم با قرار دادن يك Exit Sub كه در مثال بالا قرار دادم براحتي مي تونيد همين كاري كه مي خواهيد رو انجام بديد. در هر صورت در ورژن بعدي انشاالله يك استاندارد در اين زمينه درست مي كنيم تا دقيقا جاي اضافه كردن كد هاي جانبي مشخص باشه و ديگه تغيير نكنه... در اين ارتباط حق كاملاً با شماست.

يك ايده - لطفاً تمام دوستان بخوانند:
تصميم دارم در نسخه هاي آينده يك قسمت به كد اضافه كنم تا اطلاعات جديدي كه به هر بات اضافه مي شه در يك پايگاه داده ي مركزي ذخيره بشه! مثلاً وقتي من يك الگوي جديد به بات اضافه مي كنم در يك پايگاه مركزي اون الگوي جديد با نام خود من در اونجا ثبت بشه. همينطور براي تمام دوستاني كه از اين بات استفاده مي كنند.
هدف اين هست كه يك بات مركزي با كمك تمام دوستان ساخته بشه كه بتونه به اكثر سوالات جواب بده. اين بانك اطلاعاتي هم در دسترس عموم قرار خواهد گرفت يعني در نهايت به نفع خود دوستان هم خواهد بود.

حالا نظرتون در اين ارتباط چي هست؟ آيا روي نوشتن همچين سيستمي كار كنم يا خير؟


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

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