您現在的位置:程序化交易>> 期貨公式>> 交易開拓者(TB)>> 開拓者公式>>正文內容

開拓者TB實現DMI指標[開拓者公式]

1、新建一個用戶函數,取名為DirMovement,設置返回值為布爾型!
代碼如下:

Params
? ? ? ? Numeric Length(14);
? ? ? ? NumericRef oDMIPlus;
? ? ? ? NumericRef oDMIMinus;
? ? ? ? NumericRef oDMI;
? ? ? ? NumericRef oADX;
? ? ? ? NumericRef oADXR;
? ? ? ? NumericRef oVolty;
Vars
? ? ? ? NumericSeries sDMI;
? ? ? ? NumericSeries sADX;
? ? ? ? NumericSeries sVolty;
? ? ? ? Numeric PlusDM;
? ? ? ? Numeric MinusDM;
? ? ? ? Numeric UpperMove;
? ? ? ? Numeric LowerMove;
? ? ? ? Numeric SumPlusDM(0);
? ? ? ? Numeric SumMinusDM(0);
? ? ? ? Numeric SumTR(0);
? ? ? ? NumericSeries AvgPlusDM;
? ? ? ? NumericSeries AvgMinusDM;
? ? ? ? Numeric SF; ? ? ? ? ? ? ? ? ? ? ? ?// smoothing factor
? ? ? ? Numeric Divisor;
? ? ? ? Numeric i;
? ? ? ? NumericSeries TRValue;
Begin
? ? ? ? SF = 1/length;
? ? ? ? TRValue = TrueRange;
? ? ? ? If(CurrentBar == Length)
? ? ? ? {
? ? ? ? ? ? ? ? for i = 0 To Length - 1
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? PlusDM = 0 ;
? ? ? ? ? ? ? ? ? ? ? ? MinusDM = 0 ;
? ? ? ? ? ? ? ? ? ? ? ? UpperMove = High[i] - High[ i + 1 ] ;
? ? ? ? ? ? ? ? ? ? ? ? LowerMove = Low[ i + 1 ] - Low[i] ;
? ? ? ? ? ? ? ? ? ? ? ? if (UpperMove > LowerMove and UpperMove > 0 )
? ? ? ? ? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? PlusDM = UpperMove;
? ? ? ? ? ? ? ? ? ? ? ? }else if (LowerMove > UpperMove and LowerMove > 0)
? ? ? ? ? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? MinusDM = LowerMove ;
? ? ? ? ? ? ? ? ? ? ? ? }
? ? ? ? ? ? ? ? ? ? ? ? SumPlusDM = SumPlusDM + PlusDM ;
? ? ? ? ? ? ? ? ? ? ? ? SumMinusDM = SumMinusDM + MinusDM ;
? ? ? ? ? ? ? ? ? ? ? ? SumTR = SumTR + TRValue[i] ;
? ? ? ? ? ? ? ? }
? ? ? ? ? ? ? ? AvgPlusDM = SumPlusDM / Length ;
? ? ? ? ? ? ? ? AvgMinusDM = SumMinusDM / Length ;
? ? ? ? ? ? ? ? sVolty = SumTR / Length ;
? ? ? ? }Else if(CurrentBar > Length)
? ? ? ? {
? ? ? ? ? ? ? ? PlusDM = 0 ;
? ? ? ? ? ? ? ? MinusDM = 0 ;
? ? ? ? ? ? ? ? UpperMove = High - High[1] ;
? ? ? ? ? ? ? ? LowerMove = Low[1] - Low ;
? ? ? ? ? ? ? ? if (UpperMove > LowerMove and UpperMove > 0 )
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? PlusDM = UpperMove;
? ? ? ? ? ? ? ? }else if (LowerMove > UpperMove and LowerMove > 0 )
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? MinusDM = LowerMove ;
? ? ? ? ? ? ? ? }
? ? ? ? ? ? ? ? AvgPlusDM = AvgPlusDM[1] + SF * ( PlusDM - AvgPlusDM[1] ) ;
? ? ? ? ? ? ? ? AvgMinusDM = AvgMinusDM[1] + SF * ( MinusDM - AvgMinusDM[1] ) ;
? ? ? ? ? ? ? ? sVolty = sVolty[1] + SF * ( TRValue ?- sVolty[1] ) ;
? ? ? ? }Else
? ? ? ? {
? ? ? ? ? ? ? ? oDMIPlus = InvalidNumeric;
? ? ? ? ? ? ? ? oDMIMinus = InvalidNumeric;
? ? ? ? ? ? ? ? oDMI = InvalidNumeric;
? ? ? ? ? ? ? ? oADX = InvalidNumeric;
? ? ? ? ? ? ? ? oADXR = InvalidNumeric;
? ? ? ? ? ? ? ? oVolty = InvalidNumeric;
? ? ? ? ? ? ? ? Return True;
? ? ? ? }
? ? ? ??
? ? ? ? if (sVolty > 0)
? ? ? ? {
? ? ? ? ? ? ? ? oDMIPlus = 100 * AvgPlusDM / sVolty ;
? ? ? ? ? ? ? ? oDMIMinus = 100 * AvgMinusDM / sVolty ;
? ? ? ? }else
? ? ? ? {
? ? ? ? ? ? ? ? oDMIPlus = 0 ;
? ? ? ? ? ? ? ? oDMIMinus = 0 ;
? ? ? ? }
?
? ? ? ? Divisor = oDMIPlus + oDMIMinus ;
? ? ? ? if (Divisor > 0)
? ? ? ? {
? ? ? ? ? ? ? ? sDMI = 100 * Abs( oDMIPlus - oDMIMinus ) / Divisor;
? ? ? ? }else
? ? ? ? {
? ? ? ? ? ? ? ? sDMI = 0 ;
? ? ? ? }
?
? ? ? ? if(CurrentBar > 0)
? ? ? ? {
? ? ? ? ? ? ? ? if (CurrentBar <= Length)
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? sADX = Cum( sDMI ) / CurrentBar ;
? ? ? ? ? ? ? ? ? ? ? ? oADXR = ( sADX + sADX[ CurrentBar - 1 ] ) * 0.5 ;
? ? ? ? ? ? ? ? }else ?
? ? ? ? ? ? ? ? {
? ? ? ? ? ? ? ? ? ? ? ? sADX = sADX[1] + SF * ( sDMI - sADX[1] ) ;
? ? ? ? ? ? ? ? ? ? ? ? oADXR = ( sADX + sADX[ Length - 1 ] ) * 0.5 ;
? ? ? ? ? ? ? ? }
? ? ? ? }
? ? ? ? oVolty = sVolty;
? ? ? ? oDMI = sDMI;
? ? ? ? oADX = sADX;
? ? ? ? Return True;
End
?
?
?
?
2、新建技術指標,取名DMI,代碼如下:
?
Params
? ? ? ? Numeric Length(14);
Vars
? ? ? ? Numeric oDMIPlus( 0 );
? ? ? ? Numeric oDMIMinus( 0 );
? ? ? ? Numeric oDMI( 0 );?
? ? ? ? Numeric oADX( 0 );
? ? ? ? Numeric oADXR( 0 );?
? ? ? ? Numeric oVolty( 0 );
Begin
? ? ? ? DirMovement(Length, oDMIPlus, oDMIMinus, oDMI, oADX, oADXR, oVolty ) ;
? ? ? ? PlotNumeric( "DMI+" ,oDMIPlus);
? ? ? ? PlotNumeric( "DMI-" ,oDMIMinus);
? ? ? ? PlotNumeric( "ADX" ,oADX);
End
?

