- Most instrument test files have been tested

- sinqcom undwerwent extension to cover more devices and is now more or
  less finished

insttest/narzisstest

@@ -2,7 +2,7 @@
 #-------------------------------------------------------------------------
 # This is the regression test for SICS on the NARZISS instrument
 #
-# Mark Koennecke, November 2006
+# Mark Koennecke, November 2006, March 2007
 #------------------------------------------------------------------------
 source sicstcldebug.tcl
 source insttestutil.tcl
@@ -20,20 +20,16 @@ config rights lnsmanager lnsSICSlns
 
 #--------- remember soz position
 set sompos [SICSValue som]
+standardPrelude $instrument
 
-set notList [list dil nv]
+set notList [list nv dil]
 
-lappend commandList "counter setthreshold 1 0"
 lappend commandList "cscan som 0 .1 2 2"
 lappend commandList "sscan som 0. .1 3 2"
 lappend commandList "wwwsics"
 
-exe upload
-exe append counter setthreshold 1 0 
-exe append co timer 120
-exe forcesave insttestbatch.tcl
 
-lappend interruptList "drive som 90"
+lappend interruptList "drive som 15"
 lappend interruptList "co timer 120"
 lappend interruptList "exe insttestbatch.tcl"
 
@@ -53,9 +49,12 @@ set counters [runStandardTests par]
 #--------- put om 
 drive som $sompos
 
+standardRestore 
+
 #------------ print a summary
 set inst [string toupper $instrument]
 puts stdout "Test Summary for $inst"
 printStandardSummary $counters
 
 
+exit