أبو هادي

السلام عليكم كتب عبدالكريم محمد نصر في كتابه بحوث في التقاويم : طبعا أنا خالفت الكاتب في احتساب الكبيسة فبدلا من طرح 3 من السنة أقوم بجمع 1 عليها ثم القسمة على أربعة . التقويم مصمم ليتعامل مع تقويم الأكسل ولكن من يريد أن يستخدم التقويم الميلادي للأخ سالم الجعيدي فيستطيع مع تبديل قيمة الفرق وهو موضح بالملف المرفق . لم أقم بفحص المثال بشكل قوي ولكن لا أشك بوجود أخطاء ، فأرجو من يعثر على خطأ توضيحه هنا ليتم التعديل . تم تبديل المرفق لاعتقادي أن به مشكلة ولكن اتضح لي أن المشكلة من المنتدى وهي شاملة كل المرفقات القديمة والحديثة . تحياتي . CopticCalendar_20070608.rar

السلام عليكم أخي هذا ملف أكسس لن يعمل إلا بوجود "مايكروسوفت أكسس" على جهازك هذا أولا ، ثانيا يجب تقليل مستوى الأمان للـ "ماكرو" إلى أقل مستوى لتعمل الأكواد بالخطوات التالية : بعد تشغيل الأكسس وليس برنامج التقويم 3 : - إذهب إلى Tools ثم Macro ثم Security ثم Low ثم Ok - بعدها اقفل الأكسس ثم افتح ملف التقويم 3 تحياتي .

السلام عليكم ارجع لتقويمي "التقويم 3" في موقع الجمعية أو في صفتحتي على : http://sites.google.com/site/abbashmd/ وهو يعود بكك إلى سنة 5878740 قبل الميلاد . تحياتي

السلام عليكم شكرا للأخت فاطمة ، هناك تصحيح بسيط لخطأ "مطبعي" ، والصحيح هو : يطلع في 27 من برج الحمل . تحياتي

السلام عليكم برنامج (حاسبة) لدخول القمر ببرج العقرب حسب : - دائرة البروج الـ 12 القديمة . - دائرة البروج الـ 12 القديمة المصححة (أي باعتماد الإزاحة/التقهقر) . - دائرة البروج الـ 13 الحديثة . البرنامج نسخة تجريبية خاضعة للنقد والإنتقاد استجابتي لتعديلات مقترحاتكم لن تكون سريعة وذلك لعدم تفرغي للبرمجة لعدة ظروف أهمها "الختيرة" . تحياتي .

السلام عليكم هذه حسابات تقريبية وهي قريبة لحسابات تقويم الرضا الإلكتروني يدخل القمر في العقرب يوم السبت 13/06/1992م 12 ذو الحجة 1412هـ حسب أم القرى 11 ذو الحجة 1412هـ حسب جمعية الفلك بالقطيف الساعة 5:24 صباحا ، و يخرج القمر من العقرب يوم الإثنين 15/06/1992م 14 ذو الحجة 1412هـ حسب أم القرى 13 ذو الحجة 1412هـ حسب جمعية الفلك بالقطيف الساعة 2:33 مساء . والله أعلم . تحياتي . ملاحظة : لقد تم تصحيح السنة الميلادية .

السلام عليكم وماذا عن هز جذع النخلة ؟ هل قوة الإنسان الطبيعية تستطيع أن تهز جذع نخلة ؟ مجرد تساؤل ... تحياتي .

السلام عليكم آسف ، لم أعلم بمشاركتكم !! الرابط الأول هو لـ جدول Excel تنفيذ معهد الحاسب في مدينة الملك عبد العزيز ، وللأسف لم أستطع أن أصل إلى مكانه الجديد وقد يكون أزيل . الرابط الثاني تم تصحيح العنوان . تحياتي .

السلام عليكم في موضوع للأستاذ سالم الجعيدي بعنوان تحويل التقويم الهجري إلى ميلادي أتت معادلاته كالتالي : أ = ( السنة الهجرية – 1 ) × 354.3667 ( اجبر الكسر إن بلغ النصف ) ب = ( الشهر - 1 ) × 29.5 ( اجبر الكسر بواحد إن بلغ 0.5 ) ج = اليوم + أ + ب + 1948438 بعدها إجمع عليها يومان أي (ج + 2) ثم استخرج باقي القسمة على سبعة والناتج هو تسلسل اليوم من الأسبوع على أن ترتيب الأيام ستكون كالتالي : 0 - السبت 1 - الأحد 2 - الإثنين 3 - الثلاثاء 4 - الأربعاء 5 - الخميس 6 - الجمعة تحياتي .

السلام عليكم ملف اكسل مرفق . تحياتي . Coptic.zip

السلام عليكم تم إضافة تقويم جمعية القطيف على التقويم 3 كذلك تم إضافة تسلسل اليوم للفصول الأربعة . يوجد لدي مكان شاغر لتقويم إضافي ، لو تقترحون علي إضافة أي تقويم ترون أنه يستحق الإضافة أكون لكم من الشاكرين . تحياتي . Calendar3_20100115.zip

السلام عليكم المرفق عبارة عن ملف إكسل فقد امتداده . قم بتسميته بإضافة امتداد .xls وسيعمل الملف . تحياتي .

السلام عليكم شكرا لك أخي الرئيس ودمت بصحة وعافية . بما أن الكود مصمم لتقويم الفيجوال بيزك يلزم الإنتباه للتالي : - التقويم هو الجريجوري وليس له علاقة بقفزة عشرة الأيام لتصحيح التقويم اليولياني بمعنى أن ما قبل تاريخ 15/10/1582م هو 14/10/1582م وليس 04/10/1582م . - عند الرغبة في الحصول على التاريخ القبطي قبل 01/01/0001 قبطي يلزم تبديل الدالة Fix بدالة Int . - لا ينصح باستخدام تقويم الفيجول بيزك قبل عام 101 جريجوري . تحياتي .

