موضوع الطلبات و المساعدات Dark Basics

[kakarot]

يقول عندك مشكلة في function ولا أستطيع تشغيل اللعبة

[The_source]

أعرض كيف كتبت الكود كاملاً لأعرف المشكله لإن الفنكشن صحيح

[kakarot]

Function MoveCamera(Cang,Spd)
newcx# = newxvalue(camera position x(),camera angle y() + Cang,Spd)
newcz# = newzvalue(camera position z(),camera angle y() + Cang,Spd)
position camera newcx#,camera position y(6),newcz#
EndFunction
if leftkey() = 1 then movecamera(-90,5)
if rightkey(32) = 1 then movecamera(90,5)

[lugia 50]

أخوي أمير امام ما فهمتك ممكن تفهمني ؟

[Amir Imam]

أخوي أمير امام ما فهمتك ممكن تفهمني ؟

بسم الله
قصدك على ايه ؟ على الـ Function ولا ايه ؟

[Amir Imam]

بسم الله
ساشرح بإذن الله تعالى في هذا الرد طريقة عمل الـ Function
طبعا الـ Function لا غنى لاي مبرمج عنها .. وليس في الدارك بيسك فقط وانما في كل لغات البرمجة .. الـ Function هي بكل بساطة كالحافظة التي تحفظ لك مجموعة من الاوامر وتستدعيها وقتما تشاء وذلك لتسهيل العمل عليها .. وسأعطي مثال صغير لتوضيح ذلك :
طبعا الكل يعلم الامر Move object .. لو افترضنا اننا نريد ان نحرك خمس مجسمات كل واحد بمفتاح معين وباتجاهين ماذا سنفعل في العادي :

If keystate(17)=1 then move object 1,5
If keystate(31)=1 then move object 1,-5

if keystate(18)=1 then move object 2,5
if keystate(32)=1 then move object 2,-5 

وهكذا الى نهاية الاوبجكتس .. طريقة طويلة وممله .. ولذلك الـ Function تسهل الامر. كيف ذلك :
نقوم بعمل Function ونكتب فيها امر الحركة باختبار المفتاح مره واحده ونخزن القيم العائدة فيها كالتالي :

Function Mo(Key,Obj,Speed)
If keystate(Key) = 1 then move object Obj,Speed
EndFunction 

الان اصبح لدينا Function مخزن فيها ثلاث قيم هي :
Key >> رقم المفتاح الخاص بالاوبجكت المراد تحريكه
Obj >> رقم الاوبجكت الذي سيتم تحريكة بنائا على اختبار المفتاح
Speed>> السرعة التي يتحرك بها الاوبجكت

ولتشغيل الـ Function تكتب كالتالي في اللوب :

mo(17,2,1)
mo(31,2,-1)

mo(16,1,1)
mo(30,1,-1)

mo(18,3,1)
mo(32,3,-1)

mo(19,4,1)
mo(33,4,-1)

mo(20,5,1)
mo(34,5,-1) 

الان ستجد تحريك كل اوبجكت بمجرد الضغط على المفتاح الخاص به
في المرفقفات نفس المثال .. اي استفسار ان شاء الله نحن في الخدمه

[Amir Imam]

Function MoveCamera(Cang,Spd)
newcx# = newxvalue(camera position x(),camera angle y() + Cang,Spd)
newcz# = newzvalue(camera position z(),camera angle y() + Cang,Spd)
position camera newcx#,camera position y(6),newcz#
EndFunction
if leftkey() = 1 then movecamera(-90,5)
if rightkey(32) = 1 then movecamera(90,5)

بسم الله
الخطأ في هذا الكود في الامر Position camera .. ليه ؟
انت عامل الامر كالتالي :

Position camera Newcx#,camera position y(6) ,Newcz# 

الخطأ في

Camera position y(6) 

شيل رقم 6 وخليها قوس فاضي .. علشان مفيش عندك كاميرا رقمها 6

[The_source]

إن شاء الله يستفيد الأخوه من هذا الشرح المفيد والمبسّط

[kakarot]

هذه هي المشكلة

[The_source]

هذه هي المشكلة
الصور المصغرة للصور المرفقة

والله هذه المره الأولى الذي أرى فيها مثل هذا الرساله.....!!!!!!!!!!

[Amir Imam]

بسم الله
اعتقد ان هذه الرساله تظهر عن عمل Function بعد Sub دون اغلاقه بـ Return .. لو عملت Sub لازم تنهيه بـ Return .. او Do من غير Loop .. دور وشوف

[انس موسى]

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

سبحانك اللهم وبحمدك اشهد ان لا اله الا انت استغفرك واتوب اليك

[Amir Imam]

بسم الله
ارفق لك هنا كراك النسخة 5.3
فك الضغط وضعه في مجلد Compiler بعد تنصيب البرنامج
نأسف للتأخير في الرد ولحالة الركود الغريبة في المنتدى والتي لا اعرف لها سببا وجيها

[The_source]

والله صدق ...........أشعر بإنه القسم أصبح ليس لبرمجة الألعاب وإنما لأستعراض القصص إلى اشياء أخرى
وليس للأسئله ولا لمواضيع مفيده...........من دون ضغينه ياشباب ^_^

[sbs64]

أرجو منكم دروس ال fps creator لأنني أحمله الآن ولا أعرف حتى كيف هو شكل البرامج أعرف ما هو نوع الألعاب الذي يصنعها فقط