score

local sX, sY = guiGetScreenSize()
local scoreW, scoreH = 350, 550
local logoW, logoH = 80, 80
local scoreX, scoreY = sX/2 - scoreW/2, sY/2 - scoreH/2

local fontTexture = dxCreateFont("files/font.ttf", 8, false, "cleartype")
local fontBoldTexture = dxCreateFont("files/fontbold.ttf", 10, true, "cleartype")
local tempTable = {}
local scrollSpeed = 20
local scrollHeight = 30
local scrollbarY = 0
local scrollCount = 20
local activeScroll = 20
local canOpen = false
local showScore = false
local drawAlpha = 0
local drawLogoX = scoreX + scoreW/2 - logoW/2
local drawLeft = false
local logoRotate = 0
local drawText = sY
local progress = 0
local startProgress = 0
local activePlayer = 1
local maxPlayerInList = 11

bindKey("mouse_wheel_down", "down",
	function()
		if (showScore) then
			if (activePlayer + 1 <= (#tempTable) - maxPlayerInList) then
				activePlayer = activePlayer + 1
			end
		end
	end
)

bindKey("mouse_wheel_up", "down",
	function()
		if (showScore) then
			if (activePlayer - 1 > 0) then
				activePlayer = activePlayer - 1
			end
		end
	end
)
bindKey("tab", "down",
    function()
		if not getElementData(localPlayer, "Char->logged") then return end
		-- canOpen = true
		showScore = true
		drawAlpha = 255
		drawLogoX = scoreX
		drawText = scoreX + scoreW
		drawLeft = false
		startProgress = getTickCount()
    end
)

bindKey("tab", "up",
    function()
		showScore = false
    end
)

addEventHandler("onClientRender", getRootElement(),
	function()
		if not (showScore) then
			return
		end
		tempTable = {}
		for k, v in ipairs(getElementsByType("player")) do
			if (v ~= localPlayer) then
				tempTable[#tempTable + 1] = v
			end
		end
		table.sort(tempTable, function(a, b)
			return tonumber(getElementData(a, "Char->playerid") or 10000) < tonumber(getElementData(b, "Char->playerid") or 10000)
		end)


		dxDrawImage(scoreX, scoreY, scoreW, scoreH, "files/bg.png")
		dxDrawImage(scoreX, scoreY, scoreW, scoreH, "files/bottom_bg.png")
		-- dxDrawImage(scoreX, scoreY, scoreW, scoreH, "files/bottom_red.png")
		dxDrawImage(scoreX, scoreY, scoreW, scoreH, "files/logo.png")
		dxDrawImage(scoreX, scoreY, scoreW, scoreH, "files/icon.png")
		local progress = ((#tempTable + 1)/512)*scoreW
		dxDrawImageSection(scoreX, scoreY, progress, scoreH, 0, 0, progress, scoreH, "files/bottom_red.png", 0, 0, 0, tocolor(255,255,255), false)

		latestLine = activePlayer + maxPlayerInList - 1
		local drawElement = 0
		for k, v in pairs(tempTable) do
			if k >= activePlayer then
				if k <= latestLine then
					drawElement = drawElement + 1
					if (getElementData(v, "Char->logged") or false) then
						name = getElementData(v, "Char->name"):gsub("_", " ")

						if getElementData(v,"Char->adminduty") then
							name = getElementData(v,"Account->admin_name").." "..tostring(exports["exAdmin"]:rank_name_by_id(tonumber(getElementData(v, "Account->admin_level"))))
						else
							name = getElementData(v, "Char->name"):gsub("_", " ")
						end

						dxDrawText("" .. getElementData(v, "Char->playerid"), scoreX + 25, scoreY + 112 + drawElement * 25 + 2, scoreW, 25, tocolor(255, 255, 255, 255), 1, fontTexture, "left", "top", false, false, false, true)
						dxDrawText(name, scoreX + 90, scoreY + 112 + drawElement * 25 + 2, 130, 25, tocolor(255, 255, 255, 255), 1, fontTexture, "left", "top", false, false, false, true)
						dxDrawText(math.ceil(getElementData(localPlayer, "Char->playedminutes")/60) .. " óra", scoreX + 205, scoreY + 112  + drawElement * 25 + 2, 50, 25, tocolor(255, 255, 255, 255), 1, fontTexture, "left", "top", false, false, false, true)
						local pR, pG, pB = getPingColor(getPlayerPing(localPlayer))
						dxDrawText(getPlayerPing(localPlayer) .. "", scoreX + 305, scoreY + 112 + drawElement * 25 + 2, scoreW, 25, tocolor(pR, pG, pB, 255), 1, fontTexture, "left", "top", false, false, false, true)
					else
						dxDrawText("Nincs bejelentkezve", scoreX + 25, scoreY + 112 + drawElement * 25 + 2, scoreW, 25, tocolor(100, 100, 100, 255), 1, fontTexture, "left", "top", false, false, false, true)
					end
				end
			end
		end

		name = getElementData(localPlayer, "Char->name"):gsub("_", " ")
		if getElementData(localPlayer,"Char->adminduty") then
			name = getElementData(localPlayer,"Account->admin_name").." "..tostring(exports["exAdmin"]:rank_name_by_id(tonumber(getElementData(localPlayer, "Account->admin_level"))))
		else
			name = getElementData(localPlayer, "Char->name"):gsub("_", " ")
		end

		dxDrawText("" .. getElementData(localPlayer, "Char->playerid"), scoreX + 25, scoreY + 112, scoreW, 25, tocolor(255, 255, 255, 255), 1, fontTexture, "left", "top", false, false, false, true)
		dxDrawText(name, scoreX + 90, scoreY + 112, 130, 25, tocolor(255, 255, 255, 255), 1, fontTexture, "left", "top", false, false, false, true)
		dxDrawText(math.ceil(getElementData(localPlayer, "Char->playedminutes")/60) .. " óra", scoreX + 205, scoreY + 112, 50, 25, tocolor(255, 255, 255, 255), 1, fontTexture, "left", "top", false, false, false, true)
		local pR, pG, pB = getPingColor(getPlayerPing(localPlayer))
		dxDrawText(getPlayerPing(localPlayer) .. "", scoreX + 305, scoreY + 112, scoreW, 25, tocolor(pR, pG, pB, 255), 1, fontTexture, "left", "top", false, false, false, true)

		dxDrawText(#tempTable + 1 .. "/512", scoreX + 155, scoreY + scoreH - 81, scoreW, 25, tocolor(255, 255, 255, 255), 1, fontBoldTexture, "left", "top", false, false, false, true)
	end
)

function getPingColor(pingNumber)
	if (pingNumber < 100) then
		return 0, 255, 0
	elseif (pingNumber > 100) and (pingNumber < 200) then
		return 125, 125, 0
	elseif (pingNumber > 200) then
		return 255, 0, 0
	end
end