PSI sics-cvs-psi-complete-tree-post-site-support

ttest.tcl

@@ -7,8 +7,7 @@
 #                        O P T I O N S
 
 # --------------- Initialize Tcl internals --------------------------------
-set auto_path "/data/koenneck/src/sics/tcl"
-source $auto_path/topsicom.tcl
+set root /home/koenneck/psi/sics
 
 # first all the server options are set
 
@@ -25,7 +24,7 @@ ServerOption ReadUserPasswdTimeout  500000
 # time to wiat for a user/passwd to be sent from a client. Increase this
 # if there is a problem connecting to a server due to network overload\
 
-ServerOption ServerLogBaseName  /data/koenneck/src/sics/server
+ServerOption ServerLogBaseName  $root/server
 # the path and base name of the internal server logfile to which all
 # activity will be logged.
 
@@ -37,7 +36,7 @@ ServerOption InterruptPort 2913
 # The UDP port where the server will wait for Interrupts from clients.
 # Obviously, clients wishing to interrupt need to know this number.
 
-ServerOption DefaultTclDirectory /data/koenneck/src/sics/tcl
+ServerOption DefaultTclDirectory $root/tcl
 ServerOption DefaultCommandFile  topsicom.tcl
 
 #---------------------------------------------------------------------------
@@ -77,16 +76,12 @@ User  "Daniel_the_Clementine"
 #MakeCounter counter EL737 lnsp22.psi.ch 4000 4
 
 
-MakeDrive
-Publish scan User
-Publish otUnknown User
-MakeRuenBuffer
-
 #MakeRS232Controller marcel psxtemp 3004
 
 MakeRS232Controller pfiff  psts227 3009
 pfiff sendterminator 0x0
-pfiff replyterminator 0x10
+pfiff replyterminator 0x72 0x77
+
 
 Publish pfiffread Spy
 source pfiff.tcl