|M.r|LooFe|

معرف اخذتها من مهمة بتاعت سنابير

يعني انا استخدمت هذا الكود addEventHandler("onPlayerWasted",root, function () if isPlayerInWp(source) then DelPlayer(source) Check() end end ) addEventHandler("onPlayerQuit",root, function () if isPlayerInWp(source) then DelPlayer(source) end end ) addEventHandler("onColShapeLeave",player, function (player) if getElementType(player) == "player" then if isPlayerInWp(player) then killPed(player) DelPlayer(player) end end end ) بس ما اشتغل

كيف يعني هي كود الماركر addEventHandler("onMarkerHit",marker, function ( source ) givePlayerMoney( source, 5000 ) destroyElement(marker) killPed(player) outputChatBox("في مهمة الركض وقد ربح 500الف " .. getPlayerName(source) .. " لقد فاز اللاعب",root,255,255,255,true) end )

شكرا لكن ضل كود صغير بس وهو انه يوم اللاعب يلمس الماركر يموتو كل يلي في المهمة وشكرا

كيف يعني ؟ اطرحلي كود + يخوي المهمة اشتغلت منيح وكل شي خلاص بس ضل انه يوم يلمس الماركر يموتو يلي في المهمة بس + انا سويت كود حماية من فتح لوحات بس ما اشتغل هذا الكود buttons = { ['F1'] = true, ['F2'] = true, ['F3'] = true, ['F4'] = true, ['F5'] = true, ['F6'] = true, ['F7'] = true, ['F8'] = true, ['F9'] = true, ['F10'] = true, ['F11'] = true, ['b'] = true, ['p'] = true, [']'] = true, ['['] = true, ['/'] = true, ['admin'] = true, ['x'] = true, ['fix'] = true, ['m'] = true, ['j'] = true, } addEventHandler( 'onClientKey', root, function (button , prees) if prees and getElementDimension(localPlayer) == 45 then if buttons[button] then outputChatBox("غير مصرح لك بفتح اللوحة الان", source, 255, 0, 0) cancelEvent() end end end) الكود انا كنت مسوي فيه حماية للديربي لحد الان هو شغال

لو عنده يغيره بس لو غير بأحد الاكواد رح يخرب لانه اناا مجرب

يخوي امسح كل اكواد ملف سيرفر وحط الكود يلي عطيطك اياه

عيال هذي محاولاتي على الفنكشنات يلي اعطيتوني اياهم ممكن مساعده انه لو في خطأ بالكود تصلحوه addEventHandler ( "onPlayerChat" , root , function ( msg , msgType ) if msg == 'ركض' then setElementPosition(source,4515.9516601563,-1866.2738037109,295.76873779297) setElementDimension(source, 45) setElementFrozen(source,true) end end ) -------------------------------------------------------------- function chat ( ) outputChatBox("********************************************" ,root,255,0,0,true) outputChatBox(" " ,root,255,0,0,true) outputChatBox("لقد بدات مهمة الركض للدخول اكتب في الشات ركض" ,root,255,0,0,true) outputChatBox(" " ,root,255,0,0,true) outputChatBox("********************************************" ,root,255,0,0,true) end setTimer (chat, 120000, 0) -------------------------------------------------------------- -------------------------------------------------------------- local marker = createMarker(4525.6000976563,-1373.9000244141,304.5,"cylinder",1.5,255,255,0,255) addEventHandler("onMarkerHit",marker, function ( source ) if source ~= themarker then return end givePlayerMoney( source, 5000 ) destroyElement(themarker) outputChatBox("في مهمة الركض وقد ربح 500الف " .. getPlayerName(source) .. " لقد فاز اللاعب",root,255,255,255,true) end ) ------------------------------------------------------------- addEventHandler("onPlayerWasted",root, function () if isPlayerInWp(source) then DelPlayer(source) Check() end end ) addEventHandler("onPlayerQuit",root, function () if isPlayerInWp(source) then DelPlayer(source) end end ) addEventHandler("onColShapeLeave",col, function (player) if getElementType(player) == "player" then if isPlayerInWp(player) then killPed(player) DelPlayer(player) end end end )

