掉线重新连接代码

1. //+------------------------------------------------------------------+
   
2. //|                                             断线自动重连脚本.mq4 |
   
3. //|                                                            "ldj" |
   
4. //|                                           "http://www.fxvip.net" |
   
5. //+------------------------------------------------------------------+
   
6. //scripts//脚本文件
   
7. #property copyright "ldj"
   
8. #property link      "http://www.fxvip.net"
   
9. #property show_inputs
   
10. //自动登录准备
    
11. //把要登录的账号添加到收藏夹，并保证列在第一位。
    
12. extern string 邮件标记字符串="EA";
    
13. extern string 所有参数单位为秒="以下参数均折算为妙";
    
14. extern int 时差=18000; //本地时间与服务器时间的时间差，本地时间迟于服务器时间其值为负。单位秒。
    
15. extern int 允许时差=120;//允许服务器行情报价停滞的时间，建议设置2分钟即120秒。
    
16. extern int 检测间隔=20;//单位秒,不应小于20秒。
    
17. extern bool 邮件报警=false;
    
18. extern bool 声音报警=false;
    
19. //0、不自动登录。1、重新扫描服务器。2、重新登录第一个服务器。3、登录收藏夹第一个账号4、登录导航窗第一个账号
    
20. extern int 重连方式=1;
    
21. 
    
22. int ServerNum=0;
    
23. 
    
24. #include <WinUser32.mqh>
    
25. #import "user32.dll"
    
26.   int GetParent( int hWnd );
    
27.   int GetDlgItem( int hDlg, int nIDDlgItem );
    
28.   int GetLastActivePopup( int hWnd );
    
29.   int GetAncestor(int hWnd,int gaFlags);//GetAncestor(HWND hwnd,UINT gaFlags);
    
30. #import
    
31. 
    
32. #define VK_HOME 0x24
    
33. #define VK_DOWN 0x28
    
34. #define VK_ENTER 0x0D
    
35. 
    
36. #define PAUSE 1000
    
37. int LoginSleep=120; //不小于2分钟，避免频繁发送登录请求
    
38. int MailSleep=120;  //不小于2分钟，避免频繁发送邮件
    
39. datetime LoginTime,MailTime;
    
40. 
    
41. //+------------------------------------------------------------------+
    
42. //| script program init function                                     |
    
43. //+------------------------------------------------------------------+
    
44. void init()
    
45. {
    
46.       LoginTime=TimeLocal();
    
47.       MailTime=TimeLocal();
    
48.       if(检测间隔<10)检测间隔=10; //避免频繁检测系统资源消耗过多！
    
49.       return;
    
50. }
    
51. //+------------------------------------------------------------------+
    
52. //| script program start function                                    |
    
53. //+------------------------------------------------------------------+
    
54. void start()
    
55. {
    
56.         if ( !IsDllsAllowed() )
    
57.         {
    
58.                 Alert( "禁止调用DLL文件" );
    
59.                 return;
    
60.         }
    
61. 
    
62.    string 正文;
    
63.    double T;
    
64.    int week;
    
65.    
    
66.    while(IsStopped()==false)//如果没有接到脚本终止命令则一直运行
    
67.    {
    
68.      正文="服务器时间："+TimeToStr(TimeCurrent())+"\n本地的时间："+TimeToStr(TimeLocal())+"\n"+AccountCompany()+"平台"+"账号为："+AccountNumber()+"的账户";
    
69.      
    
70.      T=(TimeLocal()-TimeCurrent())/360.0;
    
71.      Comment("服务器时间：",TimeToStr(TimeCurrent(),TIME_SECONDS),
    
72.              "\n本地的时间：",TimeToStr(TimeLocal(),TIME_SECONDS),
    
73.              "\n参考时差值：",MathRound(T)*360);
    
74.      week=TimeDayOfWeek(TimeLocal()-时差);
    
75.      if(week>=1 && week<=5)//服务器时间为 星期一  至  星期五，有星期天或星期六 K线的平台可适当修改。
    
76.      {
    
77.        if ((TimeLocal()-TimeCurrent()-时差)>允许时差)
    
78.        {
    
79.          if (LoginTime+LoginSleep<TimeLocal())
    
80.          {
    
81.            LoginTime=TimeLocal();
    
82.            switch(重连方式)
    
83.            {
    
84.              case 0 : break;
    
85.              case 1 : ReConnecter();break;
    
86.              case 2 : ReConnecterN(ServerNum);break;
    
87.              case 3 : ReLogin(1);break;
    
88.              case 4 : ReLogin2();break;
    
89.              default : break;
    
90.            }
    
91.          }
    
92.          //正文=AccountCompany()+"平台"+"账号为："+AccountNumber()+"的账户";
    
93.          if (声音报警==true) Alert("从服务器上获取行情数据超时");
    
94.          if (邮件报警==true && MailTime+MailSleep<TimeLocal())
    
95.          {
    
96.            SendMail("从服务器上获取行情数据超时",正文+"\n从服务器上获取行情数据超时及时处理\n"+邮件标记字符串);
    
97.            MailTime=TimeLocal();
    
98.          }
    
99.          Sleep(检测间隔*1000);
    
100.        }
     
101.      }
     
102.      if(IsConnected()==false)
     
103.      {
     
104.        if (LoginTime+LoginSleep<TimeLocal())
     
105.        {
     
106.           LoginTime=TimeLocal();
     
107.           switch(重连方式)
     
108.           {
     
109.             case 0 : break;
     
110.             case 1 : ReConnecter();break;
     
111.             case 2 : ReConnecterN(ServerNum);break;
     
112.             case 3 : ReLogin(1);break;
     
113.             case 4 : ReLogin2();break;
     
114.             default : break;
     
115.           }
     
116.        }
     
117.        //正文=AccountCompany()+"平台"+"账号为："+AccountNumber()+"的账户";
     
118.        if (声音报警==true) Alert("服务器断线");
     
119.        if (邮件报警==true && MailTime+MailSleep<TimeLocal())
     
120.        {
     
121.          SendMail("服务器连接中断",正文+"\n与服务器连接中断请及时处理\n"+邮件标记字符串);
     
122.          MailTime=TimeLocal();
     
123.        }
     
124.        Sleep(检测间隔*1000);
     
125.      }
     
126.      Sleep(1*1000);
     
127.    }
     
128.    Comment("");
     
129.    return(0);
     
130. }
     
131. //+------------------------------------------------------------------+

复制代码

点赞