12 3 4 5 6 7 下一页

查看: 47043|回复: 67

TradeBlazer公式集锦 [复制链接]

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

电梯直达

1^#

发表于 2008-5-24 22:55:37 |只看该作者 |倒序浏览

倡仪：
愿交流自动化交易研究心得者，可将公式贴出来，同时贴出图片，供大家相互学习用！
同意者顶！　

收藏7

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

2^#

发表于 2008-5-24 22:58:36 |只看该作者

MACDK线波段

Params
Numeric FastLength(12);
Numeric SlowLength(26);
Numeric MACDLength(9);
Vars
NumericSeries MACDValue;
Numeric AvgMACD;
Numeric MACDDiff;
NumericSeries aa12;
Numeric aa13;
Begin
MACDValue = XAverage( Close, FastLength ) - XAverage( Close, SlowLength ) ;
AvgMACD = XAverage(MACDValue,MACDLength);
MACDDiff = MACDValue - AvgMACD;
PlotNumeric("MACD",MACDValue);
PlotNumeric("MACDAvg",AvgMACD);
If (MACDDiff >= 0)
  PlotNumeric("MACDDiff",MACDDiff,Red);
Else
  PlotNumeric("MACDDiff",MACDDiff,Green);
PlotNumeric("零线",0);
aa12=MACDValue;
aa13=AvgMACD;
If(aa12-aa13>0)
   {
   PlotNumeric("high",aa12);
   PlotNumeric("Low",aa13);
   PlotNumeric("Close",aa12);
   PlotNumeric("Open",aa13);
}
   Else
   {
   PlotNumeric("high",aa13);
      PlotNumeric("Low",aa12);
      PlotNumeric("Open",aa13);
      PlotNumeric("Close",aa12);
   }

End

附件: 你需要登录才可以下载或查看附件。没有帐号？注册

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

3^#

发表于 2008-5-24 23:02:43 |只看该作者

翻译文华论坛里的《波段王》

Params
   Numeric M1(13);
   Numeric M2(60);
   Numeric M3(34);
   Numeric M4(667);

Vars
   NumericSeries aa1;
   NumericSeries aa2;
   NumericSeries aa3;
   NumericSeries aa4;
   NumericSeries aa5;
   NumericSeries aa6;
   NumericSeries aa7;
   NumericSeries aa8;
   NumericSeries aa9;
   NumericSeries aa10;
   NumericSeries aa11;
   NumericSeries aa12;
   NumericSeries aa13;
   NumericSeries aa14;
   NumericSeries bb;
Begin
bb=M4/1000;
aa1=Highest(High,M1)-Lowest(low,M1);
aa2=Highest(HIGH,M1)-CLOSE;
aa3=CLOSE-Lowest(LOW,M1);
aa4=((aa2/aa1)*100)-70;
aa5=(((CLOSE-Lowest(LOW,M2))/(Highest(HIGH,M2)-Lowest(LOW,M2)))*100);
aa6=(((2*CLOSE)+HIGH)+LOW)/4;
aa7=WAverage(100*aa3/aa1,3);
aa8=Lowest(LOW,M3);
aa9=WAverage(aa7,3)-WAverage(aa4,9);
if(aa9>100)
   {
         aa10=aa9-100;
   }Else
      {
aa10=0;
      }
aa11=Highest(HIGH,M3);
aa12=SAverage((((aa6-aa8)/(aa11-aa8))*100),M1);
aa13=SAverage(((bb*aa12[1])+((1-bb)*aa12)),2);
If(aa12-aa13>0)
   {
   PlotNumeric("high",aa12);
   PlotNumeric("Low",aa13);
   PlotNumeric("Close",aa12);
   PlotNumeric("Open",aa13);
   }
   Else
   {
      PlotNumeric("high",aa13);
      PlotNumeric("Low",aa12);
      PlotNumeric("Open",aa13);
      PlotNumeric("Close",aa12);
   }
