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);
        //sys_err("pc_unequip_from_index vnum:%d map_index:%d", vnum, lMapIndex);
        LPITEM item = NULL;
        bool bResult = false;
        if (lMapIndex == ch->GetMapIndex())
        {
            for(BYTE i = 0; i < WEAR_MAX_NUM; i++)
            {
                item = ch->GetWear(i);
                if (item && item->GetVnum() == vnum)
                {
                    if(ch->UnequipItem(item))
                        bResult = true;
                }
            }
        }
        lua_pushboolean(L, bResult);
        return 1;
    }