开拓者期货期权程序化系统交易论坛

标题: 请管理员把文华改写成TB的自动交易公式 [打印本页]

作者: 期胜 时间: 2011-9-22 10:36:05 标题: 请管理员把文华改写成TB的自动交易公式

本帖最后由期胜于 2012-8-16 22:03 编辑

macd背离

A1:=EMA(CLOSE,N1) - EMA(CLOSE,N1*2.618);

作者: 期胜 时间: 2011-9-22 10:38:05

小弟先谢谢了

作者: alex647l 时间: 2011-9-22 13:44:33

一般不做这种事儿的。。。。LZ自己研究下怎么写吧

作者: 蔡宛宏 时间: 2011-12-17 14:02:36

自己动手丰衣足食

作者: huise4 时间: 2011-12-19 12:54:20

Params
Numeric N(10);
Numeric N1(10);
Vars
NumericSeries A1;
NumericSeries A2;
Numeric AA;
Numeric BB;
Numeric AA1;
Numeric BB1;
Numeric M1;
Numeric M2;
NumericSeries B1;
NumericSeries B2;
Begin
A1 = XAverage(Close,N1) - XAverage(Close,N1*2.618);
A2 = XAverage(A1, N1*0.618);
AA = NthCon(CrossOver(A1,A2),1);
BB = NthCon(CrossOver(A2,A1),1);
AA1 = NthCon(A1<A2);
BB1 = NthCon(A1>A2);
M1 = CountIf(Low<Low[AA+1] && A2>A2[AA+1] && CrossOver(A1,A2),AA1+1);
M2 = CountIf(High<High[BB+1] && A2<A2[BB+1] && CrossOver(A2,A1),BB1+1);
B1 = XAverage(Close,N) - XAverage(Close,N1);
B2 = XAverage(B1,N*0.618);
////////////////////////////////
If(M1==1 && CrossOver(B1,B2))
{
Buy(0,Close);
//Return;
}
If(CrossOver(B2,B1))
{
BuyToCover(0,Close);
//Return;
}
If(M2==1 && CrossOver(B2,B1))
{
SellShort(0,Close);
//Return;
}
If(CrossOver(B1,B2))
{
Sell(0,Close);
//Return;
}
End

作者: ggyyff 时间: 2012-3-29 09:33:16

思路很精妙第一次见谢谢分享

作者: 道勤 时间: 2012-5-9 15:26:53

感谢分享

作者: yoyo 时间: 2012-12-23 15:14:53

huise4 发表于 2011-12-19 12:54
Params
Numeric N(10);
Numeric N1(10);

学习了，呵呵，正是想要的

作者: qyliaowei 时间: 2014-10-13 14:17:44

学习了，呵呵，正是想要的

欢迎光临开拓者期货期权程序化系统交易论坛 (http://bbs.tb18.net/)