Mr.R

هذا طلبكـ ... addEventHandler("onPlayerChat", root, function( msg ) -- حدث عند الكتابه في الشات + وظيفة باسم if string.find( msg,"حرب" ) then -- تحقق انه كتب في الشات حرب setElementPosition( source, x, y, z ) -- x,y,z حط الاحداثيات الي ينتقل لها بدال end -- اند الفنكشن end -- اند الاف ) -- قوس اغلاق الحدث واذا بتسوي اكثر من كلمه اذا كتبها ينتقل لـ مكان معين انصحكـ تستخدم طريقة مختصرهـ وهي elseif <-- @The Best مثل ماقال مثال ... if string.find( msg,"حرب" ) then -- تحقق انه كتب في الشات حرب elseif string.find( msg,"البدايه" ) then -- تحقق انه كتب في الشات البدايه end -- اند الاف elseif استخدم كـ طريقه مختصرهـ if <-- عشان اذا بتحط على كل مكان end <-- بتزيد معها الاند فقط شرح بسيط عشان تعرف تختصر ومايصير الكود هريسه اتمنى اني افدتك وافدت كل القارئين سلام : )

هذا طلبكـ ياصاحب الموضوع ... -- Server local Vehicle = { } function CreateVehicle( theplayer ) if isElement( Vehicle[theplayer] ) then return end local x, y, z = getElementPosition ( theplayer ) Vehicle[theplayer] = createVehicle ( 411, x+4, y+4, z ) outputChatBox ( "تم انشاء سيارهـ", theplayer, 255, 0 , 0, true ) end for k,v in ipairs ( getElementsByType ( "player" ) ) do bindKey( v, "8", "down", CreateVehicle ) end addEventHandler( "onPlayerJoin", root, function( ) bindKey( source, "8", "down", CreateVehicle ) end ) addEventHandler ( "onVehicleExplode", resourceRoot, function ( ) destroyElement ( source ) end ) addEventHandler( "onPlayerQuit", root, function( ) if isElement ( Vehicle[source] ) then destroyElement( Vehicle[source] ) Vehicle[source] = nil end end ) تم تصحيح الكود @The Best شكراً على معلومة سطر 12 لاكن سطر 6 ماشوف فيه اي خطأ شكلك تقصد 5 العموم صلحتها كلها -,- انا لازم انزل الكود مرهـ ثانيه عشان اتأكد وهيك ذذ يالله سلام

هذا طلبكـ ياصاحب الموضوع طرحت الكود من جديد وصلحت القديم يعني كلها مثل الشيء بس عشان ماتنلحس function SpawnVehicle( theplayer ) if getElementData ( theplayer, "SpawnVehicle" ) == true ) then outputChatBox( "لقد اخرجت سيارهـ من قبل", 255, 0, 0, true ) return end-- تحقق انه اخرج سيارهـ + نخرج له نص local = x, y, z = getElementPosition ( theplayer ) -- الحصول على احداثيات لاعبك تلقائي يعني لا تسوي شيء SpawnVehicle = createVehicle ( 411, x+4, y+4, z ) -- صنعنا سيارهـ if ( SpawnVehicle ) then -- تحقق من وجود السيارهـ setElementData( theplayer, "SpawnVehicle", true ) -- وضعنا الداتا على السيارة وقيمة الداتا ترو outputChatBox ( "#00FF00تم اخراج سيارهـ", 255, 0, 0, true ) -- اخارج نص في الشات ، انه اخرج سيارهـ end -- اند الفنكشن end ) -- اند الف + قوس اغلاق الوظيفه addEventHandler( "onPlayerJoin", root, function ( ) -- وظيفه باسم + الحدث bindKey( source, "8", "down", SpawnVehicle, source ) -- رقم سباون السيارهـ end ) -- اند الوظيفه + قوس اغلاق الحدث addEventHandler("onPlayerQuit", root, function ( ) -- حدث عند خروج الاعب + وظيفه باسم destroyElement( SpawnVehicle ) end ) -- قوس اغلاق الحدث + اند الفنكشن King12 شكرا : ) على التوضيح ^^

ياحبيبي هذا كود قديم , شف اول كود طرحته -_-" اتوثع مافيه اي خطأ : ) + مايضر اذا حطيت الشيئين هذي فوق createVehicle و setElementData لا تستعجل ^^

هذا طلبكـ ... addEventHandler( "onPlayerJoin", source, function TextOnTheChat( ) -- الحدث + الوظيفه exports["guimessages"]:outputServer( "ولكم نورت السيرفر ، شكرا لإختيارك سيرفرنا", 0, 255, 0 ) end ) -- قوس اغلاق الحدث + اند الفنكشن root اذا تبيه يجي عند كل الاعبين اول مايدخل حط source اذا تبيه يجي عند الاعب وحده تحط ومعلومه اخرى : اذا ماطلع الكلام تحقق انك مشغل مود guimessages

