قسم الميكروكنترولر والروبوت ودوائر الاتصال بالحاسب الالي قسم المتحكمات الـ microcontroller و المعالجات microprocessor و التحكم الرقمي بالكمبيوتر CNC والانظمة الآلية والروبوت Robots

   

Youssef Toomah
:: مهندس ::
تاريخ التسجيل: Jun 2013
المشاركات: 4
نشاط [ Youssef Toomah ]
قوة السمعة:
قديم 20-06-2013, 04:03 PM المشاركة 17   
افتراضي



ابشر يا أخي سوف ارسل لك الكود بالكامل لكن انا حاليا مسافر لمدة يومين و غدا ارجع البلد و الكود في جهاز في البيت
و انا نفس الشي بصدد عمل ساعة الكترونية متكاملة و اريد مساعدتك فارجو ان تذكر لي الادوات و الآيسيات التي تشمل مشروعك و الخطة .
جزاك الله كل خير و أنا جاهز للمساعدة بالتأكيد
احتجت في هذا المشروع حتى الآن معالج Atmega8 و شاشة LCD 16*4 و 3 مفاتيح هي Set و + و - لتعديل الساعة و لا أعلم إن كنت سأحتاج شيء آخر فأنا أعمل على المشروع بإشراف أحد أساتذتي في الكلية

اعلانات

alhootti
:: مهندس ::
تاريخ التسجيل: May 2012
المشاركات: 14
نشاط [ alhootti ]
قوة السمعة:
قديم 22-06-2013, 02:09 AM المشاركة 18   
افتراضي


تفضل يا أخي و عذرا على التأخير

كود:
long Day = 18;
long Month = 6;
long Year = 2013;
unsigned long JD;

void setup()
{
  Serial.begin(9600);
 if ((Month < 2) || (Month == 2))
 {
  Month == Month + 12;
 Year == Year - 1; 
 }
 else 
 {
  Month == Month; 
  Year == Year;
 }
 long A = int(Year/100);
 long B = 2 - A +int(A/4);
  JD = (365.25 * (Year + 4716)) + (30.6001 * (Month + 1)) + Day + B - 1524.5;
  unsigned long L = JD - 1948440 + 10632;
  unsigned long N = ((L - 1) / 10631);
  L = L - 10631 * N +354;
  unsigned long J = ((10985 - L) / 5316) * ((50 * L) / 17719) + (L / 5670) * ((43 * L) / 15238);
   L = L - ((30 - J) / 15) * ((17719 * J) / 50) - (J / 16) * ((15238 * J) / 43) + 29;
  unsigned long M = ((24 * L) / 709);
  unsigned long G = (M * 709) / 24;
  long y = (30 * N + J - 30);
  long D = L - G;
  
  Serial.println("Day : ");
   Serial.println(D);
  Serial.println(M);
  Serial.println(y);
    
}



  
    
   
      

void loop() 
{
  
}
أرجو ان تدرج لي الكود الذي يوضع في حدث Set + و -
أعتقد انك تستخدم DS1307

اعلانات اضافية ( قم بتسجيل الدخول لاخفائها )

alhootti
:: مهندس ::
تاريخ التسجيل: May 2012
المشاركات: 14
نشاط [ alhootti ]
قوة السمعة:
قديم 23-06-2013, 11:38 PM المشاركة 19   
افتراضي


اين انت يا أخي انتظر الكود


Youssef Toomah
:: مهندس ::
تاريخ التسجيل: Jun 2013
المشاركات: 4
نشاط [ Youssef Toomah ]
قوة السمعة:
قديم 24-06-2013, 11:13 PM المشاركة 20   
افتراضي


