Moved to instrument/config dir to provide a common config file.

r1588 | ffr | 2007-03-05 16:42:42 +1100 (Mon, 05 Mar 2007) | 2 lines

site_ansto/instrument/hipd/config/hipadaba/common_hipadaba_configuration.tcl

@@ -1,63 +0,0 @@
-# Defines hashes which map SICS device object names to hipadaba paths
-InstallHdb
-hmake /graphics spy none
-hsetprop /graphics type graphset
-hmake /commands spy none
-hsetprop /commands type commandset
-
-#TODO change this to hparts.tcl
-source $cfPath(hipadaba)/hpaths.tcl 
-set instrument [string tolower [SplitReply [Instrument]] ]
-hmake /$instrument spy none
-hsetprop /$instrument type instrument
-
-# Generate hipadaba nodes for the paths in the hpaths file
-foreach hp $hpaths {
-  hmake /$instrument/$hp spy none;
-  hsetprop /$instrument/$hp type part;
-}
-
-#--- admin
-hattach /$instrument title title
-hattach /$instrument/experiment sample description
-hmake /$instrument/user spy none
-hsetprop /$instrument/user type part
-hattach /$instrument/user user name
-hattach /$instrument/user email email
-hattach /$instrument/user phone phone
-
-#--- Motors
-foreach {obj name part} $motor_hpath {
-  hattach /$instrument/$part $obj $name
-  #TODO Only ignore node deletion errors for simulated motors
-  if [ catch {hdel /$instrument/$part/$name/axis} ] {}
-  if [ catch {hdel /$instrument/$part/$name/units} ] {}
-}
-
-#--- Configurable Virtual Motors
-foreach {obj name part master_obj} $cvirtmotor_hpath {
-  set path /$instrument/$part
-#  hattach /$instrument/$part $obj $name
-  hattach $path $obj $name
-  hchain $path/$name $path/$master_obj
-}
-
-#------------- scan command
-hsetprop /commands type part
-hcommand /commands/scan hdb_hmscan
-hsetprop /commands/scan type command
-hsetprop /commands/scan priv user
-hmake /commands/scan/scan_variable user text
-hsetprop /commands/scan/scan_variable argtype drivable
-hmake /commands/scan/scan_start user float
-hsetprop /commands/scan/scan_start argtype float
-hmake /commands/scan/scan_increment user float
-hsetprop /commands/scan/scan_increment argtype float
-hmake /commands/scan/NP user int
-hsetprop /commands/scan/NP argtype int
-hmake /commands/scan/mode user text
-hsetprop /commands/scan/mode argtype text
-hsetprop /commands/scan/mode values monitor,timer
-hmake /commands/scan/preset user float
-hsetprop /commands/scan/preset argtype float
- 

site_ansto/instrument/hipd/config/scan/scan.hdd

@@ -1,8 +0,0 @@
-##SICS ASCII at HIPD
-*************************** HIPD SCAN File ********************************
-Original Filename = !!FILE!!
-Title = !!VAR(Title)!!
-User  = !!VAR(User)!!
-Sample Name = !!VAR(sample)!!
-File Creation Date = !!DATE!!
-**************************** DATA ******************************************

site_ansto/instrument/hrpd/config/hipadaba/common_hipadaba_configuration.tcl

@@ -1,63 +0,0 @@
-# Defines hashes which map SICS device object names to hipadaba paths
-InstallHdb
-hmake /graphics spy none
-hsetprop /graphics type graphset
-hmake /commands spy none
-hsetprop /commands type commandset
-
-#TODO change this to hparts.tcl
-source $cfPath(hipadaba)/hpaths.tcl 
-set instrument [string tolower [SplitReply [Instrument]] ]
-hmake /$instrument spy none
-hsetprop /$instrument type instrument
-
-# Generate hipadaba nodes for the paths in the hpaths file
-foreach hp $hpaths {
-  hmake /$instrument/$hp spy none;
-  hsetprop /$instrument/$hp type part;
-}
-
-#--- admin
-hattach /$instrument title title
-hattach /$instrument/experiment sample description
-hmake /$instrument/user spy none
-hsetprop /$instrument/user type part
-hattach /$instrument/user user name
-hattach /$instrument/user email email
-hattach /$instrument/user phone phone
-
-#--- Motors
-foreach {obj name part} $motor_hpath {
-  hattach /$instrument/$part $obj $name
-  #TODO Only ignore node deletion errors for simulated motors
-  if [ catch {hdel /$instrument/$part/$name/axis} ] {}
-  if [ catch {hdel /$instrument/$part/$name/units} ] {}
-}
-
-#--- Configurable Virtual Motors
-foreach {obj name part master_obj} $cvirtmotor_hpath {
-  set path /$instrument/$part
-#  hattach /$instrument/$part $obj $name
-  hattach $path $obj $name
-  hchain $path/$name $path/$master_obj
-}
-
-#------------- scan command
-hsetprop /commands type part
-hcommand /commands/scan hdb_hmscan
-hsetprop /commands/scan type command
-hsetprop /commands/scan priv user
-hmake /commands/scan/scan_variable user text
-hsetprop /commands/scan/scan_variable argtype drivable
-hmake /commands/scan/scan_start user float
-hsetprop /commands/scan/scan_start argtype float
-hmake /commands/scan/scan_increment user float
-hsetprop /commands/scan/scan_increment argtype float
-hmake /commands/scan/NP user int
-hsetprop /commands/scan/NP argtype int
-hmake /commands/scan/mode user text
-hsetprop /commands/scan/mode argtype text
-hsetprop /commands/scan/mode values monitor,timer
-hmake /commands/scan/preset user float
-hsetprop /commands/scan/preset argtype float
- 

site_ansto/instrument/hrpd/config/scan/scan.hdd

@@ -1,8 +0,0 @@
-##SICS ASCII at HRPD
-*************************** HRPD SCAN File ********************************
-Original Filename = !!FILE!!
-Title = !!VAR(Title)!!
-User  = !!VAR(User)!!
-Sample Name = !!VAR(sample)!!
-File Creation Date = !!DATE!!
-**************************** DATA ******************************************