int pc_unequip_from_index(lua_State * L)
    {
        LPCHARACTER ch = CQuestManager::instance().GetCurrentCharacterPtr();

        if (!lua_isnumber(L, 1))
        {
            sys_err("wrong map index");
            return 0;
        }

        if (!lua_isnumber(L, 2))
        {
            sys_err("wrong vnum");
            return 0;
        }

        long lMapIndex = (long) lua_tonumber(L, 1);
        DWORD vnum = (DWORD) lua_tonumber(L, 2);
        LPITEM item = NULL;
        if (lMapIndex == ch->GetMapIndex())
        {
            for(BYTE i = 7;i<9;i++)
            {
                item = ch->GetWear(i);
                if (item->GetVnum() == vnum)
                {
                    lua_pushboolean(L, ch->UnequipItem(item) ? true : false);
                    break;
                }
            }
        }
        return 1;
    }