Function LuaAnimate

engine/gui/src/gui_script.cpp:1487–1582

animates a node property * This starts an animation of a node property according to the specified parameters. * If the node property is already being animated, that animation will be canceled and * replaced by the new one. Note however that several different node properties * can be animated simultaneously. Use `gui.cancel_animations` to stop the animation * before it has

     * ```
     */
    static int LuaAnimate(lua_State* L)
    {
        DM_LUA_STACK_CHECK(L, 0);

        Scene* scene = GuiScriptInstance_Check(L);

        HNode hnode;
        InternalNode* node = LuaCheckNodeInternal(L, 1, &hnode);
        (void) node;

        dmhash_t property_hash = dmScript::CheckHashOrString(L, 2);
        if (!dmGui::HasPropertyHash(scene, hnode, property_hash)) {
            char buffer[128];
            luaL_error(L, "property '%s' not found", dmScript::GetStringFromHashOrString(L, 2, buffer, sizeof(buffer)));
        }

        Vector3* v3;
        Quat*   q;
        Vector4 to;
        if (lua_isnumber(L, 3))
        {
            to = Vector4((float) lua_tonumber(L, 3));
        }
        else if ((v3 = dmScript::ToVector3(L, 3)))
        {
            Vector4 original = dmGui::GetNodePropertyHash(scene, hnode, property_hash);
            to = Vector4(*v3, original.getW());
        }
        else if ((q = dmScript::ToQuat(L, 3)))
        {
            to = Vector4(*q);
        }
        else
        {
            to = *dmScript::CheckVector4(L, 3);
        }

        dmEasing::Curve curve;
        if (lua_isnumber(L, 4))
        {
            curve.type = (dmEasing::Type)luaL_checkinteger(L, 4);
            if (curve.type >= dmEasing::TYPE_COUNT)
                return luaL_error(L, "invalid easing constant");
        }
        else if (dmScript::IsVector(L, 4))
        {
            curve.type = dmEasing::TYPE_FLOAT_VECTOR;
            curve.vector = dmScript::CheckVector(L, 4);

            lua_rawgeti(L, LUA_REGISTRYINDEX, scene->m_ContextTableReference);
            lua_pushvalue(L, 4);

            curve.release_callback = LuaCurveRelease;
            curve.userdata1 = (void*)scene;
            curve.userdata2 = (void*)(uintptr_t)dmScript::Ref(L, -2);
            lua_pop(L, 1);
        }
        else