اخوي ممكن الأكود كاملة سويتها لكن ضل الاكواد يلي طلبتها

بنسبة لمود شراء رتب بعطيك ملف سيرفر كامل من برمجتي هذا الكود حطه في ملف سيرفر ولا تعدل على شي local aGroups = { ["3agl"] = true , ["gpp"] = true , ["apm"] = true , ["ADMIN[EX]"] = true , ["serial"] = true , ["suppor"] = true , ["7sap"] = true , }; function removeGroups ( player ) if ( player ) and ( getElementType ( player ) == "player" ) then if isGuestAccount ( getPlayerAccount ( player ) ) then return end local Acc = getAccountName ( getPlayerAccount ( player ) ) if ( #aclGroupList ( ) == 0 ) then return end for _,Groups_ in ipairs( aclGroupList ( ) ) do if not ( aGroups [ aclGroupGetName ( Groups_ ) ] ) then if ( isObjectInACLGroup ( "user." ..Acc, Groups_ ) ) then aclGroupRemoveObject ( Groups_ ,"user."..Acc ) end end end end end xAddToGroupFunction_ = function ( Group,Price,Name ) local account = getAccountName(getPlayerAccount(source)); if isGuestAccount(getPlayerAccount(source)) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff * يجب عليك التسجيل اولاَ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup(tostring(Group))) then return outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** لديك هذهـ الرتبة فعـلا ! ",source,255,0,0,true); end if isObjectInACLGroup("user."..account, aclGetGroup("Admin-X")) then return outputChatBox("#ff4f00* ( #ffffffالادارة #ff4f00) : #ffffff** تم صكك مخالف للأستفسار كلم الادارة "..Name,source,255,0,0,true); end local sValue = getElementData( source,'PlayTime' ) if not sValue then sValue = '0:0:0' end local data = split(sValue,':') local hour = tonumber( data[1] ) if hour == nil or not tonumber(hour) then hour = 0 end if ( hour >= tonumber(Price)) then removeGroups ( source ) if not isObjectInACLGroup ("user."..account, aclGetGroup( tostring(Group)) ) then aclGroupAddObject (aclGetGroup( tostring(Group)),"user."..account); outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff** تم اضافة الرتبة بنجاح | "..Name,source,0,255,0,true); end else outputChatBox("#ff4f00* ( #ffffffBuy Admin #ff4f00) : #ffffff**ليس لديك ساعات كافية",source,255,0,0,true); end end addEvent("Accept:the:request",true) addEventHandler('Accept:the:request',root,xAddToGroupFunction_) هذا الكود لا تعدل عليه شي والا يخرب اسم رتبة الادمن المخالف Admin-X طبعا المود فيه ميزات 1- لو تعطيه مخالف ما يقدر يشتري 2- ما يكرر رتب سبق ونزلت المود على قناتي لا تنسى الاشتراك

السلام عليكم يعيال انا فكرت اني اصمم مهمة الركض صممت الماب الحين ابيه كل 20 دقيقة تشتغل المهمة يوم تشتغل يكتب في الشات لقد بدات مهمة الركض للدخول اكتب في الشات ركض يجي يكتب ركض ينقله للماب طبعا سويت الكود بس ابي الماب يكون في العالم هذا هذا الكود يليل صممته addEventHandler ( "onPlayerChat" , root , function ( msg , msgType ) if msg == 'ركض' then setElementPosition(source,2442.15771,-1664.14917,27.08487) setElementDimension(source, 45) setElementFrozen(source,true) end end ) ابيه يوم يروح يتجمد بعد ب1دقيقة من بدء المهمة تشتغل ويقول بدأت المهمة انطلاق ويفك التحميد ويبلش يركض وبس في ماركر اخر الماب لي يصله اول هو ياخذ الفلوس وبعدها الكل يموت ويخرجهم من العالم الوهمي ولو لاعب وهو يركض سقط يكتب في الشات عدد اللاعبين المتبقيين في الركض مثلا 8 7 وكذا وشكرا يا ريت تساعدوني انا جربت بس اهم شي ابيها ذي االكواد و الباقي انا اسويه

يعني المود اول من يكتب في الاشت كل لاعب يجاوب هذا الجدول يحفظه ويوم يدوس على زر من اللوحة يطلع له من يلي جاوب وكام مرة جاوب حتا يعطيه الجائزة ويوم يدوس على زر اخر يحذف يلي سجلهم في الجدول

يخوي ما اعطوني الكود حتا اني ادرسه جيدا

يخوي سويلي الكود وبس ابيها زر يطلعها وزر يمحيها يعني يخليها من اول وجديد

يخوي الصراحة ما عرفت اسوي الكود ياريت تسويلي الكود حاولت كثير وما نفعت معي

خللاص شكرا نجح

يخوي كود اعطاء سلاح مسويه ونجح لكن العالم الوهمي ما يدخله للأسف مو هذا نفس الكود بتاعي يلي عندي ما يدخله للعالم الوهمي

السلام عليكم يعيال كيفكم انا جالس اصمم سكربت انه يوم يدخل العالم الوهمي يعطيه سلاح ويدخله العالم الوهمي في زر المود يعطي سلاح لكن ما يدخل عالم وهمي الاكواد : addEvent("afkDimens",true) addEventHandler("afkDimens",root, function (player) getElementDimension(player, 1) outputChatBox("# انت الان في العالم الوهمي", player, 0, 0, 0, true) end ) الرجاء التصحيح المود مفيه شي مبين في الديبق

كك

يخوي ماني فاهم عطني فنكشنات

اها يب ساعدني حتا اغلق الموضوع يغلقق

السلام عليكم يعيال كيفكم انا الحين جالس اصمم بمود اول من يكتب في الشات يب الان ابيه يوم يضغط على زر يطلع في الشات كل لاعب كام جاوب حتا يعرف من الفائز طبعا تطلع في الشات العاام ابي الاكواد او الفنكشنات يعني مثل كدة يوم يضغط على الزر يطلع كل لاعب كام جاوب ###=================================### ### Players Points :: ### [ w.t_3Fnak. ] : 3 ### [ W.t#BnTL ] : 9 ### [ w.T#aboud# ] : 1 ### [ wT_6B6P ] : 8 ### [ w.T#x'iMoDeY-Ki ] : 1 ### [ w.T-AbU_W6N ] : 1 ###=================================###

عيال الكود يلي طرحته شغال معي 100%

كود اظهار اسماء اللاعبين -- كلينت function putAllPlayersInList() guiGridListClear(grid) for i,v in ipairs(getElementsByType("player")) do local row = guiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,getPlayerName(v),false,false) guiGridListSetItemColor(grid,row,1,0,255,0) end end -- يجب ان تضع الكود هذاputAllPlayersInList()في كود فتح اللوحة كود القتل تختار من القريد ليست -- كلينت addEventHandler("onClientGUIClick",root, function () local sel = guiGridListGetSelectedItem(grid) local text = guiGridListGetItemText(grid,sel,1) elseif ( source == GUIEditor_Button[1] ) then if ( sel ~= -1 ) then guiSetEnabled(GUIEditor_Button[1],false) setTimer(guiSetEnabled,1000,1,GUIEditor_Button[1],true) triggerServerEvent("killPlayer",localPlayer,text) else show("Please Choose Player To Kill it") end end end ) -- سيرفر addEvent("killPlayer",true) addEventHandler("killPlayer",root, function (player) local player = getPlayerFromName(player) if ( player ) then killPed(player) outputChatBox("[POLICE] : " .. getPlayerName(player) .. " Has Been Killed By " .. getPlayerName(source),root,255,0,0) end end )

يخوي ممكن تجمعلي الكود يخوي سريع عطني الكود كامل لاهنت لانه ابيه