帮我修改上述代码，使没有左右子树时不画树枝

当然可以。为了在没有左右子树的情况下不画树枝，你需要在`main`函数中添加条件判断。以下是修改后的代码片段，增加了对`lc.Id >= BTL`和`rc.Id >= BTL`的检查：

for (i = 1; i <= BTL; i++) {
    p = GetBTRowId(i);
    GetXY(p, &x, &y);

    // 绘制节点前判断节点是否存在
    if (i - 1 < BTL) {
        setfillcolor(BLACK);
        fillcircle(300 + x, 100 + y, 15);
        outtextxy(300 + x - 4, 100 + y - 8, Data[i - 1]);
    }

    GetLCRC(&p, &lc, &rc);
    
    // 只有当左右子节点存在时才绘制树枝
    if (lc.Id < BTL && rc.Id < BTL) {
        GetXY(lc, &x1, &y1);
        line(300 + x, 100 + y, 300 + x1, 100 + y1);
        GetXY(rc, &x1, &y1);
        line(300 + x, 100 + y, 300 + x1, 100 + y1);
    } else {
        // 如果只有一个子节点或没有子节点，则不绘制额外的线
    }
}

在这个版本中，只有当`lc`和`rc`都有有效子节点（`lc.Id`和`rc.Id`都小于`BTL`）时，才会继续绘制相应的线条。如果其中一个子节点不存在，那么对应的`line`函数就不会执行，因此不会画出多余的树枝。