source: MML/trunk/machine/SOLEIL/doc_html/machine/Soleil/Booster/setrframp2.html @ 4

Last change on this file since 4 was 4, checked in by zhangj, 10 years ago

Initial import--MML version from SOLEIL@2013
File size: 6.6 KB
Line 
1<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
2                "http://www.w3.org/TR/REC-html40/loose.dtd">
3<html>
4<head>
5  <title>Description of setrframp2</title>
6  <meta name="keywords" content="setrframp2">
7  <meta name="description" content="SETRFRAMP2 - Loads a new AC ramp the the RF voltage">
8  <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
9  <meta name="generator" content="m2html &copy; 2003 Guillaume Flandin">
10  <meta name="robots" content="index, follow">
11  <link type="text/css" rel="stylesheet" href="../../../m2html.css">
12</head>
13<body>
14<a name="_top"></a>
15<div><a href="../../../index.html">Home</a> &gt;  <a href="#">machine</a> &gt; <a href="#">Soleil</a> &gt; <a href="index.html">Booster</a> &gt; setrframp2.m</div>
16
17<!--<table width="100%"><tr><td align="left"><a href="../../../index.html"><img alt="<" border="0" src="../../../left.png">&nbsp;Master index</a></td>
18<td align="right"><a href="index.html">Index for machine/Soleil/Booster&nbsp;<img alt=">" border="0" src="../../../right.png"></a></td></tr></table>-->
19
20<h1>setrframp2
21</h1>
22
23<h2><a name="_name"></a>PURPOSE <a href="#_top"><img alt="^" border="0" src="../../../up.png"></a></h2>
24<div class="box"><strong>SETRFRAMP2 - Loads a new AC ramp the the RF voltage</strong></div>
25
26<h2><a name="_synopsis"></a>SYNOPSIS <a href="#_top"><img alt="^" border="0" src="../../../up.png"></a></h2>
27<div class="box"><strong>function setrampRF2(varargin) </strong></div>
28
29<h2><a name="_description"></a>DESCRIPTION <a href="#_top"><img alt="^" border="0" src="../../../up.png"></a></h2>
30<div class="fragment"><pre class="comment"> SETRFRAMP2 - Loads a new AC ramp the the RF voltage
31
32  INPUTS
33  1. AC ramp maximum between 0 and 5 in kV
34        0 means 0 kV
35        5 means mean 500 kV at maximum
36
37  NOTES
38  1. do not forget the DC value which is added
39
40
41  See Also <a href="getrframp2.html" class="code" title="function rampe = getrampRF2(varargin)">getrframp2</a></pre></div>
42
43<!-- crossreference -->
44<h2><a name="_cross"></a>CROSS-REFERENCE INFORMATION <a href="#_top"><img alt="^" border="0" src="../../../up.png"></a></h2>
45This function calls:
46<ul style="list-style-image:url(../../../matlabicon.gif)">
47<li><a href="getrframp.html" class="code" title="function rampe = getrampRF(varargin)">getrframp</a>    GETRFRAMP - Reads RF ramp for Booster ring</li></ul>
48This function is called by:
49<ul style="list-style-image:url(../../../matlabicon.gif)">
50</ul>
51<!-- crossreference -->
52
53
54<h2><a name="_source"></a>SOURCE CODE <a href="#_top"><img alt="^" border="0" src="../../../up.png"></a></h2>
55<div class="fragment"><pre>0001 <a name="_sub0" href="#_subfunctions" class="code">function setrampRF2(varargin)</a>
560002 <span class="comment">% SETRFRAMP2 - Loads a new AC ramp the the RF voltage</span>
570003 <span class="comment">%</span>
580004 <span class="comment">%  INPUTS</span>
590005 <span class="comment">%  1. AC ramp maximum between 0 and 5 in kV</span>
600006 <span class="comment">%        0 means 0 kV</span>
610007 <span class="comment">%        5 means mean 500 kV at maximum</span>
620008 <span class="comment">%</span>
630009 <span class="comment">%  NOTES</span>
640010 <span class="comment">%  1. do not forget the DC value which is added</span>
650011 <span class="comment">%</span>
660012 <span class="comment">%</span>
670013 <span class="comment">%  See Also getrframp2</span>
680014
690015 <span class="comment">%</span>
700016 <span class="comment">%  Written by Laurent S. Nadolski</span>
710017
720018 DisplayFlag = 1;
730019 devName = <span class="string">'BOO/RF/RAMPETENSION'</span>; <span class="comment">% Device avec controle 1er point = dernier point + refus ecrire Tension superieur à 8 kV</span>
740020
750021 <span class="keyword">for</span> i = length(varargin):-1:1
760022     <span class="keyword">if</span> strcmpi(varargin{i},<span class="string">'Display'</span>)
770023         DisplayFlag = 1;
780024         varargin(i) = [];
790025     <span class="keyword">elseif</span> strcmpi(varargin{i},<span class="string">'NoDisplay'</span>)
800026         DisplayFlag = O;
810027         varargin(i) = [];
820028     <span class="keyword">elseif</span> strcmpi(varargin{i},<span class="string">'NoArchive'</span>)
830029         ArchiveFlag = O;
840030         varargin(i) = [];
850031     <span class="keyword">elseif</span> strcmpi(varargin{i},<span class="string">'Archive'</span>)
860032         ArchiveFlag = 1;
870033         varargin(i) = [];
880034     <span class="keyword">end</span>
890035 <span class="keyword">end</span>
900036
910037 <span class="keyword">if</span> isempty(varargin)
920038     disp(<span class="string">'Missing factor exiting ...'</span>)
930039     <span class="keyword">return</span>;
940040 <span class="keyword">else</span>
950041     factor = varargin{1};
960042     <span class="keyword">if</span> factor &gt; 10
970043         error(<span class="string">'Too large'</span>)
980044     <span class="keyword">end</span>
990045 <span class="keyword">end</span>
1000046
1010047 rampe = <a href="getrframp.html" class="code" title="function rampe = getrampRF(varargin)">getrframp</a>(<span class="string">'NoDisplay'</span>);
1020048
1030049 figure
1040050
1050051 plot(rampe*100)
1060052
1070053 rampe2 = rampe/2;
1080054 rampe2= rampe/max(rampe)*factor;
1090055
1100056 hold on
1110057 plot(rampe2*100,<span class="string">'r.'</span>)
1120058 hold off
1130059 legend(<span class="string">'Old RF voltage Ramp'</span>,<span class="string">'New RF voltage ramp'</span>)
1140060 grid on
1150061 ylabel(<span class="string">'RF voltage (kV)'</span>);
1160062 title(<span class="string">'RF ramp'</span>)
1170063 addlabel(1,0,sprintf(<span class="string">'%s'</span>, datestr(clock)));
1180064
1190065
1200066 reply = input(<span class="string">'Do you want to apply this ramp? Y/N [N]: '</span>,<span class="string">'s'</span>);
1210067
1220068 <span class="keyword">if</span> isempty(reply)
1230069     reply = <span class="string">'N'</span>;
1240070 <span class="keyword">end</span>
1250071
1260072 <span class="keyword">switch</span> reply
1270073     <span class="keyword">case</span> <span class="string">'Y'</span>   
1280074         <span class="comment">% write the new ramp</span>
1290075         tango_command_inout2(devName, <span class="string">'Stop'</span>);
1300076         tango_write_attribute2(devName,<span class="string">'waveformData'</span>,rampe2)
1310077         tango_command_inout2(devName, <span class="string">'Start'</span>);
1320078     <span class="keyword">otherwise</span>
1330079         disp(<span class="string">'Ramp not applied'</span>)
1340080 <span class="keyword">end</span>
1350081</pre></div>
136<hr><address>Generated on Mon 21-May-2007 15:35:27 by <strong><a href="http://www.artefact.tk/software/matlab/m2html/">m2html</a></strong> &copy; 2003</address>
137</body>
138</html>
Note: See TracBrowser for help on using the repository browser.