Is there any function in Lua that can cast spells for players?

[xengine-qyt]

there is my script:

local function BuffCommand(event, player, command)
    local nTimeBuff = 60 * 60 * 1000 * 3
    if command == "buff" then
        local buffs = {23766, 23767, 23768, 23769,
                       49284, 49281,                      
                       47440, 47436                         
                       }                               
        for i, buffId in ipairs(buffs) do
            local aura = player:AddAura(buffId, player)
            -- local aura = player:CastSpell(player, buffId, true)
            if aura then
                aura:SetDuration(nTimeBuff) 
            end
        end
        player:SendBroadcastMessage("add buffs!")
        return false
    end
end

RegisterPlayerEvent(42, BuffCommand)

This buff command should perform certain checks, such as only allowing one type of Knight's Blessing or Warrior's Roar to be cast at a time. However, according to the game rules, multiple Knight's Blessings can be cast on a player as long as they are different types of blessings. What method should I use to implement this?
I tried CastSpell, but the effect is always the same, and I can't set the buff duration. Can Lua implement the functionality I mentioned?