1.) Modified macro system as to use only Sicsunknown for resolving unknown

Tcl commands. Removed the broken obTcl object system and replaced it by
    the object.tcl system from sntl. Redid the scan command with this. The
    end of this is that SICS is now independent of the tcl version and
    works with tcl 8.0 thus giving a factor of up to 10 in script execution
    speed.
2.) Added driving an angle through a translation table (object lin2ang)

test.tcl

@@ -49,7 +49,7 @@ ServerOption TelnetPort 1301
 ServerOption TelWord    sicslogin
 
 ServerOption DefaultTclDirectory $shome/sics/tcl
-ServerOption DefaultCommandFile  topsicom.tcl
+ServerOption DefaultCommandFile  ""
 
 #------ a port for broadcasting UDP messages
 #ServerOption QuieckPort 2108
@@ -86,8 +86,6 @@ Title "TopsiTupsiTapsi"
 VarMake User  Text User
 User  "Daniel_the_Clementine"
 
-VarMake lastscancommand Text User
-
 VarMake detectordist Float Mugger
 detectordist 2500
 detectordist lock
@@ -180,10 +178,6 @@ source tcl/log.tcl
 
 MakeDrive
 SicsAlias drive dr
-Publish scan Spy
-Publish ScanCounts Spy
-Publish TextStatus Spy
-Publish otUnknown Spy
 Publish LogBook Spy
 MakeRuenBuffer
 #---------------- TestVariables for Storage 
@@ -227,14 +221,10 @@ banana CountMode Timer
 #banana configure Counter counter
 banana init
 ClientPut "HM initialized"
-source $shome/sics/tcl/topsicom.tcl
+source $shome/sics/tcl/scancom.tcl
 source $shome/sics/countf.tcl
 Publish count User
 Publish repeat user
-source $shome/sics/tcl/cscan.tcl
-Publish cscan User
-Publish sscan User
-Publish sftime Spy
 source $shome/sics/tcl/fit.tcl
 Publish fit Spy
 SerialInit
@@ -288,9 +278,6 @@ SicsAlias phi ph
 source tcl/reflist.tcl
 Publish rliste User
 
-source tcl/susca.tcl
-Publish susca User
-MakeMaximize counter
 
 source fcircle.tcl
 fcircleinit
@@ -302,7 +289,6 @@ ClientPut "Installed 4-circle stuff"
 
 source transact.tcl
 Publish transact Spy
-Publish scaninfo Spy
 #MakeSPS suff lnsp26.psi.ch 4000 7
 
 #source beamdt.tcl
@@ -373,3 +359,6 @@ source autofile.tcl
 autofilepath $shome/tmp/auto
 
 MakeXYTable omth
+
+Publish info user
+MakeLin2Ang a5l a5