- Implemented tcl: prefix which allows to execute a command in Tcl directly

- Fixed a stack overrun bug in macro.c
- Fixed a killing bug in devser.c
- Added node writing with offset to nxscript.c
- Wrote a simulation driver for second generation HM's
- Readded devexec commands to  SICS
- Readded Hipadaba initialisation to SICS
- Fixed a bug in sinqhttprot.c which is triggered when a reconnect happens
  during a node based download of data.


SKIPPED:
	psi/sinqhttpprot.c

test/sicsstat.tcl

@@ -209,6 +209,7 @@ tasub r2   0.00   0.00   0.00   0.00   0.00   0.00   0.00   0.00   0.00
 tasub update
 #----- MultiMotor sa
 sa recovernampos noeff  a3 24 a4 48
+ref anglesheader stt,om,chi,phi
 ref clear
 singlex cell  0 0 0 0 0 0
 singlex oldub  0 0 0 0 0 0 0 0 0
@@ -233,9 +234,12 @@ hkl scantolerance 2.500000
 ubcalc difftheta  0.300000
 ubcalc maxindex  5
 ubcalc maxlist  10
+fmesstable clear
+messref anglesheader stt,om,chi,phi
 messref clear
 fmess weak 0
 fmess weakthreshold 20
+fmess fast 0
 fmess hkllim  -10 -10 10 10 10 10
 fmess sttlim  5 180
 fmess table clear
@@ -244,16 +248,5 @@ cone qscale 1
 cone center unknown
 simidx sttlim 0.2
 simidx anglim 0.5
-alge targetposition -170
-alge sign 1
-alge softzero 0
-alge softlowerlim -360
-alge softupperlim 0
-alge fixed -1
-alge interruptmode 0
-alge precision 0.01
-alge accesscode 2
-alge failafter 3
-alge maxretry 3
-alge ignorefault 0
-alge movecount 10
+simi preset 3
+simi mode monitor

test/testini.tcl

@@ -632,6 +632,14 @@ if {$hmhttp == 1} {
     apple init
 }
 
+set simhm 1
+#if {$simhm == 1} {
+  source ../tcl/simhm.tcl
+  simhm::MakeSimHM simi 2
+#  simhm::makeSecond simi singledet 30
+  simi dim 64 64
+  simi init
+#}
 
 set phytron 0
 if {$phytron == 1} {
@@ -673,8 +681,9 @@ mf lowerlimit -10
 mf tolerance .1
 }
 
-set dc-804 1
-
-source ../tcl/pimotor.tcl
-makesctcontroller dc804sct std localhost:8080 "\r" 10 "\x03" "\x03"
-pimotor::makepimotor dc1 1 dc804sct -10000 10000
+set dc-804 0
+if {${dc-804} == 1} {
+    source ../tcl/pimotor.tcl
+    makesctcontroller dc804sct std localhost:8080 "\r" 10 "\x03" "\x03"
+    pimotor::makepimotor dc1 1 dc804sct -10000 10000
+}