设为首页收藏本站

 找回密码
 注册
查看: 3982|回复: 4
打印 上一主题 下一主题

老师能把这个MT4的指标转化成TB么? [复制链接]

Rank: 2

精华
0
UID
1086
积分
77
帖子
7
主题
3
阅读权限
30
注册时间
2008-1-18
最后登录
2008-9-1
跳转到指定楼层
1#
发表于 2008-7-4 11:55:37 |只看该作者 |倒序浏览
int start()
{   
   
   double value2;
   double value3;
   double value10=10;
   double value11;
   double x1=70;
   double x2=30;
   int TrueCount;
   int counter;
   int MRO1;
   int MRO2;
   int i1;
   double Range;
   double AvgRange;
   double val1;
   double val2;
   double Table_value2[500][2];
   int counted_bars=IndicatorCounted();
   
   value10=3+RISK*2;
   x1=67+RISK;
   x2=33-RISK;
   value11=value10;
  //----------------------------
   
   if(counted_bars<0) return (-1);
   if(counted_bars>0) counted_bars--;       //last bar recounted
   int i;
   int shift = Bars-counted_bars-1;
   if (shift > AllBars) shift = AllBars;
         
  for(i=shift; i>0; i--)
   {
   


   
                 
      counter=i;
      Range=0;
      AvgRange=0;
      for (counter=i ;counter<=i+9;counter++)
      {
         AvgRange=AvgRange+MathAbs(High[counter]-Low[counter]);
      }
      Range=AvgRange/10;
      
      
      counter=i;
      TrueCount=0;
      while (counter<i+9 && TrueCount<1)
      {
         if (MathAbs(Open[counter]-Close[counter+1])>=Range*2.0 )
               TrueCount++;
         counter++;
      }

      if (TrueCount>=1)
            MRO1=counter ;
      else
            MRO1=-1;
            
      counter=i;
      TrueCount=0;
      while (counter<i+6 && TrueCount<1)
      {
           if(MathAbs(Close[counter+3]-Close[counter])>=Range*4.6)
            {TrueCount++;}
           counter++;
      }
      
      if(TrueCount>=1)
            MRO2=counter;
      else
            MRO2=-1;
            
      if (MRO1>-1)
            value11=3;
      else
            value11=value10;
            
      if (MRO2>-1)
            value11=4;
      else
           value11=value10;
         
            
      value2=100-MathAbs(iWPR(NULL,0,value11,i));
      Table_value2[0]=i;
      Table_value2[1]=value2;
      val1=0;
      val2=0;
      value3=0;
      //-------------------     val1  
      if (value2<x2 )  //  x2 = 30
      {
         i1=1;
         while (Table_value2[i+i1][1]>=x2 && Table_value2[i+i1][1]<=x1)
         {i1++;}

         if (Table_value2[i+i1][1]>x1)
         {
            value3=High+Range*0.5;
            val1=value3;
         }
      }
      
      //-------------------     val2  
      if ( value2>x1) // x1 = 70
      {  
            i1=1;
            while (Table_value2[i+i1][1]>=x2 && Table_value2[i+i1][1]<=x1)
            {i1++;}
            
            if (Table_value2[i+i1][1]< x2)
            {
               value3=Low-Range*0.5;
               val2=value3;
            }
      }
      
      
      
     
      if (val2!=0 && up==0 )
      {     
           val1buffer= val2-1*Point;
           up=1;
           dn=0;
           if(shift<=2)
           {
            Alert (Symbol()," ",Period(),"M  Asctrend BUY ");
            }
      }  
      if (val1 !=0 && dn==0)
      {
      
            val2buffer= val1+1*Point;
            dn=1;
            up=0;
            if(shift<=2)
            {
            Alert (Symbol()," ",Period(),"M   Asctrend SELL ");
            }
       }
   
   }
return(0);

}

Rank: 2

精华
0
UID
1086
积分
77
帖子
7
主题
3
阅读权限
30
注册时间
2008-1-18
最后登录
2008-9-1
2#
发表于 2008-7-4 16:11:21 |只看该作者
管理看看我的啊!

使用道具 举报

Rank: 6Rank: 6

精华
2
UID
390
积分
2142
帖子
286
主题
45
阅读权限
70
注册时间
2007-9-21
最后登录
2019-4-1
3#
发表于 2008-7-6 15:47:27 |只看该作者
你懂Mt4的话把它转过来你自己就可以转了
俺不懂Mt4
汗一个
如果要转
还要重新开始学习下MT4才可以啊
巨寒

使用道具 举报

Rank: 5Rank: 5

精华
0
UID
4647
积分
1403
帖子
432
主题
31
阅读权限
60
注册时间
2009-6-16
最后登录
2019-10-27
4#
发表于 2010-11-23 08:02:27 |只看该作者
这个恐怕就是世界十大交易系统之一的 ASCTrendsystem
的MT4源代码?

使用道具 举报

Rank: 3Rank: 3

精华
0
UID
20365
积分
242
帖子
50
主题
1
阅读权限
40
注册时间
2010-11-25
最后登录
2012-4-23
5#
发表于 2010-12-1 21:30:28 |只看该作者
MT4的语言看不懂啊!

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

bottom

静态版|手机版|联系我们|交易开拓者 ( 粤ICP备07044698   

GMT+8, 2024-5-29 06:17

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部