[nader_bhs]

السلام عليكم
كنت بصدد صنع كارت الكتروني تحتوي على PIC16F877 + LCD + MAX232 + COM PORT ، استعملت برنامج بروتوس وميكرو سي
ارسلت الداتا بالميكرو سي (usart_write)
و قمت كذلك بصنع إنترفاس على الفيجوال بازيك لإستقبال الداتا من المكروكنترولر
واستعملت برنامج Virtual_Serial_Port_Driver_6.0.1.115 للربط بين الكارت والكمبيوتر
لكن العملية لم تنجح معي حيث لم استطع استقبال الداتا على الإنترفاس

تفضلوا هذه الملفات المستعملة
ملف بروتوس وميكرو سي
ملف الفيجوال بازيك

أرجو منكم المساعدة وجزاكم الله خيراً

[robota]

السلام عليكم .
اخى نادر الكود جيد ويعمل بصورة جيدة لكن هناك بعض الاخطاء واهمها:
1-

temp=0.245*t1*2;

انت فى البداية عرفت temp على انه char ثم طلبت منه ان يقوم بعمل ال float .
2-

Usart_Write(temp);

كما هو معروف فان السيريال يقوم بالارسال بالاسكى كود وفى الاسكى لا يوجد ترميز للارقام المركبة مثلا لايوجد رمز للرقم 73 وعليك ارساله رقما بعد الاخر .
فمثلا اذا كانت درجة الحرارة 37 فان البيك سيرسل الرمز المقابل لل 37 وهو % وهو تماما ما يحدث فى برنامجك قم بالتعديل ونحن متابعين معك.
بالتوفيق
.

[nader_bhs]

شكرا على الإجابة السريعة أخي الكريم
لكني لا أعرف كيفية إرسال الرقم 37 رقماً بعد أخر

[robota]

بسيطة اخى نادر
باعتبار ان مدى درجة الحرارة سيكون من 0 - 99 ها الجزء سيفى بالغرض

t1=adc_read(0);
      temp=0.245*t1*2;
      inttostr(temp,text);
      lcd_cmd(lcd_cursor_off);
      lcd_out(1,6,text);
      a=temp/10;
      b=temp%10;
      Usart_Write(a+48);
      Usart_Write(b+48);

انا عدلته فى برنامجك وهو يعمل 100%
ايضا فى الجزء الثانى من الكود لايمكن ارسال جملة مباشرة . ساكتب الجزء الخاص بارسال جمل فيما بعد
بالتوفيق

[nader_bhs]

شكراً على التوضيح أخي robota
في إنتظار الجزء الخاص بإرسال جمل
قمت بربط ال-COMPIM بال-USART terminal
لكن لم اتحصل على النتيجة المطلوبة

[robota]

هذا هو كود ارسال جملة او عبارة

 unsigned char m[] = "  Temp1";
unsigned char i;
    
    i = 0;
    while(m[i] != 0)
    {                                         // Send TEXT to USART
       Usart_Write(m[i]);
       i++;
    }

بالنسبة للتطبيق استخدم الدائرة التالية
http://www.mediafire.com/?3mmnmtwtxmt
بالتوفيق

[MYM]

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

[robota]

اقتباس المشاركة الأصلية كتبت بواسطة MYM الأخ الفاضل روبوتا .... جزاكم الله خيرا على ما تبذلوه من جهد لهذا المنتدى الكريم ... فقد ساعدتني كثيرا بهذا الأمر و ها أنت مرة أخرى تمد يد العون لكل أخ في المنتدى فجزاكم الله خيرا عنا و عن الجميع.

جزاك الله خيرا على كلماتك الطيبة اخى الغالى .