Toggle menu
Toggle preferences menu
Toggle personal menu
Not logged in
Your IP address will be publicly visible if you make any edits.

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

local item = {}

local md5 = require('Module:Md5')


local function in_array(h,a) 
    for k,v in ipairs(a) do if v == h then return true end end return false
end
local function addCategory(t,n) 
   table.insert(t,"[".."[Category:"..n.."]]") 
end


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

local function getItemType(name,id)
    local a = mw.loadData('Module:Item/Type')
    return (a[name] or {})[id] or {}
end


local function getSprite(file, pos, tsize, rowlen, class)
    tsize = tsize or 32
    rowlen = rowlen or 64
    class = class or {}
    
    table.insert(class,"growsprite")
    
    return "<span class='"..table.concat(class," ").."'>"..mw.getCurrentFrame():preprocess("{{filepath:"..file.."}}"):gsub("?cb=(.*)$","/window-crop/width/"..tsize.."/x-offset/"..(pos%rowlen)*tsize.."/y-offset/"..math.floor(pos/rowlen)*tsize.."/window-width/"..tsize.."/window-height/"..tsize.."?fill=cb-%1").."</span>"
end

local function getSeedSprite(data) 
    local class = {"seed"}
    local pos = data[1]
    return getSprite("SeedSprites.png",pos,16,false,class)
end
local function getTreeSprite(data) 
    local pos = data[1]
    return getSprite("TreeSprites.png",pos,32)
end
local function getItemSprite(data) 
    local class = {}
    local pos = data[1]
    if(data[6] == 25) then table.insert(class,"shifty") end
    return getSprite("ItemSprites.png",pos,32,false,class)
end
local function getItemSpriteByName(name, data)
    local class = {}
    data = data or getItemData(md5.md5(name))
    local treeTest_name = name:gsub("%sTree$","")
    if(treeTest_name ~= name) then 
        local data2 = getItemData(md5.md5(treeTest_name))
        if(data2[2] > -1) then return getTreeSprite(data2) end
    end
        

    if(data[2] == 19 and not in_array(name,{"Magic Egg","Mutated Seed"})) then return getSeedSprite(data) end
    return getItemSprite(data)
end


function item.Sprite(frame)
    return getItemSpriteByName(frame.args[1])
end

function item.SpritePos(frame)
    return getSprite(frame.args[1],frame.args[2],frame.args[3],frame.args[4])
end

function item.ItemLink(frame)
    local name = frame.args[1] or ""
    local d = getItemData(md5.md5(name))
    local s = getItemSpriteByName(name, d)
    if(d[2] == -1) then
        local tname = name:gsub("%sTree$","")
        if(getItemData(md5.md5(tname))[2] ~= -1) then
            return s.." [["..tname.."|"..name.."]]"
        end
        return s.." Unknown Item"
    end
    if(d[2] == 19) then
        local iname = name:gsub("%sSeed$","")
        if(d[3] ~= md5.md5(iname)) then return s.." [["..name.."]]" end
        return s.." [["..iname.."|"..name.."]]"
    else
        return s.." [["..name.."]]"
    end
end

