[指標例子] DMI 趋向指标 myDMI 例子
<p>//------------------------------------------------------------------------</p><p>// 简称: DMI</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 N(14);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Integer M(6);</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 TR = Summation(MAX(MAX(HIGH-LOW,ABS(HIGH-CLOSE)),ABS(LOW-CLOSE)),N);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric HD = HIGH-HIGH;</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric LD = LOW-LOW;</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric DMP = Summation(IIF(HD>0 AND HD>LD,HD,0),N);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric DMM = Summation(IIF(LD>0 AND LD>HD,LD,0),N);</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 PDI = DMP*100/TR;</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotNumeric("PDI", PDI);</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 MDI = DMM*100/TR;</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotNumeric("MDI", MDI);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>Numeric ADX = AverageFC(ABS(MDI-PDI)/(MDI+PDI)*100,M);</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("ADX", ADX);</p><p><span class="Apple-tab-span" style="white-space:pre"> </span>PlotNumeric("ADXR",(ADX+REF(ADX,M))/2);</p><p>End</p><div><br></div><div><br></div><div></div><div><br></div><div><br></div><div><br></div><div>myDMI 例子, 加 顯示數值:<br><br>.......<br><div> PlotNumeric("ADX", ADX);</div><div><span class="Apple-tab-span" style="white-space:pre"> </span><font color="#006400"><b>//</b></font> PlotNumeric("ADXR",(ADX+REF(ADX,M))/2); "//" 代表 REMARK 不執行</div><div><span class="Apple-tab-span" style="white-space:pre"> </span><font color="#ff00ff"><b>PlotNumeric("Line", 24 );</b></font></div><div><font color="#ff00ff"><b><span class="Apple-tab-span" style="white-space:pre"> </span>PlotNumeric("0", 0 );</b></font></div><div><span class="Apple-tab-span" style="white-space:pre"><font color="#ff00ff"><b> </b></font></span></div><div><font color="#ff00ff"><b><span class="Apple-tab-span" style="white-space:pre"> </span>PlotText( ADX , "ADX:"+ text(round(ADX,0)));</b></font></div><div><font color="#ff00ff"><b><span class="Apple-tab-span" style="white-space:pre"> </span>PlotText( PDI , "+DI:"+ text(round(PDI,0)));</b></font></div><div><font color="#ff00ff"><b><span class="Apple-tab-span" style="white-space:pre"> </span>PlotText( MDI , "-DI:"+ text(round(MDI,0)));</b></font></div><div><font color="#ff00ff"><b> UnPlotText(1); // 取消前一支燭的文字</b></font><br><br>End</div><br></div><p></p>
页:
[1]