Загрузка данных


slot0 = {
	format = function (slot0, slot1, slot2, slot3)
		slot6 = slot2 or "\t"
		slot6 = uv0
		slot7 = slot3 or " "
		slot1 = uv0(slot1 or "\n")
		slot4 = 1
		slot5 = 0
		slot6 = 0
		slot11 = uv2(slot6(slot7), -1) == "\n"

		for slot15 = 1, uv1(uv0(slot0)) do
			slot16 = uv2(slot0, slot15, slot15)

			if not nil and (slot16 == "{" or slot16 == "[") then
				slot5 = slot5 + 1
			elseif not slot10 and (slot16 == "}" or slot16 == "]") then
				if slot9 == "{" or slot9 == "[" then
					slot8[slot4 - 1] = uv3(slot2, slot5 - 1) .. slot9 .. slot16
				else
					slot8[slot4] = slot1 .. uv3(slot2, slot5) .. slot16
				end
			elseif not slot10 and slot16 == "," then
				slot8[slot4] = slot16 .. slot1
				slot6 = -1
			elseif not slot10 and slot16 == ":" then
				slot8[slot4] = slot16 .. slot3

				if slot11 then
					slot8[slot4 + 1] = uv3(slot2, slot5)
				end
			else
				if slot16 == "\"" and slot9 ~= "\\" then
					slot10 = not slot10 and true or nil
				end

				if slot5 ~= slot6 then
					slot8[slot4] = uv3(slot2, slot5)
					slot6 = slot5
					slot4 = slot4 + 1
				end

				slot8[slot4] = slot16
			end

			slot4 = slot4 + 1
			slot9 = slot16
		end

		return uv4({
			[slot4] = nil == ":" and slot16 .. slot1 or uv3(uv0(slot6), slot5) .. slot16 .. slot1
		})
	end
}
slot1 = client.color_log
slot2 = unpack
slot3 = tostring
slot4 = table.concat
slot5 = table.insert
slot6 = table.remove
slot7 = string.sub
slot8 = string.rep
slot9 = string.len
slot10 = {
	221,
	221,
	221
}
slot11 = {
	180,
	230,
	30
}
slot12 = {
	96,
	160,
	220
}
slot13 = {
	218,
	230,
	30
}
slot14 = slot0.format

function slot0.highlight(slot0, slot1, slot2, slot3, slot4)
	slot5 = slot1 or uv0
	slot2 = slot2 or uv3
	slot4 = slot4 or uv2
	slot3 = slot3 or uv1
	slot5 = 1
	slot7 = {}
	slot10 = slot5

	for slot15 = 1, uv5(uv4(slot0)) do
		slot16 = uv6(slot0, slot15, slot15)
		slot17 = nil

		if not nil and (slot16 == "{" or slot16 == "[") then
			slot17 = slot1

			uv7({}, slot16)
		elseif not slot9 and (slot16 == "}" or slot16 == "]") then
			slot17 = slot1

			if slot8 == "{" or slot8 == "[" then
				uv7(slot11, uv8(slot8, slot16))
			else
				uv7(slot11, slot16)
			end
		elseif not slot9 and (slot16 == "," or slot16 == ":") then
			slot17 = slot1

			uv7(slot11, slot16)
		else
			if slot16 == "\"" and slot8 ~= "\\" then
				slot9 = not slot9 and true or nil
				slot17 = slot2
			elseif slot10 == slot2 then
				slot17 = slot9 and slot3 or slot4
			elseif slot10 == slot1 and slot16 ~= " " and slot16 ~= "\n" and slot16 ~= "\t" then
				slot17 = slot9 and slot3 or slot4
			end

			uv7(slot11, slot16)
		end

		if slot17 ~= nil and slot17 ~= slot10 then
			uv7(slot7, {
				slot10[1],
				slot10[2],
				slot10[3],
				uv8(slot11)
			})

			slot11 = {
				uv9(slot11, #slot11)
			}
			slot10 = slot17
		end

		slot8 = slot16
	end

	if #slot11 > 0 then
		uv7(slot7, {
			slot10[1],
			slot10[2],
			slot10[3],
			uv8(slot11)
		})
	end

	return slot7
end

slot15 = slot0.highlight

function slot0.print_highlighted(slot0, slot1, slot2, slot3, slot4)
	slot10 = slot2

	for slot10 = 1, #uv0(slot0, slot1, slot3, slot4, slot10) do
		slot16, slot17, slot18, slot19 = uv1(slot5[slot10])

		uv2(slot16, slot17, slot18, slot19, slot10 == slot6 and "" or "�")
	end

	return slot5
end

function slot0.stringify(slot0, slot1, slot2, slot3)
	slot4, slot5 = pcall(json.stringify, slot0)

	if not slot4 then
		error(slot5, 2)

		return
	end

	return uv0(slot5, slot1, slot2, slot3)
end

return slot0