GlobalVariableSet("gr1_var1",1.2);
   GlobalVariableSet("gr1_var2",3.4);   
   GlobalVariableSet("gr2_var1",5.6);
   GlobalVariableSet("gr2_var2",7.8);   
   
   GlobalVariablesFlush();

该代码可以在附件中的 sGVTestFlush 文件中找到。 

最好能演示 GlobalVariableFlush() 函数的运行过程，但是很不幸，我们没办法模拟终端紧急关闭而全局变量消失的场景。终端的运行可以通过任务管理器的进程页面来进行终止，也许，全局变量可能会在电脑断电的时候消失，现在电脑很少会突然断电，因为很多用户使用笔记本电脑，而台式电脑通常有不间断电源设备。如果终端在服务器上运行，防止断电的措施就更加重要。所以，就算没有 GlobalVariableFlush() 函数，全局变量也是非常可信赖的保存数据的方法。    

临时变量, GlobalVariableTemp 函数

GlobalVariableTemp() 函数创建一个临时全局变量 (存在直到终端被关闭)。在我使用MQL5开发EA交易的几年中，我从未遇到使用这样变量的需要。并且，临时全局变量的概念与它们应用的基本原则相反 — 长期保存数据而不受终端重新启动而影响。但是，因为MQL5语言中有这样的函数，我们也应该注意一下，以防您需要它。

当调用该函数时，会有单独一个参数　— 变量名称 — 被传递给它。如果这样名称的变量不存在，会创建一个临时变量而且数值为0。在那以后，使用 GlobalVariableSet() 函数来给它赋值，这样它就能正常使用了。如果变量已经存在 (之前通过 GlobalVariableSet() 函数创建过了), 它不会被转化为临时变量:

   GlobalVariableSet("test",1.2); // 设置变量值以确保变量存在
   GlobalVariableTemp("temp"); // 创建一个临时变量
   Alert("创建后的临时变量值 - ",GlobalVariableGet("temp"));
   GlobalVariableSet("temp",3.4); //　设置临时变量值
   GlobalVariableTemp("test"); // 尝试把 "test" 变量转化为临时变量

该实例可以在下面附件中的 sGVTestTemp 文件中找到。在运行脚本之后，打开全局变量窗口，它应该包含 "temp" 变量，值为 3.4 以及 "test" 变量，值为 1.2。关闭全局变量窗口，重新运行终端并再次打开窗口，"test" 变量还保存在那里，而 "temp" 就不在了。

根据条件修改变量, GlobalVariableSetOnCondition 函数

现在，是时候探讨最后一个，并且以我的观点是最有趣的函数了: GlobalVariableSetOnCondition()。这个函数要传入三个参数: 名称，新的数值，以及测试值。如果变量值等于测试值，它就改为新的数值而函数会返回true, 否则它就返回　false (如果变量不存在也会这样)。

对于运行原则，函数使用与以下代码类似:

   double check_value=1;
   double value=2;

   if(GlobalVariableGet("test")==check_value){
      GlobalVariableSet("test",value);
      return(true);
   }
   else {
      return(false);
   }

如果 "test" 全局变量等于 check_value, 就把新的值赋给它并且返回 true ，否则 — false。check_value 变量的默认值为 1, 所以，如果“test”全局变量不存在，就会返回 false。

GlobalVariableSetOnCondition() 函数的主要目的是为多个EA交易提供一致的执行。因为现在的操作系统都是多任务程序，而每个EA交易可以看作是独立的线程，没有人能够保证所有的EA交易能够挨个执行它们的任务，

如果您对使用 MetaTrader 4 有些经验的话, 您可能会记得繁忙的交易流。现在，多个EA交易可能会同时向服务器发送交易请求，而它们将会被执行，与之前一次只有一个EA发送请求的情况不同，如果终端中有多个EA交易，繁忙的交易流可能会使执行市场操作时经常出错。当建立和关闭订单时，错误会更加严重，因为好的EA交易会重复尝试关闭或者建立仓位。另外，不同EA交易在同一个点建立和关闭仓位，有时也有这种情况。另外，如果跟踪止损功能(EA内部构建而并非在终端中设置)在多个EA交易中激活，每个订单时刻将只有它们中的一个可以修改止损，这已经是一个问题。尽管可能现在没有这些问题，但是有些EA交易还是需要任务按顺序执行。 

上面所述的全局变量就可以用于保证一组EA能够一致工作。在 OnTick() 函数执行的开始，给变量赋值，这样其他EA交易就能看到有些EA交易正在运行，它们应当终止它们的 OnTick()函数，或者进入循环等待。在EA交易完成所有必需的操作之后，我们把 check_value 赋给变量，现在其他 EA 就可以执行它的 OnTick() 函数了，如此这般。

上面显示的代码可以解决问题，但是我们无法确保执行序列:

