diff options
Diffstat (limited to 'Windows/spice/examples/tclspice/tcl-testbench2/tcl-testbench2.sh')
-rw-r--r-- | Windows/spice/examples/tclspice/tcl-testbench2/tcl-testbench2.sh | 48 |
1 files changed, 0 insertions, 48 deletions
diff --git a/Windows/spice/examples/tclspice/tcl-testbench2/tcl-testbench2.sh b/Windows/spice/examples/tclspice/tcl-testbench2/tcl-testbench2.sh deleted file mode 100644 index 458e903d..00000000 --- a/Windows/spice/examples/tclspice/tcl-testbench2/tcl-testbench2.sh +++ /dev/null @@ -1,48 +0,0 @@ -#!/bin/sh -# -*- mode: tcl -*- \ - exec wish -f "$0" ${1+"$@"} - -package require BLT -load ../../../src/.libs/libspice.so -namespace import blt::* - -wm title . "Vector Test script" -wm geometry . 800x600+40+40 -pack propagate . false - -stripchart .chart -pack .chart -side top -fill both -expand true -.chart axis configure x -title "Time" - - -# Create a vector (and call it $vector) -#vector create v1 -spice::source example.cir -spice::bg run - -after 1000 - -vector create a0 -vector create b0 -vector create a1 -vector create b1 -vector create stime -proc bltupdate {} { - #puts [spice::spice_data] - spice::spicetoblt a0 a0 - spice::spicetoblt b0 b0 - spice::spicetoblt a1 a1 - spice::spicetoblt b1 b1 - spice::spicetoblt time stime - #puts $spice::lastitercount - after 100 bltupdate -} -bltupdate - - - -.chart element create a0 -color red -xdata stime -ydata a0 -.chart element create b0 -color blue -xdata stime -ydata b0 -.chart element create a1 -color yellow -xdata stime -ydata a1 -.chart element create b1 -color black -xdata stime -ydata b1 - |