formatting, updated create_graph.tcl
This commit is contained in:
parent
75526cacbe
commit
db1049d469
|
|
@ -42,6 +42,8 @@ proc create_graph {title rawfile node {analysis tran} {color {4 5 6 7 8 9 10 11
|
||||||
xschem setprop rect 2 0 node $node
|
xschem setprop rect 2 0 node $node
|
||||||
# set node colors
|
# set node colors
|
||||||
xschem setprop rect 2 0 color $color
|
xschem setprop rect 2 0 color $color
|
||||||
|
# set thinner graph line widths
|
||||||
|
xschem setprop rect 2 0 linewidth_mult 0.5
|
||||||
# make xschem display full the graph rectangle
|
# make xschem display full the graph rectangle
|
||||||
xschem zoom_full
|
xschem zoom_full
|
||||||
# full zoom graph data on x axis
|
# full zoom graph data on x axis
|
||||||
|
|
|
||||||
|
|
@ -555,6 +555,7 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
|
||||||
Tcl_SetResult(interp, my_itoa(count_items(argv[2], argv[3], argv[4])), TCL_VOLATILE);
|
Tcl_SetResult(interp, my_itoa(count_items(argv[2], argv[3], argv[4])), TCL_VOLATILE);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
/* create_plot_cmd
|
/* create_plot_cmd
|
||||||
* Create an xplot file in netlist/simulation directory with
|
* Create an xplot file in netlist/simulation directory with
|
||||||
* the list of highlighted nodes in a format the selected waveform
|
* the list of highlighted nodes in a format the selected waveform
|
||||||
|
|
@ -566,7 +567,6 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
|
||||||
Tcl_ResetResult(interp);
|
Tcl_ResetResult(interp);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
/* create_text draw x y rot flip text props size
|
/* create_text draw x y rot flip text props size
|
||||||
* Create a text object
|
* Create a text object
|
||||||
* draw is a flag. If set to 1 will draw the created text
|
* draw is a flag. If set to 1 will draw the created text
|
||||||
|
|
@ -585,9 +585,6 @@ int xschem(ClientData clientdata, Tcl_Interp *interp, int argc, const char * arg
|
||||||
Tcl_ResetResult(interp);
|
Tcl_ResetResult(interp);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
/* cut
|
/* cut
|
||||||
* Cut selection to clipboard */
|
* Cut selection to clipboard */
|
||||||
else if(!strcmp(argv[1], "cut"))
|
else if(!strcmp(argv[1], "cut"))
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue