求助：将所有单子设平保的代码怎么写？

usdjpy

5 老板  能不能帮忙 做个这样的指标  不是EA  谢谢了

573

usdjpy 发表于 2020-4-15 22:49
5 老板  能不能帮忙 做个这样的指标  不是EA  谢谢了

这个容易


订单统计+日期时间.rar (2.1 KB, 下载次数: 3)

2020-4-15 23:01 上传

点击文件名下载附件
下载积分: 金钱 -3

573

usdjpy 发表于 2020-4-15 22:49
5 老板  能不能帮忙 做个这样的指标  不是EA  谢谢了

其实代码很乱，我是东拼西凑修修改改做的，很多代码我都不知道什么意思，不过我测试了能用。

1. //+------------------------------------------------------------------+
   
2. //|                                                      ProjectName |
   
3. //|                                      Copyright 2018, CompanyName |
   
4. //|                                       http://www.companyname.net |
   
5. //+------------------------------------------------------------------+
   
6. 
   
7. #property strict
   
8. int    FontSize=14;
   
9. int    WhichCorner0_3=1;
   
10. int        MarketSpread;
    
11. int        firsttime=1;
    
12. string FontType="微软雅黑";
    
13. color  FontColor = Yellow;
    
14. double p;
    
15. int duokong=0;  
    
16. double pip=0.0001,point,digits;
    
17. int slip=5;
    
18. string hbd ="===";
    
19. //+------------------------------------------------------------------+
    
20. //|                                                                  |
    
21. //+------------------------------------------------------------------+
    
22. 
    
23. int init()
    
24.   {
    
25.   ObjectCreate( "北京时间", OBJ_LABEL, 0,0,0,0,0,0,0);
    
26.   ObjectSet( "北京时间", OBJPROP_CORNER, 1);
    
27.   ObjectSet( "北京时间", OBJPROP_XDISTANCE, 5);
    
28.   ObjectSet( "北京时间", OBJPROP_YDISTANCE, 40);
    
29.   ObjectSetText(  "北京时间", "", 18, "微软雅黑", clrAqua);
    
30.   ObjectCreate( "日期", OBJ_LABEL, 0,0,0,0,0,0,0);
    
31.   ObjectSet( "日期", OBJPROP_CORNER, 1);
    
32.   ObjectSet( "日期", OBJPROP_XDISTANCE, 10);
    
33.   ObjectSet( "日期", OBJPROP_YDISTANCE, 0);
    
34.   ObjectSetText(  "日期", "", 14, "微软雅黑", clrAqua);
    
35.     return(0);
    
36.   }
    
37. 
    
38. 
    
39. int start()
    
40.   {
    
41. 
    
42.   ObjectSetText("日期", TimeToStr(TimeLocal(), TIME_DATE)+"  星期 "+DayOfWeek(), 17, "微软雅黑", clrAqua );
    
43.   ObjectSetText("北京时间", TimeToStr(TimeLocal(), TIME_MINUTES|TIME_SECONDS), 38, "微软雅黑", clrAqua );
    
44.    MarketSpread=MarketInfo(Symbol(),MODE_SPREAD);
    
45.    
    
46. 
    
47.    if (hbd=="===")hbd=Symbol();
    
48.      PointInit();
    
49.      if(MarketInfo(hbd,MODE_DIGITS)==5){slip=slip*10;p=MarketInfo(Symbol(), MODE_SPREAD)/10;}
    
50.      if(MarketInfo(hbd,MODE_DIGITS)==4)p=MarketInfo(Symbol(), MODE_SPREAD);
    
51.      
    
52.      
    
53.     //if (CountTrades(1,hbd,"",0)!=0)
    
54.    
    
55.    string Market_point2 = "多单："+DoubleToStr(CountTrades(1,hbd,"",0),2)+" 手，    均价："+AvgPrice(1,hbd,1);
    
56.    
    
57.    ObjectCreate("Market_Point2_Label", OBJ_LABEL, 0, 0, 0);
    
58.    ObjectSetText("Market_Point2_Label", Market_point2, 14, FontType, clrWhite);
    
59.    ObjectSet("Market_Point2_Label", OBJPROP_CORNER, 1);
    
60.    ObjectSet("Market_Point2_Label", OBJPROP_XDISTANCE, 10);
    
61.    ObjectSet("Market_Point2_Label", OBJPROP_YDISTANCE, 110);
    
62.    
    
63.    // if(CountTrades(2,hbd,"",1)!=0)
    
64.    
    
65.       string Market_point1 = "空单："+DoubleToStr(CountTrades(2,hbd,"",1),2)+" 手，    均价："+AvgPrice(2,hbd,2);
    
66. 
    
67.    ObjectCreate("Market_Point1_Label", OBJ_LABEL, 0, 0, 0);
    
68.    ObjectSetText("Market_Point1_Label", Market_point1, 14, FontType, clrWhite);
    
69.    ObjectSet("Market_Point1_Label", OBJPROP_CORNER, 1);
    
70.    ObjectSet("Market_Point1_Label", OBJPROP_XDISTANCE,10);
    
71.    ObjectSet("Market_Point1_Label", OBJPROP_YDISTANCE, 150);
    
72.    
    
73.    return(0);
    
74. }
    
75. //+------------------------------------------------------------------+
    
76. //|                                                                  |
    
77. //+------------------------------------------------------------------+
    
78. int deinit()
    
79.   {
    
80.    switch(UninitializeReason())
    
81.      {
    
82.       case REASON_CHARTCLOSE:
    
83.       case REASON_REMOVE:
    
84.       case REASON_RECOMPILE:
    
85.          Comment("");
    
86.          //ObjectDelete(OBJECT_NAME);
    
87.          break;
    
88.       case REASON_CHARTCHANGE:   // leave the object the way it is if simply switching timeframes
    
89.       case REASON_PARAMETERS:
    
90.       case REASON_ACCOUNT:
    
91.          break;
    
92.      }
    
93.      ObjectDelete("北京时间");
    
94.      ObjectDelete("日期");
    
95.      ObjectDelete("Market_Point3_Label");
    
96.      ObjectDelete("Market_Point4_Label");
    
97.      ObjectDelete("Market_Point_Label");
    
98.      ObjectDelete("Market_Point2_Label");
    
99.      ObjectDelete("Market_Point1_Label");
    
100.    return(0);
     
101.   }
     
102. //+------------------------------------------------------------------+
     
103. 
     
104. //+-------------------------------订单数量统计--
     
105.   double CountTrades(int duokong,string hb,string ordtip,int ordtype)
     
106. {
     
107.    double count;
     
108.    for (int pos = OrdersTotal() - 1; pos >= 0; pos--)
     
109.    {
     
110.       OrderSelect(pos, SELECT_BY_POS, MODE_TRADES);
     
111.       if (OrderSymbol() == hb  )
     
112.       {
     
113.          if (duokong == 1)
     
114.          {
     
115.             if ( OrderType() == ordtype)
     
116.             {
     
117.                count+=OrderLots();
     
118.             }
     
119.          }
     
120.          
     
121.          if (duokong == 2)
     
122.          {
     
123.             if ( OrderType() == ordtype)
     
124.             {
     
125.               count+=OrderLots();
     
126.             }
     
127.          }
     
128.       }
     
129.    }
     
130.    
     
131.    return (count);
     
132. }  
     
133. 
     
134. 
     
135. 
     
136. /////////////////////////////////////////////////////
     
137.    void PointInit()
     
138.    {
     
139.       int digits = MarketInfo(hbd, MODE_DIGITS);
     
140.       if (digits >= 2 && digits < 4)
     
141.       {
     
142.          point = 0.01;
     
143.       }
     
144.       if (digits >= 4)
     
145.       {
     
146.          point = 0.0001;
     
147.       }
     
148.    }
     
149.    
     
150.    //////////////////////////////////////////
     
151. //计算多单或者空单的平均入场价，结果精确到汇率小数点位
     
152.   double AvgPrice(int ddz,string hb,int duokong)
     
153. {
     
154.    double sum = 0;
     
155.    double lots = 0;
     
156.    
     
157.    
     
158.    for (int pos = OrdersTotal() - 1; pos >= 0; pos--)
     
159.    {
     
160.       OrderSelect(pos, SELECT_BY_POS, MODE_TRADES);
     
161.       if (OrderSymbol() == hb )
     
162.       {
     
163.          if (duokong == 1)
     
164.          {
     
165.             if (OrderType() == 0)
     
166.             {
     
167.                sum += OrderOpenPrice() * OrderLots();
     
168.                lots += OrderLots();
     
169.             }
     
170.          }
     
171.          
     
172.          if (duokong == 2)
     
173.          {
     
174.             if (OrderType() == 1)
     
175.             {
     
176.                sum += OrderOpenPrice() * OrderLots();
     
177.                lots += OrderLots();
     
178.             }
     
179.          }
     
180.       }
     
181.    }
     
182.    double ret;
     
183.    if (lots!=0)
     
184.       ret = NormalizeDouble(sum/lots,5);
     
185.    else ret=0;
     
186.    
     
187.    return (ret);
     
188. }  
     
189. ///////////////////////////////////////////

复制代码

573

hpy6666 发表于 2020-4-15 22:46
你这均线取值不对吧！改下指标函数的周期就好了

还没完成呢，现在做不出来，先学习一段时间后再做。

hpy6666

我也来秀一个,MT5的按钮界面; 目前功能都没有, 打算弄个平保和简单织布机!!

usdjpy

573 发表于 2020-4-15 23:01
这个容易

