- Fixed a bug which caused the SICServer to die when a socket was broken.

- Fixed many things in DIFRAC subsystem:
  * Recoded tcentr.f etc so that the course centering will work and will not
    go into an endless loop.
  * fixed boundary overwrites which occurred when yesno or alfnum where
    uset to get a single character and several were given.
  * Addeded documentation for DIFRAC
- Added tcl-files which  support the WWW status system

test.tcl

@@ -204,8 +204,8 @@ VarMake email  Text User
 VarMake sample_mur Float User
 
 MakeDataNumber SicsDataNumber "$shome/sics/danu.dat"
-InitSANS  $shome/sics/sansdict.dic
-#InitDMC
+#InitSANS  $shome/sics/sansdict.dic
+InitDMC
 
 MakeScanCommand  xxxscan counter topsi.hdd recover.bin
 MakePeakCenter xxxscan
@@ -228,7 +228,8 @@ banana CountMode Timer
 banana init
 ClientPut "HM initialized"
 source $shome/sics/tcl/scancom.tcl
-source $shome/sics/countf.tcl
+#source $shome/sics/countf.tcl
+source $shome/sics/tcl/count.tcl
 Publish count User
 Publish repeat user
 source $shome/sics/tcl/fit.tcl
@@ -340,14 +341,14 @@ MakeFocusAverager average hm
 FocusInstall hm focus.dic $shome/sics/focusmerge.dat 
 
 #MakeChopper choco docho lnsp20 4000 8
-MakeChopper choco sim
+#MakeChopper choco sim
 #ChopperAdapter fermispeed choco chopper1.nspee 0 20000
 #ChopperAdapter diskspeed  choco chopper2.nspee 0 20000
 #ChopperAdapter phase      choco chopper2.nphas 0 90.
 #ChopperAdapter ratio      choco chopper2.ratio 0 6.
-ChopperAdapter diskspeed  choco speed 0 20000
-ChopperAdapter phase      choco phase  0 90.
-ChopperAdapter ratio      choco ratio 0 6.
+#ChopperAdapter diskspeed  choco speed 0 20000
+#ChopperAdapter phase      choco phase  0 90.
+#ChopperAdapter ratio      choco ratio 0 6.
  
 source chosta.tcl
 Publish chosta Spy