vanilla-wow-addons – Rev 1

Subversion Repositories:
Rev:
local dewdrop = DewdropLib:GetInstance('1.0')
local tablet = TabletLib:GetInstance('1.0')

--[[
EmoteFu
by Cilraaz of Cenarion Circle

Please note that this mod is a port of TitanEmoteMenu by Dsanai of Whisperwind.  Some of the functions are largely based
on that mod.  The entire emote list is also borrowed from TitanEmoteMenu.  So a huge thanks to Dsanai for even making 
this mod possible.

Also, a special thanks to chuckg from www.wowinterface.com.  Chuckg helped in straightening out a few problem areas in
my code, as well as pointing out the DoEmote API function, which was invalueable.

Welcome to EmoteFu!  This is a FuBar port of TitanEmoteMenu.  It is meant to give players an easily
accessible menu of emotes.  The emotes have been sorted by category (ie. "Friendly", "Hostile", etc) to make it quite
simple to quickly access the emote you want.  Emotes can end up in more than one category, where applicable (ie. /dance
can be found in "Happy" and "Affection").

Emotes in the list are colorized and marked with a label (A, V, AV) if they are Animated, Voice, or Both.

It is also possible to add your own custom emotes!  To do so, simply edit the EmoteData.lua file.  You will want to 
match the format exactly or that mod may no longer function!  If that occurs, just replace the EmoteData.lua with a good
copy from the zip.

Change Log:
v0.1.5 (TOC 11200)
-- Issue from v0.1.3 (gender handling) somehow occurred again in version 0.1.4, but this has now been corrected
v0.1.4 (TOC 11200)
-- Updated TOC
v0.1.3b (TOC 11100)
-- Re-upped the archive yet again. I added the directory structure to include a folder, so that the zip only needs unzipped into the AddOns folder, rather than the user needing to create a folder for it
v0.1.3a (TOC 11100)
-- Re-upped the archive as a ZIP file, rather than a RAR file. Sorry about that all!
v0.1.3 (TOC 11100)
-- Changed gender handling to fit Blizzard's new scheme (now 1=unknown, 2=male, 3=female...was 0=male, 1=female, 2=unknown)
-- Updated TOC
v0.1.2 (TOC 11000)
-- As per feature request 839, an option has been added to the menu labeled "Toggle Slash Commands". When selected, this will cause all emotes in the menus to be prefixed with their slash command. In the case of custom emotes, they will be prefixed with "Custom: ".
v0.1.1 (TOC 11000)
-- Fixed an issue with some emotes not working properly
-- Removed an unnecessary line from EmoteFuLocals.lua
-- Fixed one emote, which was showing as having neither an action or vocal, when in fact it had an action associated with it
-- Files changed: All
v0.1.0 (TOC 11000)
-- Initial Release

To do:
-- Add localization

]]

EmoteFu = FuBarPlugin:GetInstance("1.2"):new({
        name          = EmoteFuLocals.NAME,
        description   = EmoteFuLocals.DESCRIPTION,
        version       = "0.1.2",
        releaseDate   = "06-03-2006",
        aceCompatible = 103,
        fuCompatible  = 101,
        author        = "Cilraaz",
        email         = "Cilraaz@gmail.com",
        website       = "http://cilraaz.wowinterface.com/",
        category      = "others",
        db            = AceDatabase:new("EmoteFuDB"),
        cmd           = AceChatCmd:new(EmoteFuLocals.COMMANDS, EmoteFuLocals.CMD_OPTIONS),
        loc           = EmoteFuLocals,
        data          = EmoteData,
        hasIcon       = "Interface\\Icons\\Spell_Shadow_Charm",
        hasText           = "EmoteFu",
        cannotDetachTooltip = TRUE
        })
        
        EmoteFu.profileCode = true;
        
function EmoteFu:IsShowingSlashCommands()
        return self.data.showSlashCommand
end

function EmoteFu:ToggleShowingSlashCommands()
        self.data.showSlashCommand = not self.data.showSlashCommand
        if loud then
                self.cmd:status(self.loc.ARGUMENT_SLASH, self.data.showSlashCommand and 1 or 0, FuBarLocals.MAP_ONOFF)
        end
        return self.data.showSlashCommand
end
        
function EmoteFu:UpdateTooltip()
        local cat = tablet:AddCategory()
                cat:AddLine(
                        "text", self.loc.LMBTEXT
                )
end

