توابع تبدیل تاریخ زبان C

توابع تبدیل تاریخ هجری شمسی زبان C (سی قدیمی)

دو تابع gregorian_to_jalali و jalali_to_gregorian از توابع بسیار کاربردی برای تبدیل تاریخ از میلادی (گرگوری) به هجری شمسی (جلالی) و برعکس می‌باشند که به چندین زبان برنامه‌نویسی در نشانی http://jdf.scr.ir/jdf ارائه گردیده و به همراه مثال‌های کاربردی در یک فایل فشرده قابل دریافت هستند.

کد زیر به زبان C می‌باشد. [ سایر زبان‌های برنامه‌نویسی ] [ دریافت فایل‌ها+مثال ]

/**  Gregorian & Jalali (Hijri_Shamsi,Solar) Date Converter Functions
Author: JDF.SCR.IR =>> Download Full Version :  http://jdf.scr.ir/jdf
License: GNU/LGPL _ Open Source & Free :: Version: 2.80 : [2020=1399]
---------------------------------------------------------------------
355746=361590-5844 & 361590=(30*33*365)+(30*8) & 5844=(16*365)+(16/4)
355666=355746-79-1 & 355668=355746-79+1 &  1595=605+990 &  605=621-16
990=30*33 & 12053=(365*33)+(32/4) & 36524=(365*100)+(100/4)-(100/100)
1461=(365*4)+(4/4) & 146097=(365*400)+(400/4)-(400/100)+(400/400)  */

