Jump to content

GAME_OVER!!

Members
  • Posts

    149
  • Joined

  • Last visited

Everything posted by GAME_OVER!!

  1. مشكور حسن ربي يعطيك الف عافيه ماقصرت مبدع والله
  2. بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته صادفتني صعوبات بالاكواد وصارلي كم خطأ الاكواد function t(player) for id, players in ipairs(getElementsByType("player")) do local message = table.concat "..message" local textDisplay = textCreateDisplay () local textItem = textCreateTextItem( "..message", 0.5, 0.5, 2, 205, 0, 0, 255, 3, "center") textDisplayAddText ( textDisplay, textItem ) textDisplayAddObserver ( textDisplay, players ) end else outputChatBox("**Shout Admin",player,255,12,15) end end addCommandHandler("shout", t) ياريت تصححونه وتخلون الكلام يختفي وابيه يكون للأدمن
  3. السلام عليكم ورحمة الله وبركاته في البدايه مشكور تابل في الرد على موضوعي السابق ثانيآً انا لو كنت اداره بسيرفري وودي اعطي حساب معين ادمن من اف8 هل من الممكن ؟
  4. السلام عليكم ورحمة الله وبركاته اخباركم شباب ابي مساعده منكم يوجوه الخير addEventHandler ("onClientGUIClick", getRootElement(), function(button, state, absoluteX, absoluteY) if ( source == button) then guiSetText(label, "1") end end) انا ابغى كل شخص يضغط الزرمره يزيد 1 وطبعا الرقم يشوفه الكل يعني انا ضغطة على الزر صار 1 اليبل الكل يشوفه انه 1 ولو جا خويي وضغط عليه يصير 2 والكل يشوفه ولو جا خوي ثاني وضغط يصير 3 والكل يشوفه يعني المختصر كل ماضغط على الزر يزيد 1 في اليبل والكل يشوف الرقم ان شاء الله ماكون طولت عليكم
  5. ههههههههههه تنكت انت يعني الحين هو وش يبي ؟
  6. قولي كيف اطلع المطلوب من هذا table.sort(table [, comp]) Sort the elements of a table in-place (i.e. alter the table). > t = { 3,2,5,1,4 } > table.sort(t) > = table.concat(t, ", ") -- display sorted values 1, 2, 3, 4, 5 If the table has a specified size only the range specified is sorted, e.g., > t = { 3,2,5,1,4; n=3 } -- construct a table with user size of 3 > table.sort(t) -- sort will be limited by user size > = table.concat(t, ", ") -- only specified size is concatenated as well 2, 3, 5 A comparison function can be provided to customise the element sorting. The comparison function must return a boolean value specifying whether the first argument should be before the second argument in the sequence. The default behaviour is for the < comparison to be made. For example, the following behaves the same as no function being supplied: > t = { 3,2,5,1,4 } > table.sort(t, function(a,b) return aend) > = table.concat(t, ", ") 1, 2, 3, 4, 5 We can see if we reverse the comparison the sequence order is reversed. > table.sort(t, function(a,b) return a>b end) > = table.concat(t, ", ") 5, 4, 3, 2, 1 تكفى انا مو متعود الا على الويكي
  7. لو معطيني من الويكي ممكن اسويه لأكن ذي الصفحه آبد مو فاهم لهآ
  8. يسلمو والله ماقصرتو لاكن أخرر طلب ابيها تكون مرتبه من فوق لتحت يعني اكثر شخص قتل يكون فوق ويكون تنازلي يعني الي قتل 10 يكون أألأول والي قتل 9 الثاني وكيذا وآسف تعبتكم
  9. استخدم البيس مود
  10. GUIEditor_Window = {} GUIEditor_Grid = {} GUIEditor_Window[1] = guiCreateWindow(183,114,358,405,"عدد القتل للاعبين",false) GUIEditor_Grid[1] = guiCreateGridList(9,24,196,372,false,GUIEditor_Window[1]) guiGridListSetSelectionMode(GUIEditor_Grid[1],2) guiGridListAddColumn(GUIEditor_Grid[1],"اسم الاعبين",0.2) guiGridListAddColumn(GUIEditor_Grid[1],"الاعب قتل",0.2) يعني بالمختصر ال Column ألأول يكون اسم الاعب والColumn الثاني يكون عدد الي قتلهم وتسلم
  11. ردودكم شباب لهاذي الدرجه هذا الطلب يعقد !
  12. مشكور على المساعده ماقصرت لاكن شوف ردي الي فوق ذي المشاركه
  13. GUIEditor_Window = {} GUIEditor_Grid = {} GUIEditor_Window[1] = guiCreateWindow(183,114,358,405,"عدد القتل للاعبين",false) GUIEditor_Grid[1] = guiCreateGridList(9,24,196,372,false,GUIEditor_Window[1]) guiGridListSetSelectionMode(GUIEditor_Grid[1],2) guiGridListAddColumn(GUIEditor_Grid[1],"اسم الاعبين",0.2) guiGridListAddColumn(GUIEditor_Grid[1],"الاعب قتل",0.2) تحت اسم لاعب يكون اسم لاعبين والحد ألأغصى 20 وتخت الاعب قتل يكون رقم 0 جنب كل لاعب وكل لاعب له رقم لحاله رقم 0 حلو ولما يقتل الاعب شخص يزيد على رقمه 1 وتنحفظ وياريت فهمت ومشكور مقدنا
  14. ض1 شوف انا سويت الحين list حق لاعبين مفهوم ابي لكل لاعب رقم معين جنبه يعني مثلا انا وانت بسيرفر واحد يجي في list المتواجدين الي في السيرفر يعني اانا وانت ويكون جنب اسمي انا في list يكون جنب اسمي رقم 0 ويكون خاص فيني انا فقط وانت جنب اسمك رقم 0 وخاص فيك مايتغير الا لك فقط والمقصود من الفكره لو قتلت شخص يزيد +1 على 0 يعني انت قتلتني وانت كان رقمك 0 لما تقتلني يزيد 1 ولما تقتلني مره ثانيه يزيد 1 على 1 يعني يصير 2 ها وصلت ؟
  15. السلام عليكم روحمة الله وبركاته اخواني اانا سويت لسته وفيها لاعبين انا ابي طريقه اخلي لكل لاعب رقم معين جنبه مثلا لسته فيها لاعبين وكل لاعب جنب اسمه بنقه هاذا مثال فقط انا ابي كل لاعب جنبه رقم 0 وكل ماقلت الاعب شخص يزيد +1 على رقم 0 ولما يصير 1 يزيد +1 ويصير 2 وياريت فهمتو قصدي لو مافهمتو راح اوضح
  16. لأ اانا قصدي زر في النافذه مو زر كيبورد + لاتقولي خذ اكواد ربط الزر جربت مانفع ياريت تفيدوني شباب
  17. معليش شباب آسف تعبتكم لاكن باقي طلب واحد اصوات الأسلحه ابغاه يشتغل بزر ويطفي بزر تفضلو local function playGunfireSound(weaponID) local muzzleX, muzzleY, muzzleZ = getPedWeaponMuzzlePosition(source) local px, py, pz = getElementPosition ( source ) if weaponID == 22 then --colt45 local sound = playSound3D("sounds/weap/Colt45.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 23 then local sound = playSound3D("sounds/weap/Silenced.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 24 then--deagle local sound = playSound3D("sounds/weap/Deagle.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 25 then--shotgun local sound = playSound3D("sounds/weap/Shotgun.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 26 then--sawn-off local sound = playSound3D("sounds/weap/Sawed-Off.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 27 then--combat shotgun local sound = playSound3D("sounds/weap/Combat Shotgun.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 28 then--uzi local sound = playSound3D("sounds/weap/UZI.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 32 then--tec-9 local sound = playSound3D("sounds/weap/tec9.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 29 then--mp5 local sound = playSound3D("sounds/weap/MP5.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 30 then--ak47 local sound = playSound3D("sounds/weap/AK-47.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 31 then--m4 sounnd = playSound3D("sounds/weap/M4.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 33 then--rifle local sound = playSound3D("sounds/weap/Rifle.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) elseif weaponID == 34 then--sniper local sound = playSound3D("sounds/weap/Sniper.mp3", muzzleX, muzzleY, muzzleZ, false) setSoundMaxDistance(sound, 40) end end addEventHandler("onClientPlayerWeaponFire", root, playGunfireSound) وماقصرتو
  18. لما يموت شخص تطلع له شنطه فلوس ولما ياخذها الشخص تنحذف وتجيه فلوس فهمت لما يموت الشخص يجي محل مامات شنطه فلوس وياريت كان واضح
  19. مشكور حبيبي وماقصرت لاكن قولي وش الخطأ في هاذا طيب function onWasted ( killer ) if ( killer ) and ( killer ~= source ) and ( killer == getLocalPlayer() ) then if ( isTimer ( timer ) ) then killTimer ( timer ) local x, y, z = getElementPosition(source) local pick = createPickup ( x, y, z, 3, 1550, 30000, 5000 ) marker = createMarker ( x, y, z, "cylinder", 1.5, 0, 0, 0, 0) setElementInterior( pick, 3, x, y, z ) if marker then destroyElement(pick) destroyElement(marker ) triggerServerEvent("giveMoney", localPlayer) end end end end end addEventHandler("onClientMarkerHit", marker, onWasted) addEventHandler ( "onClientPlayerWasted", getRootElement(), onWasted ) المقصود من هذاا االكود لما يموت شخص يجي مكانه ماركر + الأوبجكت pick ومشكور
  20. بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته في البدايه الكود function onWasted ( killer ) if ( killer ) and ( killer ~= source ) and ( killer == getLocalPlayer() ) then if ( isTimer ( timer ) ) then killTimer ( timer ) end h = guiCreateLabel(350, 210, 701, 60, "Wasted", false) guiSetVisible(h, false) guiSetVisible(h, true) setTimer (guiSetVisible, 1000, 1, h, false ) local sound = playSound("a.mp3") setSoundVolume(sound, 0.7) end end addEventHandler ( "onClientPlayerWasted", getRootElement(), onWasted ) الكود صحيح لاكن ابغى كل مايقتل واحد تجيه رساله مختلفه ماتجي نفس الرساله مثلا لو قتل الأول تجيه وصوت مخصص لها h = guiCreateLabel(350, 210, 701, 60, "Wasted", false) واذا قتل الثاني وصوت مخصص لها hh = guiCreateLabel(350, 210, 701, 60, "good", false) ومشكورين مقدما
  21. بالنسبه لشخصيه هاذا مثال فقط وبالنسبه اني ماقدر يعني هاذا شيء مستحيل؟
  22. التوب 30 اتوقع العقرب اول شخص صنعه وتراه مو صعب المود لاكن الي عنده خبره كامله في Gridlists يسويه بكل سهوله
  23. بسم الله الرحمن الرحيم @~> السلام عليكم روحمة الله وبركاتة @~> علومكم اخباركم انا كان عندي فكره انه لما الاعب يضغط زر يشتغل مود ويطفي مود للاعب فقط ----------------------- --server ---------------------- addEvent("script", true) addEventHandler("script", getRootElement(), function ( Player, resourceName ) if ( resourceName ) then local resource = getResourceFromName ( resourceName ) local start = startResource ( skin ) local stop = stopResource( skin1 ) if ( start ) then outputChatBox ( resourceName .. " start skin", Player, 255, 0, 0 ) else outputChatBox ( "error~!", Player, 255, 0, 0 ) if ( stop ) then outputChatBox ( resourceName .. " stop skin1", Player, 255, 0, 0 ) else outputChatBox ( "error~!", Player, 255, 0, 0 ) end end end end ) ------------------------- --client ------------------------ addEventHandler ("onClientGUIClick", getRootElement(), function(button, state, absoluteX, absoluteY) if ( source == button ) then triggerServerEvent("script",getLocalPlayer()) end end ) وفي محاوله ثانيه ------------------------- --server ------------------------ addEvent("script", true) addEventHandler("script", getRootElement(), function(plr) accountName = getAccountName(getPlayerAccount(plr)) if isObjectInACLGroup ( "user." .. accountName, aclGetGroup ( "Admin" ) ) then executeCommandHandler("stop skin",plr) executeCommandHandler("start skin",plr) else aclGroupAddObject (aclGetGroup("Admin"), "user."..accountName) executeCommandHandler("stop skin",plr) executeCommandHandler("star skin",plr) aclGroupRemoveObject (aclGetGroup("Admin"), "user."..accountName) end outputChatBox("start skin", plr, 255, 255, 0, true) local name = getPlayerName(source) outputChatBox ( "#FFFF1A [ #FFFFFF" .. name .. " start skin", getRootElement(), 255, 255, 0, true ) else outputChatBox("~][~error~][~!", plr, 255, 0, 0, true) end else outputChatBox("~][~error~][~!",plr,255,0,0,true) end end end ) ------------------- --client ------------------ addEventHandler ("onClientGUIClick", getRootElement(), function(button, state, absoluteX, absoluteY) if ( source == button ) then triggerServerEvent("script",getLocalPlayer()) end end )
  24. function R ( ammo, killer, killerweapon, bodypart ) if killer or killer ~= source then setTimer ( setElementPosition, 3000, 1, source, 5000, 5000, 500000 ) for i,v in ipairs(getElementsByType("player")) do if getCameraTarget(v) == source then setTimer(specNext,500,1,v) end end end end addEventHandler ( "onPlayerWasted", root, R ) هاد الي قدرت عليه تصحيحكم
×
×
  • Create New...