وش دخل الحركات ب موضوعه ياخوي هو كودهـ هريسه انا نصحته يسوي جدول لـ التيمات احسن والتيمات الحين كذا حوسه setTeamFriendlyFire(createTeam("Grove", 0, 500, 0 ), false) setTeamFriendlyFire(createTeam("Vagos", 255, 200, 0 ), false) setTeamFriendlyFire(createTeam("Ballas", 128, 0, 128), false) setTeamFriendlyFire(createTeam("Mafia", 154,205,50 ), false) setTeamFriendlyFire(createTeam("Russians", 160,82,45), false) setTeamFriendlyFire(createTeam("Triads", 104,104,104), false) setTeamFriendlyFire(createTeam("Rifa", 250,128,114 ), false) setTeamFriendlyFire(createTeam("Street", 250,128,0 ), false) setTeamFriendlyFire(createTeam("Aztecas", 24, 198, 238), false) setTeamFriendlyFire(createTeam("Medic", 24, 255, 255 ), false) setTeamFriendlyFire(createTeam("Police", 0, 0, 255 ), false) createTeam("No Team", 255, 255, 255) انا قلت ايش ؟ يسوي لها جدول مثل ماسوى لـ الحركات والأشياء الثانيه المتبعثرهـ local Anims = {"DAN_UP_A", "dnce_M_b", "DAN_Left_A", "DAN_Down_A", "DAN_Loop_A", "dance_loop"} يعني ترتيب فقط لا غير

addEventHandler("onPlayerJoin", root, function theplayer( ) local = x, y, z = getElementPosition ( ) local vehicle = createVehicle ( id, x, y, z ) -- حط احداثيات السياره + الايدي مايحتاج تقوله يحط الآحداثيات بس تعدل getElementPosition (player) والآفنت تشيل آسم الفنكشن وتخلي داخل القوسين player ومايحتاج التيبل وآفنت دخول اللاعب هذا سيرفر وانت كاتب كلاينت + مسوي آند زايده بالآخير الكود يكون كذا -- Server side function spawnvehicles(player) if getElementData(player,"spawningvehicle", true) then outputChatBox("You already spawned the car") return end local x, y, z = getElementPosition (player) SpawnVehicle = createVehicle ( 411, x+4, y+4, z ) if ( SpawnVehicle ) then setElementData(player, "spawningvehicle", true) end end function bindvehicle() bindKey(source, "8", "down", spawnvehicles, source) end addEventHandler("onPlayerJoin", root, bindvehicle) وهذا الكود تضيفه لو تبي اللاعب لما يخرج من السيرفر سيارته تروح ولما يدخل لازم يضغط رقم 8 مره ثانيه علشان يسوي السياره من جديد طبعاً تضيفه بآخر الكود اللي فوق function destroyvehicle() destroyElement(SpawnVehicle) end addEventHandler("onPlayerQuit", root, destroyvehicle) معليش يالغالي بس الكود حراق مشكور على توضيح بعض الاشياء local = x, y, z = getElementPosition ( ) وبالنسبه لـ انا ماقلت اكتب احداثيات لاعبك قلت الحصول على احداثيات لاعبك يعني يجلب الاحداثيات تلقائي وبس

معليش ضحكنا ابو شنب

انصحك اختصر الكود يعني مثل ماسويت لـ هذي جدول local Anims = {"DAN_UP_A", "dnce_M_b", "DAN_Left_A", "DAN_Down_A", "DAN_Loop_A", "dance_loop"} سوي لـ التيمات والاشياء الباقيه عشان الكود مايصير هريسه

هههههههههههههههههههههههههههههههههههههههههههههههههههههههههه اخطاء بسيطه عدلتها احسك صقعت الطاوله من الضحك

مود رائع من شخص اروع اهنيك والله , مود جميل جداً لاهنت ع الطرح

اتمنى تراجع الكود لان فيه اخطاء كثير تـــــم#

والله ماقد شفت زي كذا لاكن تقدر تسوي جدار يمين وفي الوسط باب وجدار يسار , يعني مايبيلها شيء

تم الإصلاح Weapons حطيتها من الفهاوه لاني كنت اشتغل على شوب ههههههههههههههههههههههههه مشكور على قفط بعض الاشياء

وش الخطأ طيب ؟؟ ماشوف شيء

كودك غلط كله , طبعا ماراح احبطك وكذا لاكن اقولك زي ما قالك تنطيل راجع كودك , + الي طارحه انت غير والي طالبه هو غير والغلط في كودك حاط كلنت مع سيرفر واشياء ثانيه كثيير المهم انه كله غلط واتمنى منك تراجعه بنفسك وقبل تتسرع تطرح كود تأكد منه زين وبالتوفيق تم الاصلاح , جرب يـ صاحب الموضوع ومشكورين تنطيل + ذا كيلر ,

بدأت الحرب اعصابكم هههه .. استغفر الله العظيم من كل ذنبٍ عظيم ~ سبحان الله وبحمده ، سبحان الله العظيم ~ لا إله الا الله محمد رسول الله ~

safe zone يالحبيب هو يقول يحط حمايه على مكان يعني والي يدخل في المكان المحمي يجيه سلاب 100 , او ينتقل مكان ثاني وش دخل isObjectInACLGroup getPlayerAccount killPed مشكور

function SpawnVehicle( theplayer ) if getElementData ( theplayer, "SpawnVehicle" ) == true ) then outputChatBox( "لقد اخرجت سيارهـ من قبل", 255, 0, 0, true ) return end-- تحقق انه اخرج سيارهـ + نخرج له نص local = x, y, z = getElementPosition ( theplayer ) -- الحصول على احداثيات لاعبك تلقائي يعني لا تسوي شيء SpawnVehicle = createVehicle ( 411, x+4, y+4, z ) -- صنعنا سيارهـ if ( SpawnVehicle ) then -- تحقق من وجود السيارهـ setElementData( theplayer, "SpawnVehicle", true ) -- وضعنا الداتا على السيارة وقيمة الداتا ترو outputChatBox ( "#00FF00تم اخراج سيارهـ", 255, 0, 0, true ) -- اخارج نص في الشات ، انه اخرج سيارهـ end -- اند الفنكشن end ) -- اند الف + قوس اغلاق الوظيفه addEventHandler( "onPlayerJoin", root, function ( ) -- وظيفه باسم + الحدث bindKey( source, "8", "down", SpawnVehicle, source ) -- رقم سباون السيارهـ end ) -- اند الوظيفه + قوس اغلاق الحدث addEventHandler("onPlayerQuit", root, function ( ) -- حدث عند خروج الاعب + وظيفه باسم destroyElement( SpawnVehicle ) end ) -- قوس اغلاق الحدث + اند الفنكشن تم اصلاح الكود , اشكر اخوي King12 على تنبيهي على بعض الاخطاء البسيطه استفدنا + نشكر كل من شارك في هذا الموضوع اظن الكود شغال تمام ومافيه اخطائ وشكرا : )