function item.Infobox(frame) 
    local name = frame.args["name"] or mw.title.getCurrentTitle().text
    local d = getItemData(md5.md5(name))
    
    local s = {}
    
    if(d[2] == -1 or d[2] == 19) then
        table.insert(s,"<div><b style='color: #F00'>Invalid Item</b></div>")
        if(mw.title.getCurrentTitle().nsText=="") then 
            addCategory(s,"Invalid Item")
        end
        return table.concat(s)
    end
    
    local c = {}
    addCategory(c,"Item")
    table.insert(s,"__NOTOC__<div class='iteminfobox'>")
    table.insert(s,"<div class='header'><h3>")
    table.insert(s,getItemSprite(d))
    table.insert(s,"&nbsp;<b class='s_name'>"..name)
     if(d[3]<999) then
        table.insert(s,"&nbsp;<small class='s_rarity'>(Rarity: "..d[3]..")</small>")
    end
    table.insert(s,"</b></h3><span></span></div>")
    --------------------
    table.insert(s,"<div class='sect_text'>")
    if((frame.args[1] or ""):len()>0) then
        if(d[2]==64) then table.insert(s,"This is a 1 lb. "..name..". ") end
        table.insert(s,frame.args[1])
    else
        table.insert(s,"<i class='warning'>Description missing.</i>")
        addCategory(c,"Missing Description")
    end
    table.insert(s,"</div>")
    --------------------
    table.insert(s,"<b class='sect_title'>Properties</b>")
    table.insert(s,"<div class='sect_text'>")
    
    local l = {}
    if((d[4]/1)%2>=1) then
        table.insert(l,"This item can be placed in two directions, depending on the direction you're facing.") end
    if((d[4]/2)%2>=1) then
        table.insert(l,"This item has special properties you can adjust with the Wrench.") end
    if((d[4]/4)%2>=1) then
        table.insert(l,"This item never drops any [[seed]]s.") end
    if((d[4]/32)%2>=1) then
        if(d[2]==20) then table.insert(l,"This item can kill zombies during a Pandemic!") 
        else table.insert(l,"This item can't be used on yourself.") end
    end
    if((d[4]/128)%2>=1) then
        table.insert(l,"This item can only be used in World-Locked worlds.") end
    if((d[4]/512)%2>=1) then
        table.insert(l,"This item can't be destroyed - smashing it will return it to your backpack if you have room!") 
    end
    if((d[4]/2048)%2>=1) then
        table.insert(l,"A tree of this type can bear surprising fruit!") end
    if((d[4]/4096)%2>=1) then
        table.insert(l,"This item is PUBLIC: Even if it's locked, anyone can smash it.") end
    if((d[4]/16384)%2>=1) then
        if(id==3762) then table.insert(l,"This item can only be created during SummerFest!")
        else table.insert(l,"This item can only be created during WinterFest!") end
    end
    if((d[4]/32768)%2>=1) then
        table.insert(l,"This item cannot be dropped or traded.") end
    if(d[2]==3) then
        table.insert(l,"A lock makes it so only you (and designated friends) can edit an area.") end
    if(d[2]==37 or d[2]==114) then
        table.insert(l,"This item has no use... by itself.") end
    if(d[2]==64) then
        table.insert(l,"This is a fish. It can only be placed in a Fish Tank. You can't divide fish into pieces.") end
    if(d[2]==107) then
        table.insert(l,"This item can be upgraded.") end
    
    if(#l==0) then table.insert(s,"None")
    else table.insert(s,table.concat(l,"<br>")) end
    table.insert(s,"</div>")
    --------------------
    table.insert(s,"<b class='sect_title'>Data</b>")
    table.insert(s,"<table class='sect_text'>")
    
    table.insert(s,"<tr><th>Type</th><td>")
    local ca = getItemType("category",d[2])
    if(d[2]==20) then ca = getItemType("clothingType",d[8]) end
    if(not ca[1]) then table.insert(s,getItemSpriteByName("Blank").." <i class='warning'>Unknown ("..d[2]..")</i>")
    else
        table.insert(s,getItemSpriteByName(ca[3]).." "..ca[1])
        if(ca[4] ~= false) then table.insert(s,"<small> - "..ca[4].."</small>") end
        if(#ca[2] > 0) then table.insert(s,"<br><small class='desc'>"..ca[2].."</small>") end
    end
    
    table.insert(s,"</td></tr><tr><th>Chi</th><td>")
    local chi_uc = mw.getContentLanguage():ucfirst((frame.args[2] or ""):lower())
    if(chi_uc == "None" or in_array(d[2],{20,107})) then
        table.insert(s,"None")
    elseif(in_array(chi_uc,{"Fire","Water","Earth","Wind"})) then
        table.insert(s,getItemSpriteByName("Element - "..chi_uc).." "..chi_uc)
        addCategory(c,"Chi - "..chi_uc)
    else
        table.insert(s,"<i class='warning'>Unknown</i>")
        addCategory(c,"Missing Chi")
    end
 
    table.insert(s,"</td></tr><tr><th>Texture Type</th><td>")
    local tt = getItemType("textureType",d[5])
    table.insert(s,getSprite("TextureTypeSprite.png", d[5], 32, 8).." "..(tt[1] or "<i class='warning'>Unknown</i>"))
 
    table.insert(s,"</td></tr><tr><th>Collision Type</th><td>")
    local ct = getItemType("collisionType",d[7])
    table.insert(s,getSprite("CollisionTypeSprite.png", d[7], 32, 8).." "..(ct[1] or "<i class='warning'>Unknown</i>"))
    
    table.insert(s,"</td></tr><tr><th>Hardness</th><td>"..getItemSpriteByName("Fist").." ")
    table.insert(s,math.ceil(d[9]/6).." Hits<br>"..getItemSpriteByName("Pickaxe").." ")
    table.insert(s,math.ceil(d[9]/8).." Hits<br><small>Restores after <b>"..d[10].."s</b>")
    table.insert(s," of inactivity.</small></td></tr>")
    
    table.insert(s,"<tr><th>Seed Color</th><td class='seedColor'>"..getSeedSprite(d).." <div>")
    table.insert(s,"<span style='background:"..d[11].."'></span> "..d[11].."<br>")
    table.insert(s,"<span style='background:"..d[12].."'></span> "..d[12].."</div></td></tr>")
    
    table.insert(s,"<tr><th>Grow Time</th><td>"..getTreeSprite(d).." ")
    if(d[13]>=604800) then table.insert(s,math.floor(d[13]/604800).."w ") end
    if(d[13]>=86400) then table.insert(s,math.floor(d[13]%604800/86400).."d ") end
    if(d[13]>=3600) then table.insert(s,math.floor(d[13]%86400/3600).."h ") end
    if(d[13]>=60) then table.insert(s,math.floor(d[13]%3600/60).."m ") end
    table.insert(s,(d[13]%60).."s</td></tr>")
    
    table.insert(s,"<tr><th>Default Gems Drop</th><td>"..getItemSpriteByName("Gems").." ")
    if(d[3]==999) then table.insert(s,"N/A".."</td></tr>")
    else
        if((d[14]/131072)%2>=1) then table.insert(s,"0</td></tr>")
        elseif(d[3]>30) then table.insert(s,"0 - "..math.floor(d[3]/4+1).."</td></tr>")
        elseif(d[3]>=8) then table.insert(s,"0 - "..math.floor(math.floor(d[3]/4)*0.75+1).."</td></tr>")
        else table.insert(s,"0 - 1</td></tr>") end
    end
    
    table.insert(s,"</table>")
    table.insert(s,"</div>")
 
 
    ----- [Handle Category] -----
    if(d[2]==20) then 
        addCategory(c,"Clothes")
        addCategory(c,getItemType("clothingType",d[8])[1].." (Clothes)")
    end
 
 
    if(mw.title.getCurrentTitle().nsText=="") then
        table.insert(s,table.concat(c))
    end
    return table.concat(s)
end

return item