张咏 发表于 2020-5-30 11:09:38

[TB源码] KDJ指标及系统交易源码


KDJ源码://------------------------------------------------------------------------
// 简称: KDJ
// 名称: 快速随机指数
// 类别: 技术指标
// 类型: 振荡类
// 输出: 五条指标线
//------------------------------------------------------------------------
Params
    Numeric Length(14);            
    Numeric SlowLength(3);   
    Numeric SmoothLength(3);
Vars
    NumericSeries HighestValue;               
    NumericSeries LowestValue;                  
    NumericSeries KValue;
    Numeric DValue;
Begin
    HighestValue = HighestFC(High, Length);
    LowestValue = LowestFC(Low, Length);
    KValue = SummationFC(Close - LowestValue,SlowLength)/SummationFC(HighestValue-LowestValue,SlowLength)*100;
    DValue = AverageFC(KValue,SmoothLength);
    PlotNumeric("K",KValue);
    PlotNumeric("D",DValue);
    PlotNumeric("J",3*KValue - 2*DValue);
    PlotNumeric("Ref1",20);
    PlotNumeric("Ref2",80);
End
//------------------------------------------------------------------------
// 编译版本    GS2004.06.12
// 版权所有    TradeBlazer Software 2003-2008
// 更改声明    TradeBlazer Software保留对TradeBlazer平
//            台每一版本的TradeBlazer公式修改和重写的权利
//------------------------------------------------------------------------程式交易源码:
//------------------------------------------------------------------------
// 简称: My_kdjSYS
// 名称:
// 类别: 交易指令
// 类型: 其他
// 输出:
//------------------------------------------------------------------------

Params
    Numeric Length(14);            
    Numeric SlowLength(3);   
    Numeric SmoothLength(3);
Vars
    NumericSeries HighestValue;               
    NumericSeries LowestValue;                  
    NumericSeries KValue;
    NumericSeries DValue;
      Bool condition1;
    Bool condition2;
Begin
   
      HighestValue = HighestFC(High, Length);
    LowestValue = LowestFC(Low, Length);
    KValue = SummationFC(Close - LowestValue,SlowLength)/SummationFC(HighestValue-LowestValue,SlowLength)*100;
    DValue = AverageFC(KValue,SmoothLength);
      
      condition1 = CrossOver(Kvalue,dvalue);
      condition2 = CrossUnder(kvalue,dvalue);
      if (condition1)
      {
      Buy(0,Close);
      }
   if (condition2)
   {
   SellShort(0,Close);
   }

End
//------------------------------------------------------------------------
// 编译版本      GS2004.06.12
// 用户版本      2011/03/18 10:06
// 版权所有      yezi08895
// 更改声明      TradeBlazer Software保留对TradeBlazer平台
//                        每一版本的TrabeBlazer公式修改和重写的权利
//------------------------------------------------------------------------


页: [1]
查看完整版本: [TB源码] KDJ指标及系统交易源码