aa14=SAverage(aa13,5);
PlotNumeric("aa14",aa14);
End

附件: 你需要登录才可以下载或查看附件。没有帐号？注册

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

4^#

发表于 2008-5-24 23:26:25 |只看该作者

nopain 老师编写的《顾比倒数线》

http://www.tradeblazer.net/forum/thread-1396-2-4.html 需要将high与low两参数的线型设置为线段

Params
      Numeric Length(5);
Vars
      Bool ConTmp;
      NumericSeries CBLHi;
      NumericSeries CBLLo;
Begin
      If(High < Highest(High,Length))
      {
            CBLHi = CBLHi[1];
      }Else
      {
            ConTmp = Low[2] < Low[1] && Low[2] < Low && Low[1] < Low;
            If(ConTmp)
            {
                     CBLHi = Low[2];
            }Else
            {
                     ConTmp = (Low[3] < Low[2] && Low[3] < Low[1] && Low[3] < Low) And
                                    (Low[2] < Low || Low[1] < Low);
                     If(ConTmp)
                     {
                              CBLHi = Low[3];
                     }Else
                     {
                              ConTmp = (Low[4] < Low[3] && Low[4] < Low[2] && Low[4] < Low[1] && Low[4] < Low) And
                                             (Low[3] < Low || Low[2] < Low || Low[1] < Low);
                              If(ConTmp)
                              {
                                    CBLHi = Low[4];
                              }Else
                              {
                                    ConTmp = (Low[5] < Low[4] && Low[5] < Low[3] && Low[5] < Low[2] && Low[5] < Low[1] && Low[5] < Low) And
                                                      (Low[4] < Low || Low[3] < Low || Low[2] < Low || Low[1] < Low);
                                    If(ConTmp)
                                    {
                                             CBLHi = Low[5];
                                    }Else
                                    {
                                             CBLHi = CBLHi[1];
                                    }
                              }
                     }
            }
      }

      If(Low > Lowest(Low,Length))
      {
            CBLLo = CBLLo[1];
      }Else
      {
            ConTmp = High[2] > High[1] && High[2] > High && High[1] > High;
            If(ConTmp)
            {
                     CBLLo = High[2];
            }Else
            {
                     ConTmp = (High[3] > High[2] && High[3] > High[1] && High[3] > High) And
                                    (High[2] > High || High[1] > High);
                     If(ConTmp)
                     {
                              CBLLo = High[3];
                     }Else
                     {
                              ConTmp = (High[4] > High[3] && High[4] > High[2] && High[4] > High[1] && High[4] > High) And
                                             (High[3] > High || High[2] > High || High[1] > High);
                              If(ConTmp)
                              {
                                    CBLLo = High[4];
                              }Else
                              {
                                    ConTmp = (High[5] > High[4] && High[5] > High[3] && High[5] > High[2] && High[5] > High[1] && High[5] > High) And
                                                      (High[4] > High || High[3] > High || High[2] > High || High[1] > High);
                                    If(ConTmp)
                                    {
                                             CBLLo = High[5];
                                    }Else
                                    {
                                             CBLLo = CBLLo[1];
                                    }
                              }
                     }
            }
      }

      If(CBLHi < Close)
      {
            PlotNumeric("CBLHi",CBLHi,Yellow);
            PlotNumeric("CBLLo",InvalidNumeric);

            PlotNumeric("Open",Min(Open,Close));
            PlotNumeric("Close",Max(Open,Close));
      }Else
      {
            PlotNumeric("CBLHi",InvalidNumeric);
            If(CBLLo > Close)
            {
                     PlotNumeric("CBLLo",CBLLo,Magenta);
                     PlotNumeric("Open",Max(Open,Close));
                     PlotNumeric("Close",Min(Open,Close));
            }Else
            {
                     PlotNumeric("CBLLo",InvalidNumeric);
                     PlotNumeric("Open",Close);
                     PlotNumeric("Close",Close);
            }
      }
      PlotNumeric("High",High);
      PlotNumeric("Low",Low);
