'曾祖辈', -2 => '祖辈', -1 => '父母辈']; return $up[$level] ?? '上 ' . abs($level) . ' 代'; } $down = [1 => '子女辈', 2 => '孙辈', 3 => '曾孙辈']; return $down[$level] ?? '下 ' . $level . ' 代'; }; $levels = array_keys($gens); // ---- 把每一代摊成「列位(slot)」 ---- // 一「户」占几个列位:夫妻 2(并排 + 中间一根短横)、单人 1。 // 整棵树的列数取最宽那一代;**所有代共用这一套列**,竖线才可能对齐。 $slotOf = []; // level => [单元key => ['start'=>起始列位, 'span'=>占几列]] $maxSlots = 1; foreach ($levels as $level) { $s = 0; foreach (($units[$level] ?? []) as $u) { $span = $u['spouse'] !== null ? 2 : 1; $slotOf[$level][$u['key']] = ['start' => $s, 'span' => $span]; $s += $span; } // ⚠️ 至少要 1:整棵树只有「我」一个人时也不能写出 repeat(0, …)(那是无效值) $maxSlots = max($maxSlots, max(1, $s)); } // 列宽**固定 = 一卡之宽**(--col-w:桌面 96 / 窄屏 78),不是 1fr。 // // ⚠️ 为什么必须是固定值而不是 minmax(96px,1fr):列宽给 1fr 时,宽屏下列被撑到 ~195px, // 而卡片只有 96px、在户内 flex 居中 —— 于是**卡片中心 ≠ 列中心**。 // 连线靠 justify-self:center 落在**列**中心,就会与卡片错开(实测夫妻户偏 50px)。 // 列宽固定成 96px 后: // · 单列户 宽 = 96 = 卡片宽 → 卡片正好居中,中心 = 列中心; // · 夫妻户 宽 = 96+14+96 = 两卡 + 一根短横 → 内容正好填满,两卡各自落在自己的列上。 // 两列的间距(gap)与夫妻短横同宽,所以「户内的两个卡」与「跨户的两个卡」间距也一致。 // 木桶效应不存在了:列宽恒定 → 卡片永远不会被压到地板以下(重叠问题从构造上消失)。 $colStyle = 'grid-template-columns: repeat(' . (int)$maxSlots . ', var(--col-w));'; // 网格行号:每代占 3 行 —— 「辈分行 / 卡片行 / 连线行」。 // 行号写死(而不是靠自动排布)是为了让上引线、横杆、下引线精确落到同一行。 $rowLabel = function (int $li): int { return $li * 3 + 1; }; $rowCards = function (int $li): int { return $li * 3 + 2; }; $rowConn = function (int $li): int { return $li * 3 + 3; }; ?>

我的家谱

同代按长幼从左到右 · 夫妻并排 · 折线表示谁是谁的父母
还没连上任何亲属关系 到「」的资料页,把父母、配偶、子女填进去, 这张家谱就会自动长出来。兄弟姐妹不用单独填 —— 只要你们有同一对父母,就会自动认出来。
$level): ?>
户
$id): ?> 待确认 姻亲
它的子女们的列位起点 $kidStarts = []; foreach ($units[$childLevel] as $ku) { $pk = $ku['parent_key']; if ($pk !== null && isset($slotOf[$level][$pk])) { $kidStarts[$pk][] = $slotOf[$childLevel][$ku['key']]['start']; } } $bars = []; $downs = []; foreach ($kidStarts as $pk => $starts) { $ps = $slotOf[$level][$pk]; $lo = min($ps['start'], min($starts)); $hi = max($ps['start'] + $ps['span'] - 1, max($starts)); $bars[] = ['lo' => $lo, 'hi' => $hi, 'pStart' => $ps['start'], 'pSpan' => $ps['span'], 'who' => ($unitName[$pk]['head'] ?? '') . (($unitName[$pk]['spouse'] ?? null) !== null ? ' 夫妇' : '')]; foreach ($starts as $cs) { $downs[] = $cs; } } sort($downs); ?>

「姻亲」= 因为婚姻进到这张图里的人(如我妻子的父母),不是本家的血亲。 折线横跨的那几户,就是它上方那一户的子女;连线从**血亲本人**头上接出。