Example for Pointshop2.com Drops and Crates custom lua crate and function to print all item class names.

print.lua

local str = LibK._(Pointshop2.GetRegisteredItems()):chain()
	:map(function(item)
		return { className = item.className, name = item:GetPrintName() }
	end)
	:sort(function(a, b)
		if tonumber(a.className) and tonumber(b.className) then
			return tonumber(a.className) < tonumber(b.className)
		elseif tonumber(a) and not tonumber(b) then
			return false
		else
			return a.className < b.className
		end
	end)
	:map(function(entry)
		return entry.className .. ": " .. entry.name
	end)
	:join("\n")
	:value()

print(str)

sh_crate_special.lua

-- this file is in kinv/items/pointshop/crates
ITEM.PrintName = "My Special Crate"
ITEM.baseClass = "base_crate"
ITEM.material = "pointshop2/box39.png"

-- See print.lua to get the item class numbers
ITEM.itemMap = {
    {
        ["factorySettings"] = {
            ["BasicSettings.ItemClass"] = "57",
        },
        ["factoryClassName"] = "Pointshop2.SingleItemFactory",
        ["chance"] = 47,
    },
    {
        ["factorySettings"] = {
            ["BasicSettings.Amount"] = 100,
            ["BasicSettings.CurrencyType"] = "points",
        },
        ["factoryClassName"] = "Pointshop2.PointsFactory",
        ["chance"] = 47,
    },
    {
        ["factorySettings"] = {
            ["ManualSettings.CategoryName"] = "Hats",
            ["BasicSettings.WeightedRandom"] = true
        },
        ["factoryClassName"] = "Pointshop2.ItemFromCategoryFactory",
        ["chance"] = 47,
    },
}

function ITEM.static:GetRequiredKeyClass( )
    return Pointshop2.GetItemClassByPrintName( "Name of your Key" )
end