if (spellName=="Engulf in Flames") then 
				catorce=23;
				stacks=0;
			end

if ((spellId==61621) or (spellId==56092)) then
				catorce=23;
				stacks=0;
			end

if (GetLocale() == "frFR") then
        MSG_ComboPoints  = "Points de combo: "    
        MSG_Energy       = "Energie:     "
        MSG_EngulfStacks = "Envelopper dans les flammes: "
        MSG_EngulfRemainigTime = "Temps restant pour l'envelopper dans les flammes:"
    end

function MalygosCP_OnLoad()
    this:RegisterEvent("COMBAT_LOG_EVENT_UNFILTERED");
    this:RegisterEvent("UNIT_COMBO_POINTS");
    this:RegisterEvent("PLAYER_TARGET_CHANGED");
    this:RegisterEvent("UNIT_POWER");
    this:RegisterEvent("UNIT_ENERGY");
    this:RegisterEvent("UNIT_SPELLCAST_SUCCEEDED")
    this:RegisterEvent("UNIT_SPELLCAST_INTERRUPTED")
    this:RegisterEvent("UNIT_SPELLCAST_FAILED")
    this:RegisterEvent("UNIT_SPELLCAST_START")
    this:RegisterEvent("PLAYER_REGEN_ENABLED")

    frameMalys_Text:SetTextHeight(20) 
    frameMalys_Text2:SetTextHeight(20) 
    frameMalys_Text3:SetTextHeight(20)
    frameMalys_Text5:SetTextHeight(15)
    frameMalys_Text:SetTextColor(1, 1, 0);
    frameMalys_Text2:SetTextColor(1, 1, 0); 
    frameMalys_Text3:SetTextColor(1, 1, 0); 
    frameMalys_Background:SetAlpha(0);
    frameMalys:SetAlpha(0);
    frameMalys:EnableMouse(false)
    frameMalysTimeRemaining:SetStatusBarColor(1, 0, 0, 0.5);

    Shown = 1
    catorce=16;
    Start=0;
    stacks=0;
    TimeCombo=0;
    WSID=32535;
    WSID2=30161;
    editing=0;

    SLASH_MalygosCP1 = "/MalygosCP";
    SLASH_MalygosCP2 = "/MCP";
    SlashCmdList["MalygosCP"] = MalygosCP_Command;

    MSG_ComboPoints        = "Combo Points: "
    MSG_Energy             = "Energy:       "
    MSG_EngulfStacks       = "Engulf in Flames Stacks: "
    MSG_EngulfRemainigTime = "Remaining time in the Engulf in Flames"

    if (GetLocale() == "deDE") then
        MSG_ComboPoints  = "Kombopunkte: "    
        MSG_Energy       = "Energie:     "
        MSG_EngulfStacks = "Flammenh\195\188lle gestapelt: "
        MSG_EngulfRemainigTime = "Verbleibende Zeit f\195\188r Flammenh\195\188lle"
    end    
     
end

function MalygosCP_Command(cmd)

   if(  Shown == 1 ) then
      editing=1;
      frameMalys_Text:SetText(MSG_ComboPoints.."0");
      frameMalys:EnableMouse(true)
      frameMalys_Background:SetAlpha(1);
      Shown = 0
      frameMalys:SetAlpha(1);
      
    else
      editing=0;
      frameMalys:EnableMouse(false)
      frameMalys_Background:SetAlpha(0);
      Shown = 1
      frameMalys:SetAlpha(0);     
    end
   
end

function WyrmrestSkytalon()
    local guid = "vehicle" and UnitGUID("vehicle")
    if (guid) then
        if((WSID==tonumber(strsub(guid, -12,-7),16)) or (WSID2==tonumber(strsub(guid, -12,-7),16))) then 
        return true
        end     
    end 
end

function GetColorValue(nBase)
    if nBase <= 2 then
        nNum="FF0000"
    elseif nBase <= 4 then
        nNum = "FFAA00"
    elseif nBase <= 5 then
        nNum = "FFAA00"
    elseif nBase <= 6 then
        nNum = "FFD500"
    elseif nBase <= 7 then
        nNum = "FFFF00"
    elseif nBase <= 8 then
        nNum = "D5FF00"
    elseif nBase <= 9 then
        nNum = "AAFF00"
    elseif nBase <= 10 then
        nNum = "55FF00"
    elseif nBase <= 12 then
        nNum = "55FF00"
    elseif nBase <= 14 then
        nNum = "2BFF00" 
    else
       nNum = "00FF00"
    end     
    return nNum
