Module:Sandbox/Soreness

Documentation for this module may be created at Module:Sandbox/Soreness/doc

local raritylist = {}

local md5 = require('Module:Md5')

local sc= {}
local f = {}
local printset = {}

local function getItemData(hash)
    local a = mw.loadData('Module:Item/Data')
    return a[hash] or {-1, -1}
end

local function getItemName()
    local a = mw.loadData('Module:Md5/Cache')
    return a
end

local function addToSet(set, key)
    set[key] = true
end

local function removeFromSet(set, key)
    set[key] = nil
end

local function setContains(set, key)
    return not set[key] == nil
end

local function addtoList(frame)
	local name = frame
	local d = getItemData((name))
	local contains = setContains(f, d[3])
	--local DEBUG = {}
	if not contains then
		addToSet(f, d[3])
		table.insert(sc,{"'''Rarity "..d[3]..": '''"})
		table.insert(DEBUG, "'''Rarity "..d[3]..":''' added <br>")
		table.insert(DEBUG, "'''Length:"..#sc.." <br>")
		table.insert(DEBUG, "'''Value:"..sc[#sc][1].." <br>")
		for i=1,#sc,1
		do
			if sc[i][1] == "'''Rarity "..d[3]..": '''" then
				table.insert(sc[i],"[["..name.."]]")
			end
		end
		table.insert(DEBUG, "Not found in list")
	end
end

function raritylist.list()
	local x=1
	local DEBUG = {}
	local a = getItemName()
	table.insert(DEBUG, "1st: "..a[x])
	table.insert(DEBUG, "1st contains: "..a[1])
	for x=2, (a[1]+1),1
	do
		addtoList(a[x])
		table.insert(DEBUG, "add: "..a[x])
		x=x+1
	end
	----------------------------------All items listed in array-------------------------------------
	for i=1, #sc, 1
	do
		for j=1,#sc[i], 1
		do
			table.insert(printset, sc[i][j])	
		end
	end
	return table.concat(DEBUG)
end

return raritylist