Pierre8rTeam
36 lines
2.9 KiB
Plaintext
36 lines
2.9 KiB
Plaintext
//+------------------------------------------------------------------+
|
|
//| Globals_test2.mq5 |
|
|
//| Copyright 2014, denkir |
|
|
//| https://login.mql5.com/ru/users/denkir |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright 2014, denkir"
|
|
#property link "https://login.mql5.com/ru/users/denkir"
|
|
#property version "1.00"
|
|
#property script_show_inputs
|
|
//---
|
|
#include "CGlobalVar.mqh"
|
|
|
|
input uint InpCnt=10000; // Number of variables
|
|
//+------------------------------------------------------------------+
|
|
//| Script program start function |
|
|
//+------------------------------------------------------------------+
|
|
void OnStart()
|
|
{
|
|
int deleted_num=GlobalVariablesDeleteAll();
|
|
//--- store the initial value
|
|
uint start=GetTickCount();
|
|
//---
|
|
for(uint idx=0;idx<InpCnt;idx++)
|
|
{
|
|
CGlobalVar gVar;
|
|
//--- Create a temporary global var
|
|
if(!gVar.Create("Test_var"+IntegerToString(idx+1),idx+0.15))
|
|
Alert("Error creating a global variable!");
|
|
}
|
|
//--- get the spent time in milliseconds
|
|
uint time=GetTickCount()-start;
|
|
//--- display the error message in the Experts journal
|
|
PrintFormat("Creation of %d global variables took %d ms",InpCnt,time);
|
|
}
|
|
//+------------------------------------------------------------------+
|