?

 

有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友

可聯系技術人員 QQ: 1145508240  點擊這里給我發消息進行 有償 編寫!不貴!點擊查看價格!

 


【字體: 】【打印文章】【查看評論

相關文章

    沒有相關內容
  主站蜘蛛池模板: 忍住北条麻妃10分钟让你中出| m.jizz4.com| 男人j放进女人p全黄午夜视频| 国产福利在线看| yy6080影院| 波多野结衣按摩| 国产精品日韩欧美一区二区| 中文字幕亚洲乱码熟女一区二区| 欧美午夜精品久久久久免费视| 公侵犯玩弄漂亮人妻优| 91精品国产91久久久久久最新| 最近电影在线中文字幕| 免费久久一级欧美特大黄| 韩国一大片a毛片女同| 国产色婷婷精品综合在线| 下载一个黄色录像| 欧美视频免费在线播放| 啊啊啊好深视频| 99国产成+人+综合+亚洲欧美| 无码超乳爆乳中文字幕久久| 亚洲人成网站在线观看青青| 真实国产乱子伦沙发睡午觉| 国产乱子伦农村xxxx| 金8国欧美系列在线| 日日碰狠狠添天天爽不卡| 亚洲国产最大av| 被cao的合不拢腿的皇后| 女性高爱潮视频| 亚洲va在线va天堂成人| 狠色狠色狠狠色综合久久| 国产欧美精品区一区二区三区| av在线亚洲男人的天堂| 报告夫人漫画画免费读漫画在线观看漫画ag | 黑人video| 成人动漫在线免费观看| 久草视频在线免费| 精品国产综合区久久久久久| 国产成人亚综合91精品首页| 2022天天操| 成全影视免费观看大全二| 久久精品国产精品亚洲毛片|