شوقي ربيع قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 (معدل) بسم الله الرحمن الرحيم السلام عليكم بعد غيابي الطويل عن هذا المنتدى العزيز لم أشاء أن أعود اليكم خالي اليدين لذى برمجة لعبة الثعبان المعروفة للجميع خصيصا لأعضاء هذا المنتدى الجميل وهي أول لعبة لي أبرمجها على الاكسل هذه اللعبة هدية مني الى كافت الاعضاء كما أني أهديها بشكل خاص الى أستادنا القدير عبد الله باقشير أرجو أن تنال اعجابكم مع تحيات أخوكم شوقي ربيع ســـــــــــــــــــــــــــــــــــلام Snake__Games.rar تم تعديل نوفمبر 23, 2013 بواسطه دغيدى 1 رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 السلام عليكم اخي الحبيب / شوقي ربيع............حفظكم الله .اكرمكم الله في الدارين وجزاكم خيرا وبارك فيكم تقبلوا تحياتي وشكري رابط هذا التعليق شارك More sharing options...
ياسر خليل أبو البراء قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 بارك الله فيك أستاذ / شوقي ربيع بس اللعبة سريعة جدا ممكن تكون أبطأ شوية (مش عارف ألعبها اتعقدت) رابط هذا التعليق شارك More sharing options...
أم عبد الله قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 (معدل) أستاذنا الفاضل / شوقي ربيع السلام عليكم ورحمة الله وبركاته حمد لله على السلامة. جزاكم الله خيراً على هذه اللعبة الجميلة ورائع جداً هذه اللعب التي تبرمج بالاكسيل وكما قال أستاذنا الكبير / ياسر خليل أن اللعبة سريعة جداً أو لقلة خبرتي بالألعاب لا أدري. عموماً ألف مليون تحية لهذا الإبداع الجميل من حضرتك. جزاكم الله خيراً وجعل جميع أعمالكم في ميزان حسناتكم. تم تعديل نوفمبر 23, 2013 بواسطه دغيدى رابط هذا التعليق شارك More sharing options...
saad abed قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 اخى شوقى حمدا لله على سلامتك كل اعمالك بها افكار جميله وفقك الله رابط هذا التعليق شارك More sharing options...
يوسف السيد قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 ما شاء الله ... اعمالك كلها تحف فنية نادرة رابط هذا التعليق شارك More sharing options...
ابو اياد ( الاسيوطى ) قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 الابداع هو شوقى ربيع بعد التجربه المبهره اللعبه جميله جدا واعتقد انها ليست سريعه جدا بل معقوله خصوصا فى المستوى الاول وهى الجديد من اللعبه ذات الحواجر انتظر نسخه اخرى بدون حواجز يكون الثعبان قادر على المرور عبر الجوانب والاسقف والارضيه حيث اذا تقاطع مع نفسه أنتهى الجيم بارك الله فيكم وانتظر النسخه الاخرى رابط هذا التعليق شارك More sharing options...
أبو حنــــين قام بنشر نوفمبر 23, 2013 مشاركة قام بنشر نوفمبر 23, 2013 السلام عليكم جزاك الله خيرا اخي ربيع شوقي على هذا العمل المميز رابط هذا التعليق شارك More sharing options...
مجدى يونس قام بنشر نوفمبر 24, 2013 مشاركة قام بنشر نوفمبر 24, 2013 الاخ ربيع شوقى فكرة رائعة فعلا وعمل مميز رابط هذا التعليق شارك More sharing options...
أبو محمد عباس قام بنشر نوفمبر 24, 2013 مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم ورحمة الله وبركاته الاستاذ والاخ الحبيب شوقي ربيع جزاك الله خيرا عمل رائع وفقك الله ورضي عنك وارضاك تقبل فائق احترامي وتقديري رابط هذا التعليق شارك More sharing options...
إبراهيم ابوليله قام بنشر نوفمبر 24, 2013 مشاركة قام بنشر نوفمبر 24, 2013 اخى واستاذنا شوقى بارك الله فيك موضوع جميل فيه جهد كبير من استاذ اكبر بكثير نسأل الله لك دوام الصحه وبركه فى العمر وزياده فى العلم رابط هذا التعليق شارك More sharing options...
حمادة عمر قام بنشر نوفمبر 24, 2013 مشاركة قام بنشر نوفمبر 24, 2013 (معدل) السلام عليكم الاخ الحبيب / شوقي ربيع بارك الله فيك بالفعل لعبة جميلة جدا جدا وبها مجهود كبير جدا وافكار عالية وكما قال ذات مرة استاذنا / عبد الله المجرب .. جزاه الله خيرا من طالت غيبته جاب الغنايم استاذ وملك الحركات بالفعل ليس فقط في الفورم بل في الاكواد والموديلات ايضا تقبل خالص تحياتي جزاك الله خيرا تم تعديل نوفمبر 24, 2013 بواسطه حمادة عمر رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم اخي الحبيب / شوقي ربيع............حفظكم الله .اكرمكم الله في الدارين وجزاكم خيرا وبارك فيكم تقبلوا تحياتي وشكري السلام عليكم الاستاد القدير عبد الله باقشير جزاك الله خيرا لدعائك الجميل وأنت اسنادنا تتساهل كل الخير تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 بارك الله فيك أستاذ / شوقي ربيع بس اللعبة سريعة جدا ممكن تكون أبطأ شوية (مش عارف ألعبها اتعقدت) السلام عليكم شكرا لمرورك العطر اما بخصوص سؤالك حول سرعة اللعبة فأضن انها السرعة المناسبة بالنسبة لي ولاكن ان اردت تبطيئها اذهب الى محرر الاكواد تجد كود Tamer كا الاتي Sub Tamer() vitesse = 0.01 If Start = True Then timer_avant = Timer Do While Timer < timer_avant + vitesse DoEvents Loop End If End Sub غير في vitesse اجعله يساوي 0,1 مثلا فكلما كان الرقم أكبر بطئة سرعة اللعبة أكثر تقبل تحياتي رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم جازكي الله كل الخير اختي الفاضلة أم عبد الله وشكرا جزيلا لدعواتك الجميلة اما بخصوص سرعة اللعبة شاهدي الرد السابق تقبلي تحياتي وتقديري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الاستاد سعد عابد يشرفني ويسعندي دائما مرورك العطر لك مني فائق الاحترام والتقدير رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الاخ يوسف السيد اخجلتم تواضعنا بكلماتكم الجميلة تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الاخ محمود الاسيوطي شكرا جزيلا لعبراتك المميزة والجميلة ولك وعدا مني أن انجز لك ما طلبت في اقرب وقت ان شاء الله تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الاستاد العزيز ابو حنين ربي يخليلك حنين ويحفضها من العين ولك مني فائق الاحترام والتقدير رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الحاج مجدي يونس بركاتك ياحاج بركاتك شكرا لمرورك ولعبراتك تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 لسلام عليكم الاخ العزيز ابو محمد جزاك الله خيرا لمرورك ولعبراتك الجميلة تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الاستاد ابراهيم ابو ليله والله الواحد يخجل لما يسمع عبرات اطراء كهذه من اساتدة مميزين مثلكم جزاك الله خيرا لدعائك الرائع تقبل تحياتي وشكري رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 السلام عليكم الاخ الحبيب حماد عمر كما قلت لك سابقا فان موضيعي لاتكتمل الا بمرورك العطر والكمال لله طبعا ومازلت أذكر انك أول شخصا في المنتدى رد على أول موضوعا لي في هذى المنتدى المميز وان عباراتك المشجعة كانت السبب الاول في استمراري في تقديم المزيد لهذا الصرح العضيم لك مني فائق الاحترام والتقدير رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 24, 2013 الكاتب مشاركة قام بنشر نوفمبر 24, 2013 ملا حضة بخصوص اللعبة ربما لم أعطي الاعبة حقها من الشرح في بداية الموضوع لذى - اللعبة مكونت من اربعة مستوايات كل مستوى اصعب من الاول والانتقال بينها لا يتم الا بائتما المستوى الذي قبله وهذه صور للمستوايات الاربعة كما ان المستويات مصممة في فورم واحد وليس كل مستوى في فورم منفصل فلو تلاحظ في ميودل المستويات(ModNiveau) تلاحظ اني برمجت موقع كل كائن على حدى ليأخذ مكانه داخل الفورم ربما تتسائلون كيف فعلت ذالك هل أخذة المعلومات الخاصة ب top و left كل واحد على حدى لا ذالك كثير ويتطلب وقت كبير لذى صممت كود بسيط يجلب لي بينات الازمة لكل مستوى بضغطة زر او ان صح التعبير كما سميته (كود أخذ صورة للاكواد) Dim Ur As New Collection Dim UrlName, AllUrl As String Private Sub CommandButton1_Click() Dim Ctrl As Control For Each Ctrl In Controls Ur.Add "UserForm1." & Ctrl.Name & ".Visible=" & Ctrl.Visible & " : " & "UserForm1." & Ctrl.Name & ".top = " & Ctrl.Top & " : UserForm1." & Ctrl.Name & ".left = " & Ctrl.Left Next AllUrl = "" For Each UrlName In Ur AllUrl = AllUrl & UrlName & vbCrLf Next Me.TextBox1.MultiLine = True Me.TextBox1.Text = AllUrl End Sub كل ما علي هو النسخ واللصق بسيط اليس كذالك - تشغيل اللعبة يتم فقط بمفاتيح لوحة التشغيل اذا لا حظة عدم اشتغال المفاتح ماعليك الا بالضغط داخل اللعبة بالماوس - في الواجهة الاولى للعبة تلاحظ وجود اعلى خمست قيم مسجلة وذالك يتم اوتوماتيكيا أخيرا مبدأ اللعبة بسيط جدا فهي تعتمد على الحلقات التكرارية لا غير والقليل من الذكاء والحيلة ارجو ان لا اكون قد اثقلت عليكم تحياتي للجميع رابط هذا التعليق شارك More sharing options...
شوقي ربيع قام بنشر نوفمبر 27, 2013 الكاتب مشاركة قام بنشر نوفمبر 27, 2013 هذا ملف معدل لللعبة مخففة السرعة لمن لم يستطع مجارات الملف الاول Snake__GamesvItase.rar رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.