WoWInterface - Help Singing Sunflower sing again

WoWInterface (https://www.wowinterface.com/forums/index.php)

- AddOn Search/Requests (https://www.wowinterface.com/forums/forumdisplay.php?f=6)

- - Help Singing Sunflower sing again (https://www.wowinterface.com/forums/showthread.php?t=59747)

Help Singing Sunflower sing again

Hi all, I'm so sad right now. The Singing Sunflower pet doesn't sing anymore...(1, 2). I really miss its happiness! Can someone please make an addon that plays the sounds of the Singing Flower when it is summoned? Just like before? Here are the sounds: https://www.wowhead.com/sound=23503/...ersong-channel

I heard it sing only today. Maybe the time between songs is just longer randoms.

If you (and just you) wanted to hear it more often you could use something like:
The min/max times can be set to whatever doesn't annoy you (8, 12 seconds is very short but you don't have to wait long to test.)

Lua Code:

-- More music for Sunflower pet
local minTime, maxTime = 8, 12 -- min/max times between songs in seconds
local castID = 93823
local guids = { -- add additional guids here
    ["BattlePet-0-0000121FED47"] = true, 
    ["BattlePet-0-0000121FED42"] = true,
}
local soundIDs = {
    567354,
    567327,
    567317,
    567338,
    567374,
    567295,
}
local summoned
local function SingFlowerSing()
    local id = C_PetJournal.GetSummonedPetGUID()
    if not guids[id] then
        summoned = false
        return
    end
    PlaySoundFile(soundIDs[random(1, #soundIDs)])      
    C_Timer.After(random(minTime, maxTime), SingFlowerSing)
end
local f = CreateFrame("Frame")
f:RegisterUnitEvent("UNIT_SPELLCAST_SUCCEEDED", "player")
f:RegisterUnitEvent("UNIT_LEVEL", "player")
f:RegisterEvent("PLAYER_ENTERING_WORLD")
f:SetScript("OnEvent", function(self, event, ...)
    local unit, _, spellid = ...
    if event == "UNIT_SPELLCAST_SUCCEEDED" and spellid == castID then
        if not summoned then
            summoned = true
            C_Timer.After(random(minTime, maxTime), SingFlowerSing)
        end
    elseif event == "PLAYER_ENTERING_WORLD" or event == "UNIT_LEVEL" then
        local id = C_PetJournal.GetSummonedPetGUID()
        if guids[id] then
            self:GetScript("OnEvent")(self, "UNIT_SPELLCAST_SUCCEEDED", "player", nil, castID)
            self:UnregisterEvent("UNIT_LEVEL")
        end
        self:UnregisterEvent("PLAYER_ENTERING_WORLD")
        if event == "UNIT_LEVEL" then
            self:UnregisterEvent("UNIT_LEVEL")
        end
    end
end)

Copy/paste the code to the website addon.bool.no to create download as an addon.

He singed once when I summoned it then nothing. I'm confused.

Different guids for each Sunflower in your journal.

I have two so those are included in the updated code above (copy/paste and create a new addon to replace your current one). If you have more Sunflowers or one that is not one of these (there's usually a max. of 3 of any one type of pet...I think (not a pet person)), you will have to find/add it's guid.

With the flower that isn't singing properly summoned, you should be able to

Code:

/run print(C_PetJournal.GetSummonedPetGUID())

and copy that into a new entry in the guids table (insert a new line)

Code:

["xxxxxxxx"] = true,

where xxxxxxxx is the guid.

Copy one of the ones already there and you probably only have to change the last one or two numbers.

It works great! THANKS YOU SO MUCH!