|M.r|LooFe|

يعني كذا ؟ addEventHandler("onClientMarkerHit",marker, function() startResource("mooood" ,false) stopResource("mood" ,false) end )

يخوي يوم اكتب السبب في الايديت واختار اسم اللاعب يروح للجريد ليست يلي في مود شراء الرتب

السلام عليكم يعيال كيفكم يعيال ابي منكم طلب بدي تستاعدوني بكود انه يوم يلمس الماركر يطفي مود محدد تحط اسمه ويشغل مود محدد من اسمه بوريكم محاولاتي addEventHandler("onClientMarkerHit",marker, function() onStartResorce("mooood" ,false) onStopResorce("mood" ,false) end ) -- طبعا ذي الاكواد واحد ساعدني بها يلي هيonStartResorce("mooood" ,false) --الرجاء لو في خطأ اصلاحه

يخوي علفاضي الكود مو شغال جربت ما اشتغللللللللللللللللل

السلام عليكم يعيال كيفكم انا جالس اصمم بمود شراء الرتب طبعا مو شراء الرتب جهزته وكل شي في نفس لوحة مو شراء رتب سويت قريد ليست هذا القريد ليست يظهر سبب اعطائه ساعات او سحب ساعات او اعطائه رتبة او سحب الرتبة طيب جيت صممت لوحة ثانية تفتح من اف8 فيها 2edit و 2button طيب وقريد ليست الان ابي لقريد ليست يطلع اسماء لاعبين ويوم اختار اسم اللاعب واكتب السبب ومدة سحب الرتبة يروح له على القريد ليست يلي في مود شراء رتب هذا يلي محيرني انه كيف ارسل من مود الى اخر ياريت اعطائي اكواد انا اعرف الفناكشنات لكن ابي الكود بنسبة لكود اظهار اسم اللاعب الان جبته ها هو لو فيه مشكلة قولولي addEventHandler("onClientGUIChanged",root, function () if ( source == edit ) then local text = guiGetText(edit) if ( text == "" ) then putAllPlayersInList() else guiGridListClear(grid) for i,v in ipairs(getElementsByType("player")) do local name = getPlayerName(v) if string.find(name,text) then local row = guiGridListAddRow(grid) guiGridListSetItemText(grid,row,1,name,false,false) guiGridListSetItemColor(grid,row,1,255,255,0) end end end end end ) طيب كود اظهار معلومات اللاعب addEventHandler("onClientGUIClick",root, function () if ( source == grid ) then local sel = guiGridListGetSelectedItem(grid) local text = guiGridListGetItemText(grid,sel,1) local player = getPlayerFromName(text) if ( player ) then local theTime = getElementData(player,"PlayTime") or "00:00:00" guiSetText(GUIEditor_Label[1],"Name: " .. getPlayerName(player)) guiSetText(GUIEditor_Label[2],"Money: " .. getPlayerMoney(player) .. "$") guiSetText(GUIEditor_Label[3],"Time: " .. theTime) else guiSetText(GUIEditor_Label[1],"Name: N/A") guiSetText(GUIEditor_Label[2],"Money: N/A") guiSetText(GUIEditor_Label[3],"Time: N/A") end end end ) ----------------- 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 ذول محاولاتي الاكواد ذي صحيحة متأكد انا لكن ابي كود انه يوم اكتب السبب في الايديت يطلع في القريد ليست ويضل محفوظ للأبد

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

يخوي الكود صحيح انت مخربط بشي بكرا اصمملك الكلينت ربطهم لك مع الاكواد الان مو فاضي -- كلينت addEventHandler("onClientGUIClick",root, function () if source == ask then local gs = guiGetText(qus) local answer = guiGetText(ans) local raw = guiGetText(rw) if string.len(gs) > 0 and string.len(answer) > 0 and string.len(raw) > 0 and tonumber(raw) then triggerServerEvent("onAsking",localPlayer,gs,answer,raw) else outputChatBox("# Error In Details. Please Check Question Information",255,0,0) end end end ) --سيرفر stat = false ans = nil rw = 0 addEvent("onAsking",true) addEventHandler("onAsking",root, function (gs,answer,rew) stat = true ans = answer rw = rew outputChatBox("## #0069c7the Question Is :#ffffff " .. gs,root,255,0,0,true) outputChatBox("## #0069c7Question Reward :#00ff00 " .. rew .. "$",root,255,0,0,true) end ) addEventHandler("onPlayerChat",root, function (msg) if stat == true then if msg == ans then givePlayerMoney(source,rw) outputChatBox("## #0069c7the Winner Is :#ff0000 " .. getPlayerName(source) .. " #0069c7And the Answer Was #ffffff( " .. ans .. " )",root,255,0,0,true) stat = false ans = nil rw = 0 end end end ) المشكلة كانت في الترايقر اسمه لو ما نجح عدل اسم الترايقر

يخوي كذا ما ينفع بس لازم تتعلم على الاكواد تفضل addEventHandler("onClientGUIClick",root, function () if source == ask then local gs = guiGetText(qus) local answer = guiGetText(ans) local raw = guiGetText(rw) if string.len(gs) > 0 and string.len(answer) > 0 and string.len(raw) > 0 and tonumber(raw) then triggerServerEvent("onStartAsking",localPlayer,gs,answer,raw) else outputChatBox("# Error In Details. Please Check Question Information",255,0,0) end end end )

شكرا رح بجربه

محاولتي function informPlayerOnModelChange( ) if isObjectInACLGroup("user." .. getAccountName(getPlayerAccount(thePlayer)), aclGetGroup("gold")) then if ( getElementType(source) == "player" ) or getElementModel(source,91) then end addEventHandler("onElementModelChange", root, informPlayerOnModelChange)

