script to start GTKWave

8 years ago · f46135cc03
1 changed files with 10 additions and 0 deletions
--- a/examples/xspice/state/nggtk.tcl
+++ b/examples/xspice/state/nggtk.tcl
@ -0,0 +1,10 @@
+# tcl script for gtkwave: show vcd file data created by ngspice
+set nfacs [ gtkwave::getNumFacs ]
+
+for {set i 0} {$i < $nfacs } {incr i} {
+    set facname [ gtkwave::getFacName $i ]
+    set num_added [ gtkwave::addSignalsFromList $facname ]
+}
+
+gtkwave::/Edit/UnHighlight_All
+gtkwave::/Time/Zoom/Zoom_Full