الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عضو جديد ولدى سؤال عن تصميم الالعاب

مغلق
بدأه جادو في 25 أبريل 2003 · 4 رد · 658 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

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

التى تتيح لمن ليس لهم الخبرة من امثالى ان يتعلمو البرمجة لم اكن اتخيل

انى فى يوم من الأيام استطيع ان اصنع برنامجآ مثل البرامج التى تعمل على

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

اكن اتخيله. المهم اخوانى الأعزاء لدى سؤال فى تصميم الألعاب وهو .

ما هية نقطة التلاقى بين صورتين متحركتين على النموزج ؟

توضيح .

مثلا يوجد لدى صورة بأسم z تتحرك من جه اليمين الى اليسار حتى اخر ا

الشاشا بقيمة top ثابتة ثم تقوم باعادة نفس الحركة مرة اخرى من اليمين الى اليسار

باستخدام الكود الأتى فى التيمر1 .

z.Move z.Left - 300

If z.Left <= Form1.Left Then

z.Left = Form1.Width

End If

وصورة اخرى باسم ko تتحرك عكس الصورة الأولى (z) من اليسار الى اليمين

مع تغيير موقع top حسب الموقع الذى يختاره المستخدم لبدأ حركة الصورة

والكود المستخدم لهذه الصورة فى التيمر2 هو .

ko.Move ko.Left + 300

والسؤال مرى اخرة على هذا المثال هو .

اريد ان يقع حدث معين وليكن End عند بداية دخول الصورة الثانية (ko) داخل

محيط الصورة الاولى (z)

ارجو ان يكون السؤال واضح

واشكركم مقدما

#2

:( هل السؤال صعب لهذه الدرجة ؟ :(

#3

بداخل التايمر 1 ضع هذا الكود :

If z.Left = ko.Left Then

    MsgBox "end?"

    End

End If

هذا كود توضيحي فقط لااعلم ان كان يؤدي الغرض ام لا ولكن يمكنك التعديل عليه حسب الحاجه.

هذا الكود يعرض رساله بمجرد ان يكون ko بداخل محيط z .

#4

اذا كنت تريد اول ما يتطابقوا ينهي استخد هذا الكود:

If z.Left = ko.Left And z.Top = ko.Top Then

End

End If

#5

اخى العزيز hamohd70

اشكرك على الرد وللعلم الصورة Z ارتفاعها 2سم والصورة ko حوالى 3 ملم والفورم تعرض بمليء الشاشة (maximized) يعنى ان لو كانت z اسفل الشاشة و ko اعلى الشاشة مع استخدام الكود الذى ذكرته سينفظ الحدث وهذا غير المطلوب . واشكرك مرة الخرى

اخى العزيز بيبو

اشكرك على الرد

ولكن هذا الكود ليس دقيق لأنه يصيب الهدف بنسبة 1 كل 10 مرات ولكن انا قمت بتعديل الكود كما يلى

1- جعلت قيمة توب للصورة z ثابتة و= 5000

2- تحديد نقطتى ارتفاع الصورة z بقيمة توب والنتيجة هى ان ارتفاع الصورة كان ينحصر بين 5000 و 6000 بقيمة توب

واصبح الكود بهذا الشكل

If ko.Top >= 5000 And ko.Top <= 6000 And ko.Left >= z.Left Then

End

End If

وكانت النتيجة ناجحة

ولكن هل هذا الكود هو الذى اعتمد علية فى باقى الاحداث ؟

علما بان هذه لعبة وتتكون من حوالى 50 صورة مثل z

واشكرك مرة اخرى لانك اعطيتنى بداية الكود

واعطيتنى بداية الفكرة لكى اصمم لعبة بكود الحركة الذى ذكرته بالكتاب فى هذا الموضوع

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…