أصدقاء كثيرون في البرمجة لأنها رمز التاريخ الميلادي تتمثل يتم تلقائيا التاريخ الميلادي في التقويم ، وكذلك في سنة كبيسة التي يجري حساب رمز.
اليوم رمز لتحويل التاريخ الميلادي إلى تقويم لأصدقاء الأساسية مبرمج اللغة ، ولقد أعطيت. هذا الرمز تماما العملية هو Vtst

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

ولكن كيف يجب أن تكون رمز من السنة والشهر واليوم وفاتهما البرنامج هو موضح في مجموعة المتغيرات التالية.

Myear = 2008
Mday = 28
Mmonth = 8
2008/08/28 على رمز ونحن النموذج الناتج من هذا الرمز هو أنتجت على جدول زمني كما يلي في هذا المثال هو يوم 1387/06/07.

شراء البريدي ds1307

في ما يلي مدونة لإخراج Jday اليوم المتغير الذي يمكن أن تصبح يوما تواريخ هذا المتغير يمكن أن تصبح الإخراج متغير أشهر Jmonth في هذا الرمز وكإخراج متغير Jyear السنة التقويمية هو أيضا متغير من عدد الأيام التي قضاها Jdayofyear تحسب من الشهر الشمسية لأول مرة تظهر.

'------المتشعب : / / www.yazdkit.com------'
''------المتشعب : / / www.yazdkit.ir-------'
$ regfile = "M16def.dat"
$ الكريستال = 1000000
$ ليب "Mcsbyteint.lbx"

كما قاتمة Myear صحيح «الإدخال الميلادي (الغريغوري) السنة
كما قاتمة Mday صحيح 'مدخلات الميلادي يوم
كما قاتمة Mmonth صحيح 'إدخال الشهر الميلادي
كما قاتمة Mdayofyear صحيح
كما قاتمة Myear_ صحيح

كما قاتمة Jday صحيح 'إخراج جلالي (شمسي) اليوم
كما قاتمة Jmonth صحيح 'إخراج جلالي شهر
كما قاتمة Jyear صحيح 'إخراج جلالي السنة
كما قاتمة Jdayofyear صحيح

كما قاتمة Gnumdayofyear صحيح
كما قاتمة Isleapyear مقدار ضئيل
كما قاتمة Isleapyearp مقدار ضئيل

كما قاتمة Iloop البايت
كما قاتمة Temp1 صحيح
كما قاتمة Temp2 صحيح
كما قاتمة Temp3 صحيح
كما قاتمة Temp4 صحيح

خافت Jmonth_a (12) كأن البايت
خافت Mmonth_a (12) كأن البايت

Mmonth_a (1) = 31
'--- 28 يا 29 سال اجار Kabiseh Bashad وفي 29 ماه روز Mibashad -------
Mmonth_a (2) = 28
Mmonth_a (3) = 31

Mmonth_a (4) = 30
Mmonth_a (5) = 31
Mmonth_a (6) = 30

Mmonth_a (7) = 31
Mmonth_a (8) = 31
Mmonth_a (9) = 30

Mmonth_a (10) = 31
Mmonth_a (11) = 30
Mmonth_a (12) = 31

Gnumdayofyear = 365

Myear = 2008 'عينة الميلادي (الغريغوري) السنة
Mday = 28 'عينة الميلادي يوم
Mmonth = 8 'عينة الميلادي شهر
'-----شارت Kabiseh Bodane سال ---- --
temp1 = Myear زارة الدفاع 4
temp2 = Myear وزارة الدفاع 100
Temp3 = Myear وزارة الدفاع 400
Temp4 = Temp1 وTemp2

إذا Temp4 <> 0 أو Temp3 = 0 ثم
Mmonth_a (2) = 28
أيضا
Mmonth_a (2) = 29
نهاية إذا

Myear_ = Myear -- 1
temp1 = Myear_ زارة الدفاع 4
temp2 = Myear_ وزارة الدفاع 100
Temp3 = Myear_ وزارة الدفاع 400
Temp4 = Temp1 وTemp2

إذا Temp4 <> 0 أو Temp3 = 0 ثم
إعادة Isleapyearp
أيضا
مجموعة Isleapyearp
نهاية إذا

temp1 = Mmonth -- 1

لIloop = 1 لTemp1
Mdayofyear = Mmonth_a (iloop) + Mdayofyear
التالي
Mdayofyear = Mday + Mdayofyear

إذا Mdayofyear> 79 ثم

temp1 = Mdayofyear -- 79
Jyear = Myear -- 621

إذا Temp1 <186 ثم

temp2 = Temp1 وزارة الدفاع 31
Temp3 = Temp1 / 31

إذا Temp2 = 0 ثم
Jmonth = Temp3
Jday = 31
أيضا
Jmonth = Temp3 + 1
Jday = Temp2
نهاية إذا

أيضا

temp2 = Temp1 -- 186
Temp3 = Temp2 زارة الدفاع 30
Temp4 = Temp2 / 30

إذا Temp3 = 0 ثم
Jmonth = Temp4 + 6
Jday = 30
أيضا
Jmonth = Temp4 + 7
Jday = Temp3
نهاية إذا

نهاية إذا

أيضا

Jyear = Myear -- 622

إذا Isleapyearp = 1 ثم
Mdayofyear = Mdayofyear + 11
أيضا
Mdayofyear = Mdayofyear + 10
نهاية إذا

temp2 = Mdayofyear وزارة الدفاع 30
Temp3 = Mdayofyear / 30

إذا Temp2 = 0 ثم
Jmonth = Temp3 + 9
Jday = 30
أيضا
Jmonth = Temp3 + 10
Jday = Temp2
نهاية إذا

Waitms 1

نهاية إذا

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

شراء البريدي ds1307

المصدر : يزد كيت
موقع مخصص للدوائر ، والبرمجيات Vmqalat إلكترونيات