30 lines
738 B
Tcl
30 lines
738 B
Tcl
# MOTOR HOST AND PORT
|
|
foreach {mc host port} {
|
|
MC1 mc1-echidna pmc1-echidna
|
|
MC2 mc2-echidna pmc2-echidna
|
|
MC3 mc3-echidna pmc3-echidna
|
|
MC4 mc4-echidna pmc4-echidna
|
|
} {
|
|
dict set MOTOR_HOSTPORT $mc HOST $host
|
|
dict set MOTOR_HOSTPORT $mc PORT $port
|
|
}
|
|
|
|
# BEAM MONITOR HOST AND PORT
|
|
foreach {bm host port} {
|
|
MONITOR_1 das1-echidna 30000
|
|
MONITOR_2 das1-echidna 30001
|
|
MONITOR_3 das1-echidna 30002
|
|
} {
|
|
dict set MONITOR_HOSTPORT $bm HOST $host
|
|
dict set MONITOR_HOSTPORT $bm PORT $port
|
|
}
|
|
|
|
# HISTOGRAM SERVER HOST AND PORT
|
|
foreach {key host port} {
|
|
HMM das1-echidna.nbi.ansto.gov.au 8080
|
|
HMSTAT das1-echidna.nbi.ansto.gov.au 8081
|
|
} {
|
|
dict set HISTMEM_HOSTPORT $key HOST $host
|
|
dict set HISTMEM_HOSTPORT $key PORT $port
|
|
}
|