hepang 发表于 2013-4-13 15:32:39

:victory:

1分钟k线图 发表于 2013-4-16 19:44:23

学习ing……

天诛地灭 发表于 2013-6-5 15:20:11

:)

lingl2 发表于 2013-7-3 17:59:18

:victory::victory:

goodstudy 发表于 2013-7-4 16:09:19

学习学习。。

lxin18 发表于 2013-7-22 15:46:24

学习了.:victory:

zsh1206735353 发表于 2013-11-1 17:25:50

代码有逻辑问题。肯定会有一根棒上同时满足多个条件的情况。

zsh1206735353 发表于 2013-11-1 17:27:44

而且还有开盘价直接低于止损点的问题也没处理。。。

神游金牛 发表于 2013-11-3 11:37:28

这种k线组合在k线图任意位置出现的概率都较大,入场没有任何优势,应加背景过滤

周基金 发表于 2013-11-12 15:24:14

以下程序不知何处有问题无法运行请指教?谢谢!
Params
   Numeric Closeprice;//收盘价
   Numeric Openprice;//开盘价
   Numeric Highprice;//最高价
   NumericSeries Lowprice;//最低价
   Numeric Lots(1);//交易手数
   Numeric Offset(0);//滑点数
   Numeric Stoplose(30);//止损点数
   Numeric Close(14.59);//进场时间限制
Vars
   
         NumericSeries Closeprice;//收盘价
         NumericSeries Openprice;//开盘价
         NumericSeries Highprice;//最高价
   NumericSeries Lowprice;//最低价
   NumericSeries Enterprice;//入场价格
   NumericSeries Stoploseprice;//止损价格
Begin
   //计算日内高低价
   If(CurrentBar==0 || Date!=Date) //如果最新一根K线不是第一根
   {
     Highprice=High; //最近高价为最高价
         Lowprice=Low; //最近低价为最低价
   }
   Else//并且
   {
     Highprice=Max(High,Highprice); //最新高价为近期最高价
         Lowprice=Min(Low,Lowprice); //最新低价为近期最低价
   }

PlotNumeric("Highprice",Highprice); //输出阳K线到图表上
   PlotNumeric("Lowprice",Lowprice); //输出阴K线到图表上

If(MarketPosition==0) // 当前K线为最新K线并且没有任何持仓
   {
If(Time==Timelimit/100 && High>Close && High>Close)//当收盘前1分钟市价大于前2日收盘价时
    Buy(Lots,Enterprice); // 固定数量无滑点平空开多单
   Stoploseprice=Open;//  以前开盘价止损并按30点移动止损
}
   And
{
If(Time==Timelimit/100 && Low<Close && Low<Close) //当收盘前1分钟市价小于前2日收盘价时
   SellShort(Lots,Enterprice);//  固定数量无滑点平多开空单
Stoploseprice=Open;  //   以前开盘价止损并按30点移动止损
}
Else if//并且如果
     If(MarketPosition==1 && BarsSinceEntry>0) //如果持有多仓并且是K线为最新
         {
If(High>Highprice && Low>=Lowprice) //当持有多仓时盘面市价突破前期高点
   Buy(Lots,Enterprice); //  固定数量加半仓无滑点平空开多单
      Stoploseprice=Open;// 持仓均价按30点移动止损
}
  And
    {
If(High>Stoploseprice) BuyToCover(0,Max(Open,Stoploseprice+Offset*MinMove*PriceScale));
         //  当持有多仓时盘面止损被触发
      SellShort(Lots,Enterprice);//固定数量反手无滑点平多开空单
     Stoploseprice=Open;  //  以前开盘价止损并按30点移动止损
}
Else//并且
    If(MarketPosition==-1 && BarsSinceEntry>0)//如果持有空仓并且是K线为最新
   {
   Enterprice=Min(Open,Low-Offset*MinMove*PriceScale);// 当持有空仓时盘面市价突破前期低点
     SellShort(Lots,Enterprice);// 固定数量加半仓无滑点平多开空单
       Stoploseprice=Open;  //持仓均价按30点移动止损
}
And
      {
If(High>Stoploseprice) BuyToCover(0,Max(Open,Stoploseprice+Offset*MinMove*PriceScale));
         //当持有空仓时盘面止损被触发
    Buy(Lots,Enterprice); // 固定数量反手无滑点平空开多单
     Stoploseprice=Open;// 以前开盘价止损并按30点移动止损
}
And
   { // 突破或止损后加仓与反手的持仓在第3日收盘价市价平仓
}
    Commentary("止损价:"+Text(Stoploseprice));  // 输出开平仓信号在图表上
End
//完成
页: 1 2 3 4 5 6 7 [8] 9 10 11 12
查看完整版本: 一个简单顺势交易系统的例子