End

附件: 你需要登录才可以下载或查看附件。没有帐号？注册

使用道具举报

糊涂

高级散户

Rank: 4

精华: 0
UID: 1527
积分: 487
帖子: 159
主题: 3
阅读权限: 50
注册时间: 2008-4-21
最后登录: 2019-3-31

5^#

发表于 2008-5-24 23:43:43 |只看该作者

发一些已经有的没什么用的指标有必要吗？

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

6^#

发表于 2008-5-25 08:18:39 |只看该作者

拜托楼上的发几个有用的供我们学习学习！

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

7^#

发表于 2008-5-25 08:19:25 |只看该作者

原帖由糊涂于 2008-5-24 23:43 发表
发一些已经有的没什么用的指标有必要吗？

拜托楼上的发几个有用的供我们学习学习！

使用道具举报

前线小卒

高级散户

Rank: 4

精华: 0
UID: 30
积分: 309
帖子: 52
主题: 13
阅读权限: 50
注册时间: 2007-7-23
最后登录: 2016-6-10

8^#

发表于 2008-5-25 08:50:42 |只看该作者

多多益善

。不是看人家公式有没有用，关键是看人家怎么编的。

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

9^#

发表于 2008-5-27 18:44:40 |只看该作者

// 简称: CBL2
// 名称: 顾比倒数线文华版
// 类别: 技术指标
// 类型: 其它类
// 输出:
//------------------------------------------------------------------------
Params
      Numeric N(5);
Vars
      Numeric a;
Numeric b;
Numeric P1;
Numeric P2;
Numeric P3;
Numeric P4;
Numeric P5;
Numeric P6;
Numeric P7;
Numeric P8;
Numeric P9;
Numeric P10;
Numeric AA;
Numeric pp1;
Numeric pp2;
Numeric pp3;
Numeric pp4;
Numeric pp5;
Numeric pp6;
Numeric pp7;
Numeric pp8;
Numeric pp9;
Numeric pp10;
Numeric AAA1;
Numeric AAA;
NumericSeries C1;
Numeric T1;
Numeric T2;
Numeric T3;
Numeric T4;
Numeric T5;
Numeric T6;
Numeric T7;
Numeric T8;
Numeric T9;
Numeric T10;
Numeric TT1;
Numeric TT2;
Numeric TT3;
Numeric TT4;
Numeric TT5;
Numeric TT6;
Numeric TT7;
Numeric TT8;
Numeric TT9;
Numeric TT10;
Numeric BB;
Numeric BBB1;
Numeric BBB;
NumericSeries D1;
NumericSeries UD;
NumericSeries KK;
NumericSeries GG;

Begin
   if(High>=Highest(high,N))
      a=Low;
   Else
      a=0;
   if(Low<=Lowest(Low,N))
      b=High;
   Else
      b=888888;
   if(a>low[1])
   p1=low[1];
   Else
   p1=0;
   if(a>low[2]&&A<=low[1])
   p2=low[2];
   Else
   p2=0;
   if(a>low[3]&&A<=low[1]&&A<=low[2])
   p3=low[3];
   Else
   p3=0;
   if(a>low[4]&&A<=low[1]&&A<=low[2]&&A<=low[3])
   p4=low[4];
   Else
   p4=0;
   if(a>low[5]&&A<=low[1]&&A<=low[2]&&A<=low[3]&&A<=low[4])
   p5=low[5];
   Else
   p5=0;
   if(a>low[6]&&A<=low[1]&&A<=low[2]&&A<=low[3]&&A<=low[4]&&A<=low[5])
   p6=low[6];
   Else
   p6=0;
   if(a>low[7]&&A<=low[1]&&A<=low[2]&&A<=low[3]&&A<=low[4]&&A<=low[5]&&A<=low[6])
   p7=low[7];
   Else
   p7=0;
   if(a>low[8]&&A<=low[1]&&A<=low[2]&&A<=low[3]&&A<=low[4]&&A<=low[5]&&A<=low[6]&&A<=low[7])
   p8=low[8];
   Else
   p8=0;
   if(a>low[9]&&A<=low[1]&&A<=low[2]&&A<=low[3]&&A<=low[4]&&A<=low[5]&&A<=low[6]&&A<=low[7]&&A<=low[8])
   p9=low[9];
   Else
   p9=0;
   if(a>low[10]&&A<=low[1]&&A<=low[2]&&A<=low[3]&&A<=low[4]&&A<=low[5]&&A<=low[6]&&A<=low[7]&&A<=low[8]&&A<=low[9])
   p10=low[10];
   Else
   p10=0;
   AA=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10;
