vanilla-wow-addons – Rev 1

Subversion Repositories:
Rev:
-- MetaMap Export Module
-- Written by MetaHawk aka Urshurak

MMEXP_USERKB = "UserKB";
MMEXP_USERNOTES = "UserNotes";

local Export_KB = "MetaKB";
local Export_Notes = "MetaNotes";
local KBcount = 0;
local Notecount = 0;

function MetaMapEXP_CheckData()
        MetaMap_ImportHeader:SetTextColor(1,1,1);
        MetaMap_ImportHeader:SetText("MetaMap Exports module loaded");
        MetaMap_ConfirmationHeader:SetText(METAMAPBLT_CONFIRM_EXPORT);
        MetaMap_SelectionButton1:SetText(MMEXP_USERKB);
        MetaMap_SelectionButton2:SetText(MMEXP_USERNOTES);
        MetaMap_SelectionButton3:SetText("Both");
        if(not IsAddOnLoaded("MetaMapWKB")) then
                LoadAddOn("MetaMapWKB");
        end
        if(not IsAddOnLoaded("MetaMapWKB")) then
                MetaMap_SelectionButton1:Disable();
                MetaMap_SelectionButton3:Disable();
        end
        MetaMap_ConfirmationDialog:Show();
end

function MetaMap_SelectedExport(mode)
        local msg = ""; KBcount = 0; Notecount = 0;
        if(mode == MMEXP_USERKB) then
                MyNotes_Data = nil;
                MyLines_Data = nil;
                MetaMap_ExportKB();
                msg = format(METAMAPEXP_KB_EXPORTED, KBcount);          
        elseif(mode == MMEXP_USERNOTES) then
                MyKB_Data = nil;
                MetaMap_ExportMetaNotes();
                msg = format(METAMAPEXP_NOTES_EXPORTED, Notecount);             
        elseif(mode == "Both") then
                MetaMap_ExportKB();
                MetaMap_ExportMetaNotes();
                msg = format(METAMAPEXP_KB_EXPORTED, KBcount).."\n"..format(METAMAPEXP_NOTES_EXPORTED, Notecount);              
        end
        MetaMap_ConfirmationDialog:Hide();
        MetaMap_ImportHeader:SetTextColor(0,1,0);
        MetaMap_ImportHeader:SetText(msg);
end

function MetaMap_ExportKB()
        MyKB_Data = {};
        MyKB_Data[MetaKB_dbID] = {};
        for name, zone in MetaKB_Data[MetaKB_dbID] do
                MyKB_Data[MetaKB_dbID][name] = MetaKB_Data[MetaKB_dbID][name];
                KBcount = KBcount +1;
        end
end

function MetaMap_ExportMetaNotes()
        MyNotes_Data = {};
        MyLines_Data = {};
        for continent=1, 2, 1 do
                MyNotes_Data[continent] = {};
                for zone, zoneTable in MetaMapNotes_Data[continent] do
                        MyNotes_Data[continent][zone] = {};
                        for i, value in MetaMapNotes_Data[continent][zone] do
                                MyNotes_Data[continent][zone][i] = MetaMapNotes_Data[continent][zone][i];
                                Notecount = Notecount +1;
                        end
                end
        end
        for continent=1, 2, 1 do
                MyLines_Data[continent] = {};
                for zone, zoneTable in MetaMapNotes_Lines[continent] do
                        MyLines_Data[continent][zone] = {};
                        for i, value in MetaMapNotes_Lines[continent][zone] do
                                MyLines_Data[continent][zone][i] = MetaMapNotes_Lines[continent][zone][i];
                        end
                end
        end
end