0001 function set_bump_test6_2009
0002
0003
0004
0005
0006 tango_read_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k1.trigStepDelay');
0007 tango_read_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k2.trigStepDelay');
0008 tango_read_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k3.trigStepDelay');
0009 tango_read_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k4.trigStepDelay');
0010
0011 tango_read_attribute2('ANS-C01/EP/AL_K.1', 'voltage' );
0012 tango_read_attribute2('ANS-C01/EP/AL_K.2', 'voltage');
0013 tango_read_attribute2('ANS-C01/EP/AL_K.3', 'voltage');
0014 tango_read_attribute2('ANS-C01/EP/AL_K.4', 'voltage');
0015
0016
0017
0018 delai0 =5621670-40;
0019 voltage0=3000;
0020 r=1.02;
0021 r1=1.0 ;
0022
0023 k=-0;
0024
0025 tango_write_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k1.trigStepDelay',delai0 -1 + k);
0026 tango_write_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k2.trigStepDelay',delai0 +6 + k);
0027 tango_write_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k3.trigStepDelay',delai0 -2 + k);
0028 tango_write_attribute2('ANS-C01/SY/LOCAL.Ainj.1', 'k4.trigStepDelay',delai0 +2 + k);
0029
0030
0031 tango_write_attribute2('ANS-C01/EP/AL_K.1', 'voltage',(5566)*r);
0032 tango_write_attribute2('ANS-C01/EP/AL_K.2', 'voltage',(5644 )*r);
0033 tango_write_attribute2('ANS-C01/EP/AL_K.3', 'voltage',(5543 )*r);
0034 tango_write_attribute2('ANS-C01/EP/AL_K.4', 'voltage',(5619)*r);
0035
0036
0037
0038 return
0039
0040
0041