if(AA>low[1])
   PP1=low[1];
   Else
   PP1=0;
if(AA>low[2]&&AA<=low[1])
   PP2=low[2];
   Else
   PP2=0;
if(AA>low[3]&&AA<=low[1]&&AA<=low[2])
   PP3=low[3];
   Else
   PP3=0;
if(AA>low[4]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3])
   PP4=low[4];
   Else
   PP4=0;
if(AA>low[5]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3]&&AA<=low[4])
   PP5=low[5];
   Else
   PP5=0;
if(AA>low[6]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3]&&AA<=low[4]&&AA<=low[5])
   PP6=low[6];
   Else
   PP6=0;
if(AA>low[7]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3]&&AA<=low[4]&&AA<=low[5]&&AA<=low[6])
   PP7=low[7];
   Else
   PP7=0;
if(AA>low[8]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3]&&AA<=low[4]&&AA<=low[5]&&AA<=low[6]&&AA<=low[7])
   PP8=low[8];
   Else
   PP8=0;
if(AA>low[9]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3]&&AA<=low[4]&&AA<=low[5]&&AA<=low[6]&&AA<=low[7]&&AA<=low[8])
   PP9=low[9];
   Else
   PP9=0;
if(AA>low[10]&&AA<=low[1]&&AA<=low[2]&&AA<=low[3]&&AA<=low[4]&&AA<=low[5]&&AA<=low[6]&&AA<=low[7]&&AA<=low[8]&&AA<=low[9])
   PP10=low[10];
   Else
   PP10=0;
   AAA1=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10;
if(Time<0.0901)
   AAA=low;
Else
   AAA=AAA1;
if(AAA>0)
   C1=AAA;
Else
   C1=C1[1];
if(B<High[1])
   T1=High[1];
Else
   T1=0;
if(B<High[2]&&B>=High[1])
   T2=High[2];
Else
   T2=0;
if(B<High[3]&&B>=High[1]&&B>=High[2])
   T3=High[3];
Else
   T3=0;
if(B<High[4]&&B>=High[1]&&B>=High[2]&&B>=High[3])
   T4=High[4];
Else
   T4=0;
if(B<High[5]&&B>=High[1]&&B>=High[2]&&B>=High[3]&&B>=High[4])
   T5=High[5];
Else
   T5=0;
if(B<High[6]&&B>=High[1]&&B>=High[2]&&B>=High[3]&&B>=High[4]&&B>=High[5])
   T6=High[6];
Else
   T6=0;
if(B<High[7]&&B>=High[1]&&B>=High[2]&&B>=High[3]&&B>=High[4]&&B>=High[5]&&B>=High[6])
   T7=High[7];
Else
   T7=0;
if(B<High[8]&&B>=High[1]&&B>=High[2]&&B>=High[3]&&B>=High[4]&&B>=High[5]&&B>=High[6]&&B>=High[7])
   T8=High[8];
Else
   T8=0;
if(B<High[9]&&B>=High[1]&&B>=High[2]&&B>=High[3]&&B>=High[4]&&B>=High[5]&&B>=High[6]&&B>=High[7]&&B>=High[8])
   T9=High[9];
Else
   T9=0;
