//################################################################################  
function inv100_RegisterSet takes integer setid, integer abilcode, string name returns nothing
    local integer i = 0
    loop 
        exitwhen i > cfgi("invEmi_set_max")
        if not HaveStoredInteger(udg_fs_cache, "set"+I2S(i), "setid") then
            call StoreInteger(udg_fs_cache, "set"+I2S(i), "setid", setid)
            call StoreInteger(udg_fs_cache, "set"+I2S(i), "abilcode", abilcode)
            call StoreString(udg_fs_cache, "set"+I2S(i), "name", name)

            call StoreInteger(udg_fs_cache, "set", "count", i+1)
            return
        endif
    endloop
endfunction
//################################################################################  
function inv100_RegisterSetLevel takes integer setid, integer level, integer itemcount, string desc returns nothing
    local integer i = 0
    loop 
        exitwhen i > cfgi("invEmi_set_maxlevels")
        if not HaveStoredInteger(udg_fs_cache, "set_"+I2S(setid)+"_"+I2S(i), "level") then
            call StoreInteger(udg_fs_cache, "set_"+I2S(setid)+"_"+I2S(i), "level", level)
            call StoreInteger(udg_fs_cache, "set_"+I2S(setid)+"_"+I2S(i), "itemcount", itemcount)
            call StoreString(udg_fs_cache, "set_"+I2S(setid)+"_"+I2S(i), "desc", desc)

            call StoreInteger(udg_fs_cache, "set_"+I2S(setid), "count", i+1)
            return
        endif
    endloop
endfunction
//################################################################################  
function inv100_RegisterSetItem takes integer setid, integer level, integer itemid returns nothing
    local integer i = 0
    loop 
        exitwhen i > cfgi("invEmi_set_maxitems")
        if not HaveStoredInteger(udg_fs_cache, "set_item"+I2S(setid)+"_"+I2S(level)+"_"+I2S(i), "itemid") then
            call StoreInteger(udg_fs_cache, "set_item"+I2S(setid)+"_"+I2S(level)+"_"+I2S(i), "itemid", itemid)

            call StoreInteger(udg_fs_cache, "set_item"+I2S(setid)+"_"+I2S(level), "count", i+1)
            return
        endif
    endloop
endfunction