[指標例子]MACD 指数平滑异同平均线
<p>//------------------------------------------------------------------------</p><p>// 简称:MACD</p><p>// 名称:指数平滑异同平均线</p><p>// 类别: 交易指令</p><p>// 类型: 用户应用</p><p>//------------------------------------------------------------------------</p><p>Params <span class="Apple-tab-span" style="white-space:pre"> </span></p><p><span class="Apple-tab-span" style="white-space:pre"> </span>//参数定义</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Integer LongPrd(26);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Integer ShortPrd(12);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Integer M(9);</p><p>GlobalVars<span class="Apple-tab-span" style="white-space:pre"> </span></p><p><span class="Apple-tab-span" style="white-space:pre"> </span>//全局变量定义</p><p>Vars<span class="Apple-tab-span" style="white-space:pre"> </span></p><p><span class="Apple-tab-span" style="white-space:pre"> </span>//局部变量定义</p><p>Begin<span class="Apple-tab-span" style="white-space:pre"> </span></p><p><span class="Apple-tab-span" style="white-space:pre"> </span>//策略执行区</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric DIFF = EMA(Close,ShortPrd) - EMA(Close,LongPrd);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric DEA = EMA(DIFF,M);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric ret = 2*(DIFF-DEA);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span></p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotNumeric("DIFF",DIFF);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotNumeric("DEA",DEA);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>if(ret>0)</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>{</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotStickLine("MACD",ret,0,ColorUp());</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>}</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Else</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>{</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotStickLine("MACD",ret,0,ColorDown());</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>}</p><p><span class="Apple-tab-span" style="white-space:pre"> </span></p><p>End</p><div><br></div><div><br></div><div></div><p></p>
页:
[1]