根据海龟修改的简单均线系统，请大家帮忙给看看 [开拓者 TB]
- 咨询内容：
本帖最后由 yxq01234 于 2014-10-24 21:36 编辑
根据海龟修改的简单均线系统，请大家帮忙给看看，信号不对：大于18日均线+ATR开仓，收盘价再大于上次开仓价+ATR加仓，最多加3次仓。
Params
Numeric Length(14) ;
Numeric Length2(20);
Vars
NumericSeries TurtleUnits; // 交易单位
Numeric A;
NumericSeries AvgValue1;
Numeric myEntryPrice;
Numeric myExitPrice;
Begin
AvgValue1 = AverageFC(Close[1],Length2);
A=AvgTrueRange(Length) ;
If(MarketPosition == 0)
{
If(c[1]>AvgValue1+2*A and Close[1]-Open[1]>0.25*A )
{
myEntryPrice = o;
Buy(0,myEntryPrice) ;
}
If(c[1]<AvgValue1-2*A and Open[1]-Close[1]>0.25*A )
{
myEntryPrice = o;
SellShort(0,myEntryPrice);
}
}
If(MarketPosition == 1)
{
If(c[1] < AvgValue1)
{
myEntryPrice = o;
Sell(0,myEntryPrice);
}
Else
{
If(c[1]>= lastEntryPrice + 2*A and TurtleUnits>=1)
{
myEntryPrice = o;
Buy(1,myEntryPrice);
}
If(c[1] <= lastEntryPrice - 4*A )
{
myExitPrice = o;
Sell(0,myExitPrice);
}
}
}
If(MarketPosition == -1)
{
If(Close[1]>AvgValue1)
{
myEntryPrice = o;
BuyToCover(0,myEntryPrice);
}
Else
{
If(c[1]< lastEntryPrice - 2*A and TurtleUnits>=1)
{
myEntryPrice = o;
SellShort(1,myEntryPrice);
}
If(c[1] >= lastEntryPrice + 4*A )
{
myExitPrice = o;
BuyToCover(0,myExitPrice);
}
}
}
End
- TB技术人员： 实测图贴一个？
有思路，想编写各种指标公式，程序化交易模型，选股公式，预警公式的朋友
可联系技术人员 QQ: 1145508240 进行 有偿 编写！（不贵！点击查看价格！）
相关文章
-
没有相关内容
会员登录/注册