table.move

local result = table.move(from, start_at, end_at, move_at, to = from)

local src = {1, 2, 3, 4, 5}
local dest = {}
table.move(src, 1, 3, 1, dest)

engine.print("info", table.concat(dest, ", ")) --'1, 2, 3'

local t = {10, 20, 30, 40, 50}
table.move(t, 1, 2, 4)

engine.print("info", table.concat(t, ", ")) --'10, 20, 30, 10, 20'

local t = {1, 2, 3, 4}
table.move(t, 1, 4, 2)

engine.print("info", table.concat(t, ", ")) --'1, 1, 2, 3, 4'

local t = {"a", "b", "c", "d", "e"}
table.move(t, 2, 4, 6)

engine.print("info", table.concat(t, ", ")) --'a, b, c, d, e, b, c, d'

local original = {1, 2, 3}
local clone = {}
table.move(original, 1, table.len(original), 1, clone)

engine.print("info", table.concat(clone, ", ")) --'1, 2, 3'

local t = {2, 3, 4}
table.move(t, 1, table.len(t), 2)
t[1] = 1

engine.print("info", table.concat(t, ", ")) --'1, 2, 3, 4'

local t1 = {1, 2, 3}
local t2 = {4, 5, 6}
table.move(t2, 1, table.len(t2), table.len(t1) + 1, t1)

engine.print("info", table.concat(t1, ", ")) --'1, 2, 3, 4, 5, 6'

local t = {1, 2, 3, 4, 5}
table.move(t, 3, 5, 2)
table.remove(t)
table.remove(t)

engine.print("info", table.concat(t, ", ")) --'1, 3, 4, 5'

local t = {"x", "y", "z"}
table.move(t, 1, 3, 4)

engine.print("info", table.concat(t, ", ")) --'x, y, z, x, y, z'

local src = {10, 20, 30, 40, 50}
local dest = {0, 0, 0, 0, 0}
table.move(src, 2, 4, 1, dest)

engine.print("info", table.concat(dest, ", ")) --'20, 30, 40, 0, 0'

local src = {1, 2, 3, 4}
local dest = {}
for i = table.len(src), 1, -1 do
    table.move(src, i, i, table.len(src) - i + 1, dest)
end

engine.print("info", table.concat(dest, ", ")) --'4, 3, 2, 1'

local base = {1, 2, 3}
local extension = {4, 5, 6, 7, 8}
table.move(extension, 1, table.len(extension), table.len(base) + 1, base)

engine.print("info", table.concat(base, ", ")) --'1, 2, 3, 4, 5, 6, 7, 8'