Params
Numeric M(7);
Numeric N(0.5);
Vars
Numeric TODAYBARS;
Numeric SUMCLOSE;
Numeric TRENDRATE;
Numeric I;
Begin
TODAYBARS=BarsSinceToday;
For I=1 TO M abs
{
SUMCLOSE=SUMCLOSE+Abs(C[i]-C[i+1]);
}
TRENDRATE=Average((C[1]-C[M])/SUMCLOSE,M);
.......
.......
End
以上是TB的策略,怎么转换成金字塔格式的啊
[此贴子已经被作者于2012-4-18 17:12:04编辑过]
TODAYBARS=BarsSinceToday; // 当天开盘到现在的K线数
For I=1 TO M // for循环从1到M
{
SUMCLOSE=SUMCLOSE+Abs(C[i]-C[i+1]); // 前一个收盘价 和 前两个收盘价之差 总和
}
TRENDRATE=Average((C[1]-C[M])/SUMCLOSE,M); // 前一个收盘价 和 前M根K线的收盘价只差 除以上面总和 在M周期的平均值
用金字塔怎么表达好????????????
[此贴子已经被作者于2012-4-18 21:40:31编辑过]
仅供参考
TODAYBARS:datacount; // 当天开盘到现在的K线数
for i=1 to m do sumclose:sumclose+abs(ref(c,i)-ref(c,i+1)); // for循环从1到M,前一个收盘价 和 前两个收盘价之差 总和
MA( (ref(c,1)-ref(c,m)/sumclose),m ); // 前一个收盘价 和 前M根K线的收盘价只差 除以上面总和 在M周期的平均值
[此贴子已经被作者于2012-4-19 8:54:19编辑过]
Params
Numeric M(7);
Numeric N(0.5);
Vars
Numeric
TODAYBARS;
Numeric SUMCLOSE;
Numeric TRENDRATE;
Numeric
I;
Begin
TODAYBARS=BarsSinceToday;
For I=1 TO M
{
SUMCLOSE=SUMCLOSE+Abs(C[i]-C[i+1]);
}
TRENDRATE=Average((C[1]-C[M])/SUMCLOSE,M);
If(TODAYBARS>M
)
{
If(TRENDRATE>N )
Buy(1,O);
If(TRENDRATE<N )
SellShort(1,O);
}
End
完整的TB策略是这样,麻烦转换成金字塔的格式
[此贴子已经被作者于2012-4-19 9:05:50编辑过]
VARIABLE:M=5;//变量申明
VARIABLE:SUMCLOSE=0;
VARIABLE:TRENDRATE=0;
TODAYBARS:=BARSLAST(DATE<>REF(DATE,1));// 当天开盘到现在的K线数
VARIABLE:I=1;//变量申明
FOR I=1 TO M DO BEGIN
SUMCLOSE=SUMCLOSE+Abs(C[i]-C[i+1]);
END
TRENDRATE=MA((C[1]-C[M])/SUMCLOSE,M);