非常感谢 5老板

frlin2003

如果单子处于浮盈状态，开仓价=止损；
如果单子处于浮亏状态，开仓价≠止损；改不动此刻。
这条可加进去了？

573

frlin2003 发表于 2020-4-16 09:51
如果单子处于浮盈状态，开仓价=止损；
如果单子处于浮亏状态，开仓价≠止损；改不动此刻。
这条可加进去 ...

没有加进去
还有止损价与现价的距离，小于这个距离也改不动。
但是我是手动交易，
开第1单后，填 个价格可以一键设止损（如果加一个点数止损的按钮就更方便了，就不用计算价格了）
开第2单的时候，先把第1单，一健平保（此时第1单必须是盈利的，而且大于平台规定的最小止盈距离）
开第3单的时候，先把前面的单子各自平保，可以一键完成，虽然有重复执行，但是没影响。（此时第2单必须是盈利的，而且大于平台规定的最小止盈距离）
依此类推，，，

所以，，不加进去好像也没影响，，主要还是我不会加

573

hpy6666 发表于 2020-4-15 22:46
你这均线取值不对吧！改下指标函数的周期就好了

均线价格搞定了，很笨的方法，但是能用

1. int start()
   
2. 
   
3. {
   
4. 
   
5. if(Period()==240) h4=14;if(Period()==60) h4=56;if(Period()==15) h4=224;if(Period()==5) h4=672;if(Period()==1) h4=3360;
   
6. if(Period()==240) h1=0;if(Period()==60) h1=14;if(Period()==15) h1=56;if(Period()==5) h1=168;if(Period()==1) h1=840;
   
7. if(Period()==240) m15=0;if(Period()==60) m15=0;if(Period()==15) m15=14;if(Period()==5) m15=42;if(Period()==1) m15=210;
   
8. if(Period()==240) m5=0;if(Period()==60) m5=0;if(Period()==15) m5=0;if(Period()==5) m5=14;if(Period()==1) m5=70;
   
9. if(Period()==240) m1=0;if(Period()==60) m1=0;if(Period()==15) m1=0;if(Period()==5) m1=0;if(Period()==1) m1=14;
   
10. 
    
11. string Market_point10 = "跟踪均线止损        价格       距离  ";
    
12. 
    
13.    ObjectCreate("Market_Point10_Label", OBJ_LABEL, 0, 0, 0);
    
14.    ObjectSetText("Market_Point10_Label", Market_point10, 14, FontType, clrWhite);
    
15.    ObjectSet("Market_Point10_Label", OBJPROP_CORNER, WhichCorner0_3);
    
16.    ObjectSet("Market_Point10_Label", OBJPROP_XDISTANCE, 14);
    
17.    ObjectSet("Market_Point10_Label", OBJPROP_YDISTANCE, 320);
    
18. 
    
19. anniu("h4",clrWhite,305,365,"H 4",50);
    
20. 
    
21. string Market_point6 = DoubleToStr(iMA(NULL,0,h4,0,MODE_SMA,PRICE_WEIGHTED,0),Digits);
    
22.    ObjectCreate("Market_Point6_Label", OBJ_LABEL, 0, 0, 0);
    
23.    ObjectSetText("Market_Point6_Label", Market_point6, 14, FontType, clrWhite);
    
24.    ObjectSet("Market_Point6_Label", OBJPROP_CORNER, WhichCorner0_3);
    
25.    ObjectSet("Market_Point6_Label", OBJPROP_XDISTANCE, 100);
    
26.    ObjectSet("Market_Point6_Label", OBJPROP_YDISTANCE, 365);
    
27.    
    
28.          anniu("h1",clrWhite,305,405,"H 1",50);
    
29.           string Market_point7 = DoubleToStr(iMA(NULL,0,h1,0,MODE_SMA,PRICE_WEIGHTED,0),Digits);
    
30.    ObjectCreate("Market_Point7_Label", OBJ_LABEL, 0, 0, 0);
    
31.    ObjectSetText("Market_Point7_Label", Market_point7, 14, FontType, clrWhite);
    
32.    ObjectSet("Market_Point7_Label", OBJPROP_CORNER, WhichCorner0_3);
    
33.    ObjectSet("Market_Point7_Label", OBJPROP_XDISTANCE, 100);
    
34.    ObjectSet("Market_Point7_Label", OBJPROP_YDISTANCE, 405);
    
35.    
    
36.             anniu("m15",clrWhite,305,445,"M15",50);
    
37.              string Market_point8 = DoubleToStr(iMA(NULL,0,m15,0,MODE_SMA,PRICE_WEIGHTED,0),Digits);
    
38.    ObjectCreate("Market_Point8_Label", OBJ_LABEL, 0, 0, 0);
    
39.    ObjectSetText("Market_Point8_Label", Market_point8, 14, FontType, clrWhite);
    
40.    ObjectSet("Market_Point8_Label", OBJPROP_CORNER, WhichCorner0_3);
    
41.    ObjectSet("Market_Point8_Label", OBJPROP_XDISTANCE, 100);
    
42.    ObjectSet("Market_Point8_Label", OBJPROP_YDISTANCE, 445);
    
43.    
    
44.                anniu("m5",clrWhite,305,485,"M 5",50);
    
45.                 string Market_point9 = DoubleToStr(iMA(NULL,0,m5,0,MODE_SMA,PRICE_WEIGHTED,0),Digits);
    
46.    ObjectCreate("Market_Point9_Label", OBJ_LABEL, 0, 0, 0);
    
47.    ObjectSetText("Market_Point9_Label", Market_point9, 14, FontType, clrWhite);
    
48.    ObjectSet("Market_Point9_Label", OBJPROP_CORNER, WhichCorner0_3);
    
49.    ObjectSet("Market_Point9_Label", OBJPROP_XDISTANCE, 100);
    
50.    ObjectSet("Market_Point9_Label", OBJPROP_YDISTANCE, 485);
    
51.    
    
52.                   anniu("m1",clrWhite,305,525,"M 1",50);
    
53.                 string Market_point11 = DoubleToStr(iMA(NULL,0,m1,0,MODE_SMA,PRICE_WEIGHTED,0),Digits);
    
54.    ObjectCreate("Market_Point11_Label", OBJ_LABEL, 0, 0, 0);
    
55.    ObjectSetText("Market_Point11_Label", Market_point11, 14, FontType, clrWhite);
    
56.    ObjectSet("Market_Point11_Label", OBJPROP_CORNER, WhichCorner0_3);
    
57.    ObjectSet("Market_Point11_Label", OBJPROP_XDISTANCE, 100);
    
58.    ObjectSet("Market_Point11_Label", OBJPROP_YDISTANCE, 525);
    
59.     return(0);
    
60. }