السلام عليكم لقد صممت لكم هذا الكود خصيصا للفيجوال بيزك : Function Greg2Coptic(ByVal yy As Integer, _ ByVal mm As Integer, _ ByVal dd As Integer) As String Dim Days As Long Days = DateSerial(yy, mm, dd) + 365 + 589990 yy = Fix((Days - 1 + 0.75) / 365.25) Days = Days - Fix(yy * 365.25) mm = Fix((Days - 1) / 30) dd = Days - mm * 30 mm = mm + 1 Greg2Coptic = Format(dd, "00/") & Format(mm, "00/") & Format(yy, "0000") End Function تحياتي .

السلام عليكم خرائط الهلال لشهر ذي الحجة 1430هـ تحياتي .

السلام عليكم يمكنكم الإطلاع على التقويم 3 من خلال هذه الصفحة : http://sites.google.com/site/abbashmd/ تحياتي

السلام عليكم تصحيح المعادلات لتصبح أكثر مرونة ولتجنب أخطاء تبديل خانات الكسر : تعريف متغير الكسر أولا : Dim DP As Byte 'Decimal Places DP = 4 ثم المعالجة : Lng = Left(Lng, Len(CStr(Lng)) - DP) + Right(Lng, DP) / Val(1 & String(DP, "0")) أو كالتالي : Lng = CDbl(Left(Lng, Len(CStr(Lng)) - DP) & "." & Right(Lng, DP)) تحياتي .

السلام عليكم بما أن الجدول لا يستخدم الفاصلة فحتما ولابد من عدد خانات محددة لكل الأطوال والعروض . عليه تأكد من عدد الخانات بعد الفاصلة وبدلها في الكود ، على سبيل المثال لو الخانات عددها أربعة فابحث عن رقم 2 في الكود وبدله برقم 4 . تمعن أكثر بجدول البيانات وسوف توافقني الرأي . تحياتي .

السلام عليكم يجب أن تذكر اللغة التي تستخدمها أولا ! وبافتراض أن اللغة المستخدمة هي الـ VB ومتغير خط الطول هو Lng فتكون المعالجة كالتالي : Lng = Left(Lng, Len(CStr(Lng)) - 2) + Right(Lng, 2) / 100 أو كالتالي : Lng = CDbl(Left(Lng, Len(CStr(Lng)) - 2) & "." & Right(Lng, 2)) تحياتي .

السلام عليكم شكرا لكل من مر الموضوع . أعتقد تقصد أرقام البروج الثلاثة عشرة ! الأمر هين كان بإمكانك تبديل الأرقام بنفسك . على كل حال تم التعديل على الملف وبما أن التعديل بسيط جدا قمت بإضافة المطالع المستقيمة كإضافة أخرى . تحياتي Constellations_20090925.zip

السلام عليكم محاولة واجتهاد مني ، آمل أني قد أصبت - تمت الحسابات على أساس درجات تقاطع البرج بالشمس . فإذا كانت هذه المعلومة صحيحة فأعتقد أن كل الأمور على مايرام . - النتائج للسنوات من 1950 إلى 2050 فقط وذلك لأن معادلات الأزياج معدة فقط لهذه الفترة ، ولكن لو توفر لديكم طول الشمس لفترات أكبر فالمعادلات سوف تعمل بشكل طبيعي . آمل أن ينتفع به ، كما آمل من له دراية بحساب البروج أن يفتينا برأيه بصحة البيانات من عدمها . تحياتي . الملف المرفق ( عدد مرات التنزيل: 60 ) Constellations.rar

السلام عليكم أخي سر الكون ، أنا لا أستخدم هذه الحسابات البتة . هي حسبة تقريبية سريعة تنفع لمن لا يمتلك أدوات الحساب الدقيق على أن يعرف : - ترتيب الأبراج . - معرفة التاريخ الهجري ليوم الحساب . - معرفة برج الشمس ليوم الحساب . وقد قرأت عنها بالصدفة فأعجبتني وطبقتها وأحببت أن أضعها بين أيديكم . تحياتي

السلام عليكم حساب برج القمر بالتقريب . المطلوب للعامل بها ان يعرف : - ترتيب الأبراج . - معرفة التاريخ الهجري ليوم الحساب . - معرفة برج الشمس ليوم الحساب . المصدر : http://www.bahrainfalcon.com/vb/29/bft91627/ تحياتي . MoonConstellations.zip

السلام عليكم أقوم هذه الأيام بتطوير برنامج لرسم خارطة الهلال بمعيار يالوب يتميز بعلو دقة رسمه . الخارطة ليست في شكلها النهائي وأنا بانتظار تلقي ملاحظاتكم حولها قبل أن أرفع لكم البرنامج بعد أيام قلائل إن شاء الله تعالى . الخارطة مقتبسة من برنامج الأوقات الدقيقة وتم تنقيحها وأهم التنقيحات هي خطوط الطول والعرض . مرفق نتيجة شهر ذي القعدة 1427هـ ونفس النتيجة لبرنامج الأوقات الدقيقة للمقارنة . تحياتي . 20061121.rar

السلام عليكم شكرا أخي وعزيزي سالم الجعيدي وتحياتي الزهرية لك ، القلوب عند بعضها ، وسلامتك من الحروق والإنفطار وشكرا أخي سر الكون على مرورك وأنا بانتظار أن تضع ما لديك من معلومات ومعادلات وشكرا سلفا . تحياتي .