Maksoud Posted April 18, 2016 Share Posted April 18, 2016 السلام عليكم و رحمة الله و بركاته سويت لوحة وظيفتها هي ان تجيب لفلآآت جميع اللاعبين (فى قريد ليست) و بدى كود يجيب لفل اللاعب اكوادى : level = { Players = {} } addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() level.Players.wnd = guiCreateWindow((screenW - 342) / 2, (screenH - 405) / 2, 342, 405, "~# Players Levels #~", false) guiWindowSetMovable(level.Players.wnd, false) guiWindowSetSizable(level.Players.wnd, false) guiSetAlpha(level.Players.wnd, 1.00) PlayerList = guiCreateGridList(10, 24, 322, 333, false, level.Players.wnd) guiGridListAddColumn(PlayerList, "# Players", 0.5) guiGridListAddColumn(PlayerList, "# Level", 0.5) PLClose = guiCreateButton(57, 367, 221, 26, "~# Close #~", false, level.Players.wnd) guiSetProperty(PLClose, "NormalTextColour", "FFAAAAAA") guiSetVisible(level.Players.wnd,false) end ) ------------------------------------------------------ bindKey("F5","down", function ( ) guiSetVisible(level.Players.wnd, not guiGetVisible(level.Players.wnd)) showCursor(guiGetVisible(level.Players.wnd)) end) ------------------------------------------------------ function update () guiGridListClear(PlayerList) for i,v in ipairs (getElementsByType("player")) do local rp = guiGridListAddRow (PlayerList) guiGridListSetItemText (PlayerList,rp,1,getPlayerName(v),false,false) end end addEventHandler ("onClientResourceStart",resourceRoot,update) addEventHandler ("onClientPlayerJoin",root,update) addEventHandler ("onClientPlayerChangeNick",root,update) addEventHandler ("onClientPlayerQuit",root,update) Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 السلام عليكم و رحمة الله و بركاتهسويت لوحة وظيفتها هي ان تجيب لفلآآت جميع اللاعبين (فى قريد ليست) و بدى كود يجيب لفل اللاعب اكوادى : level = { Players = {} } addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() level.Players.wnd = guiCreateWindow((screenW - 342) / 2, (screenH - 405) / 2, 342, 405, "~# Players Levels #~", false) guiWindowSetMovable(level.Players.wnd, false) guiWindowSetSizable(level.Players.wnd, false) guiSetAlpha(level.Players.wnd, 1.00) PlayerList = guiCreateGridList(10, 24, 322, 333, false, level.Players.wnd) guiGridListAddColumn(PlayerList, "# Players", 0.5) guiGridListAddColumn(PlayerList, "# Level", 0.5) PLClose = guiCreateButton(57, 367, 221, 26, "~# Close #~", false, level.Players.wnd) guiSetProperty(PLClose, "NormalTextColour", "FFAAAAAA") guiSetVisible(level.Players.wnd,false) end ) ------------------------------------------------------ bindKey("F5","down", function ( ) guiSetVisible(level.Players.wnd, not guiGetVisible(level.Players.wnd)) showCursor(guiGetVisible(level.Players.wnd)) end) ------------------------------------------------------ function update () guiGridListClear(PlayerList) for i,v in ipairs (getElementsByType("player")) do local rp = guiGridListAddRow (PlayerList) guiGridListSetItemText (PlayerList,rp,1,getPlayerName(v),false,false) end end addEventHandler ("onClientResourceStart",resourceRoot,update) addEventHandler ("onClientPlayerJoin",root,update) addEventHandler ("onClientPlayerChangeNick",root,update) addEventHandler ("onClientPlayerQuit",root,update) عطنا كود الداتا حق اللفل اللي انت حاطه Link to comment
Maksoud Posted April 18, 2016 Author Share Posted April 18, 2016 هو دا الابغيه مب معى كود الداتا Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 هو دا الابغيهمب معى كود الداتا انت مركب مود لفل ؟ جيب كودهء ! Link to comment
Maksoud Posted April 18, 2016 Author Share Posted April 18, 2016 addEventHandler ( "onResourceStart", resourceRoot, function ( ) exports [ "scoreboard" ]:scoreboardAddColumn ( "level" ) end ) محتآآج تعديل كبير لأنى الصراحة ما افهم فى موضوع اللفلات ذه Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 addEventHandler ( "onResourceStart", resourceRoot, function ( ) exports [ "scoreboard" ]:scoreboardAddColumn ( "level" ) end ) محتآآج تعديل كبير لأنى الصراحة ما افهم فى موضوع اللفلات ذه يبوي نبغى الكود اللي لما الاعب يقتل عدد لاعبين يعطيه لفل وزي كذا نبي كود اللي يعطي لفل Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 مب عندى الكود ذه لو م معك كود لفل او مود لفل كيف رح نسوي توب لفل Link to comment
Maksoud Posted April 18, 2016 Author Share Posted April 18, 2016 local x,y = guiGetScreenSize() addEventHandler("onClientResourceStart",resourceRoot, function() setTimer(function() if level then destroyElement(level) end if getElementData(localPlayer,"loggedin") == true then level = guiCreateLabel(x*0.790, y*0.040, x*0.150, y*0.015,(getElementData(getLocalPlayer(),"kill.level")).."%", false) guiLabelSetHorizontalAlign(level, "center", false) guiSetFont(level,"default-bold-small") guiLabelSetColor(level,255,255,255) end end,1000,0) end) addEventHandler("onClientRender", root, function() if getElementData(localPlayer,"loggedin") == true then dxDrawRectangle(x*0.788, y*0.043, x*0.150, y*0.015, tocolor(0, 0, 0, 255), false) dxDrawRectangle(x*0.790, y*0.045, (getElementData(getLocalPlayer(),"kill.level"))*0.00145*x, y*0.01, tocolor(8, 8, 242, 255), false) dxDrawRectangle(x*0.790, y*0.045, x*0.145, y*0.01, tocolor(8, 8, 242, 140), false) dxDrawText("Level: "..(getElementData(getLocalPlayer(),"Level")), x*0.800, y*0.010, x*0.131, y*0.026, tocolor(0, 0, 0, 255), 1.00, "bankgothic", "left", "top", false, false, true, false, false) dxDrawText("Level: "..(getElementData(getLocalPlayer(),"Level")), x*0.799, y*0.009, x*0.130, y*0.025, tocolor(255, 0, 0, 255), 1.00, "bankgothic", "left", "top", false, false, true, false, false) end end ) function set0() if getElementData(localPlayer,"kill.level") == false or getElementData(localPlayer,"kill.level") == nil then guiSetText(level,(0).."%") setElementData(localPlayer,"kill.level",0) end end addEventHandler("onClientRender",root,set0) function setLabelLevel() if level then local leveld = getElementData(localPlayer,"kill.level") guiSetText(level,math.floor(leveld *100)/(100).."%") end end addEventHandler("onClientRender",root,setLabelLevel) function setKillsDeaths() if getElementData(localPlayer,"Kills") == false or getElementData(localPlayer,"Kills") == nil then setElementData(localPlayer,"Kills",0) end if getElementData(localPlayer,"Deaths") == false or getElementData(localPlayer,"Deaths") == nil then setElementData(localPlayer,"Deaths",0) end end addEventHandler("onClientRender",root,setKillsDeaths) function setLevel(killer) local leveld = getElementData(killer,"kill.level") local sleveld = getElementData(source,"kill.level") local klevel = getElementData(killer,"Level") local kills = getElementData(killer,"Kills") local deaths = getElementData(source,"Deaths") local points = getElementData(killer,"avail.points") theTeamKiller = getPlayerTeam (killer) or anubteam theTeamSource = getPlayerTeam (source) or anubteam2 if (killer) and getElementType(killer) == "player" and killer ~= source then setElementData(source,"Deaths",deaths + 1) if getTeamName(theTeamKiller) == getTeamName(theTeamSource) then return end if tonumber(sleveld) > 1 then setElementData(source,"kill.level",tonumber(sleveld)-math.random(5) ) else setElementData(source,"kill.level",0) end if tonumber(klevel) <= 9 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 10) elseif tonumber(klevel) > 9 and tonumber(klevel) <= 19 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 9) elseif tonumber(klevel) > 19 and tonumber(klevel) <= 29 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + -- s8) --> elseif tonumber(klevel) > 29 and tonumber(klevel) < 39 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 7) elseif tonumber(klevel) > 39 and tonumber(klevel) < 49 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 6) elseif tonumber(klevel) > 49 and tonumber(klevel) < 59 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 5) elseif tonumber(klevel) > 59 and tonumber(klevel) < 69 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 4) elseif tonumber(klevel) > 69 and tonumber(klevel) < 79 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 3) elseif tonumber(klevel) > 79 and tonumber(klevel) < 89 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 2) elseif tonumber(klevel) > 89 and tonumber(klevel) < 94 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 2) elseif tonumber(klevel) > 94 and tonumber(klevel) < 100 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 1) end setElementData(killer,"Kills",kills + 1) triggerServerEvent("giveKillerMoney",killer) setElementData(killer,"avail.points",points + 3) end end addEventHandler("onClientPlayerWasted",getRootElement(),setLevel) function increaseLevel() local levelk = getElementData(localPlayer,"Level") if tonumber(getElementData(localPlayer,"kill.level")) > 99 then if tonumber(levelk) < 100 then setElementData(localPlayer,"kill.level",0) setTimer(setElementData,1000,1,localPlayer,"Level",levelk + 1) else setElementData(localPlayer,"kill.level",100) setTimer(setElementData,1000,1,localPlayer,"Level",100) end end end addEventHandler("onClientRender",root,increaseLevel) function onResourceStart() if getElementData(localPlayer,"Level") == 0 or getElementData(localPlayer,"Level") == false or getElementData(localPlayer,"Level") == nil then setElementData(localPlayer,"Level",1) end end addEventHandler("onClientRender",root,onResourceStart) function setToHund() if tonumber(getElementData(localPlayer,"Level")) >= 100 then setElementData(localPlayer,"kill.level",100) setElementData(localPlayer,"Level",100) end end addEventHandler("onClientRender",root,setToHund) Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 local x,y = guiGetScreenSize() addEventHandler("onClientResourceStart",resourceRoot, function() setTimer(function() if level then destroyElement(level) end if getElementData(localPlayer,"loggedin") == true then level = guiCreateLabel(x*0.790, y*0.040, x*0.150, y*0.015,(getElementData(getLocalPlayer(),"kill.level")).."%", false) guiLabelSetHorizontalAlign(level, "center", false) guiSetFont(level,"default-bold-small") guiLabelSetColor(level,255,255,255) end end,1000,0) end) addEventHandler("onClientRender", root, function() if getElementData(localPlayer,"loggedin") == true then dxDrawRectangle(x*0.788, y*0.043, x*0.150, y*0.015, tocolor(0, 0, 0, 255), false) dxDrawRectangle(x*0.790, y*0.045, (getElementData(getLocalPlayer(),"kill.level"))*0.00145*x, y*0.01, tocolor(8, 8, 242, 255), false) dxDrawRectangle(x*0.790, y*0.045, x*0.145, y*0.01, tocolor(8, 8, 242, 140), false) dxDrawText("Level: "..(getElementData(getLocalPlayer(),"Level")), x*0.800, y*0.010, x*0.131, y*0.026, tocolor(0, 0, 0, 255), 1.00, "bankgothic", "left", "top", false, false, true, false, false) dxDrawText("Level: "..(getElementData(getLocalPlayer(),"Level")), x*0.799, y*0.009, x*0.130, y*0.025, tocolor(255, 0, 0, 255), 1.00, "bankgothic", "left", "top", false, false, true, false, false) end end ) function set0() if getElementData(localPlayer,"kill.level") == false or getElementData(localPlayer,"kill.level") == nil then guiSetText(level,(0).."%") setElementData(localPlayer,"kill.level",0) end end addEventHandler("onClientRender",root,set0) function setLabelLevel() if level then local leveld = getElementData(localPlayer,"kill.level") guiSetText(level,math.floor(leveld *100)/(100).."%") end end addEventHandler("onClientRender",root,setLabelLevel) function setKillsDeaths() if getElementData(localPlayer,"Kills") == false or getElementData(localPlayer,"Kills") == nil then setElementData(localPlayer,"Kills",0) end if getElementData(localPlayer,"Deaths") == false or getElementData(localPlayer,"Deaths") == nil then setElementData(localPlayer,"Deaths",0) end end addEventHandler("onClientRender",root,setKillsDeaths) function setLevel(killer) local leveld = getElementData(killer,"kill.level") local sleveld = getElementData(source,"kill.level") local klevel = getElementData(killer,"Level") local kills = getElementData(killer,"Kills") local deaths = getElementData(source,"Deaths") local points = getElementData(killer,"avail.points") theTeamKiller = getPlayerTeam (killer) or anubteam theTeamSource = getPlayerTeam (source) or anubteam2 if (killer) and getElementType(killer) == "player" and killer ~= source then setElementData(source,"Deaths",deaths + 1) if getTeamName(theTeamKiller) == getTeamName(theTeamSource) then return end if tonumber(sleveld) > 1 then setElementData(source,"kill.level",tonumber(sleveld)-math.random(5) ) else setElementData(source,"kill.level",0) end if tonumber(klevel) <= 9 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 10) elseif tonumber(klevel) > 9 and tonumber(klevel) <= 19 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 9) elseif tonumber(klevel) > 19 and tonumber(klevel) <= 29 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + -- s8) --> elseif tonumber(klevel) > 29 and tonumber(klevel) < 39 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 7) elseif tonumber(klevel) > 39 and tonumber(klevel) < 49 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 6) elseif tonumber(klevel) > 49 and tonumber(klevel) < 59 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 5) elseif tonumber(klevel) > 59 and tonumber(klevel) < 69 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 4) elseif tonumber(klevel) > 69 and tonumber(klevel) < 79 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 3) elseif tonumber(klevel) > 79 and tonumber(klevel) < 89 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 2) elseif tonumber(klevel) > 89 and tonumber(klevel) < 94 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 2) elseif tonumber(klevel) > 94 and tonumber(klevel) < 100 then triggerServerEvent("createText",killer) setElementData(killer,"kill.level",tonumber(leveld) + 1) end setElementData(killer,"Kills",kills + 1) triggerServerEvent("giveKillerMoney",killer) setElementData(killer,"avail.points",points + 3) end end addEventHandler("onClientPlayerWasted",getRootElement(),setLevel) function increaseLevel() local levelk = getElementData(localPlayer,"Level") if tonumber(getElementData(localPlayer,"kill.level")) > 99 then if tonumber(levelk) < 100 then setElementData(localPlayer,"kill.level",0) setTimer(setElementData,1000,1,localPlayer,"Level",levelk + 1) else setElementData(localPlayer,"kill.level",100) setTimer(setElementData,1000,1,localPlayer,"Level",100) end end end addEventHandler("onClientRender",root,increaseLevel) function onResourceStart() if getElementData(localPlayer,"Level") == 0 or getElementData(localPlayer,"Level") == false or getElementData(localPlayer,"Level") == nil then setElementData(localPlayer,"Level",1) end end addEventHandler("onClientRender",root,onResourceStart) function setToHund() if tonumber(getElementData(localPlayer,"Level")) >= 100 then setElementData(localPlayer,"kill.level",100) setElementData(localPlayer,"Level",100) end end addEventHandler("onClientRender",root,setToHund) level = { Players = {} } addEventHandler("onClientResourceStart", resourceRoot, function() local screenW, screenH = guiGetScreenSize() level.Players.wnd = guiCreateWindow((screenW - 342) / 2, (screenH - 405) / 2, 342, 405, "~# Players Levels #~", false) guiWindowSetMovable(level.Players.wnd, false) guiWindowSetSizable(level.Players.wnd, false) guiSetAlpha(level.Players.wnd, 1.00) PlayerList = guiCreateGridList(10, 24, 322, 333, false, level.Players.wnd) guiGridListAddColumn(PlayerList, "# Players", 0.5) guiGridListAddColumn(PlayerList, "# Level", 0.5) PLClose = guiCreateButton(57, 367, 221, 26, "~# Close #~", false, level.Players.wnd) guiSetProperty(PLClose, "NormalTextColour", "FFAAAAAA") guiSetVisible(level.Players.wnd,false) end ) ------------------------------------------------------ bindKey("F5","down", function ( ) guiSetVisible(level.Players.wnd, not guiGetVisible(level.Players.wnd)) showCursor(guiGetVisible(level.Players.wnd)) end) ------------------------------------------------------ function update () guiGridListClear(PlayerList) for i,v in ipairs (getElementsByType("player")) do local rp = guiGridListAddRow (PlayerList) guiGridListSetItemText (PlayerList,rp,1,getPlayerName(v),false,false) guiGridListSetItemText (PlayerList,rp,2,getElementData(v, "kill.level"),false,false) end end addEventHandler ("onClientResourceStart",resourceRoot,update) addEventHandler ("onClientPlayerJoin",root,update) addEventHandler ("onClientPlayerChangeNick",root,update) addEventHandler ("onClientPlayerQuit",root,update) Link to comment
Maksoud Posted April 18, 2016 Author Share Posted April 18, 2016 شكرااا ليك ممكن طلب اخير ؟ بدى لما يقتل الزومبى اللفل حقه يزيد بس باللوحة ذيه مش بتاب Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 شكرااا ليك ممكن طلب اخير ؟بدى لما يقتل الزومبى اللفل حقه يزيد بس باللوحة ذيه مش بتاب جيب الكود حق زيادة لفل الاعب عند ما يقتل زومبي Link to comment
nxFairlywell Posted April 18, 2016 Share Posted April 18, 2016 هذا مثال شوف اول شيء تسويه ، انك تحط لفل لكل حساب مثلا يبدأ اللاعب لفله 0 بعدين اذا قتل 10 لاعبين مثلا يزيد 1 تستخدم هذي كمثال مختصر طبعا الكود سيرفر و لازم تعدل المتغيرات و الكود على حسب اللي تبيه account = getPlayerAccount( player ) for k, v in ipairs( getAccountData(account, "DataName") ) do setAccountData( account, "DataName", {getPlayerName(player),v[2]+1} ) end Link to comment
MR.GRAND Posted April 18, 2016 Share Posted April 18, 2016 هذا مثالشوف اول شيء تسويه ، انك تحط لفل لكل حساب مثلا يبدأ اللاعب لفله 0 بعدين اذا قتل 10 لاعبين مثلا يزيد 1 تستخدم هذي كمثال مختصر طبعا الكود سيرفر و لازم تعدل المتغيرات و الكود على حسب اللي تبيه account = getPlayerAccount( player ) for k, v in ipairs( getAccountData(account, "DataName") ) do setAccountData( account, "DataName", {getPlayerName(player),v[2]+1} ) end ^ + 1 احسن له من اللفل الجاهز .. يسوي له لفل خاص فيهء Link to comment
Maksoud Posted April 18, 2016 Author Share Posted April 18, 2016 هذا مثالشوف اول شيء تسويه ، انك تحط لفل لكل حساب مثلا يبدأ اللاعب لفله 0 بعدين اذا قتل 10 لاعبين مثلا يزيد 1 تستخدم هذي كمثال مختصر طبعا الكود سيرفر و لازم تعدل المتغيرات و الكود على حسب اللي تبيه account = getPlayerAccount( player ) for k, v in ipairs( getAccountData(account, "DataName") ) do setAccountData( account, "DataName", {getPlayerName(player),v[2]+1} ) end ممكن مساعده اكمله ؟ المفروض اسوى ملف و اسميه DataName ? و احط فيه اللفل و لما يقتل 10 لاعبين يبقى لفل 1 و لما يقتل 20 يكون لفل 2 و هاكذا ؟ لو مثل ما اقول كذا ^ ساعدنى بالكود اخى الكريم Link to comment
nxFairlywell Posted April 18, 2016 Share Posted April 18, 2016 هذا مثالشوف اول شيء تسويه ، انك تحط لفل لكل حساب مثلا يبدأ اللاعب لفله 0 بعدين اذا قتل 10 لاعبين مثلا يزيد 1 تستخدم هذي كمثال مختصر طبعا الكود سيرفر و لازم تعدل المتغيرات و الكود على حسب اللي تبيه account = getPlayerAccount( player ) for k, v in ipairs( getAccountData(account, "DataName") ) do setAccountData( account, "DataName", {getPlayerName(player),v[2]+1} ) end ممكن مساعده اكمله ؟ المفروض اسوى ملف و اسميه DataName ? و احط فيه اللفل و لما يقتل 10 لاعبين يبقى لفل 1 و لما يقتل 20 يكون لفل 2 و هاكذا ؟ لو مثل ما اقول كذا ^ ساعدنى بالكود اخى الكريم لا حبيبي DataName هو اسم اختياري تختاره انت للداتا راجع قسم الدروس / موضوع زاحف عن الداتا عشان تعرف اكثر عن الداتا Link to comment
Maksoud Posted April 19, 2016 Author Share Posted April 19, 2016 قلتلك اسميه داتا نيم يعنى على حسب الاسم ذه Link to comment
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now