102 lines
4 KiB
MQL5
102 lines
4 KiB
MQL5
//+------------------------------------------------------------------+
|
|
//| ArrayDoubleSample.mq5 |
|
|
//| Copyright 2000-2025, MetaQuotes Ltd. |
|
|
//| https://www.mql5.com |
|
|
//+------------------------------------------------------------------+
|
|
#property copyright "Copyright 2000-2025, MetaQuotes Ltd."
|
|
#property link "https://www.mql5.com"
|
|
//---
|
|
#include <Arrays\ArrayDouble.mqh>
|
|
#include <Files\FileBin.mqh>
|
|
//---
|
|
const int ExtArraySize=10000;
|
|
const int ExtArrayAdd=100;
|
|
string ExtFileName="ArrayDoubleSample.bin";
|
|
//+------------------------------------------------------------------+
|
|
//| Example class CArrayDouble |
|
|
//+------------------------------------------------------------------+
|
|
int OnStart(void)
|
|
{
|
|
int i,pos;
|
|
double key;
|
|
CFileBin File;
|
|
CArrayDouble ArrayDouble;
|
|
//---
|
|
printf("Start sample %s.",__FILE__);
|
|
//--- fill an array of background information
|
|
//--- open file for reading
|
|
if(File.Open(ExtFileName,FILE_READ)!=INVALID_HANDLE)
|
|
{
|
|
//--- read array from file
|
|
if(!ArrayDouble.Load(File.Handle()))
|
|
{
|
|
//--- error reading from file
|
|
printf("%s (%4d): error %d",__FILE__,__LINE__,GetLastError());
|
|
}
|
|
//--- do not forget close file
|
|
File.Close();
|
|
}
|
|
//--- check whether enough information in the array
|
|
if(ArrayDouble.Total()<ExtArraySize)
|
|
{
|
|
//--- information in the file is not enough, or it is not at all
|
|
//--- reserve position in the array for the missing information
|
|
if(!ArrayDouble.Reserve(ExtArraySize-ArrayDouble.Total()))
|
|
{
|
|
//--- displaying the log error information
|
|
printf("%s (%4d): reserve error",__FILE__,__LINE__);
|
|
//--- remove a previously created array
|
|
return(__LINE__);
|
|
}
|
|
//--- additional fill an array of "random" values
|
|
for(i=ArrayDouble.Total();i<ExtArraySize;i++)
|
|
ArrayDouble.Add(MathRand()*MathPow(10,MathRand()%100));
|
|
}
|
|
//--- sort array
|
|
ArrayDouble.Sort();
|
|
//--- inserts the additional data without violating sorting (ExtArrayAdd items)
|
|
for(i=0;i<ExtArrayAdd;i++)
|
|
ArrayDouble.InsertSort(MathRand()*MathPow(10,MathRand()%100));
|
|
//--- set tolerance "fuzzy" comparison for the search
|
|
ArrayDouble.Delta(0.1);
|
|
//--- produce some of the search in sorted array
|
|
key=MathRand()*MathPow(10,MathRand()%100);
|
|
if((pos=ArrayDouble.SearchGreat(key))==-1)
|
|
printf("Search for items greater than %f, not found",key);
|
|
else
|
|
{
|
|
printf("Search for items greater than %f, found %f in the position %d",key,ArrayDouble.At(pos),pos);
|
|
//--- your actions have found the element
|
|
//--- ...
|
|
//---
|
|
}
|
|
key=MathRand()*MathPow(10,MathRand()%100);
|
|
if((pos=ArrayDouble.SearchLess(key))==-1)
|
|
printf("Search for items less than %f, not found",key);
|
|
else
|
|
{
|
|
printf("Search for items less than %f, found %f in the position %d",key,ArrayDouble.At(pos),pos);
|
|
//--- your actions have found the element
|
|
//--- ...
|
|
//---
|
|
}
|
|
//--- Remove from the array of extra data (ExtArrayAdd/2 largest and ExtArrayAdd/2 lowest)
|
|
ArrayDouble.DeleteRange(ArrayDouble.Total()-ExtArrayAdd/2-1,ArrayDouble.Total());
|
|
ArrayDouble.DeleteRange(0,ExtArraySize/2);
|
|
//--- save the modified array of file
|
|
//--- open file for writing
|
|
if(File.Open(ExtFileName,FILE_WRITE)!=INVALID_HANDLE)
|
|
if(ArrayDouble.Save(File.Handle()))
|
|
{
|
|
//--- normal completion
|
|
//--- because when you call the destructor, an open file is closed automatically
|
|
//--- and explicitly close the file is not necessary but desirable
|
|
printf("End of sample %s. OK!",__FILE__);
|
|
return(0);
|
|
}
|
|
//--- error with file
|
|
//--- displaying the log error information
|
|
printf("%s (%4d): error %d",__FILE__,__LINE__,GetLastError());
|
|
return(__LINE__);
|
|
}
|
|
//+------------------------------------------------------------------+
|