add `xschem get bbox` command to get whole schematic bbox

This commit is contained in:
stefan schippers 2024-03-12 00:09:30 +01:00
parent 19bbbe449a
commit 560a9c5f57
1 changed files with 7 additions and 0 deletions

View File

@ -1136,6 +1136,13 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
if(!strcmp(argv[2], "backlayer")) { /* number of background layer */
Tcl_SetResult(interp, my_itoa(BACKLAYER), TCL_VOLATILE);
}
else if(!strcmp(argv[2], "bbox")) { /* bounding box schematic */
xRect boundbox;
char res[2048];
calc_drawing_bbox(&boundbox, 0);
my_snprintf(res, S(res), "%g %g %g %g", boundbox.x1, boundbox.y1, boundbox.x2, boundbox.y2);
Tcl_SetResult(interp, res, TCL_VOLATILE);
}
else if(!strcmp(argv[2], "bbox_hilighted")) { /* bounding box of highlinhted objects */
xRect boundbox;
char res[2048];