【策划架构】Lua矩阵转置：沙巴克阵位表的行列互换

local function col(tbl, j)
    local out = {}
    for i = 1, 50 do
        out[i] = tbl[i][j]           -- 每取一列扫50行
    end
    return out
end

local function transpose(m)
    local out = {}
    for i = 1, #m do
        for j = 1, #m[i] do
            out[j] = out[j] or {}
            out[j][i] = m[i][j]      -- 行列坐标互换
        end
    end
    return out
end
sendmsg(actor, 1, "沙巴克阵位列组 "
    .. #transpose(POS) .. " 条")