if(GlobalVariableGet("test")==check_value){

将立即向后执行: 

GlobalVariableSet("test",value);

另一个 EA 可能会在侦测过 check_value 之后，在中间打断它们，在执行过它的部分任务后，第一个EA交易再继续运行，这样，两个EA交易可能会同步运行。GlobalVariableSetOnCondition() 函数就解决了这样的问题。在文档中已经提到, "函数对全局变量的访问是原子方式的"，原子方式意思就是"无法分割"，所以，没有其它的应用程序可以在数值的检验和赋予新值之间打断它们。

这个函数的唯一缺点是变量不存在时不会创建变量，这意味着我们应该执行额外的检查 (最好在EA初始化期间进行) 并生成变量。 

让我们写两个EA交易来进行一次试验。两个EA交易完全相同，在 OnTick() 函数的开头会显示"EA1 开始"消息的窗口，之后是三秒的暂停 (Sleep() 函数)，最后显示"EA1 结束"的消息:

void OnTick(){
   Alert("EA1 开始");   
   Sleep(3000);   
   Alert("EA1 结束");
}

第二个 EA 很类似, 只是消息是不同的: "EA2 开始" 和 "EA2 结束"。附件中的EA命名为 eGVTestEA1 和 eGVTestEA2。在终端中打开两个相同的图表并在其中附加上EA交易，消息窗口显示，EAs 同时开始和结束了它们的工作 (图 8)。

图 8. 关于 OnTick() 函数执行开始和结束的 EA 消息

现在，让我们使用 GlobalVariableSetOnCondition() 函数来提供一致的 EA 操作，插入的变化对于两个EA来说是相同的，所以，让我们在包含文件中写入代码，该文件称为 GVTestMutex.mqh (附加在下面)。

现在，让我们探讨 GVTestMutex.mqh 文件中的函数。在 EA 初始化过程中检查全局变量是否存在，并且如有必要则进行创建 ( Mutex_Init() 函数),只有一个参数 — 变量名称 — 被传给函数:

void Init(string name){
   if(!GlobalVariableCheck(name)){
      GlobalVariableSet(name,0);
   }
}

第二个函数 (Mutex_Check()) 是用于验证的，在函数中会循环等待全局变量被释放，变量一被释放，函数就返回 true, 而 EA 继续执行它的 OnTick() 函数，如果变量在一定时间内没有被释放，函数返回false。在这种情况下 OnTick() 函数的执行应被中止:

bool Mutex_Check(string name,int timeout){   
   datetime end_time=TimeLocal()+timeout; // 等待结束的时间
   while(TimeLocal()<end_time){ // 在一定时间内循环
      if(IsStopped()){
         return(false); // 如果EA被从图表上删除
      }
      if(GlobalVariableSetOnCondition(name,1,0)){ 
         return(true);
      }
      Sleep(1); // 小的暂停
   }   
   return(false); // 未能等到释放
}

全局变量的名称和等待时间的秒数会传给这个函数。

第三个函数是 Mutex_Release()，它把全局变量值设为 0 (释放)，这样其他的EA交易就能够开始它们的工作了:

void Mutex_Release(string name){
   GlobalVariableSet(name,0);
}

复制一份EA，包含这个文件并在其中加入一个函数调用，变量名称为 "mutex_test"，让我们使用30秒的超时时间来调用 Mutex_Check() 函数，完整的 EA 代码在下面显示:

#include <GVTestMutex.mqh>

int OnInit(){
   Mutex_Init("mutex_test");
   return(INIT_SUCCEEDED);
}

void OnTick(){

   if(!Mutex_Check("mutex_test",30)){
      return;
   }

   Alert("EA1 开始");
   Sleep(3000);
   Alert("EA1 结束");

   Mutex_Release("mutex_test");

}

让我们复制一份这个EA并修改显示消息的文字，附件中的EA被命名为 eGVTestEA1-2 和 eGVTestEA2-2，在两个类似的图表中运行EA，它们现在是按顺序运行的了 (图 9)。

 
图 9. EA按顺序运行

用于简化全局变量操作的类

class CGlobalVariables{
   private:
      string m_common_prefix; // 通用变量的前缀
      string m_order_prefix; // 订单变量的前缀
   public:
      // 构造函数
      void CGlobalVariables(){}
      // 析构函数
      void ~CGlobalVariables(){}
}

void Init(string symbol,int magic){
   m_order_prefix="order_";
   m_common_prefix=MQLInfoString(MQL_PROGRAM_NAME)+"_"+symbol+"_"+IntegerToString(magic)+"_";
   if(MQLInfoInteger(MQL_TESTER)){
      m_order_prefix="tester_"+m_order_prefix;
      m_common_prefix="t_"+m_common_prefix;
      DeleteAll();
   }         
}

string Prefix(){
   return(m_common_prefix);
} 

// 用于通用方法
bool Check(string name){
   return(GlobalVariableCheck(m_common_prefix+name));
}
void Set(string name,double value){
   GlobalVariableSet(m_common_prefix+name,value);      
}      
double Get(string name){
   return(GlobalVariableGet(m_common_prefix+name));
} 
void Delete(string name){
   GlobalVariableDel(m_common_prefix+name); 
}
// 用于订单变量
bool Check(ulong ticket,string name){
   return(GlobalVariableCheck(m_order_prefix+IntegerToString(ticket)+"_"+name));
}
void Set(ulong ticket,string name,double value){
   GlobalVariableSet(m_order_prefix+IntegerToString(ticket)+"_"+name,value);      
}      
double Get(ulong ticket,string name){
   return(GlobalVariableGet(m_order_prefix+IntegerToString(ticket)+"_"+name));
} 
void Delete(ulong ticket,string name){
   GlobalVariableDel(m_order_prefix+IntegerToString(ticket)+"_"+name); 
} 

GlobalVariablesDeleteAll(m_common_prefix);
GlobalVariablesDeleteAll(m_order_prefix);  

 void Deinit(){
    if(MQLInfoInteger(MQL_TESTER)){
        DeleteByPrefix();
    }
 }

void Flush(){
   GlobalVariablesFlush();
}

void DeleteByPrefix(string prefix){
   GlobalVariablesDeleteAll(m_common_prefix+prefix);
}

#include <CGlobalVariables.mqh>

CGlobalVariables gv;

gv.Init(Symbol(),123);

gv.Deinit();

   gv.Set("name1",123.456);
   double val=gv.Get("name1");

void CGlobalVariables(string symbol="",int magic=0){
   Init(symbol,magic);
}
// 构造函数
void ~CGlobalVariables(){
   Deinit();
}

CGlobalVariables gv(Symbol(),123);