اين انت يا أخي انتظر الكود
شكراً جزيلاً لك على الكود
و آسف على التأخير بسبب التحضير لامتحاناتي في الجامعة
تفضل هذا هو كود Set , + , -
if(pina.B0 == 1)
{
Delay_ms(50);
if(pina.B0 == 1)
{while(1)
{
Lcd_out(1,6,time);delay_ms(100);Lcd_out(1,6," ");delay_ms(100);
if (pina.B1==1)
{hr++;if (hr>23) hr=0;hr1=hr1=Dec2Bcd(hr);time[0] = BCD2UpperCh(hr1);time[1] = BCD2LowerCh(hr1);}
if (pina.B2==1)
{hr--;if (hr<0) hr=23;hr1=hr1=Dec2Bcd(hr);time[0] = BCD2UpperCh(hr1);time[1] = BCD2LowerCh(hr1);}
if (pina.B0==1)
{while(1)
{
Lcd_out(1,9," ");delay_ms(100);Lcd_out(1,6,time);delay_ms(10 0);
if (pina.B1==1)
{minute++;if (minute>=60) minute=00;minute1=Dec2Bcd(minute);time[3] = BCD2UpperCh(minute1);time[4] = BCD2LowerCh(minute1);}
if (pina.B2==1)
{minute--;if (minute<00) minute=59;minute1=Dec2Bcd(minute);time[3] = BCD2UpperCh(minute1);time[4] = BCD2LowerCh(minute1);}
if (pina.B0==1)
{while(1)
{
Lcd_out(2,6,date);delay_ms(100);Lcd_out(2,6," ");delay_ms(100);
if (pina.B1==1)
{day++;if (day>=32) day=01;day1=Dec2Bcd(day);date[0] = BCD2UpperCh(day1);date[1] = BCD2LowerCh(day1);}
if (pina.B2==1)
{day--;if (day<=00) day=31;day1=Dec2Bcd(day);date[0] = BCD2UpperCh(day1);date[1] = BCD2LowerCh(day1);}
if (pina.B0==1)
{while(1)
{
Lcd_out(2,6,date);delay_ms(100);Lcd_out(2,9," ");delay_ms(100);
if (pina.B1==1)
{month++;if (month>=13) month=01;month1=Dec2Bcd(month);date[3] = BCD2UpperCh(month1);date[4] = BCD2LowerCh(month1);}
if (pina.B2==1)
{month--;if (month<=0) month=12;month1=Dec2Bcd(month);date[3] = BCD2UpperCh(month1);date[4] = BCD2LowerCh(month1);}
if (pina.B0==1)
{while(1)
{
Lcd_out(2,6,date);delay_ms(100);Lcd_out(2,12," ");delay_ms(200);
if (pina.B1==1)
{year++;if (year>=2100) year=00;year1=Dec2Bcd(year);date[8] = (((year%1000)/10)+48);date[9] = (((year%1000)%10)+48);}
if (pina.B2==1)
{year--;if (year<2000) year=2099;year1=Dec2Bcd(year);date[8] = (((year%1000)/10)+48);date[9] = (((year%1000)%10)+48);}
if (pina.B0==1)
goto loop;
}}}}}}}}}}}


عبدالله نعمان
:: مهندس متواجد ::
تاريخ التسجيل: May 2006
المشاركات: 173
نشاط [ عبدالله نعمان ]
قوة السمعة:
قديم 20-04-2014, 09:43 PM المشاركة 21   
افتراضي


بارك الله فيك


fawzy73
:: مهندس متواجد ::
تاريخ التسجيل: Dec 2008
المشاركات: 92
نشاط [ fawzy73 ]
قوة السمعة:
قديم 24-04-2014, 01:08 PM المشاركة 22   
افتراضي


الاخ المهندس صهيب

جزاك الله خير الجزاء علي محهودك وجعله الله في ميزان حسناتك

هذا الموضوع الرائع الذي طلما بحثت عنه كثيرا ولكن لم تكن النتائج دقيقة

ولكن مع هذه المعادلات فقد عملت التجربة علي برنامج الاكسيل وكانت النتائج ممتازة

وعند التجربة علي برنامج البروتيس لم تنجح التجربة واظن ان المشكلة في نوع المتغيرات

ارجو ان تساعدنا في عمل هذا المشروع علي mikro c

وشكرا

فوزي



الساعة معتمدة بتوقيت جرينتش +3 الساعة الآن: 05:57 PM
موقع القرية الالكترونية غير مسؤول عن أي اتفاق تجاري أو تعاوني بين الأعضاء
فعلى كل شخص تحمل مسئولية نفسه إتجاه مايقوم به من بيع وشراء وإتفاق وأعطاء معلومات موقعه
التعليقات المنشورة لا تعبر عن رأي موقع القرية الالكترونية ولايتحمل الموقع أي مسؤولية قانونية حيال ذلك (ويتحمل كاتبها مسؤولية النشر)