if(B<High[10]&&B>=High[1]&&B>=High[2]&&B>=High[3]&&B>=High[4]&&B>=High[5]&&B>=High[6]&&B>=High[7]&&B>=High[8]&&B>=High[9])
   T10=High[10];
Else
   T10=0;
if(T1+T2+T3+T4+T5+T6+T7+T8+T9+T10==0)
   BB=888888;
Else
   BB=T1+T2+T3+T4+T5+T6+T7+T8+T9+T10;
if(BB<High[1])
   TT1=High[1];
Else
   TT1=0;
if(BB<High[2]&&BB>=High[1])
   TT2=High[2];
Else
   TT2=0;
if(BB<High[3]&&BB>=High[1]&&BB>=High[2])
   TT3=High[3];
Else
   TT3=0;
if(BB<High[4]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3])
   TT4=High[4];
Else
   TT4=0;
if(BB<High[5]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3]&&BB>=High[4])
   TT5=High[5];
Else
   TT5=0;
if(BB<High[6]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3]&&BB>=High[4]&&BB>=High[5])
   TT6=High[6];
Else
   TT6=0;
if(BB<High[7]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3]&&BB>=High[4]&&BB>=High[5]&&BB>=High[6])
   TT7=High[7];
Else
   TT7=0;
if(BB<High[8]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3]&&BB>=High[4]&&BB>=High[5]&&BB>=High[6]&&BB>=High[7])
   TT8=High[8];
Else
   TT8=0;
if(BB<High[9]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3]&&BB>=High[4]&&BB>=High[5]&&BB>=High[6]&&BB>=High[7]&&BB>=High[8])
   TT9=High[9];
Else
   TT9=0;
if(BB<High[10]&&BB>=High[1]&&BB>=High[2]&&BB>=High[3]&&BB>=High[4]&&BB>=High[5]&&BB>=High[6]&&BB>=High[7]&&BB>=High[8]&&BB>=High[9])
   TT10=High[10];
Else
   TT10=0;
BBB1=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10;
if(Time<0.0901)
   BBB=High;
Else
   BBB=BBB1;
if(BBB>0)
   D1=BBB;
Else
   D1=D1[1];
if(CLOSE>D1&&CLOSE[1]<=D1)
   UD=1;
Else
   If(CLOSE<C1&&CLOSE[1]>=C1)
         UD=-3;
   Else
         UD=0;
if(UD<>0)
   Kk=UD;
Else
   Kk=Kk[1];
if(Kk==1)
   GG=C1;
Else
   GG=D1;
PlotNumeric("CBL倒数线",GG);
// PlotNumeric("C1",C1);
// PlotNumeric("D1",D1);

If(KK==1)
      {
            PlotNumeric("Open",Min(Open,Close));
            PlotNumeric("Close",Max(Open,Close));
      }Else
      {


                     PlotNumeric("Open",Max(Open,Close));
                     PlotNumeric("Close",Min(Open,Close));
}
      PlotNumeric("High",High);
      PlotNumeric("Low",Low);

End

//------------------------------------------------------------------------
// 编译版本 GS2004.06.12
// 用户版本 2008/05/27 16:33
// 版权所有 cqzzbszz
// 更改声明 TradeBlazer Software保留对TradeBlazer平台
// 每一版本的TrabeBlazer公式修改和重写的权利
//------------------------------------------------------------------------

附件: 你需要登录才可以下载或查看附件。没有帐号？注册

使用道具举报

cqzzbszz

中级散户

Rank: 3 Rank: 3

精华: 1
UID: 1634
积分: 159
帖子: 28
主题: 2
阅读权限: 40
注册时间: 2008-5-20
最后登录: 2019-3-30

10^#

发表于 2008-5-27 18:47:40 |只看该作者

根据文华论坛里卓夫老师的指标公式编写，比nopain 老师编写的《顾比倒数线》少一些开仓信号。

使用道具举报

12 3 4 5 6 7 下一页

返回列表

		自动登录	找回密码
密码			注册