[ennng]

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

اليوم مشروعنا مهم وبسيط جدا لكن يحتاج له تركيز شوي وهو عبارة عن مراقبة درجة الحرارة عن بعد عن طريق استخدام الانترنت والايميل اولا وقبل الشرح نضع البرامج والادوات المطلوبة للمشروع:
1-برنامج البروتس للمحاكاة وهو موجود عند الجميع باذن الله
2-برنامج MikroC وهو ايضا معروف لبرمجة المتحكم
3-برنامج Matlab وهو غني عن التعريف
4-برنامج Virtual Serial Port وفيه برامج كثيرة ومتاحة وهدفها انشاء او ربط بين serial port
http://www.eltima.com/products/vspdxp/

ممتاز حتى الان فاذا كانت درجة الحرارة 45 درجة مئوية واقل راح يضئ الليد الاخضر ولايحدث شي لان الحرارة اوكي



واذا كانت درجة الحرارة اكبر من 45 واصغر من 100 فان الليد الاصفر سوف يضي
وهنا ايضا لم ندخل في حالة الخطر!!!! وممكن انت تغير وتلعب في درجات الحرارة اللي تناسب تطبيقك من خلال الكود حلوووو الكلام

[ennng]

اما اذا كانت درجة الحرارة 100 واكثر راح يرسل المتحكم حرف a للماتلاب والذي بدورة يرسل ايميل ويحذر ان الحرارة مرتفعة طبعا ممكن تغير حرف a لكن انتبه لنوع المتغير لابد ان تغيرة في كود الماتلاب



وسوف تلاحظ ان الرسالة وصلت على ايميلك

[ennng]

الان نأتي للاكواد اولا كود الميكروسي وهو

sbit LCD_RS at RB0_bit;sbit LCD_EN at RB1_bit;sbit LCD_D4 at RB2_bit;
sbit LCD_D5 at RB3_bit;sbit LCD_D6 at RB4_bit;sbit LCD_D7 at RB5_bit;
sbit LCD_RS_Direction at TRISB0_bit;sbit LCD_EN_Direction at TRISB1_bit;
sbit LCD_D4_Direction at TRISB2_bit;sbit LCD_D5_Direction at TRISB3_bit;
sbit LCD_D6_Direction at TRISB4_bit;sbit LCD_D7_Direction at TRISB5_bit;

unsigned int adc,adc2;
char k[6];
void main() {
 ADCON1 = 0x80;
 TRISA = 0xFF;
 TRISC.F6=1;TRISC.F7=0;
 TRISD=0;PORTD=0;
 Lcd_Init();
 Lcd_Out(1, 1, "ennng");
 delay_ms(500);
 UART1_Init(9600);
 while(1) {
 adc = Adc_Read(2);
 adc2 = 0.245*adc*2;
 ByteToStr(adc2,k);
 lcd_out(2,1,"Temp:");
 lcd_out(2,6,k);
 Lcd_Chr(2,9,223);
 Lcd_out(2,10,"C");
 Lcd_Cmd(_LCD_CURSOR_OFF);
 delay_ms(500);
 if(adc2<=45) {portd.f0=1;delay_ms(100);portd.f0=0;delay_ms(100);}
 if(adc2<100&&adc2>46){portd.f1=1;delay_ms(100);portd.f1=0;delay_ms(100);}
 if(adc2>=100){;portd.f2=1;delay_ms(100);portd.f2=0;delay_ms(100);Lcd_out(2,11," email");uart1_write('a');delay_ms(10000)}
 }}

المرجع وانا غيرت اشياء بسيطة واضفت السيريل بورت
http://dbaasco.com/vb/showthread.php?t=5038

اما بالنسبة لكود الماتلاب فهذا المرجع وانا اضفت عليه اضافات حتى يتناسب مع مشروعنا
http://www.mathworks.co.uk/support/s...RDV/index.html
وهناك ملاحظة على كود الماتلاب لابد ان يكون عندك حساب على gmail لانه يدعم السيرفر مجانا اما اذا اردت استخدام مثلا hotmail فلابد ان تدفع مبلغ
ربطنا بين com1 في الماتلاب و com2 في البروتس وانتبه للاعدادات تبع com1 , com2

clear all;
s = serial('COM1');
set(s,'BaudRate',9600);
fopen(s);
    ser = fread(s,1, 'char');
    if ser == 'a'
% Define these variables appropriately:
mail = 'XXXXXXX*gmail.com'; %Your GMail email address
password = 'XXXXXXXX'; %Your GMail password

% Then this code will set up the preferences properly:
setpref('Internet','E_mail',mail);
setpref('Internet','SMTP_Server','smtp.gmail.com');
setpref('Internet','SMTP_Username',mail);
setpref('Internet','SMTP_Password',password);
props = java.lang.System.getProperties;
props.setProperty('mail.smtp.auth','true');
props.setProperty('mail.smtp.socketFactory.class', 'javax.net.ssl.SSLSocketFactory');
props.setProperty('mail.smtp.socketFactory.port','465');

% Send the email. Note that the first input is the address you are sending the email to
sendmail('XXXXXX*gmail.com','Test from MATLAB','The Temperature is High = 100 C degree!!!');
msgbox('message has been sent');
figure
rgb = imread('images.jpg');
image(rgb); title('Temp')
end
fclose(ser);
fclose(s);

msgbox('message has been sent');
figure
rgb = imread('images.jpg');
image(rgb); title('Temp')

ممكن حذفها هي فقط رسالة تظهر لك عندما يتم ارسال الرسالة بنجاح اما الصورة
فممكن تحذفها او تضع اي صورة تريدها اهم شي امتدادها وكذالك تخزنها في نفس المجلد اللي فية الكود

وكذالك محتوى الرسالة التي تصلك على الايميل ممكن تغيرة باي شئ تريدة

اتمنى للجميع التوفيق والنجاح في الداريين ولاتنسونا من صالح دعائكم

[ennng]

نسيت ان انبه عن XXXXXX لابد انت تغير الايميل تبعق وكذالك الباسورد
فمثلا ennng*gmail.com طبعا هذا ليس ابميلي هذا ايميل وهمي

وتحياتي للجميع

[ahmad abdullah]

اخي بارك الله فيك و الله مشروع جداً رائع و جميل ... عندنا في المنتدى ضعف في برمجة الكمبيوتر ببرامج مثل الماتلاب ، الفجوال بيزيك دوت نت ، سي شارب و الخ ... انا اعمل على مشروع مماثل بالفجوال بيزيك دوت نت، لكن ايضاً يستقبل الرسالة و يشغل مثلاً اغنية ( تكون صوتها انذار ) او يشغل انذار موصول بالكمبيوتر ...

لكن لم احقق شيئاً سوى ارسال الرسالة اما فيما يخص الاستقبال ف لسّة ما عملت اي شيء ...

[ahmad abdullah]

اخي حضرتك ما عم بتكون اونلاين على الماسنجر ...

[ennng]

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

[mahmosha]

maghod ra23 momkien da2ret al protues?