复制代码

frlin2003

573 发表于 2020-4-16 10:15
没有加进去
还有止损价与现价的距离，小于这个距离也改不动。
但是我是手动交易，

浮亏状态下；止盈=开仓价。此时，止损改不动

573

573 发表于 2020-4-16 10:18
均线价格搞定了，很笨的方法，但是能用

573

frlin2003 发表于 2020-4-16 10:19
浮亏状态下；止盈=开仓价。此时，止损改不动

单子没浮盈，不加仓。
单子浮亏，更不加仓。
只有在加仓的时候，前面的单子才设置平保

573

frlin2003 发表于 2020-4-16 10:19
浮亏状态下；止盈=开仓价。此时，止损改不动

因为是手动交易，所有的逻辑在脑子里，不用写进代码里，
代码只是工具，手动执行的时候，逻辑必须是合理的，否则，就是违反了交易系统规则。

jywj2019

573 发表于 2020-4-16 10:26
因为是手动交易，所有的逻辑在脑子里，不用写进代码里，
代码只是工具，手动执行的时候，逻辑必须是合理 ...

五老板已经码汇双修了，可喜可贺

573

这个上穿下穿均线全部平仓的代码应该没问题，怎么就不执行呢？

1. void macloseall()
   
2. {
   
3.   if(iHigh(0,0,0)>=iMA(0,0,ma,0,MODE_SMA,PRICE_WEIGHTED,0)&& iHigh(0,0,1)<iMA(0,0,ma,0,MODE_SMA,PRICE_WEIGHTED,0)&& mark!=1)
   
4.   {
   
5.   mark=1;
   
6.   closeall();
   
7.   }
   
8.   if(iLow(0,0,0)<=iMA(0,0,ma,0,MODE_SMA,PRICE_WEIGHTED,0)&& iLow(0,0,1)>iMA(0,0,ma,0,MODE_SMA,PRICE_WEIGHTED,0)&& mark!=2)
   
9.   {
   
10.   mark=2;
    
11.   closeall();
    
12.   }
    
13. }

复制代码

573

573

573

还有个问题，如何侦测到图表周期和品种的更改？因为图表周期和品种更换后必须终止均线跟踪止损的运行。

老五

573 发表于 2020-4-16 19:02
还有个问题，如何侦测到图表周期和品种的更改？因为图表周期和品种更换后必须终止均线跟踪止损的运行。

5爷，你这个一键设置止损，能否这样？假如我开了2单，一单浮盈，一单亏损，我想统一设置一个止损，这个止损刚好是2单同时止损的保本点？

573

老五 发表于 2020-4-16 21:39
5爷，你这个一键设置止损，能否这样？假如我开了2单，一单浮盈，一单亏损，我想统一设置一个止损，这个止 ...

可以增加一个键，单击后执行2个命令：均价设止盈；均价设止损。
这样应该可以吧。