هذا المود سبق وأنا صممته بعطيك كل اكواد ملف سيرفر وانت عدل يعني كود كامل بس انت عدل --سيرفر stat = false ans = nil rw = 0 addEvent("onStartAsking",true) addEventHandler("onStartAsking",root, function (gs,answer,rew) stat = true ans = answer rw = rew outputChatBox("## #0069c7the Question Is :#ffffff " .. gs,root,255,0,0,true) outputChatBox("## #0069c7Question Reward :#00ff00 " .. rew .. "$",root,255,0,0,true) end ) addEventHandler("onPlayerChat",root, function (msg) if stat == true then if msg == ans then givePlayerMoney(source,rw) outputChatBox("## #0069c7the Winner Is :#ff0000 " .. getPlayerName(source) .. " #0069c7And the Answer Was #ffffff( " .. ans .. " )",root,255,0,0,true) stat = false ans = nil rw = 0 end end end ) ولو تبي كلينت بعطيك

عطني كود كامل يخوي

مشكووووووووووور جدااااااااااا اشتغلت يوم حطيط source

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

المود مفيه اي مشكلة كتبتها ما طلعلي في الديبق ولا شيء يخي ما عدلتولي شي على الكود يلي انا صممته هذا هو نفسه مرسل مع الترايقر

صححو الكود وعطني جاي تعطيني القديم

اي متأكد في واحد ساعدني عطاني كود كبير كثير انا اختصرته قالي كذا بيصير اختصار ممكن انت تعطيني الكود ؟؟ مثلا كذا هذا الكود لساحة القتال محطوط الاحداثيات جاهزة هذا يمنع السيارات + ابيه يمنع النفاذة size = 200 -- COL colB = createColRectangle(532.36615 - size/2,-2177.03638 - size/2,size,size) raderB = createRadarArea(532.36615 - size/2,-2177.03638 - size/2,size,size,255,0,0,150) addEventHandler("onColShapeHit",colB, function (ele) if getElementType(ele) == "player" and getElementDimension(ele) ~= 1 then elseif getElementType(ele) == "vehicle" and getElementDimension(ele) ~= 1 then end end ) addEventHandler("onColShapeLeave",colB, function (player) if getElementType(player) == "player" then end end ) انت يخوي سوي يلي قلتلك عليه

اي فقط الكونسل لو يجي يحطها من الفري روم يقوله ملكية خاصة او يجي يحطها من لوحة الادمنية يقوله ملكية خاصة

يغلق الموضوع ونقله

السلام وعليكم شباب اليوم انا صممت كود يمنع اللاعب من اخراج سلاح الا في العالم الوهمي وانا بدي اياه في ساحة القتال و البنك طيب المود ما اشتغل كتبت في اف8 debugscript 3 وما طلعلي اي مشكلة بس الكود ما اشتغل اترككم مع الاكواد addEventHandler ( 'onPlayerWeaponSwitch', root, function() toggleControl ( source, 'fire', getElementDimension(source) ~= 0 ) outputChatBox("#FFF000[#FFFFFFServer#FFF000]:#FFFFFF لايمكنك إخراج الاسلحه الا في ساحة القتال فقط",255,0,0) end) الرجاء التصحيح و تخلوه يوم يروح لساحة القتال يسمح له بأخراج سلاح غير ساحة القتال لا

السلام وعليكم شباب اليوم انا صممت كود يمنع اللاعب من اخراج سلاح الا في العالم الوهمي وانا بدي اياه في ساحة القتال و البنك طيب المود ما اشتغل كتبت في اف8 debugscript 3 وما طلعلي اي مشكلة بس الكود ما اشتغل اترككم مع الاكواد addEventHandler ( 'onPlayerWeaponSwitch', root, function() toggleControl ( source, 'fire', getElementDimension(source) ~= 0 ) outputChatBox("#FFF000[#FFFFFFServer#FFF000]:#FFFFFF لايمكنك إخراج الاسلحه الا في ساحة القتال فقط",255,0,0) end) الرجاء التصحيح و تخلوه يوم يروح لساحة القتال يسمح له بأخراج سلاح غير ساحة القتال لا

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

السلام وعليكم شباب بدي تصحيح لكودي انا صممت لوحة توزيع سلاح من زر طيب سوي الاكواد بس ما اشتغلت -- كلينت addEventHandler("onClientGUIClick",root, function () if source == bazzoka then triggerServerEvent("giveBazzoka",localPlayer) end end ) --سيرفر addEvent("giveBazzoka",true) addEventHandler("giveBazzoka",root, function () giveWeapon(player,35,99999,true) outputChatBox("#FFE933[GiveWeapon System]: لقد قام اللاعب ( " .. getPlayerName(source) .. " ) بتزويع سلاح بازوكا", root 0, 0, 0, true) end ) انا متأكد انه الكود صح

شكرا

يعني كذا ؟؟ -- كلينت addEventHandler("onClientGUIClick",root, function () if source == sraa then triggerServerEvent("speed",localPlayer) end end ) -- سيرفر addEvent("speed",true) addEventHandler("speed",root, function () setGameSpeed(source, false) outputChatBox("#FFE933[Gne System]: لقد تم اعطائك سرعة", source, 0, 0, 0, true) end ) لو في اغلاط صلحوها الاكواد مسوية جاهزة المود كل شي به شغال بس السرعه + ابي كود اني يوم اضغط على زر ايقاف يرجع كل شي للأصل