1 | |
---|
2 | AO = getao; |
---|
3 | |
---|
4 | fam = 'QP'; |
---|
5 | fam = 'CV'; |
---|
6 | |
---|
7 | k= 1; |
---|
8 | |
---|
9 | if strcmpi(fam, 'CV') || strcmpi(fam, 'CH') |
---|
10 | rtag = 'C[H,V]'; |
---|
11 | elseif strcmpi(fam, 'QP') |
---|
12 | rtag = 'Q'; |
---|
13 | elseif strcmpi(fam, 'BEND') |
---|
14 | rtag = 'D'; |
---|
15 | end |
---|
16 | |
---|
17 | for k = 1:length(AO.(fam).DeviceName) |
---|
18 | dev_name = AO.(fam).DeviceName{k}; |
---|
19 | idx = regexpi(dev_name,rtag); |
---|
20 | % idx = regexpi(dev_name,'Q'); |
---|
21 | |
---|
22 | dev_cycle = [dev_name(1:idx-1) 'cycle' dev_name(idx:end)]; |
---|
23 | |
---|
24 | prop_name = {'AttributeProxyRead','AttributeProxyWrite', 'Iterations'}; |
---|
25 | prop = tango_get_properties2(dev_cycle,prop_name); |
---|
26 | prop(1).value = {AO.(fam).Monitor.TangoNames{k}}; |
---|
27 | prop(2).value = prop(1).value; |
---|
28 | prop(3).value = {'1'}; |
---|
29 | tango_put_properties2(dev_cycle,prop); |
---|
30 | end |
---|
31 | |
---|
32 | %create groupname |
---|
33 | id_cor = tango_group_create('correcteurLT1'); |
---|
34 | |
---|
35 | %add devices to group |
---|
36 | tango_group_add(id_cor,'LT1/AEsim/cycleC*'); |
---|
37 | |
---|
38 | %%display group |
---|
39 | tango_group_dump(id_cor); |
---|
40 | |
---|
41 | tango_group_command_inout(id_cor,'Init',1,0); |
---|
42 | |
---|
43 | %% Start cycling magnets |
---|
44 | tango_group_command_inout(id_cor,'Start',1,0); |
---|
45 | |
---|
46 | |
---|
47 | %% chargement d'une rampe |
---|
48 | |
---|