function EmoteFu:MenuSettings(level, value)
        if level == 1 then
        
                for k, v in EL_Types do
                    local elType = k;
                    local label = v;

                    dewdrop:AddLine(
                        'text', label,
                        'value', elType,
                        'hasArrow', TRUE
                    )
                end
                
                dewdrop:AddLine()
                dewdrop:AddLine(
                        'text', "Toggle Slash Commands",
                        'arg1', self,
                        'func', "ToggleShowingSlashCommands",
                        'checked', self:IsShowingSlashCommands()
                )

        elseif level == 2 then

                local hasTarget = UnitName("target");
                local genderCode = UnitSex("player");
                local genderHe = nil;
                local genderHis = nil;
                local genderhe = nil;
                local genderhis = nil;
                if (genderCode==2) then -- male
                        genderHe = "He";
                        genderhe = "he";
                        genderHis = "His";
                        genderhis = "his";
                else -- female (we hope)
                        genderHe = "She";
                        genderhe = "she";
                        genderHis = "Her";
                        genderhis = "her";
                end

                for k2, v2 in EL_Emotes do
                        for k3, v3 in v2.types do
                                if (value == v3) then
                                        local info = nil;
                                        if (hasTarget) then
                                                info = self:GetOnDemandText(v2,true);
                                                info = string.gsub(info,"<Target>",hasTarget);
                                        else
                                                info = self:GetOnDemandText(v2,false);
                                        end
                                
                                        info = string.gsub(info,"<He>",genderHe);
                                        info = string.gsub(info,"<His>",genderHis);
                                        info = string.gsub(info,"<he>",genderhe);
                                        info = string.gsub(info,"<his>",genderhis);
                                        
                                        for k4, v4 in v2.custom do
                                                if (v4 == 1) then
                                                        slshCmd = "Custom:  ";
                                                else
                                                        slshCmd = "/"..k2..":  ";
                                                end
                                        end

                                        if (self.data.showSlashCommand) then
                                                dewdrop:AddLine(
                                                        'text', slshCmd..info,
                                                        'level', 2,
                                                        'arg1', k2,
                                                        'func', function(k2)
                                                                self:HandleModClick(k2)
                                                        end,
                                                        'closeWhenClicked', true
                                                )
                                        else
                                                dewdrop:AddLine(
                                                        'text', info,
                                                        'level', 2,
                                                        'arg1', k2,
                                                        'func', function(k2)
                                                                self:HandleModClick(k2)
                                                        end,
                                                        'closeWhenClicked', true
                                                )
                                        end
                                end             
                        end
                end

        end
end

function EmoteFu:GetOnDemandText(v2,hasTarget)
        local color;
        local flag = nil;
        local returnCode;
        local emoteText;
        
        if (hasTarget) then emoteText = v2.target else emoteText = v2.none end
        
        if (EL_Types[v2["types"][1]] and EL_Types[v2["types"][1]]=="Custom") then
                emoteText = UnitName("player").." "..emoteText; -- custom emote
        end
        
        if (EL_React[v2.react] == "") then              -- None (text only) White
                color = "fffefefe";
        elseif (EL_React[v2.react] == "A") then         -- Animated - Purple
                color = "ffa335ee";
                flag = "A";
        elseif (EL_React[v2.react] == "V") then -- Voice - Orange
                color = "ffff8000";
                flag = "V";
        elseif (EL_React[v2.react] == "AV") then -- Both - Green
                color = "ff1eff00";
                flag = "AV";
        else                                                                            -- Grey (Unknown)
                color = "ff9d9d9d";
        end     

        returnCode = "|c" .. color .. emoteText .. FONT_COLOR_CODE_CLOSE;
        if (flag) then returnCode = returnCode.." ["..flag.."]"; end
        return returnCode;
end

function EmoteFu:HandleModClick(k2)
        if (k2) then
                if (EL_Types[EL_Emotes[k2]["types"][1]] and EL_Types[EL_Emotes[k2]["types"][1]]=="Custom") then -- Custom emote
                        local emoteText;
                        local hasTarget = UnitName("target");
                        local genderCode = UnitSex("player");
                        local genderHe = nil;
                        local genderHis = nil;
                        local genderhe = nil;
                        local genderhis = nil;
                        if (genderCode==2) then -- male
                                genderHe = "He";
                                genderhe = "he";
                                genderHis = "His";
                                genderhis = "his";
                        else -- female (we hope)
                                genderHe = "She";
                                genderhe = "she";
                                genderHis = "Her";
                                genderhis = "her";
                        end
                        
                        if (hasTarget) then
                                emoteText = EL_Emotes[k2].target;
                                emoteText = string.gsub(emoteText,"<Target>",hasTarget);
                        else
                                emoteText = EL_Emotes[k2].none;
                        end
                        emoteText = string.gsub(emoteText,"<He>",genderHe);
                        emoteText = string.gsub(emoteText,"<His>",genderHis);
                        emoteText = string.gsub(emoteText,"<he>",genderhe);
                        emoteText = string.gsub(emoteText,"<his>",genderhis);

                        SendChatMessage(emoteText,"EMOTE");
                else
                        emoteToken = string.upper(k2);
                        if (emoteToken == "LAVISH") then
                                emoteToken = "PRAISE";
                        end
                        if (emoteToken == "EXCITED") then
                                emoteToken = "TALKEX";
                        end
                        if (emoteToken == "DOOM") then
                                emoteToken = "THREATEN";
                        end
                        if (emoteToken == "SILLY") then
                                emoteToken = "JOKE";
                        end
                        if (emoteToken == "LAY") then
                                emoteToken = "LAYDOWN";
                        end
                        if (emoteToken == "REAR") then
                                emoteToken = "SHAKE";
                        end
                        if (emoteToken == "BELCH") then
                                emoteToken = "BURP";
                        end
                        if (emoteToken == "SMELL") then
                                emoteToken = "STINK";
                        end
                        if (emoteToken == "GOODBYE") then
                                emoteToken = "BYE";
                        end
                        if (emoteToken == "FOLLOWME") then
                                emoteToken = "FOLLOW";
                        end
                        if (emoteToken == "ATTACKTARGET") then
                                emoteToken = "ATTACKMYTARGET";
                        end
                        if (emoteToken == "CONGRATS") then
                                emoteToken = "CONGRATULATE";
                        end
                        if (emoteToken == "PUZZLED") then
                                emoteToken = "PUZZLE";
                        end
                        if (emoteToken == "QUESTION") then
                                emoteToken = "TALKQ";
                        end
                        DoEmote(emoteToken);
                end
        end
end
        
EmoteFu:RegisterForLoad()