Currently Talking Code

-- local playerServerId = GetPlayerServerId(PlayerId())

while true do
	Citizen.Wait(1)
	local t = 0
		for i = 0,32 do
			if(GetPlayerName(i))then
				if(NetworkIsPlayerTalking(i))then
					t = t + 1
					if(t == 1)then
							drawTxt(0.515, 1.19, 1.0,1.0,0.3, "~y~Talking", 255, 255, 255, 255)
					end
					drawTxt(0.515, 1.19 + (t * 0.023), 1.0,1.0,0.4, "" .. GetPlayerName(i), 255, 255, 255, 255)
				end
			end
		end
	end
end
end)

function drawTxt(x,y ,width,height,scale, text, r,g,b,a)
SetTextFont(0)
SetTextProportional(0)
SetTextScale(scale, scale)
SetTextColour(r, g, b, a)
SetTextDropShadow(0, 0, 0, 0,255)
SetTextEdge(1, 0, 0, 0, 255)
SetTextDropShadow()
SetTextOutline()
SetTextEntry("STRING")
AddTextComponentString(text)
DrawText(x - width/2, y - height/2 + 0.005)
end