اوك مشكور ع المعلومهه

ماعمري شفته هههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههه

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

آنت عدمتهآ ؟؟؟؟؟؟؟

-- معلومات مالها شغل بالكود r, g, b, a = 255, 0, 0, 255 -- لون الماركر size = 1.5 -- حجم الماركر x, y, z = 100, 100, 100 -- احداثيات الماركر myMarker = createMarker(x, y, z, "cylinder", size, r, g, b, a) -- صنع ماركر -- معلومات مالها شغل بالكود -- Server local myMarker = createMarker(x, y, z, "cylinder", size, r, b, g, a) -- صنع ماركر addEventHandler( "onMarkerHit", myMarker, root, function ( theplayer ) -- وظيفة باسم + حدث if getElementType ( thePlayer ) == "player" then -- تحقق ان الي دخل الماركر لاعب local AccountName = getAccountName ( getPlayerAccount ( thePlayer ) ) -- نجلب اسم حساب الاعب local AccountPlayer = getPlayerAccount ( thePlayer ) -- نجلب اسم حساب الاعب if ( AccountPlayer ) and not isGuestAccount ( AccountPlayer ) then -- نتحقق من حساب الاعب if isObjectInACLGroup ("user."..accName, aclGetGroup ( "هنا اسم الرتبه" ) ) then -- نتحقق من الرتبه triggerClientEvent ( thePlayer, "ShowPanel", thePlayer ) -- هنا ترايقر الى سيرفر اكتب اي شيء end -- اند الفنكشن function end -- اند الف if end -- اند الف if end -- اند الف if ) --- Client local wnd = -- اسم النافذه هنا addEvent("ShowPanel", true) -- نحط الاسم الي كتبناه بالترايقر هنا addEventHandler("ShowPanel", root, ShowPanel) -- مثل الكلام الي فوق ^ function ShowPanel( ) -- وظيفه guiSetVisible (اللوحه اسم هنا, true) -- هنا نحط ترو عشان اذا دخلت الماركر تطلع النافذه showCursor (true) -- هنا نحط ترو عشان مؤئر الماوس يطلع end -- اند الفنكشن function هذا الكود سويته بنفسي اول مره اساعد ف الموقع والحمد الله سويت الكود اي خطأ فيه كلمني ولاهنتوا يعيال على مساعدة الرجال وحاول تعتمد على نفسك على الاقل تسوي الكود حتى لو غلط ويساعدونك هنا انا مبتدئ مثلك والحمد الله عرفت للكود متحمس واذا تبي الكلام العربي الي في الاكواد مايروح ويبقى في المود وشغال بالسيرفر UTF-8 خل الملف NotePad++ بإستخدام برنامج وهو مهم للبرمجه جداً مع السلامه

مشكور والله مادري كيف اشكرك استفدت بشكل كبير اشكرك كل الشكر + تمت الافادهه