تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[مثال] ملف مفتوح ..تصميم لعبة تحطيم الحواجز يتعديلات جديدة
#1
لسلام عليكم

استفادة من موضوع [b]ahmadpal[/b]

http://vb4arb.com/vb/showthread.php?tid=33155

تم تعديل بعض الاشياء منها :


- بدل ان نضع الحواجز ...نجعل البرنامج هو الذي يصممها بالشكل الذي تريد 
وهذا باستعمال 
PHP كود :
  btm = New PictureBox()
 
               Controls.Add(btm)
 
            

في ملف السورس وضعنا صور ملونة كازرار جميلة نستدعيها بشكل عشوائي لجعلها خلفية  للصور

PHP كود :
 Dim BColor() As Image = {My.Resources.aMy.Resources.bMy.Resources.cMy.Resources.dMy.Resources.e,
 
                            My.Resources.fMy.Resources.gMy.Resources.h}


    Dim k As New Random
                Dim Ncolor 
k.Next(08)
                btm.BackgroundImage BColor(Ncolor)
            -------- 


من اجل احصاء كل الصور المولدة عشوائيا و جعلها في مصفوفة لاستخدماها في  دالة الاصطدام نستعمل

PHP كود :
For Each ctr As Control In Controls
            If TypeOf ctr Is PictureBox Then
                If ctr
.Name <> Raket.Name And ctr.Name <> Ball.Name Then
                    PictureBoxArray
.Add(ctr)
 
               End If
 
           End If
 
       Next 


استعملنا ايضا خاصية progress bar  من اجل  اظهار تناقص الاهداف المحطمة
ايضا جعنا سرعة انطلاق الكرة او الرصاصة تزيد كلما تزايد عدد الحاجز المحطمة 

الشكل كالتالي
    ا

-------------
الملف للتعديل و التطبيق
http://www.mediafire.com/file/y5uewumas2...s.rar/file

بالتوفيق
 لعل الكلمة التي تنفعني لم أكتبها بعد
عبد الله بن المبارك
الرد


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Star [مشروع] برنامج مبيعات مفتوح المصدر 2018 mohammedvego 166 97,021 27-04-21, 03:54 PM
آخر رد: alfaiz678
Video [مشروع] لعبة إختبر معلوماتك [أسئلة عشوائية]+[قاعدة بيانات xml] + [تأثيرات صوتية] عبدالله الدوسري 11 4,672 07-04-21, 09:54 PM
آخر رد: souhil21
Photo [مشروع] ليس جديد لعبة ال 15 رقم asmarsou 0 149 06-04-21, 10:30 PM
آخر رد: asmarsou
Wink مشروع انشاء لعبة سيارات مع السورس كود ahmadpal 4 1,884 25-03-21, 05:57 PM
آخر رد: alexatmedia
  [VB.NET] اعادة رفع نظام إدارة المدارس مفتوح المصدر الكاتب 44 26,727 18-01-21, 07:49 AM
آخر رد: Gaher
  [مشروع] تصميم برنامج تعليمي للاطفال ... الحساب الذهني Calcul Mental عبد الهادي بهاب 1 930 04-01-21, 03:40 AM
آخر رد: izz kamal
Information [درس فيديو] تصميم برنامج شات بالغة الفيجوال vb.net alims 1 458 23-12-20, 04:51 AM
آخر رد: ابو روضة
  [مشروع] تصميم احترافي لبرنامج شئون الموظفين باستخدام ديف اكسبريس + تحميل السورس كود mazentq 4 1,436 12-11-20, 03:05 PM
آخر رد: MORADWAN
  [مشروع] تصميم تطبيق لقفل واخفاء الملفات مع السورس كود ahmadpal 11 2,776 10-11-20, 06:41 PM
آخر رد: djtech
Wink [مشروع] مشروع تصميم فورم بشكل جديد بالفيجوال ستوديو مع السورس كود ahmadpal 6 2,689 01-10-20, 05:59 PM
آخر رد: Ali 2020

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم