克罗均线 代码

liudong

克罗将多年的交易经验尽心了简化的指标量化，在上升趋势中，只持有多头头寸，或不入市。不持有空头头寸。在下降趋势中，只持有空头头寸，或不入市。不持有多头头寸。克罗先生使用4，9，18三条均线为参数的三均线系统。用易盛程序化写出测试代码如下（交易时要做改动）：

//------------------------------------------------------------------------
// 简称:kljx
// 名称:克罗均线
// 类别: 交易指令
// 类型: 用户应用
//------------------------------------------------------------------------
Params         
Numeric TradeUint(1); //下单手数
Vars               
NumericSeries ma4;
NumericSeries ma9;
NumericSeries ma18;
bool duo(False); //多头成立
Bool pduo(False);//平多
Bool kong(False);//空头成立
Bool pkong(False);//平空
Begin               
ma4=Average(close,4);
ma9=Average(close,9);
ma18=Average(close,18);
PlotNumeric("ma4",ma4);
PlotNumeric("ma9",ma9);
PlotNumeric("ma18",ma18);
duo=Close>ma4 and ma4>ma9 and ma9>ma18;
pduo=ma4<ma9;
kong=Close<ma4 and ma4<ma9 and ma9<ma18;
pkong=ma4>ma9;
  if (duo and MarketPosition!=1)
     {
                 // Buy(TradeUint,Q_AskPrice + MinMove * PriceScale*2);
                 Buy(TradeUint,Close);
         };
  if (kong and MarketPosition!=-1)
     {
                  // SellShort(TradeUint,Q_BidPrice-MinMove* PriceScale*2);
                  SellShort(TradeUint,Close);
         };
  IF (pduo and MarketPosition==1 )
     {
            // Sell(TradeUint,Q_BidPrice-MinMove* PriceScale*2);  
                Sell(TradeUint,Close);       
         }         ;
  IF (pkong and MarketPosition==-1)
     {
            // BuyToCover(TradeUint,Q_AskPrice+MinMove* PriceScale*2);        
                 BuyToCover(TradeUint,Close);
         };         




End



在沪胶上测试效果如下：

超宇瑗

支持一下哈












石楼网站建设

beiwoj702

强烈感谢楼主

松静自然

多谢分享

洞庭晨曦

{:soso_e179:}这代码是个雏形吧

liudong

只是按照书本上克罗先生的原意写的而已，没有改动。

kdjobv1

谢谢楼主分享

kdjobv1

谢谢楼主分享

kdjobv1

谢谢楼主分享

andrewsding

多谢分享，仔细学习

粤B-南山小散

趋势均线系统的资金曲线就如图一样，回撤足够大的

1050908725

学习.............

汤沛

新手 学习

风客云心

{:soso_e179:}

静守远

我虽然看不懂，但是要顶下

少东

多谢  下载起来使用看看

永不放弃

{:soso_e100:}

kindxie

先顶后看

猎鹰

{:soso_e179:}