end


function UpdateComboPoints()
    local comboP = 0;
    if (CanExitVehicle() and WyrmrestSkytalon()) then
        comboP = GetComboPoints("vehicle", "target");
    end
    return comboP;
end

function UnitPowerF()
    foo = UnitPower("Vehicle"); 
    local energy = 0;

    if (CanExitVehicle()) then
        energy = foo;
        if (energy == 0) then
         energy = foo;
        end
    end
    return energy;
end

function MalygosCP_OnUpdate()
    
    if(UnitPowerF()<25) then
     frameMalys_Text2:SetTextColor(1, 0, 0);
    else
     frameMalys_Text2:SetTextColor(1, 1, 0);
    end 

   frameMalys_Text2:SetText(MSG_Energy..UnitPowerF()); 

    if(catorce<22 and catorce >=0) then
    
        frameMalys_Text3:SetText(MSG_EngulfStacks..stacks);
        frameMalys_Text4:SetText(MSG_EngulfRemainigTime);
        frameMalys_Text5:SetText("|cff"..GetColorValue(floor(catorce))..catorce.."|r");
        catorce=floor(TimeCombo+(Start-GetTime()));
        frameMalysTimeRemaining:SetValue(TimeCombo+(Start-GetTime()));
    else
        frameMalys_Text3:SetText(MSG_EngulfStacks.."0");
        frameMalys_Text4:SetText("");
        frameMalysTimeRemaining:SetValue(0);
        frameMalys_Text5:SetText("");
    end

end

function MalygosCP_OnEvent(self, event, ...)
    local playerName = UnitName("player");
    local timestamp, type, sourceGUID, sourceName, sourceFlags, destGUID, destName, destFlags = select(1, ...)
    local guid = UnitGUID("vehicle");      

    if event == "PLAYER_REGEN_ENABLED" then
        catorce=23;
        stacks=0;
    end
    
    if event == "UNIT_COMBO_POINTS" or event == "PLAYER_TARGET_CHANGED" then
        frameMalys_Text:SetText(MSG_ComboPoints..UpdateComboPoints());
    end
    
    
    if (CanExitVehicle() and WyrmrestSkytalon()) then           
        frameMalys:SetAlpha(1);
        frameMalys_Text:SetText(MSG_ComboPoints..UpdateComboPoints());
        frameMalys_Text2:SetText(MSG_Energy..UnitPowerF()); 
    else
        if(editing<1) then
            frameMalys:SetAlpha(0);
        end   
    end
 
    if (event=="COMBAT_LOG_EVENT_UNFILTERED") then
        if (sourceGUID == guid) then
           
            if (type ~= "SPELL_PERIODIC_DAMAGE" and type ~= "SPELL_AURA_APPLIED") then
                local spellId, spellName, spellSchool = select(9, ...)
                local amount, overkill, school, resisted, blocked, absorbed, critical, glancing, crushing = select(12, ...)

                --  if (spellName=="Engulf in Flames") then 
                if ((spellId==61621) or (spellId==56092)) then
                    StartCombo=UpdateComboPoints();
                    StartCombo=StartCombo-1;
                    TempTimeCombo=StartCombo*4;
                    TempTimeCombo=TempTimeCombo+6;
                    if (TempTimeCombo > catorce or catorce==23) then
                        catorce=0;
                        TimeCombo=TempTimeCombo;
                        Start=GetTime();
                        frameMalysTimeRemaining:SetMinMaxValues(0,TimeCombo);
                    end
                    stacks=stacks+1;
                end
            end
    
            if (type == "SPELL_AURA_REMOVED") then
                local spellId, spellName, spellSchool = select(9, ...)
                local amount, overkill, school, resisted, blocked, absorbed, critical, glancing, crushing = select(12, ...)
                if (sourceGUID == guid) then
                    --  if (spellName=="Engulf in Flames") then 
                    if ((spellId==61621) or (spellId==56092)) then
                        catorce=23;
                        stacks=0;
                    end 
                end
            end

        end
    end
end