long *gregorian_to_jalali(long gy, long gm, long gd, long out[]) {
  long days;
  {
    long gy2 = (gm > 2) ? (gy + 1) : gy;
    long g_d_m[12] = {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
    days = 355666 + (365 * gy) + ((int)((gy2 + 3) / 4)) - ((int)((gy2 + 99) / 100)) + ((int)((gy2 + 399) / 400)) + gd + g_d_m[gm - 1];
  }
  long jy = -1595 + (33 * ((int)(days / 12053)));
  days %= 12053;
  jy += 4 * ((int)(days / 1461));
  days %= 1461;
  if (days > 365) {
    jy += (int)((days - 1) / 365);
    days = (days - 1) % 365;
  }
  out[0] = jy;
  if (days < 186) {
    out[1]/*jm*/ = 1 + (int)(days / 31);
    out[2]/*jd*/ = 1 + (days % 31);
  } else {
    out[1]/*jm*/ = 7 + (int)((days - 186) / 30);
    out[2]/*jd*/ = 1 + ((days - 186) % 30);
  }
  return out;
}

long *jalali_to_gregorian(long jy, long jm, long jd, long out[]) {
  jy += 1595;
  long days = -355668 + (365 * jy) + (((int)(jy / 33)) * 8) + ((int)(((jy % 33) + 3) / 4)) + jd + ((jm < 7) ? (jm - 1) * 31 : ((jm - 7) * 30) + 186);
  long gy = 400 * ((int)(days / 146097));
  days %= 146097;
  if (days > 36524) {
    gy += 100 * ((int)(--days / 36524));
    days %= 36524;
    if (days >= 365) days++;
  }
  gy += 4 * ((int)(days / 1461));
  days %= 1461;
  if (days > 365) {
    gy += (int)((days - 1) / 365);
    days = (days - 1) % 365;
  }
  long gd = days + 1;
  long gm;
  {
    long sal_a[13] = {0, 31, ((gy % 4 == 0 && gy % 100 != 0) || (gy % 400 == 0)) ? 29 : 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
    for (gm = 0; gm < 13 && gd > sal_a[gm]; gm++) gd -= sal_a[gm];
  }
  out[0] = gy;
  out[1] = gm;
  out[2] = gd;
  return out;
}

کد بالا، به‌صورت عادی نوشته شده‌است.

کد زیر، با کامپایلرهای بسیار قدیمی C نیز سازگاری دارد.

/**  Gregorian & Jalali (Hijri_Shamsi,Solar) Date Converter Functions
Author: JDF.SCR.IR =>> Download Full Version :  http://jdf.scr.ir/jdf
License: GNU/LGPL _ Open Source & Free :: Version: 2.80 : [2020=1399]
---------------------------------------------------------------------
355746=361590-5844 & 361590=(30*33*365)+(30*8) & 5844=(16*365)+(16/4)
355666=355746-79-1 & 355668=355746-79+1 &  1595=605+990 &  605=621-16
990=30*33 & 12053=(365*33)+(32/4) & 36524=(365*100)+(100/4)-(100/100)
1461=(365*4)+(4/4) & 146097=(365*400)+(400/4)-(400/100)+(400/400)  */

long *gregorian_to_jalali(long gy, long gm, long gd, long out[]) {
  long jy, gy2, days, g_d_m[12] = {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
  gy2 = (gm > 2) ? (gy + 1) : gy;
  days = 355666 + (365 * gy) + ((int)((gy2 + 3) / 4)) - ((int)((gy2 + 99) / 100)) + ((int)((gy2 + 399) / 400)) + gd + g_d_m[gm - 1];
  jy = -1595 + (33 * ((int)(days / 12053)));
  days %= 12053;
  jy += 4 * ((int)(days / 1461));
  days %= 1461;
  if (days > 365) {
    jy += (int)((days - 1) / 365);
    days = (days - 1) % 365;
  }
  out[0] = jy;
  if (days < 186) {
    out[1]/*jm*/ = 1 + (int)(days / 31);
    out[2]/*jd*/ = 1 + (days % 31);
  } else {
    out[1]/*jm*/ = 7 + (int)((days - 186) / 30);
    out[2]/*jd*/ = 1 + ((days - 186) % 30);
  }
  return out;
}

long *jalali_to_gregorian(long jy, long jm, long jd, long out[]) {
  long gy, gm, gd, days, sal_a[13] = {0, 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
  jy += 1595;
  days = -355668 + (365 * jy) + (((int)(jy / 33)) * 8) + ((int)(((jy % 33) + 3) / 4)) + jd + ((jm < 7) ? (jm - 1) * 31 : ((jm - 7) * 30) + 186);
  gy = 400 * ((int)(days / 146097));
  days %= 146097;
  if (days > 36524) {
    gy += 100 * ((int)(--days / 36524));
    days %= 36524;
    if (days >= 365) days++;
  }
  gy += 4 * ((int)(days / 1461));
  days %= 1461;
  if (days > 365) {
    gy += (int)((days - 1) / 365);
    days = (days - 1) % 365;
  }
  gd = days + 1;
  if ((gy % 4 == 0 && gy % 100 != 0) || (gy % 400 == 0)) sal_a[2] = 29;
  for (gm = 0; gm < 13 && gd > sal_a[gm]; gm++) gd -= sal_a[gm];
  out[0] = gy;
  out[1] = gm;
  out[2] = gd;
  return out;
}

کد زیر، با تعریف کمترین تعداد ممکن از متغیّرها، در مصرف حافظه‌ی RAM صرفه‌جویی نموده و برای استفاده در میکروکنترلرها یا نرم‌افزارهای دارای تکرار زیاد عملیات، مناسب می‌باشد.

/**  Gregorian & Jalali (Hijri_Shamsi,Solar) Date Converter Functions
Author: JDF.SCR.IR =>> Download Full Version :  http://jdf.scr.ir/jdf
License: GNU/LGPL _ Open Source & Free :: Version: 2.80 : [2020=1399]
---------------------------------------------------------------------
355746=361590-5844 & 361590=(30*33*365)+(30*8) & 5844=(16*365)+(16/4)
355666=355746-79-1 & 355668=355746-79+1 &  1595=605+990 &  605=621-16
990=30*33 & 12053=(365*33)+(32/4) & 36524=(365*100)+(100/4)-(100/100)
1461=(365*4)+(4/4) & 146097=(365*400)+(400/4)-(400/100)+(400/400)  */

long *gregorian_to_jalali(long gy, long gm, long gd, long out[]) {
  out[0] = (gm > 2) ? (gy + 1) : gy;
  {
    long g_d_m[12] = {0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
    out[3] = 355666 + (365 * gy) + ((int)((out[0] + 3) / 4)) - ((int)((out[0] + 99) / 100)) + ((int)((out[0] + 399) / 400)) + gd + g_d_m[gm - 1];
  }
  out[0] = -1595 + (33 * ((int)(out[3] / 12053)));
  out[3] %= 12053;
  out[0] += 4 * ((int)(out[3] / 1461));
  out[3] %= 1461;
  if (out[3] > 365) {
    out[0] += (int)((out[3] - 1) / 365);
    out[3] = (out[3] - 1) % 365;
  }
  if (out[3] < 186) {
    out[1]/*jm*/ = 1 + (int)(out[3] / 31);
    out[2]/*jd*/ = 1 + (out[3] % 31);
  } else {
    out[1]/*jm*/ = 7 + (int)((out[3] - 186) / 30);
    out[2]/*jd*/ = 1 + ((out[3] - 186) % 30);
  }
  return out;
}

long *jalali_to_gregorian(long jy, long jm, long jd, long out[]) {
  jy += 1595;
  out[2] = -355668 + (365 * jy) + (((int)(jy / 33)) * 8) + ((int)(((jy % 33) + 3) / 4)) + jd + ((jm < 7) ? (jm - 1) * 31 : ((jm - 7) * 30) + 186);
  out[0] = 400 * ((int)(out[2] / 146097));
  out[2] %= 146097;
  if (out[2] > 36524) {
    out[0] += 100 * ((int)(--out[2] / 36524));
    out[2] %= 36524;
    if (out[2] >= 365) out[2]++;
  }
  out[0] += 4 * ((int)(out[2] / 1461));
  out[2] %= 1461;
  if (out[2] > 365) {
    out[0] += (int)((out[2] - 1) / 365);
    out[2] = (out[2] - 1) % 365;
  }
  long sal_a[13] = {0, 31, ((out[0]%4 == 0 && out[0]%100 != 0) || (out[0]%400 == 0))?29:28 , 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
  for (out[2]++, out[1] = 0; out[1] < 13 && out[2] > sal_a[out[1]]; out[1]++) out[2] -= sal_a[out[1]];
  return out;
}

[ حمایت مالی داوطلبانه ] [ دریافت سایر پروژه‌های مرکز ] [ دریافت فایل‌ها+مثال ]

راهنمای تابع gregorian_to_jalali (C)

دارای 4 پارامتر (آرگومان) بوده و وظیفه ی اصلی آن ، تبدیل تاریخ میلادی به هجری شمسی می باشد. هر 4 پارمتر آن اجباری بوده و حتماً باید وارد شوند. تاریخی که به این تابع وارد می کنیم ، حتماً باید میلادی باشد تا در خروجی به هجری شمسی تبدیل گردد. خروجی این تابع به صورت آرایه است.

long* gregorian_to_jalali(long gy,long gm,long gd,long out[])

gregorian_to_jalali(gy,gm,gd,out[]);

پارامترهای تابع gregorian_to_jalali

gy : پارامتر اوّل ، سال میلادی ( کامل 4 رقمی )
gm : پارامتر دوم ، ماه میلادی ( 12- 1 )
gd : پارامتر سوم ، روز میلادی ( 31 - 1 )

[]out : پارامتر چهارم یک آرایه ی 3 عنصری که از قبل آن را اعلان کرده و قرار است مقادیر خروجی را به وسیله ی همین آرایه تحویل بگیریم.

البته خروجی این تابع به دو روش قابل دریافت است. 1- از طریق همان آرایه که در آرگومان چهارم در اختیار تابع نهاده ایم و فقط با اجرای تابع ، مقدار عناصر آرایه تغییر خواهند نمود. 2- مقدار بازگشتی از خود تابع نیز قابل استفاده است. مثال عملی در فایل مربوطه موجود می باشد. می توانید دانلود نمایید.

توجّه: صفر بی ارزش قبل از اعداد ورودی را حذف کنید: مثلاً 02 را به 2 تبدیل نموده ، سپس به آرگومان ها وارد نمایید.

راهنمای تابع jalali_to_gregorian (C)

دارای 4 پارامتر (آرگومان) بوده و وظیفه ی اصلی آن ، تبدیل تاریخ هجری شمسی به میلادی می باشد. هر 4 پارمتر آن اجباری بوده و حتماً باید وارد شوند. تاریخی که به این تابع وارد می کنیم ، حتماً باید هجری شمسی باشد تا در خروجی به میلادی تبدیل گردد. خروجی این تابع به صورت آرایه است.

long* jalali_to_gregorian(long jy,long jm,long jd,long out[])

jalali_to_gregorian(jy,jm,jd,out[]);

پارامترهای تابع jalali_to_gregorian

jy : پارامتر اوّل ، سال هجری شمسی ( کامل 4 رقمی )
jm : پارامتر دوم ، ماه هجری شمسی ( 12- 1 )
jd : پارامتر سوم ، روز هجری شمسی ( 31 - 1 )

توجّه: صفر بی ارزش قبل از اعداد ورودی را حذف کنید: مثلاً 02 را به 2 تبدیل نموده ، سپس به آرگومان ها وارد نمایید.

* * *

توابع تبدیل تاریخ میلادی به هجری شمسی و برعکس

( به زبان‌های برنامه‌نویسی زیر )

C C++ C# Java Kotlin Python Dart JavaScript PHP Perl Go Swift Objective_C R Pascal VisualBasic Ruby Bash [Download]

آیا می‌دانید حمایت مالی داوطلبانه از برنامه‌نویسان باعث افزایش انگیزه‌ی آنان جهت توسعه‌ی نرم‌افزارهای رایگان می‌گردد؟
حمایت مالی داوطلبانه

نشانی کانال ما: https://sapp.ir/jdf.scr.ir سروش

نشانی کوتاه این صفحه: