[4] | 1 | function res = idSetCorCurSync(idName, curToSetCHE, curToSetCVE, curToSetCHS, curToSetCVS, curAbsTol) |
---|
| 2 | |
---|
| 3 | res = 0; |
---|
| 4 | idDevServCor01 = ''; |
---|
| 5 | idDevServCor02 = ''; |
---|
| 6 | idDevServCor03 = ''; |
---|
| 7 | idDevServCor04 = ''; |
---|
| 8 | curCh01 = 0; |
---|
| 9 | curCh02 = 0; |
---|
| 10 | curCh03 = 0; |
---|
| 11 | curCh04 = 0; |
---|
| 12 | |
---|
| 13 | if strcmp(idName, 'HU80_TEMPO') |
---|
| 14 | |
---|
| 15 | %First call after turning on the correctors should be: idSetCorCurSync('HU80_TEMPO', 0., 0.1, 0, 0.1, 0.001) |
---|
| 16 | |
---|
| 17 | idDevServCor01 = 'ans-c08/ei/m-hu80.2_chan1'; |
---|
| 18 | idDevServCor02 = 'ans-c08/ei/m-hu80.2_chan2'; |
---|
| 19 | idDevServCor03 = 'ans-c08/ei/m-hu80.2_chan3'; |
---|
| 20 | idDevServCor04 = 'ans-c08/ei/m-hu80.2_chan4'; |
---|
| 21 | |
---|
| 22 | %curCh01 = 0.5*(curToSetCHE + curToSetCVE); |
---|
| 23 | %curCh02 = 0.5*(curToSetCHE - curToSetCVE); |
---|
| 24 | %curCh03 = 0.5*(curToSetCHS + curToSetCVS); |
---|
| 25 | %curCh04 = 0.5*(curToSetCHS - curToSetCVS); |
---|
| 26 | |
---|
| 27 | curCh01 = 0.5*(-curToSetCVE - curToSetCHE); |
---|
| 28 | curCh02 = 0.5*(-curToSetCVE + curToSetCHE); |
---|
| 29 | curCh03 = 0.5*(-curToSetCVS - curToSetCHS); |
---|
| 30 | curCh04 = 0.5*(-curToSetCVS + curToSetCHS); |
---|
| 31 | |
---|
| 32 | end |
---|
| 33 | |
---|
| 34 | res = idSetCurrentSync(idDevServCor01, curCh01, curAbsTol); |
---|
| 35 | if res ~= 0 |
---|
| 36 | return; |
---|
| 37 | end |
---|
| 38 | res = idSetCurrentSync(idDevServCor02, curCh02, curAbsTol); |
---|
| 39 | if res ~= 0 |
---|
| 40 | return; |
---|
| 41 | end |
---|
| 42 | res = idSetCurrentSync(idDevServCor03, curCh03, curAbsTol); |
---|
| 43 | if res ~= 0 |
---|
| 44 | return; |
---|
| 45 | end |
---|
| 46 | res = idSetCurrentSync(idDevServCor04, curCh04, curAbsTol); |
---|
| 47 | if res ~= 0 |
---|
| 48 | return; |
---|
| 49 | end |
---|
| 50 | |
---|