Initial Commit ...
This commit is contained in:
Binary file not shown.
@@ -0,0 +1,197 @@
|
||||
///////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 Alert Library
|
||||
// --------------------------------------
|
||||
// Name: XAlert
|
||||
// Description: provides Alerts abilities ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
input group "Alerts";
|
||||
input bool enableAlerts = true; // Enable Alerts
|
||||
input bool logAlerts = true; // Log Alerts
|
||||
input bool terminalAlerts = true; // Terminal Alerts
|
||||
input bool mailAlerts = true; // Mail Alerts
|
||||
input bool pushAlerts = true; // Push Alerts
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
#include "x-saherelm.log.lib.mq5";
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
string alertPrefix = "X-Alert";
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool OnInInitAlertLibrary()
|
||||
{
|
||||
return false;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void OnDeinitAlertLibrary()
|
||||
{
|
||||
}
|
||||
|
||||
//
|
||||
// Attach Alert Prefix to Message ...
|
||||
string PrepareAlertMessage(string message)
|
||||
{
|
||||
//
|
||||
StringConcatenate(message, alertPrefix, " > ", message);
|
||||
|
||||
//
|
||||
return message;
|
||||
}
|
||||
|
||||
//
|
||||
// Logging an Alert ...
|
||||
void LogAlert(string message)
|
||||
{
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!enableAlerts || !logAlerts)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
LogMessage(alertPrefix, message);
|
||||
}
|
||||
|
||||
//
|
||||
// Terminal Alert ...
|
||||
void TerminalAlert(string message)
|
||||
{
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!enableAlerts || !terminalAlerts)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Prepare Message ...
|
||||
message = PrepareAlertMessage(message);
|
||||
|
||||
// Send Terminal Alert ...
|
||||
Alert(message);
|
||||
}
|
||||
|
||||
//
|
||||
// Mail Alert ...
|
||||
void MailAlert(string message)
|
||||
{
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!enableAlerts || !mailAlerts)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Send Mail Alert ...
|
||||
SendMail(alertPrefix, message);
|
||||
}
|
||||
|
||||
//
|
||||
// Send Push Notification ...
|
||||
void PushAlert(string message)
|
||||
{
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!enableAlerts || !pushAlerts)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Prepare Message ...
|
||||
message = PrepareAlertMessage(message);
|
||||
|
||||
//
|
||||
// Send Push Notification Alert ...
|
||||
SendNotification(message);
|
||||
}
|
||||
|
||||
//
|
||||
// Alert Sending ...
|
||||
void SendAlert(string message)
|
||||
{
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!enableAlerts)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Log ...
|
||||
if (logAlerts)
|
||||
{
|
||||
LogAlert(message);
|
||||
}
|
||||
|
||||
//
|
||||
// Terminal ...
|
||||
if (terminalAlerts)
|
||||
{
|
||||
TerminalAlert(message);
|
||||
}
|
||||
|
||||
//
|
||||
// Mail ...
|
||||
if (mailAlerts)
|
||||
{
|
||||
MailAlert(message);
|
||||
}
|
||||
|
||||
//
|
||||
// Push ...
|
||||
if (pushAlerts)
|
||||
{
|
||||
PushAlert(message);
|
||||
}
|
||||
}
|
||||
void SendAlert(
|
||||
XSignal &signal, // the Signal Object which requred to Alert
|
||||
bool asExecuted = true // determines Alert Signal as Executed Signal or not
|
||||
)
|
||||
{
|
||||
//
|
||||
// Prepare Message ...
|
||||
string message = asExecuted ? ExecutedSignalToString(signal) : SignalToString(signal);
|
||||
|
||||
//
|
||||
// Do Alerting ...
|
||||
SendAlert(message);
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
Binary file not shown.
File diff suppressed because it is too large
Load Diff
Binary file not shown.
File diff suppressed because it is too large
Load Diff
Binary file not shown.
File diff suppressed because it is too large
Load Diff
Binary file not shown.
@@ -0,0 +1,177 @@
|
||||
///////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 Http Library
|
||||
// ------------------------------------------
|
||||
// Name: XHttp
|
||||
// Description: provide http communication
|
||||
// abilities ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// START Model Definition ...
|
||||
//
|
||||
enum X_HTTP_METHOD
|
||||
{
|
||||
X_HTTP_GET,
|
||||
X_HTTP_POST
|
||||
};
|
||||
//
|
||||
// END Model Definition ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool OnInInitHttpLibrary()
|
||||
{
|
||||
return false;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void OnDeinitHttpLibrary()
|
||||
{
|
||||
}
|
||||
|
||||
//
|
||||
// Convert enum to String ...
|
||||
string ToString(X_HTTP_METHOD method)
|
||||
{
|
||||
//
|
||||
string result = "";
|
||||
|
||||
//
|
||||
switch (method)
|
||||
{
|
||||
//
|
||||
case X_HTTP_GET:
|
||||
result = "GET";
|
||||
break;
|
||||
|
||||
//
|
||||
case X_HTTP_POST:
|
||||
result = "POST";
|
||||
break;
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Send Global Request ...
|
||||
int SendRequest(
|
||||
X_HTTP_METHOD method, // Httm Request Method
|
||||
const string url, // Server Address
|
||||
const string headers, // Headers providing
|
||||
const char &payload[], // the Data which needs to Send
|
||||
char &response[], // Response of request
|
||||
string responseHeaders, // Response Headers
|
||||
int timeout = 500 // Timeout for response default is 500
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = -1;
|
||||
|
||||
//
|
||||
string strMethod = ToString(method);
|
||||
if (StringLen(strMethod) == 0) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = WebRequest(
|
||||
strMethod,
|
||||
url,
|
||||
headers,
|
||||
timeout,
|
||||
payload,
|
||||
response,
|
||||
responseHeaders
|
||||
);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Get Request ...
|
||||
int GetRequest(
|
||||
const string url, // Server Address
|
||||
const string headers, // Headers providing
|
||||
const char &payload[], // the Data which needs to Send
|
||||
char &response[], // Response of request
|
||||
string responseHeaders, // Response Headers
|
||||
int timeout = 500 // Timeout for response default is 500
|
||||
) {
|
||||
//
|
||||
int result = SendRequest(
|
||||
X_HTTP_GET,
|
||||
url,
|
||||
headers,
|
||||
payload,
|
||||
response,
|
||||
responseHeaders,
|
||||
timeout
|
||||
);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Post Request ...
|
||||
int PostRequest(
|
||||
const string url, // Server Address
|
||||
const string headers, // Headers providing
|
||||
const char &payload[], // the Data which needs to Send
|
||||
char &response[], // Response of request
|
||||
string responseHeaders, // Response Headers
|
||||
int timeout = 500 // Timeout for response default is 500
|
||||
) {
|
||||
//
|
||||
int result = SendRequest(
|
||||
X_HTTP_POST,
|
||||
url,
|
||||
headers,
|
||||
payload,
|
||||
response,
|
||||
responseHeaders,
|
||||
timeout
|
||||
);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,161 @@
|
||||
///////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 Logger Library
|
||||
// ---------------------------------------
|
||||
// Name: XLogger
|
||||
// Description: provides Logging abilities ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
input group "Logging";
|
||||
input bool enableLogging = true; // Enable Logging
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Including Models ...
|
||||
#include "x-saherelm.models.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
string logTag = "X-Logger"; // LogTag
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
//
|
||||
// Logging a Message ...
|
||||
void LogMessage(string message)
|
||||
{
|
||||
//
|
||||
if (!enableLogging)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
Print(logTag, " > ", message);
|
||||
}
|
||||
void LogMessage(string tag, string message)
|
||||
{
|
||||
//
|
||||
if (!enableLogging)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
Print(tag, " > ", message);
|
||||
}
|
||||
|
||||
//
|
||||
// Logging an Array ...
|
||||
void LogArray(int &array[])
|
||||
{
|
||||
//
|
||||
if (!enableLogging)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
Print(logTag, ">");
|
||||
ArrayPrint(array);
|
||||
}
|
||||
void LogArray(double &array[])
|
||||
{
|
||||
//
|
||||
if (!enableLogging)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
Print(logTag, ">");
|
||||
ArrayPrint(array);
|
||||
}
|
||||
void LogArray(string &array[])
|
||||
{
|
||||
//
|
||||
if (!enableLogging)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
Print(logTag, ">");
|
||||
ArrayPrint(array);
|
||||
}
|
||||
|
||||
//
|
||||
// Convert a Signal to String Message ...
|
||||
string SignalToString(XSignal &signal)
|
||||
{
|
||||
//
|
||||
string result = "";
|
||||
|
||||
//
|
||||
result += (signal.type == X_SIGNAL_LONG ? "Buy" : "Sell") + " Signal provided on (" + signal.symbol + " _ " + EnumToString(_Period) + ") by this comment: " + signal.comment;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Convert an Executed Signal to String Message ...
|
||||
string ExecutedSignalToString(XSignal &signal)
|
||||
{
|
||||
//
|
||||
string result = "";
|
||||
|
||||
//
|
||||
result += (signal.type == X_SIGNAL_LONG ? "Buy" : "Sell") + " Signal Executed provided on (" + signal.symbol + " _ " + EnumToString(_Period) + ") by this comment: " + signal.comment;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Logging Signal ...
|
||||
void LogSignal(XSignal &signal)
|
||||
{
|
||||
//
|
||||
string message = SignalToString(signal);
|
||||
|
||||
//
|
||||
LogMessage(message);
|
||||
}
|
||||
|
||||
//
|
||||
// Log Signal Execution ...
|
||||
void LogExecutedSignal(XSignal &signal)
|
||||
{
|
||||
//
|
||||
string message = ExecutedSignalToString(signal);
|
||||
|
||||
//
|
||||
LogMessage(message);
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,189 @@
|
||||
///////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 Models Library
|
||||
// ---------------------------------------
|
||||
// Name: XModels
|
||||
// Description: provides all required models ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Model Definitions ...
|
||||
//
|
||||
//
|
||||
// OHCL Candel Model ...
|
||||
enum ENUM_X_PRICE
|
||||
{
|
||||
X_PRICE_HIGH,
|
||||
X_PRICE_OPEN,
|
||||
X_PRICE_CLOSE,
|
||||
X_PRICE_LOW
|
||||
};
|
||||
|
||||
//
|
||||
// Describe an Specific Candle ...
|
||||
struct XOHCL
|
||||
{
|
||||
double high;
|
||||
double open;
|
||||
double close;
|
||||
double low;
|
||||
};
|
||||
|
||||
//
|
||||
// Swing Types Enum ...
|
||||
enum ENUM_X_SWING_TYPE
|
||||
{
|
||||
X_NO_SWING = 0,
|
||||
X_SWING_HIGH = 1,
|
||||
X_SWING_LOW = -1,
|
||||
};
|
||||
|
||||
//
|
||||
// XTrader Execution Signal Result ...
|
||||
enum ENUM_EXECUTION_SIGNAL_RESULT
|
||||
{
|
||||
X_INVALID_SIGNAL_ERROR,
|
||||
X_XTRADER_NOT_ENOUGH_BALANCE_ERROR,
|
||||
X_XTRADER_NOT_ENOUGH_MARIGIN_ERROR,
|
||||
X_XTRADER_MAX_ALLOWED_TRADE_KIND_REACHED_ERROR,
|
||||
X_XTRADER_MAX_ALLOWED_SUPPORT_KIND_REACHED_ERROR,
|
||||
X_UNKNOWN_ERROR,
|
||||
X_SUCCEED_EXECUTION
|
||||
};
|
||||
|
||||
//
|
||||
// Signal Types ...
|
||||
enum ENUM_X_SIGNAL_TYPE
|
||||
{
|
||||
X_SIGNAL_LONG,
|
||||
X_SIGNAL_SHORT,
|
||||
X_SIGNAL_UNKNOWN,
|
||||
};
|
||||
|
||||
//
|
||||
// Represent a Signal issued for Trade or Support a Trade ...
|
||||
enum ENUM_X_SIGNAL_KIND
|
||||
{
|
||||
X_KIND_TRADE,
|
||||
X_KIND_SUPPORT
|
||||
};
|
||||
|
||||
//
|
||||
// Signal Structure ...
|
||||
struct XSignal
|
||||
{
|
||||
//
|
||||
// Identifier ...
|
||||
ulong id;
|
||||
|
||||
//
|
||||
// Which Symbol used for Signal ...
|
||||
string symbol;
|
||||
|
||||
//
|
||||
// Which Type of operations ...
|
||||
ENUM_X_SIGNAL_TYPE type;
|
||||
|
||||
//
|
||||
// Signal Kind ...
|
||||
ENUM_X_SIGNAL_KIND kind;
|
||||
|
||||
//
|
||||
// Parent Ticket ...
|
||||
ulong parent;
|
||||
|
||||
//
|
||||
// Magic Number ...
|
||||
ulong magicNumber;
|
||||
|
||||
//
|
||||
// Ticket ...
|
||||
ulong ticket;
|
||||
|
||||
//
|
||||
// Entry/Open Price ...
|
||||
double entry;
|
||||
|
||||
//
|
||||
// TP ...
|
||||
double tp;
|
||||
|
||||
//
|
||||
double virtualTP;
|
||||
|
||||
//
|
||||
// SL ...
|
||||
double sl;
|
||||
|
||||
//
|
||||
double virtualSL;
|
||||
|
||||
//
|
||||
// Make Risk Free Trade on this Value if provided ...
|
||||
double riskFree;
|
||||
|
||||
//
|
||||
// a Multiplier for determines how much trade volume exit on risk free time ...
|
||||
double riskFreeRate;
|
||||
|
||||
//
|
||||
// Trade Profit ...
|
||||
double profit;
|
||||
|
||||
//
|
||||
// Time of Operation ...
|
||||
datetime time;
|
||||
|
||||
//
|
||||
// Volume ...
|
||||
double volume;
|
||||
|
||||
//
|
||||
// Comment ...
|
||||
string comment;
|
||||
};
|
||||
|
||||
//
|
||||
// TP/SL Struct ...
|
||||
struct XTPSL
|
||||
{
|
||||
ENUM_X_SIGNAL_TYPE type;
|
||||
double tp;
|
||||
double sl;
|
||||
double entry;
|
||||
double r2r;
|
||||
};
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
@@ -0,0 +1,258 @@
|
||||
///////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 NN Class Library
|
||||
// ----------------------------------------
|
||||
// Name: XNNClass
|
||||
// Description: provides all classes for implementing
|
||||
// Neural Network ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
class XCNNBase
|
||||
{
|
||||
//
|
||||
// Public Definitions ...
|
||||
public:
|
||||
//
|
||||
// Constructor ...
|
||||
void XCNNBase(
|
||||
int nodes = 10, // Number of Input Nodes
|
||||
double starterWeight = 0.5, // start weight for each input
|
||||
double coEfficient = 0.1, // COEfficient Multiplier
|
||||
double upperRange = 1, // Upper Normal Range Value
|
||||
double lowerRange = -1, // Lower Normal Range Value
|
||||
double learningRates = 0.1 // Back Propagation Learning Rate
|
||||
) {
|
||||
//
|
||||
mNodes = nodes;
|
||||
mUpperRange = upperRange;
|
||||
mLowerRange = lowerRange;
|
||||
mCoEfficient = coEfficient;
|
||||
mLearningRates = learningRates;
|
||||
mStarterWeight = starterWeight;
|
||||
|
||||
//
|
||||
ReConstructWeights();
|
||||
}
|
||||
|
||||
//
|
||||
// Deconstructor ...
|
||||
void ~XCNNBase() {}
|
||||
|
||||
//
|
||||
// Protected Definitions ...
|
||||
void NormalizeInputs(double &inputs[], double &result[])
|
||||
{
|
||||
//
|
||||
ArrayFree(result);
|
||||
ArrayResize(result, 1);
|
||||
|
||||
//
|
||||
// Validate inputs ...
|
||||
if (ArraySize(inputs) != mNodes)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Prepare Result ...
|
||||
ArrayResize(result, mNodes);
|
||||
|
||||
//
|
||||
// Calculating min and max range value ...
|
||||
double minRangeValue = inputs[ArrayMinimum(inputs)];
|
||||
double maxRangeValue = inputs[ArrayMaximum(inputs)];
|
||||
|
||||
//
|
||||
// Loop through Inputs nd Normalize them ...
|
||||
for (int i = 0; i < mNodes; i++)
|
||||
{
|
||||
//
|
||||
double normalValue = (((inputs[i] - minRangeValue) * (mUpperRange - mLowerRange)) / (maxRangeValue - minRangeValue)) + mLowerRange;
|
||||
result[i] = normalValue;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Hyperbolic Tangent Activation Function ...
|
||||
double TanHActivationFunction(double weightedInputs)
|
||||
{
|
||||
//
|
||||
double result = (exp(weightedInputs) - exp(-weightedInputs)) / (exp(weightedInputs) + exp(-weightedInputs));
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Weighted Inputs ...
|
||||
double CalculateWeightedInputs(
|
||||
double &inputs[],
|
||||
bool applyCOEfficient = true)
|
||||
{
|
||||
//
|
||||
double result = 0;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
if (ArraySize(inputs) != mNodes)
|
||||
{
|
||||
//
|
||||
result = -1;
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
for (int i = 0; i < mNodes; i++)
|
||||
{
|
||||
result += inputs[i] * mWeights[i];
|
||||
}
|
||||
|
||||
//
|
||||
// Multiply if required ...
|
||||
if (applyCOEfficient)
|
||||
{
|
||||
result *= mCoEfficient;
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Hidden Layers ...
|
||||
virtual double CalculateHiddenLayer(double &inputs[])
|
||||
{
|
||||
//
|
||||
// this is Default Activation Function which used ...
|
||||
// you can override this by writing your own ...
|
||||
double totalWeightedInputs = CalculateWeightedInputs(inputs);
|
||||
double result = TanHActivationFunction(totalWeightedInputs);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Output Layers ...
|
||||
double CalculateOutputLayer(double &inputs[])
|
||||
{
|
||||
//
|
||||
double result = -1;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
if (ArraySize(inputs) != mNodes) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double normalizedInputs[];
|
||||
NormalizeInputs(inputs, normalizedInputs);
|
||||
if (ArraySize(normalizedInputs) != mNodes) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double hiddenLayerResult = CalculateHiddenLayer(normalizedInputs);
|
||||
|
||||
//
|
||||
result = 1 * hiddenLayerResult;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Basck Propaggation Learning ...
|
||||
void BackPropagation(
|
||||
double &inputs[],
|
||||
double &outputs,
|
||||
double targetOutput
|
||||
) {
|
||||
//
|
||||
// Validate Inputs ...
|
||||
if (ArraySize(inputs) != mNodes) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
double normalizedInputs[];
|
||||
NormalizeInputs(inputs, normalizedInputs);
|
||||
if (ArraySize(normalizedInputs) != mNodes) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
double error = targetOutput - outputs;
|
||||
double derivative = 1 - MathPow(outputs, 2);
|
||||
|
||||
//
|
||||
for (int i = 0; i < mNodes; i++) {
|
||||
//
|
||||
double gradient = error * derivative * inputs[i];
|
||||
mWeights[i] = mLearningRates * gradient;
|
||||
}
|
||||
}
|
||||
|
||||
protected:
|
||||
//
|
||||
// Private Definitions ...
|
||||
private:
|
||||
//
|
||||
// Number of Input Nodes ...
|
||||
int mNodes;
|
||||
|
||||
//
|
||||
// Specify Upper range of Normal Values ...
|
||||
double mUpperRange;
|
||||
|
||||
//
|
||||
// Specify Lower range of Normal Values ...
|
||||
double mLowerRange;
|
||||
|
||||
//
|
||||
// Starter Weight for each input node ...
|
||||
double mStarterWeight;
|
||||
|
||||
//
|
||||
// double Input Node Weights ...
|
||||
double mWeights[];
|
||||
|
||||
//
|
||||
// CoEfficient is a multiplyer for weighted inputs ...
|
||||
double mCoEfficient;
|
||||
|
||||
//
|
||||
// Back Propagation Learning Rates ...
|
||||
double mLearningRates;
|
||||
|
||||
//
|
||||
// ReConstruct Weights ...
|
||||
void ReConstructWeights() {
|
||||
//
|
||||
ArrayFree(mWeights);
|
||||
ArrayResize(mWeights, mNodes);
|
||||
|
||||
//
|
||||
for (int i = 0; i< mNodes; i++) {
|
||||
mWeights[i] = mStarterWeight;
|
||||
}
|
||||
}
|
||||
}
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
BIN
Binary file not shown.
+126
@@ -0,0 +1,126 @@
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 _INDICATOR_ Indicator Helper for Signal Providers
|
||||
// --------------------------------------------------------------------------
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Includes ...
|
||||
#include "..\Libraries\x-saherelm.log.lib.mq5"
|
||||
#include "..\Libraries\x-saherelm.common.lib.mq5"
|
||||
//
|
||||
// TODO: Include Main Provider Inputs ...
|
||||
// #include "x-saherelm.xmap.provider.inputs.lib.mq5"
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
input group "_INDICATOR_ Indicator/Oscillator";
|
||||
// TODO: Implement Named Indicator/Oscillator Specific Inputs here ...
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Definitions ...
|
||||
int _iNDICATOR_Handler = INVALID_HANDLE;
|
||||
//
|
||||
// TODO: Define Specific Buffers here ...
|
||||
// double _iNDICATOR_Buffer[];
|
||||
//
|
||||
// END Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Handler Functions ...
|
||||
//
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool _INDICATOR_InitHandlers()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// _INDICATOR_ Handler ...
|
||||
// TODO: Set As Buffer Series ...
|
||||
// ArraySetAsSeries(_iNDICATOR_Buffer, true);
|
||||
_iNDICATOR_Handler = iCustom(
|
||||
_Symbol,
|
||||
_Period,
|
||||
// TODO: Set Indicator Name ...
|
||||
""
|
||||
//
|
||||
// Inputs ...
|
||||
// TODO: Attach Inputs here ...
|
||||
//
|
||||
);
|
||||
if (_iNDICATOR_Handler == INVALID_HANDLE)
|
||||
{
|
||||
//
|
||||
// TODO: Edit Error Message ...
|
||||
LogMessage("failed to Initialize _INDICATOR_ Indicator: " + (string)GetLastError());
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void _INDICATOR_ReleaseHandlers()
|
||||
{
|
||||
IndicatorRelease(_iNDICATOR_Handler);
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void _INDICATOR_ReadBuffers()
|
||||
{
|
||||
//
|
||||
// TODO: Fix Copy Buffer ...
|
||||
// CopyBuffer(
|
||||
// _iNDICATOR_Handler,
|
||||
// 0,
|
||||
// 0,
|
||||
// //
|
||||
// // TODO: Use Global Number Of Items Per Tick ...
|
||||
// 0
|
||||
// //
|
||||
// // TODO Define Which buffer to save results ...
|
||||
// // _iNDICATOR_Buffer
|
||||
// //
|
||||
// );
|
||||
}
|
||||
//
|
||||
// END Handler Funcions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START _INDICATOR_ Custom Functions ...
|
||||
//
|
||||
// TODO: Attach all Aditional Helper Functions for Specific Indicator/Oscillator here ...
|
||||
//
|
||||
// END _INDICATOR_ Custom Functions ...
|
||||
//
|
||||
@@ -0,0 +1,758 @@
|
||||
////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 _XPROVIDER_ Signal Provider Library
|
||||
// --------------------------------------------------------
|
||||
// Name: _XPROVIDER_SignalProvider
|
||||
// Description: _XPROVIDER_ based signal provider ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
input group "_XPROVIDER_ Provider";
|
||||
|
||||
//
|
||||
input group "_XPROVIDER_ Common";
|
||||
input bool enable_XPROVIDER_Provider = true; // Enable Provider
|
||||
input bool _xPROVIDER_EnableAlerts = true; // Enable Events Alert
|
||||
|
||||
//
|
||||
input group "_XPROVIDER_ Indicator";
|
||||
|
||||
//
|
||||
input group "_XPROVIDER_ Trader";
|
||||
input int _xPROVIDER_MagicNumber = 16940562; // Trader MagicNumber
|
||||
input int _xPROVIDER_Slippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "_XPROVIDER_ Trade Management";
|
||||
input bool _xPROVIDER_AllowLongTrades = true; // Allow Long Trades
|
||||
input bool _xPROVIDER_AllowShortTrades = true; // Allow Short Trades
|
||||
input bool _xPROVIDER_UseGridTrades = true; // Enable Grid Trades
|
||||
input double _xPROVIDER_GridVolumeMultiplier = 2; // Grid Volume Multiplier
|
||||
input double _xPROVIDER_GridDistancePips = 10; // Grid Position Distance in Pips
|
||||
|
||||
//
|
||||
input group "_XPROVIDER_ Risk Management";
|
||||
input bool _xPROVIDER_UseDynamicVolume = true; // Enable Dynamic Volume
|
||||
input double _xPROVIDER_StaticVolume = 0.01; // Static Volume
|
||||
input double _xPROVIDER_BalanceIncreased = 500; // Balance Increase
|
||||
input double _xPROVIDER_VolumeIncreased = 0.01; // Volume Increase
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Include Common Library ...
|
||||
#include "x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Logger Library ...
|
||||
#include "x-saherelm.log.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Alert Library ...
|
||||
#include "x-saherelm.alert.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Draw Library ...
|
||||
#include "x-saherelm.draw.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Class Libraries ...
|
||||
#include "x-saherelm.class.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
//
|
||||
XCTrade *_xPROVIDER_Trader;
|
||||
XCAccountInfo _xPROVIDER_AccountInfo;
|
||||
|
||||
//
|
||||
double _xPROVIDER_GridLongPrice = 0;
|
||||
double _xPROVIDER_GridLongVolume = 0;
|
||||
|
||||
//
|
||||
double _xPROVIDER_GridShortPrice = 0;
|
||||
double _xPROVIDER_GridShortVolume = 0;
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool OnInInit_XPROVIDER_SignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Error Message ...
|
||||
string message = "";
|
||||
|
||||
//
|
||||
// Check Risk Management ...
|
||||
if (_xPROVIDER_UseDynamicVolume)
|
||||
{
|
||||
//
|
||||
if (_xPROVIDER_BalanceIncreased <= 0 || _xPROVIDER_VolumeIncreased <= 0)
|
||||
{
|
||||
//
|
||||
message = "invalid volume increased factors ...";
|
||||
LogMessage(message);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
//
|
||||
double maxAvailableVolume = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MAX);
|
||||
double minAvailableVolume = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MIN);
|
||||
|
||||
//
|
||||
if (_xPROVIDER_StaticVolume > maxAvailableVolume || _xPROVIDER_StaticVolume < minAvailableVolume)
|
||||
{
|
||||
//
|
||||
message = "invalid static volume ...";
|
||||
LogMessage(message);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Make XCTrader instance ...
|
||||
_xPROVIDER_Trader = new XCTrade(
|
||||
_Symbol,
|
||||
_xPROVIDER_Slippage,
|
||||
_xPROVIDER_MagicNumber);
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
message = "Initializion of (" + "_XPROVIDER_ Provider" + " _ " + _Symbol + " _ " + EnumToString(_Period) + ") Succeeded ...";
|
||||
LogMessage(message);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void OnDeinit_XPROVIDER_SignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
// Logging State ...
|
||||
string message = "De Initializion of (" + "_XPROVIDER_ Provider" + ") Succeeded ...";
|
||||
LogMessage(message);
|
||||
}
|
||||
|
||||
//
|
||||
// this is a Globally Function which do all of
|
||||
// checkings and positions handling ...
|
||||
void Handle_XPROVIDER_SignalProviderTick()
|
||||
{
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
_XPROVIDER_HandleOpenTrades();
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
_XPROVIDER_HandleCloseTrades();
|
||||
}
|
||||
|
||||
//
|
||||
// Check Market Conditions to find Long Primary Signals ...
|
||||
bool _XPROVIDER_HasPrimaryLongSignal()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check Buy/Long Conditions ...
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Market Conditions to find Short Primary Signals ...
|
||||
bool _XPROVIDER_HasPrimaryShortSignal()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check Sell/Short Conditions ...
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Market Conditions to find Long Grid Signals ...
|
||||
bool _XPROVIDER_HasGridLongSignal()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check Buy/Long Conditions ...
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Market Conditions to find Short Grid Signals ...
|
||||
bool _XPROVIDER_HasGridShortSignal()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check Sell/Short Conditions ...
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Market Conditions for closing Long Trades ...
|
||||
bool _XPROVIDER_CanCloseLongTrades()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Market Conditions for closing Short Trades ...
|
||||
bool _XPROVIDER_CanCloseShortTrades()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Long/Buy for Primary Trades...
|
||||
bool _XPROVIDER_HandlePrimaryLong(
|
||||
XSignal &signal, // return structure if signal founded
|
||||
bool doTrade = true // do trade on signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
if (_XPROVIDER_HasPrimaryLongSignal() && _xPROVIDER_Trader.CountLongs() == 0)
|
||||
{
|
||||
//
|
||||
double entry = GetAsk();
|
||||
double volume = _XPROVIDER_CalculateVolume();
|
||||
|
||||
//
|
||||
double canDoTrade = _XPROVIDER_CanDoTrade();
|
||||
|
||||
//
|
||||
signal.entry = entry;
|
||||
signal.volume = volume;
|
||||
signal.symbol = _Symbol;
|
||||
signal.type = X_SIGNAL_LONG;
|
||||
signal.magicNumber = _xPROVIDER_MagicNumber;
|
||||
signal.time = iTime(_Symbol, _Period, 0);
|
||||
signal.comment = "Primary _XPROVIDER_ Long";
|
||||
|
||||
//
|
||||
if (enable_XPROVIDER_Provider && _xPROVIDER_AllowLongTrades && doTrade && canDoTrade)
|
||||
{
|
||||
//
|
||||
// Execute Signal ...
|
||||
result = _xPROVIDER_Trader.ExecuteSignal(signal);
|
||||
|
||||
//
|
||||
// Since this means an error happens, we have to log this error ...
|
||||
if (!result)
|
||||
{
|
||||
string errMessage = "failed to execute Long signal: " + (string)GetLastError();
|
||||
LogMessage(errMessage);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
result = false;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Alerts ...
|
||||
if (result)
|
||||
{
|
||||
//
|
||||
if (_xPROVIDER_EnableAlerts)
|
||||
{
|
||||
SendAlert(signal, true);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogExecutedSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell for Primary Trades...
|
||||
bool _XPROVIDER_HandlePrimaryShort(
|
||||
XSignal &signal, // return structure if signal founded
|
||||
bool doTrade = true // do trade on signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
if (_XPROVIDER_HasPrimaryShortSignal() && _xPROVIDER_Trader.CountShorts() == 0)
|
||||
{
|
||||
//
|
||||
double entry = GetBid();
|
||||
double volume = _XPROVIDER_CalculateVolume();
|
||||
|
||||
//
|
||||
double canDoTrade = _XPROVIDER_CanDoTrade();
|
||||
|
||||
//
|
||||
signal.entry = entry;
|
||||
signal.volume = volume;
|
||||
signal.symbol = _Symbol;
|
||||
signal.type = X_SIGNAL_SHORT;
|
||||
signal.magicNumber = _xPROVIDER_MagicNumber;
|
||||
signal.time = iTime(_Symbol, _Period, 0);
|
||||
signal.comment = "Primary _XPROVIDER_ Short";
|
||||
|
||||
//
|
||||
if (enable_XPROVIDER_Provider && _xPROVIDER_AllowShortTrades && doTrade && canDoTrade)
|
||||
{
|
||||
//
|
||||
// Execute Signal ...
|
||||
result = _xPROVIDER_Trader.ExecuteSignal(signal);
|
||||
|
||||
//
|
||||
// Since this means an error happens, we have to log this error ...
|
||||
if (!result)
|
||||
{
|
||||
string errMessage = "failed to execute Short signal: " + (string)GetLastError();
|
||||
LogMessage(errMessage);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
result = false;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Alerts ...
|
||||
if (result)
|
||||
{
|
||||
//
|
||||
if (_xPROVIDER_EnableAlerts)
|
||||
{
|
||||
SendAlert(signal, true);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogExecutedSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Long/Buy for Grid Trades...
|
||||
bool _XPROVIDER_HandleGridLong(
|
||||
XSignal &signal, // return structure if signal founded
|
||||
bool doTrade = true // do trade on signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
bool canDoGridTrade = ask <= _xPROVIDER_GridLongPrice;
|
||||
if (_XPROVIDER_HasGridLongSignal() && _xPROVIDER_Trader.CountLongs() > 0 && canDoGridTrade)
|
||||
{
|
||||
//
|
||||
double entry = ask;
|
||||
double volume = _xPROVIDER_GridLongVolume;
|
||||
|
||||
//
|
||||
double canDoTrade = _XPROVIDER_CanDoTrade();
|
||||
|
||||
//
|
||||
signal.entry = entry;
|
||||
signal.volume = volume;
|
||||
signal.symbol = _Symbol;
|
||||
signal.type = X_SIGNAL_LONG;
|
||||
signal.magicNumber = _xPROVIDER_MagicNumber;
|
||||
signal.time = iTime(_Symbol, _Period, 0);
|
||||
signal.comment = "Grid _XPROVIDER_ Long";
|
||||
|
||||
//
|
||||
if (enable_XPROVIDER_Provider && _xPROVIDER_AllowLongTrades && _xPROVIDER_UseGridTrades && doTrade && canDoTrade)
|
||||
{
|
||||
//
|
||||
// Execute Signal ...
|
||||
result = _xPROVIDER_Trader.ExecuteSignal(signal);
|
||||
|
||||
//
|
||||
// Since this means an error happens, we have to log this error ...
|
||||
if (!result)
|
||||
{
|
||||
string errMessage = "failed to execute Long signal: " + (string)GetLastError();
|
||||
LogMessage(errMessage);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
result = false;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Alerts ...
|
||||
if (result)
|
||||
{
|
||||
//
|
||||
if (_xPROVIDER_EnableAlerts)
|
||||
{
|
||||
SendAlert(signal, true);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogExecutedSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell for Grid Trades...
|
||||
bool _XPROVIDER_HandleGridShort(
|
||||
XSignal &signal, // return structure if signal founded
|
||||
bool doTrade = true // do trade on signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
double bid = GetBid();
|
||||
bool canDoGridTrade = bid >= _xPROVIDER_GridShortPrice;
|
||||
if (_XPROVIDER_HasGridShortSignal() && _xPROVIDER_Trader.CountShorts() > 0 && canDoGridTrade)
|
||||
{
|
||||
//
|
||||
double entry = bid;
|
||||
double volume = _xPROVIDER_GridShortVolume;
|
||||
|
||||
//
|
||||
double canDoTrade = _XPROVIDER_CanDoTrade();
|
||||
|
||||
//
|
||||
signal.entry = entry;
|
||||
signal.volume = volume;
|
||||
signal.symbol = _Symbol;
|
||||
signal.type = X_SIGNAL_SHORT;
|
||||
signal.magicNumber = _xPROVIDER_MagicNumber;
|
||||
signal.time = iTime(_Symbol, _Period, 0);
|
||||
signal.comment = "Grid _XPROVIDER_ Short";
|
||||
|
||||
//
|
||||
if (enable_XPROVIDER_Provider && _xPROVIDER_AllowShortTrades && _xPROVIDER_UseGridTrades && doTrade && canDoTrade)
|
||||
{
|
||||
//
|
||||
// Execute Signal ...
|
||||
result = _xPROVIDER_Trader.ExecuteSignal(signal);
|
||||
|
||||
//
|
||||
// Since this means an error happens, we have to log this error ...
|
||||
if (!result)
|
||||
{
|
||||
string errMessage = "failed to execute Short signal: " + (string)GetLastError();
|
||||
LogMessage(errMessage);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
result = false;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Alerts ...
|
||||
if (result)
|
||||
{
|
||||
//
|
||||
if (_xPROVIDER_EnableAlerts)
|
||||
{
|
||||
SendAlert(signal, true);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogExecutedSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
void _XPROVIDER_HandleOpenTrades()
|
||||
{
|
||||
//
|
||||
// Primary Long Trade ...
|
||||
XSignal primaryLongSignal = {};
|
||||
bool isPrimaryLongSignalExecuted = _XPROVIDER_HandlePrimaryLong(primaryLongSignal);
|
||||
if (isPrimaryLongSignalExecuted)
|
||||
{
|
||||
//
|
||||
// Calculate Grid Long Conditions ...
|
||||
_XPROVIDER_CalculateGridLongConditions(primaryLongSignal);
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Short Trade ...
|
||||
XSignal primaryShortSignal = {};
|
||||
bool isPrimaryShortSignalExecuted = _XPROVIDER_HandlePrimaryShort(primaryShortSignal);
|
||||
if (isPrimaryShortSignalExecuted)
|
||||
{
|
||||
//
|
||||
// Calculate Grid Short Conditions ...
|
||||
_XPROVIDER_CalculateGridShortConditions(primaryShortSignal);
|
||||
}
|
||||
|
||||
//
|
||||
// Check Grid Trades ...
|
||||
if (_xPROVIDER_UseGridTrades)
|
||||
{
|
||||
//
|
||||
// Grid Long Trade ...
|
||||
XSignal gridLongSignal = {};
|
||||
bool isGridLongSignalExecuted = _XPROVIDER_HandleGridLong(gridLongSignal);
|
||||
if (isGridLongSignalExecuted)
|
||||
{
|
||||
//
|
||||
// Calculate Grid Long Conditions ...
|
||||
_XPROVIDER_CalculateGridLongConditions(gridLongSignal);
|
||||
}
|
||||
|
||||
//
|
||||
// Grid Short Trade ...
|
||||
XSignal gridShortSignal = {};
|
||||
bool isGridShortSignalExecuted = _XPROVIDER_HandleGridShort(gridShortSignal);
|
||||
if (isGridShortSignalExecuted)
|
||||
{
|
||||
//
|
||||
// Calculate Grid Short Conditions ...
|
||||
_XPROVIDER_CalculateGridShortConditions(gridShortSignal);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
void _XPROVIDER_HandleCloseTrades()
|
||||
{
|
||||
//
|
||||
// Handle Long/Buy Close ...
|
||||
if (_xPROVIDER_Trader.CountLongs() > 0 && _XPROVIDER_CanCloseLongTrades())
|
||||
{
|
||||
//
|
||||
_xPROVIDER_Trader.CloseLongPositions();
|
||||
|
||||
//
|
||||
// Reset Grid Long Conditions ...
|
||||
_xPROVIDER_GridLongPrice = 0;
|
||||
_xPROVIDER_GridLongVolume = 0;
|
||||
|
||||
//
|
||||
string message = "_XPROVIDER_ Closing Long Trades ...";
|
||||
|
||||
//
|
||||
if (_xPROVIDER_EnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell Close ...
|
||||
if (_xPROVIDER_Trader.CountShorts() > 0 && _XPROVIDER_CanCloseShortTrades())
|
||||
{
|
||||
//
|
||||
_xPROVIDER_Trader.CloseShortPositions();
|
||||
|
||||
//
|
||||
// Reset Grid Short Conditions ...
|
||||
_xPROVIDER_GridShortPrice = 0;
|
||||
_xPROVIDER_GridShortVolume = 0;
|
||||
|
||||
//
|
||||
string message = "_XPROVIDER_ Closing Short Trades ...";
|
||||
|
||||
//
|
||||
if (_xPROVIDER_EnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Calculating Volume for Tradings ...
|
||||
double _XPROVIDER_CalculateVolume()
|
||||
{
|
||||
//
|
||||
double result = _xPROVIDER_StaticVolume;
|
||||
if (!_xPROVIDER_UseDynamicVolume)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double accountBalance = _xPROVIDER_AccountInfo.GetBalance();
|
||||
double balanceIncreased = _xPROVIDER_BalanceIncreased;
|
||||
double volumeIncreased = _xPROVIDER_VolumeIncreased;
|
||||
|
||||
//
|
||||
result = (volumeIncreased * accountBalance) / balanceIncreased;
|
||||
|
||||
//
|
||||
// Normalize Volume ...
|
||||
result = NormalizeDouble(result, 2);
|
||||
|
||||
//
|
||||
double maxAvailableVolume = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MAX);
|
||||
double minAvailableVolume = SymbolInfoDouble(_Symbol, SYMBOL_VOLUME_MIN);
|
||||
|
||||
//
|
||||
// Validate Result ...
|
||||
if (result > maxAvailableVolume)
|
||||
{
|
||||
result = maxAvailableVolume;
|
||||
}
|
||||
else if (result < minAvailableVolume)
|
||||
{
|
||||
result = minAvailableVolume;
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Grid Long Trades Price and Volume ...
|
||||
void _XPROVIDER_CalculateGridLongConditions(XSignal &signal)
|
||||
{
|
||||
//
|
||||
// Check Grid Trades Enable ...
|
||||
if (!_xPROVIDER_UseGridTrades)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate GridLongPrice and GridLongVolume ...
|
||||
_xPROVIDER_GridLongVolume = NormalizeDouble(signal.volume * _xPROVIDER_GridVolumeMultiplier, 2);
|
||||
_xPROVIDER_GridLongPrice = NormalizeDouble(signal.entry - (_xPROVIDER_GridDistancePips * 10 * _Point), _Digits);
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Grid Short Trades Price and Volume ...
|
||||
void _XPROVIDER_CalculateGridShortConditions(XSignal &signal)
|
||||
{
|
||||
//
|
||||
// Check Grid Trades Enable ...
|
||||
if (!_xPROVIDER_UseGridTrades)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate GridShortPrice and GridShortVolume ...
|
||||
_xPROVIDER_GridShortVolume = NormalizeDouble(signal.volume * _xPROVIDER_GridVolumeMultiplier, 2);
|
||||
_xPROVIDER_GridShortPrice = NormalizeDouble(signal.entry + (_xPROVIDER_GridDistancePips * 10 * _Point), _Digits);
|
||||
}
|
||||
|
||||
//
|
||||
// Determine based on current account state
|
||||
bool _XPROVIDER_CanDoTrade()
|
||||
{
|
||||
//
|
||||
bool result = true;
|
||||
|
||||
//
|
||||
// TODO: Complete this ...
|
||||
|
||||
//
|
||||
return true;
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,925 @@
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XCHLH Oscillator Helper for Signal Providers
|
||||
// --------------------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Includes ...
|
||||
#include "..\Libraries\x-saherelm.log.lib.mq5"
|
||||
#include "..\Libraries\x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// START Enum Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// XCHLH Hot States ...
|
||||
enum ENUM_X_XCHLH_HOT_STATES
|
||||
{
|
||||
X_XCHLH_HOT_HH = 1,
|
||||
X_XCHLH_NEUTURAL = 0,
|
||||
X_XCHLH_HOT_LL = -1,
|
||||
};
|
||||
|
||||
//
|
||||
// XCHLH Signal Calculation Types ...
|
||||
enum ENUM_X_XCHLH_SIGNAL_TYPES
|
||||
{
|
||||
X_XCHLH_AVG_SIGNAL,
|
||||
X_XCHLH_DELTA_SIGNAL,
|
||||
};
|
||||
|
||||
//
|
||||
// XCHLH Buffer Lines ...
|
||||
enum ENUM_X_XCHLH_BUFFER_LINES
|
||||
{
|
||||
X_XCHLH_LC_HH_LINE = 0,
|
||||
X_XCHLH_LC_LL_LINE = 1,
|
||||
X_XCHLH_MC_HH_LINE = 2,
|
||||
X_XCHLH_MC_LL_LINE = 3,
|
||||
X_XCHLH_SC_HH_LINE = 4,
|
||||
X_XCHLH_SC_LL_LINE = 5,
|
||||
X_XCHLH_SIGNAL_T_LINE = 6,
|
||||
X_XCHLH_SIGNAL_B_LINE = 7,
|
||||
X_XCHLH_HOT_STATE_LINE = 8,
|
||||
};
|
||||
|
||||
//
|
||||
// END Enum Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
input group "XCHLH Oscillator";
|
||||
|
||||
//
|
||||
// Signal Calculations ...
|
||||
input group "XCHLH Signal Calculations";
|
||||
input ENUM_X_XCHLH_SIGNAL_TYPES xCHLHSignalType = X_XCHLH_AVG_SIGNAL; // Signal Method
|
||||
|
||||
//
|
||||
// Common ...
|
||||
input group "XCHLH Hot Areas";
|
||||
input bool xCHLHDrawHotAreas = false; // Draw Hot Areas Symbol
|
||||
input uchar xCHLHHotHHArrowCode = 234; // Hot HH Arrow Code
|
||||
input color xCHLHHotHHArrowColor = clrAqua; // Hot HH Arrow Color
|
||||
input uchar xCHLHHotLLArrowCode = 233; // Hot LL Arrow Code
|
||||
input color xCHLHHotLLArrowColor = clrFuchsia; // Hot LL Arrow Color
|
||||
|
||||
//
|
||||
// LC Inputs ...
|
||||
input group "XCHLH Long Cycle";
|
||||
input group "XCHLH LC Market";
|
||||
input int xCHLHLcLength = 288; // Length
|
||||
input double xCHLHLcThresholdInPips = 0.3; // Threshold In Pips
|
||||
input ENUM_SERIESMODE xCHLHLcHHMode = MODE_HIGH; // Highest High Calculation Method
|
||||
input ENUM_SERIESMODE xCHLHLcLLMode = MODE_LOW; // Lowest Low Calculation Method
|
||||
input group "XCHLH LC Style";
|
||||
input int xCHLHLcDrawWidth = 1; // Draw Width
|
||||
input ENUM_DRAW_TYPE xCHLHLcDrawType = DRAW_LINE; // Draw Type
|
||||
input ENUM_LINE_STYLE xCHLHLcDrawStyle = STYLE_DOT; // Draw Style
|
||||
input color xCHLHLcHHColor = clrAqua; // Highest High Color
|
||||
input color xCHLHLcLLColor = clrFuchsia; // Lowest Low Color
|
||||
input group "XCHLH LC Drawings";
|
||||
input bool xCHLHLcDrawHH = true; // Draw Highest High
|
||||
input bool xCHLHLcDrawLL = true; // Draw Lowest Low
|
||||
|
||||
//
|
||||
// MC Inputs ...
|
||||
input group "XCHLH Medium Cycle";
|
||||
input group "XCHLH MC Market";
|
||||
input int xCHLHMcLength = 72; // Length
|
||||
input double xCHLHMcThresholdInPips = 0.3; // Threshold In Pips
|
||||
input ENUM_SERIESMODE xCHLHMcHHMode = MODE_HIGH; // Highest High Calculation Method
|
||||
input ENUM_SERIESMODE xCHLHMcLLMode = MODE_LOW; // Lowest Low Calculation Method
|
||||
input group "XCHLH MC Style";
|
||||
input int xCHLHMcDrawWidth = 1; // Draw Width
|
||||
input ENUM_DRAW_TYPE xCHLHMcDrawType = DRAW_LINE; // Draw Type
|
||||
input ENUM_LINE_STYLE xCHLHMcDrawStyle = STYLE_DOT; // Draw Style
|
||||
input color xCHLHMcHHColor = clrLime; // Highest High Color
|
||||
input color xCHLHMcLLColor = clrRed; // Lowest Low Color
|
||||
input group "XCHLH MC Drawings";
|
||||
input bool xCHLHMcDrawHH = false; // Draw Highest High
|
||||
input bool xCHLHMcDrawLL = false; // Draw Lowest Low
|
||||
|
||||
//
|
||||
// SC Inputs ...
|
||||
input group "XCHLH Short Cycle";
|
||||
input group "XCHLH SC Market";
|
||||
input int xCHLHScLength = 7; // Length
|
||||
input double xCHLHScThresholdInPips = 0.3; // Threshold In Pips
|
||||
input ENUM_SERIESMODE xCHLHScHHMode = MODE_HIGH; // Highest High Calculation Method
|
||||
input ENUM_SERIESMODE xCHLHScLLMode = MODE_LOW; // Lowest Low Calculation Method
|
||||
input group "XCHLH SC Style";
|
||||
input int xCHLHScDrawWidth = 1; // Draw Width
|
||||
input ENUM_DRAW_TYPE xCHLHScDrawType = DRAW_LINE; // Draw Type
|
||||
input ENUM_LINE_STYLE xCHLHScDrawStyle = STYLE_DOT; // Draw Style
|
||||
input color xCHLHScHHColor = clrLightBlue; // Highest High Color
|
||||
input color xCHLHScLLColor = clrLightSalmon; // Lowest Low Color
|
||||
input group "XCHLH SC Drawings";
|
||||
input bool xCHLHScDrawHH = false; // Draw Highest High
|
||||
input bool xCHLHScDrawLL = false; // Draw Lowest Low
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Definitions ...
|
||||
//
|
||||
|
||||
int xCHLHHandler = INVALID_HANDLE;
|
||||
double xCHLHLcHHBuffer[];
|
||||
double xCHLHLcLLBuffer[];
|
||||
double xCHLHMcHHBuffer[];
|
||||
double xCHLHMcLLBuffer[];
|
||||
double xCHLHScHHBuffer[];
|
||||
double xCHLHScLLBuffer[];
|
||||
double xCHLHSignalTBuffer[];
|
||||
double xCHLHSignalBBuffer[];
|
||||
|
||||
//
|
||||
// END Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Handler Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Init Oscillators ...
|
||||
bool XCHLHInitHandlers()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XCHLH Handler ...
|
||||
ArraySetAsSeries(xCHLHLcHHBuffer, true);
|
||||
ArraySetAsSeries(xCHLHLcLLBuffer, true);
|
||||
ArraySetAsSeries(xCHLHMcHHBuffer, true);
|
||||
ArraySetAsSeries(xCHLHMcLLBuffer, true);
|
||||
ArraySetAsSeries(xCHLHScHHBuffer, true);
|
||||
ArraySetAsSeries(xCHLHScLLBuffer, true);
|
||||
ArraySetAsSeries(xCHLHSignalTBuffer, true);
|
||||
ArraySetAsSeries(xCHLHSignalBBuffer, true);
|
||||
xCHLHHandler = iCustom(
|
||||
_Symbol,
|
||||
_Period,
|
||||
"x-saherelm.xchlh.oscillator",
|
||||
//
|
||||
// Inputs ...
|
||||
//
|
||||
// Signal Calculations ...
|
||||
"",
|
||||
xCHLHSignalType,
|
||||
//
|
||||
// Commons ...
|
||||
"",
|
||||
xCHLHDrawHotAreas,
|
||||
xCHLHHotHHArrowCode,
|
||||
xCHLHHotHHArrowColor,
|
||||
xCHLHHotLLArrowCode,
|
||||
xCHLHHotLLArrowColor,
|
||||
//
|
||||
// LC ...
|
||||
"",
|
||||
"",
|
||||
xCHLHLcLength,
|
||||
xCHLHLcThresholdInPips,
|
||||
xCHLHLcHHMode,
|
||||
xCHLHLcLLMode,
|
||||
"",
|
||||
xCHLHLcDrawWidth,
|
||||
xCHLHLcDrawType,
|
||||
xCHLHLcDrawStyle,
|
||||
xCHLHLcHHColor,
|
||||
xCHLHLcLLColor,
|
||||
"",
|
||||
xCHLHLcDrawHH,
|
||||
xCHLHLcDrawLL,
|
||||
//
|
||||
// MC ...
|
||||
"",
|
||||
"",
|
||||
xCHLHMcLength,
|
||||
xCHLHMcThresholdInPips,
|
||||
xCHLHMcHHMode,
|
||||
xCHLHMcLLMode,
|
||||
"",
|
||||
xCHLHMcDrawWidth,
|
||||
xCHLHMcDrawType,
|
||||
xCHLHMcDrawStyle,
|
||||
xCHLHMcHHColor,
|
||||
xCHLHMcLLColor,
|
||||
"",
|
||||
xCHLHMcDrawHH,
|
||||
xCHLHMcDrawLL,
|
||||
//
|
||||
// SC ...
|
||||
"",
|
||||
"",
|
||||
xCHLHScLength,
|
||||
xCHLHScThresholdInPips,
|
||||
xCHLHScHHMode,
|
||||
xCHLHScLLMode,
|
||||
"",
|
||||
xCHLHScDrawWidth,
|
||||
xCHLHScDrawType,
|
||||
xCHLHScDrawStyle,
|
||||
xCHLHScHHColor,
|
||||
xCHLHScLLColor,
|
||||
"",
|
||||
xCHLHScDrawHH,
|
||||
xCHLHScDrawLL);
|
||||
if (xCHLHHandler == INVALID_HANDLE)
|
||||
{
|
||||
//
|
||||
LogMessage("failed to Initialize XCHLH Indicator: " + (string)GetLastError());
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Oscillators ...
|
||||
void XCHLHReleaseHandlers()
|
||||
{
|
||||
IndicatorRelease(xCHLHHandler);
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XCHLHReadBuffers(
|
||||
int xCHLHItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
// XCHLH LC HH Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_LC_HH_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHLcHHBuffer);
|
||||
|
||||
//
|
||||
// XCHLH LC LL Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_LC_LL_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHLcLLBuffer);
|
||||
|
||||
//
|
||||
// XCHLH MC HH Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_MC_HH_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHMcHHBuffer);
|
||||
|
||||
//
|
||||
// XCHLH MC LL Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_MC_LL_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHMcLLBuffer);
|
||||
|
||||
//
|
||||
// XCHLH SC HH Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_SC_HH_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHScHHBuffer);
|
||||
|
||||
//
|
||||
// XCHLH SC LL Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_SC_LL_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHScLLBuffer);
|
||||
|
||||
//
|
||||
// XCHLH Signal T Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_SIGNAL_T_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHSignalTBuffer);
|
||||
|
||||
//
|
||||
// XCHLH Signal B Buffer ...
|
||||
CopyBuffer(
|
||||
xCHLHHandler,
|
||||
X_XCHLH_SIGNAL_B_LINE,
|
||||
0,
|
||||
xCHLHItemsPerTick,
|
||||
xCHLHSignalBBuffer);
|
||||
}
|
||||
|
||||
//
|
||||
// END Handler Funcions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Signal Related Conditions ...
|
||||
//
|
||||
|
||||
//
|
||||
// XCHLH Long Conditions ...
|
||||
bool XCHLHHasLongConditions(
|
||||
int xCHLHItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isSignalBCrossedOverLCLL = XCHLHIsSignalBCrossedOverLCLL(1);
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isSignalBCrossedOverLCLL
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// XCHLH Close Long Conditions ...
|
||||
bool XCHLHHasLongCloseConditions(
|
||||
int xCHLHItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
) {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isSignalBCrossedOverSignalT = XCHLHIsSignalBCrossedOverSignalT(1);
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isSignalBCrossedOverSignalT
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// XCHLH Short Conditions ...
|
||||
bool XCHLHHasShortConditions(
|
||||
int xCHLHItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isSignalBCrossedUnderSignalT = XCHLHIsSignalBCrossedUnderSignalT(1);
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isSignalBCrossedUnderSignalT
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// XCHLH Close Short Conditions ...
|
||||
bool XCHLHHasShortCloseConditions(
|
||||
int xCHLHItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isSignalBCrossedUnderLCLL = XCHLHIsSignalBCrossedUnderLCLL(1);
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isSignalBCrossedUnderLCLL
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END Signal Related Conditions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START XCHLH Custom Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Check Signal B Crossed Over LC LL ...
|
||||
bool XCHLHIsSignalBCrossedOverLCLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossOver(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHLcLLBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Over LC LL ...
|
||||
bool XCHLHIsSignalBOverLCLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsOver(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHLcLLBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Crossed Under LC LL ...
|
||||
bool XCHLHIsSignalBCrossedUnderLCLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossUnder(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHLcLLBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Under LC LL ...
|
||||
bool XCHLHIsSignalBUnderLCLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsUnder(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHLcLLBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Crossed Over Signal T ...
|
||||
bool XCHLHIsSignalBCrossedOverSignalT(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossOver(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHSignalTBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Over Signal T ...
|
||||
bool XCHLHIsSignalBOverSignalT(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsOver(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHSignalTBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Crossed Under Signal T ...
|
||||
bool XCHLHIsSignalBCrossedUnderSignalT(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossUnder(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHSignalTBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal B Under Signal T ...
|
||||
bool XCHLHIsSignalBUnderSignalT(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 2))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsUnder(
|
||||
xCHLHSignalBBuffer,
|
||||
xCHLHSignalTBuffer,
|
||||
bar_index);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check LC and MC has Same HH ...
|
||||
bool XCHLHIsLCMCHasSameHH(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double lcValue = xCHLHLcHHBuffer[bar_index];
|
||||
double mcValue = xCHLHMcHHBuffer[bar_index];
|
||||
|
||||
//
|
||||
result = lcValue == mcValue;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check LC and MC has Same LL ...
|
||||
bool XCHLHIsLCMCHasSameLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double lcValue = xCHLHLcLLBuffer[bar_index];
|
||||
double mcValue = xCHLHMcLLBuffer[bar_index];
|
||||
|
||||
//
|
||||
result = lcValue == mcValue;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check LC and SC has Same HH ...
|
||||
bool XCHLHIsLCSCHasSameHH(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double lcValue = xCHLHLcHHBuffer[bar_index];
|
||||
double scValue = xCHLHScHHBuffer[bar_index];
|
||||
|
||||
//
|
||||
result = lcValue == scValue;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check LC and SC has Same LL ...
|
||||
bool XCHLHIsLCSCHasSameLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double lcValue = xCHLHLcLLBuffer[bar_index];
|
||||
double scValue = xCHLHScLLBuffer[bar_index];
|
||||
|
||||
//
|
||||
result = lcValue == scValue;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check MC and SC has Same HH ...
|
||||
bool XCHLHIsMCSCHasSameHH(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double mcValue = xCHLHMcHHBuffer[bar_index];
|
||||
double scValue = xCHLHScHHBuffer[bar_index];
|
||||
|
||||
//
|
||||
result = mcValue == scValue;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check MC and SC has Same LL ...
|
||||
bool XCHLHIsMCSCHasSameLL(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double mcValue = xCHLHMcLLBuffer[bar_index];
|
||||
double scValue = xCHLHScLLBuffer[bar_index];
|
||||
|
||||
//
|
||||
result = mcValue == scValue;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Is Same Highest Highs ...
|
||||
bool XCHLHIsSameHHs(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double lcValue = xCHLHLcHHBuffer[bar_index];
|
||||
double mcValue = xCHLHMcHHBuffer[bar_index];
|
||||
double scValue = xCHLHScHHBuffer[bar_index];
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
lcValue == mcValue &&
|
||||
mcValue == scValue
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Is Same Lowest Lows ...
|
||||
bool XCHLHIsSameLLs(
|
||||
int bar_index // Specified Bar Index ...
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (!XCHLHIsValidBufferSizes(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double lcValue = xCHLHLcLLBuffer[bar_index];
|
||||
double mcValue = xCHLHMcLLBuffer[bar_index];
|
||||
double scValue = xCHLHScLLBuffer[bar_index];
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
lcValue == mcValue &&
|
||||
mcValue == scValue
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check and Validate Buffer Sizes ...
|
||||
bool XCHLHIsValidBufferSizes(
|
||||
int size // Specified Min Size
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
ArraySize(xCHLHLcHHBuffer) > size &&
|
||||
ArraySize(xCHLHLcLLBuffer) > size &&
|
||||
//
|
||||
ArraySize(xCHLHMcHHBuffer) > size &&
|
||||
ArraySize(xCHLHMcLLBuffer) > size &&
|
||||
//
|
||||
ArraySize(xCHLHScHHBuffer) > size &&
|
||||
ArraySize(xCHLHScLLBuffer) > size;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END XCHLH Custom Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,166 @@
|
||||
///////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XCHLH Signal Provider Indicators Library
|
||||
// ----------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Include Provider Inputs ...
|
||||
#include "x-saherelm.xchlh.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// Imports all Indicators Helper here ...
|
||||
input group "XCHLH Provider Indicators";
|
||||
#include "x-saherelm.xchlh.oscillator.helper.lib.mq5";
|
||||
|
||||
//
|
||||
int xCHLHMaxLengthOfInputs = 0;
|
||||
int xCHLHCalculatedBars = 0;
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool XCHLHInitIndicators()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check and Calculate Max Length in Inputs ...
|
||||
xCHLHMaxLengthOfInputs = MathMax(
|
||||
xCHLHLcLength,
|
||||
xCHLHMcLength);
|
||||
xCHLHMaxLengthOfInputs = MathMax(
|
||||
xCHLHScLength,
|
||||
xCHLHMaxLengthOfInputs);
|
||||
xCHLHMaxLengthOfInputs = MathMax(
|
||||
xCHLHNumberOfItemsPerTick,
|
||||
xCHLHMaxLengthOfInputs);
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XCHLH Init ...
|
||||
result = XCHLHInitHandlers();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void XCHLHReleaseIndicators()
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XCHLHReleaseHandlers();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XCHLHHandleReadingBuffers()
|
||||
{
|
||||
//
|
||||
// Reading Calculated Bars for a Simple Handler ...
|
||||
xCHLHCalculatedBars = BarsCalculated(xCHLHHandler);
|
||||
|
||||
//
|
||||
// Read Indicators Buffers ...
|
||||
XCHLHReadBuffers(xCHLHNumberOfItemsPerTick);
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// START Combination Functions ...
|
||||
//
|
||||
//
|
||||
|
||||
//
|
||||
// Can Open Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XCHLHCanOpenLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XCHLHHasLongConditions(xCHLHNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XCHLHCanCloseLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// result = XCHLHHasLongCloseConditions(xCHLHNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Open Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XCHLHCanOpenShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XCHLHHasShortConditions(xCHLHNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XCHLHCanCloseShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// result = XCHLHHasShortCloseConditions(xCHLHNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// END Combination Functions ...
|
||||
//
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,64 @@
|
||||
///////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XCHLH Signal Provider Library Inputs
|
||||
// -----------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
input group "XCHLH Provider";
|
||||
|
||||
//
|
||||
input group "XCHLH Common";
|
||||
input bool xCHLHEnableProvider = true; // Enable Provider
|
||||
input bool xCHLHEnableAlerts = false; // Enable Events Alert
|
||||
input int xCHLHNumberOfItemsPerTick = 110; // Number Of items Readed In Each Tick
|
||||
|
||||
//
|
||||
input group "XCHLH Trader";
|
||||
input int xCHLHMagicNumber = 16940562; // Trader MagicNumber
|
||||
input int xCHLHSlippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "XCHLH Trade Management";
|
||||
input bool xCHLHAllowLongTrades = true; // Allow Long Trades
|
||||
input bool xCHLHAllowShortTrades = true; // Allow Short Trades
|
||||
|
||||
//
|
||||
input group "XCHLH Risk Management";
|
||||
input int xCHLHMaxAllowedTrades = 5; // Max Allowed Trades at Same Time
|
||||
input int xCHLHMaxInProfitTradeAge = 0; // Max In Profit Trades Age
|
||||
input int xCHLHMaxInDrawDownTradeAge = 576; // Max In DrawDown Trades Age
|
||||
input double xCHLHStaticVolume = 0.02; // Static Volume
|
||||
input double xCHLHVolumeMultiplier = 2; // Volume Multiplier
|
||||
input double xCHLHMinRewardPerTradeInPips = 2; // Min Reward Per Trade In Pips
|
||||
input double xCHLHFreeMarginFactorForOpenTrades = 0.5; // Minimum Free Marging for Open Trades
|
||||
input double xCHLHBalanceFactorForOpenTrades = 0.5; // Minimum Balance for Open Trades
|
||||
// input bool xCHLHEnableSupportTrades = true; // Enable Support Trade
|
||||
input int xCHLHMaxAllowedSupportTrades = 5; // Max Allowed Support Trade
|
||||
|
||||
//
|
||||
// Validate Inputs before Initialization ...
|
||||
bool XCHLHValidateInputs()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Fix this ...
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
File diff suppressed because it is too large
Load Diff
Binary file not shown.
File diff suppressed because it is too large
Load Diff
Binary file not shown.
@@ -0,0 +1,165 @@
|
||||
///////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XCHMA Signal Provider Indicators Library
|
||||
// ----------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Include Provider Inputs ...
|
||||
#include "x-saherelm.xchma.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// Imports all Indicators Helper here ...
|
||||
input group "XCHMA Provider Indicators";
|
||||
#include "x-saherelm.xchma.oscillator.helper.lib.mq5";
|
||||
|
||||
//
|
||||
int xCHMAMaxLengthOfInputs = 0;
|
||||
int xCHMACalculatedBars = 0;
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool XCHMAInitIndicators()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check and Calculate Max Length in Inputs ...
|
||||
xCHMAMaxLengthOfInputs = MathMax(
|
||||
xCHMAScFastLength,
|
||||
xCHMAScSlowLength);
|
||||
xCHMAMaxLengthOfInputs = MathMax(
|
||||
xCHMAMcFastLength,
|
||||
xCHMAMaxLengthOfInputs);
|
||||
xCHMAMaxLengthOfInputs = MathMax(
|
||||
xCHMAMcSlowLength,
|
||||
xCHMAMaxLengthOfInputs);
|
||||
xCHMAMaxLengthOfInputs = MathMax(
|
||||
xCHMALcFastLength,
|
||||
xCHMAMaxLengthOfInputs);
|
||||
xCHMAMaxLengthOfInputs = MathMax(
|
||||
xCHMALcSlowLength,
|
||||
xCHMAMaxLengthOfInputs);
|
||||
xCHMAMaxLengthOfInputs = MathMax(
|
||||
xCHMANumberOfItemsPerTick,
|
||||
xCHMAMaxLengthOfInputs);
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XCHMA Init ...
|
||||
result = XCHMAInitHandlers();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void XCHMAReleaseIndicators()
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XCHMAReleaseHandlers();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XCHMAHandleReadingBuffers()
|
||||
{
|
||||
//
|
||||
// Reading Calculated Bars for a Simple Handler ...
|
||||
xCHMACalculatedBars = BarsCalculated(xCHMAHandler);
|
||||
|
||||
//
|
||||
// Read Indicators Buffers ...
|
||||
XCHMAReadBuffers(xCHMANumberOfItemsPerTick);
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// START Combination Functions ...
|
||||
//
|
||||
//
|
||||
|
||||
//
|
||||
// Can Open Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XCHMACanOpenLongTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XCHMAHasLongConditions(xCHMANumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XCHMACanCloseLongTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Open Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XCHMACanOpenShortTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XCHMAHasShortConditions(xCHMANumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XCHMACanCloseShortTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// END Combination Functions ...
|
||||
//
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,63 @@
|
||||
///////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XCHMA Signal Provider Library Inputs
|
||||
// -----------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
input group "XCHMA Provider";
|
||||
|
||||
//
|
||||
input group "XCHMA Common";
|
||||
input bool xCHMAEnableProvider = true; // Enable Provider
|
||||
input bool xCHMAEnableAlerts = false; // Enable Events Alert
|
||||
input int xCHMANumberOfItemsPerTick = 110; // Number Of items Readed In Each Tick
|
||||
|
||||
//
|
||||
input group "XCHMA Trader";
|
||||
input int xCHMAMagicNumber = 16940562; // Trader MagicNumber
|
||||
input int xCHMASlippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "XCHMA Trade Management";
|
||||
input bool xCHMAAllowLongTrades = true; // Allow Long Trades
|
||||
input bool xCHMAAllowShortTrades = true; // Allow Short Trades
|
||||
|
||||
//
|
||||
input group "XCHMA Risk Management";
|
||||
input int xCHMAMaxAllowedTrades = 5; // Max Allowed Trades at Same Time
|
||||
input int xCHMAMaxInProfitTradeAge = 0; // Max In Profit Trades Age
|
||||
input int xCHMAMaxInDrawDownTradeAge = 576; // Max In DrawDown Trades Age
|
||||
input double xCHMAStaticVolume = 0.02; // Static Volume
|
||||
input double xCHMAVolumeMultiplier = 2; // Volume Multiplier
|
||||
input double xCHMAMinRewardPerTradeInPips = 2; // Min Reward Per Trade In Pips
|
||||
input double xCHMAFreeMarginFactorForOpenTrades = 0.5; // Minimum Free Marging for Open Trades
|
||||
input double xCHMABalanceFactorForOpenTrades = 0.5; // Minimum Balance for Open Trades
|
||||
input bool xCHMAEnableSupportTrades = false; // Enable Support Trade
|
||||
|
||||
//
|
||||
// Validate Inputs before Initialization ...
|
||||
bool XCHMAValidateInputs()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Fix this ...
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
@@ -0,0 +1,861 @@
|
||||
////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XCHMA Signal Provider Library
|
||||
// --------------------------------------------------------
|
||||
// Name: XCHMASignalProvider
|
||||
// Description: XCHMA based signal provider ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
#define XCHMAProviderName "XCHMA"
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
#include "x-saherelm.xchma.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Include Common Library ...
|
||||
#include "x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Logger Library ...
|
||||
#include "x-saherelm.log.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Alert Library ...
|
||||
#include "x-saherelm.alert.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Draw Library ...
|
||||
#include "x-saherelm.draw.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Class Libraries ...
|
||||
#include "x-saherelm.class.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
XCTrade *xCHMATrader;
|
||||
XCAccountInfo xCHMAAccountInfo;
|
||||
|
||||
//
|
||||
#include "x-saherelm.xchma.provider.indicators.lib.mq5"
|
||||
|
||||
//
|
||||
double xCHMADeposit = 0;
|
||||
double xCHMABalance = 0;
|
||||
double xCHMAFreeMargin = 0;
|
||||
double xCHMAFreeMarginForOpenTrades = 0;
|
||||
double xCHMABalanceForOpenTrades = 0;
|
||||
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool XCHMAInitSignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
result = XCHMAValidateInputs();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
result = XCHMAInitIndicators();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Account Deposit ...
|
||||
xCHMADeposit = xCHMAAccountInfo.GetInitialBalance();
|
||||
|
||||
//
|
||||
// Calculate Min Balance for Trades ...
|
||||
if (xCHMABalanceFactorForOpenTrades > 0)
|
||||
{
|
||||
xCHMABalanceForOpenTrades = xCHMABalanceFactorForOpenTrades * xCHMADeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Claculate Min Free Marging for Trades ...
|
||||
if (xCHMAFreeMarginFactorForOpenTrades > 0)
|
||||
{
|
||||
xCHMAFreeMarginForOpenTrades = xCHMAFreeMarginFactorForOpenTrades * xCHMADeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Make XCTrader instance ...
|
||||
xCHMATrader = new XCTrade(
|
||||
_Symbol,
|
||||
xCHMASlippage,
|
||||
xCHMAMagicNumber);
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XCHMAIssueInitializationSucceedAlert();
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void XCHMADeinitSignalProviderLibrary(
|
||||
const int reason)
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XCHMAReleaseIndicators();
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XCHMAIssueDeinitializationSucceedAlert();
|
||||
}
|
||||
|
||||
//
|
||||
// this is a Globally Function which do all of
|
||||
// checkings and positions handling ...
|
||||
void XCHMASignalProviderHandleTick()
|
||||
{
|
||||
//
|
||||
// Update account Balance ...
|
||||
xCHMABalance = xCHMAAccountInfo.GetBalance();
|
||||
xCHMAFreeMargin = xCHMAAccountInfo.GetFreeMargin();
|
||||
|
||||
//
|
||||
// Check Provider is Enable or Not ...
|
||||
if (!xCHMAEnableProvider) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Reading Indicator Buffers ...
|
||||
XCHMAHandleReadingBuffers();
|
||||
if (xCHMACalculatedBars < xCHMAMaxLengthOfInputs)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
XCHMAHandleOpenTrades();
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
XCHMAHandleCloseTrades();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
void XCHMAHandleOpenTrades()
|
||||
{
|
||||
//
|
||||
// Check Can Trade ...
|
||||
bool canTrade = xCHMAAllowLongTrades || xCHMAAllowShortTrades;
|
||||
if (!canTrade)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// First Check Signal Exists or NOt ...
|
||||
bool xCHMAHasLongSignal = XCHMACanOpenLongTrade();
|
||||
bool xCHMAHasShortSignal = XCHMACanOpenShortTrade();
|
||||
if (!xCHMAHasLongSignal && !xCHMAHasShortSignal)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Max Open Trades ...
|
||||
if (xCHMAMaxAllowedTrades > 0)
|
||||
{
|
||||
//
|
||||
int count = xCHMATrader.Count();
|
||||
bool canOpenTrade = count < xCHMAMaxAllowedTrades;
|
||||
if (!canOpenTrade)
|
||||
{
|
||||
//
|
||||
XCHMAIssueMaxAllowedTradesReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Check Free Margin ...
|
||||
if (xCHMAFreeMargin <= xCHMAFreeMarginForOpenTrades)
|
||||
{
|
||||
//
|
||||
XCHMAIssueMaxAllowedFreeMarginReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Account Balance ...
|
||||
if (xCHMABalance <= xCHMABalanceForOpenTrades)
|
||||
{
|
||||
//
|
||||
XCHMAIssueMinAllowedBalanceReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Long Trade ...
|
||||
if (
|
||||
xCHMAHasLongSignal &&
|
||||
xCHMAAllowLongTrades)
|
||||
{
|
||||
//
|
||||
bool isLongSignalExecuted = XCHMAOpenLongPosition();
|
||||
if (isLongSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Short Trade ...
|
||||
if (
|
||||
xCHMAHasShortSignal &&
|
||||
xCHMAAllowShortTrades)
|
||||
{
|
||||
//
|
||||
bool isShortSignalExecuted = XCHMAOpenShortPosition();
|
||||
if (isShortSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
void XCHMAHandleCloseTrades()
|
||||
{
|
||||
//
|
||||
// Handle Long/Buy Close ...
|
||||
if (xCHMATrader.CountLongs() > 0 && XCHMACanCloseLongTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xCHMATrader.CloseLongPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XCHMAIssueForceCloseTradesAlert(X_SIGNAL_LONG);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell Close ...
|
||||
if (xCHMATrader.CountShorts() > 0 && XCHMACanCloseShortTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xCHMATrader.CloseShortPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XCHMAIssueForceCloseTradesAlert(X_SIGNAL_SHORT);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In Profit Teades ...
|
||||
if (xCHMAMaxInProfitTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xCHMATrader.GetLongTimeTrades(
|
||||
xCHMAMaxInProfitTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit < 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
bool isClosed = xCHMATrader.Close(trade.ticket);
|
||||
if (isClosed)
|
||||
{
|
||||
Add(
|
||||
trade,
|
||||
closed);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XCHMAIssueLongInProfitTradeClosed();
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In DrawDown Trades ...
|
||||
if (xCHMAMaxInDrawDownTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xCHMATrader.GetLongTimeTrades(
|
||||
xCHMAMaxInDrawDownTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit > 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Grid Trades ...
|
||||
XCHMAOpenSuppurtTrade(trade);
|
||||
|
||||
// //
|
||||
// bool isClosed = xCHMATrader.Close(trade.ticket);
|
||||
// if (isClosed)
|
||||
// {
|
||||
// //
|
||||
// Add(
|
||||
// trade,
|
||||
// closed);
|
||||
// }
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XCHMAIssueLongInDrawdownTradeClosed();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Open Long Position ...
|
||||
bool XCHMAOpenLongPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XCHMAGeneratePositionSignal(X_SIGNAL_LONG);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xCHMAMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xCHMATrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XCHMAIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Short Position ...
|
||||
bool XCHMAOpenShortPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XCHMAGeneratePositionSignal(X_SIGNAL_SHORT);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xCHMAMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xCHMATrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XCHMAIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open a Support Signal ...
|
||||
bool XCHMAOpenSuppurtTrade(
|
||||
XSignal &signal // Parent Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (!xCHMAEnableSupportTrades) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Validate Signal ...
|
||||
if (!IsValid(signal, xCHMAMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Market Conditions ...
|
||||
bool hasLongSignal = XCHMACanOpenLongTrade();
|
||||
bool hasShortSignal = XCHMACanOpenShortTrade();
|
||||
|
||||
//
|
||||
ENUM_X_SIGNAL_TYPE type = X_SIGNAL_UNKNOWN;
|
||||
|
||||
//
|
||||
// Detect Support Signal Direction ...
|
||||
XSignal support = {};
|
||||
switch (signal.type)
|
||||
{
|
||||
//
|
||||
case X_SIGNAL_LONG:
|
||||
//
|
||||
// First Check Long Support ...
|
||||
// Then Look for Short Support ...
|
||||
if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
|
||||
//
|
||||
case X_SIGNAL_SHORT:
|
||||
// First Check Short Support ...
|
||||
// Then Look for Long Support ...
|
||||
if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
//
|
||||
if (type == X_SIGNAL_UNKNOWN)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
// Find Common Used ...
|
||||
double entry = GetEntry(type);
|
||||
double volumeMultiplier = 2;
|
||||
if (xCHMAVolumeMultiplier > 2)
|
||||
{
|
||||
volumeMultiplier = xCHMAVolumeMultiplier;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal is Support ot nor ...
|
||||
int titlePosition = StringFind(
|
||||
signal.comment,
|
||||
"Support");
|
||||
bool isSupport = titlePosition >= 0;
|
||||
double priceDistance = MathAbs(signal.entry - entry);
|
||||
|
||||
//
|
||||
if (isSupport || priceDistance < PipsToPrice(5)) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
double volume = NormalizeVolume(isSupport ? signal.volume : signal.volume * volumeMultiplier);
|
||||
string comment = "Support_" + GetSignalType(type) + "_For_" + (string)signal.ticket + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XCHMACalculateTPSL(type);
|
||||
if (!IsValid(tpSL))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate reward of signal ...
|
||||
double reward = MathAbs(signal.entry - signal.tp) / 2;
|
||||
double tp = tpSL.sl; // isLong ? entry + reward : entry - reward;
|
||||
double sl = tpSL.sl;
|
||||
|
||||
//
|
||||
// Filling Support Signal ...
|
||||
support.tp = tp;
|
||||
support.sl = sl;
|
||||
support.type = type;
|
||||
support.time = time;
|
||||
support.entry = entry;
|
||||
support.volume = volume;
|
||||
support.symbol = _Symbol;
|
||||
support.comment = comment;
|
||||
support.magicNumber = xCHMAMagicNumber;
|
||||
|
||||
//
|
||||
// Validate Generated Support ...
|
||||
if (!IsValid(support, xCHMAMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = xCHMATrader.ExecuteSignal(support);
|
||||
if (result)
|
||||
{
|
||||
XCHMAIssueSignalExecutionAlert(support);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Generate Specific type of Signals for Trading ...
|
||||
XSignal XCHMAGeneratePositionSignal(
|
||||
ENUM_X_SIGNAL_TYPE type // direction of position
|
||||
)
|
||||
{
|
||||
//
|
||||
XSignal result = {};
|
||||
|
||||
//
|
||||
if (type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double entry = GetEntry(type);
|
||||
|
||||
//
|
||||
double volume = XCHMACalculateVolume();
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
|
||||
//
|
||||
string typeString = GetSignalType(type);
|
||||
string comment = XCHMAProviderName + "_" + typeString + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XCHMACalculateTPSL(type);
|
||||
if (IsValid(tpSL))
|
||||
{
|
||||
//
|
||||
// Apply TP ...
|
||||
if (tpSL.tp > 0)
|
||||
{
|
||||
result.tp = tpSL.tp;
|
||||
}
|
||||
|
||||
//
|
||||
// Apply SL ...
|
||||
if (tpSL.sl > 0)
|
||||
{
|
||||
result.sl = tpSL.sl;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.time = time;
|
||||
result.entry = entry;
|
||||
result.volume = volume;
|
||||
result.symbol = _Symbol;
|
||||
result.comment = comment;
|
||||
result.magicNumber = xCHMAMagicNumber;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Private Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Calculating Volume for Tradings ...
|
||||
double XCHMACalculateVolume()
|
||||
{
|
||||
//
|
||||
// Assign default Value ...
|
||||
double result = xCHMAStaticVolume;
|
||||
|
||||
//
|
||||
// we can count open trades and in draw down trades
|
||||
// then do check volume based on it for gridding ...
|
||||
int openTrades = xCHMATrader.Count();
|
||||
if (openTrades == 0)
|
||||
{
|
||||
openTrades = 1;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Normalized Multiplier ...
|
||||
double multiplier = xCHMAVolumeMultiplier <= 0 ? 1 : xCHMAVolumeMultiplier;
|
||||
|
||||
//
|
||||
result = multiplier * openTrades * xCHMAStaticVolume;
|
||||
|
||||
//
|
||||
// Normalize Volume ...
|
||||
result = NormalizeVolume(result);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Signal TP and SL ...
|
||||
XTPSL XCHMACalculateTPSL(
|
||||
ENUM_X_SIGNAL_TYPE type // Position Type
|
||||
)
|
||||
{
|
||||
//
|
||||
XTPSL result = {};
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (
|
||||
type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double spread = GetSpread();
|
||||
double entry = isLong ? ask : bid;
|
||||
|
||||
//
|
||||
// TODO: Find Risk ..
|
||||
double risk = 0;
|
||||
|
||||
//
|
||||
// Calculate Reward ...
|
||||
double reward = PipsToPrice(xCHMAMinRewardPerTradeInPips) + spread;
|
||||
|
||||
//
|
||||
// Calculate TP and SL ...
|
||||
double tp = isLong ? entry + reward : entry - reward;
|
||||
double sl = 0;
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.tp = tp;
|
||||
result.sl = sl;
|
||||
result.entry = entry;
|
||||
//
|
||||
// TODO: Calculate R2R ...
|
||||
result.r2r = 0;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
void XCHMAIssueInitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "Initializion of (" + XCHMAProviderName + " Provider" + " _ " + _Symbol + " _ " + EnumToString(_Period) + ") Succeeded ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueDeinitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "De Initializion of (" + XCHMAProviderName + " Provider" + ") Succeeded ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueForceCloseTradesAlert(ENUM_X_SIGNAL_TYPE type) {
|
||||
//
|
||||
string typeStr = GetSignalType(type);
|
||||
if (StringLen(typeStr) == 0) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
string message = "Force Close " + typeStr + " Trades ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueMaxAllowedTradesReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached Max Allowed Same Time Trades ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueMaxAllowedFreeMarginReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached FreeMarigin For Open Trades ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueMinAllowedBalanceReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "doesn't have Minimum Balance For Open Trades ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueSignalExecutionAlert(
|
||||
XSignal &signal // Executed Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
XCHMAIssueAlert(signal);
|
||||
}
|
||||
|
||||
void XCHMAIssueLongInProfitTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueLongInDrawdownTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XCHMAIssueAlert(message);
|
||||
}
|
||||
|
||||
void XCHMAIssueAlert(string message)
|
||||
{
|
||||
//
|
||||
if (xCHMAEnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
void XCHMAIssueAlert(XSignal &signal)
|
||||
{
|
||||
//
|
||||
if (xCHMAEnableAlerts)
|
||||
{
|
||||
SendAlert(signal);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// END Private Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,279 @@
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XOBD Oscillator Helper for Signal Providers
|
||||
// --------------------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Includes ...
|
||||
#include "..\Libraries\x-saherelm.log.lib.mq5"
|
||||
#include "..\Libraries\x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// START Enum Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// XOBD Oscillator Buffer Lines ...
|
||||
enum ENUM_X_XOBD_BUFFER_LINES
|
||||
{
|
||||
X_XOBD_SWING_HIGH_LINE = 0,
|
||||
X_XOBD_SWING_LOW_LINE = 1,
|
||||
X_XOBD_SIGNAL_LINE = 2,
|
||||
};
|
||||
|
||||
//
|
||||
// END Enum Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
input group "XOBD Oscillator";
|
||||
input int xOBDLength = 72; // Market Length
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Definitions ...
|
||||
//
|
||||
|
||||
int xOBDHandler = INVALID_HANDLE;
|
||||
double xOBDSwingHighBuffer[];
|
||||
double xOBDSwingLowBuffer[];
|
||||
double xOBDSignalBuffer[];
|
||||
|
||||
//
|
||||
// END Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Handler Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Init Oscillators ...
|
||||
bool XOBDInitHandlers()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XOBD Handler ...
|
||||
ArraySetAsSeries(xOBDSwingHighBuffer, true);
|
||||
ArraySetAsSeries(xOBDSwingLowBuffer, true);
|
||||
ArraySetAsSeries(xOBDSignalBuffer, true);
|
||||
xOBDHandler = iCustom(
|
||||
_Symbol,
|
||||
_Period,
|
||||
"x-saherelm.xobd.oscillator",
|
||||
//
|
||||
// Inputs ...
|
||||
xOBDLength
|
||||
//
|
||||
);
|
||||
if (xOBDHandler == INVALID_HANDLE)
|
||||
{
|
||||
//
|
||||
LogMessage("failed to Initialize XOBD Oscillator: " + (string)GetLastError());
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Oscillators ...
|
||||
void XOBDReleaseHandlers()
|
||||
{
|
||||
IndicatorRelease(xOBDHandler);
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XOBDReadBuffers(
|
||||
int xOBDItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
// XOBD Swing High ...
|
||||
CopyBuffer(
|
||||
xOBDHandler,
|
||||
X_XOBD_SWING_HIGH_LINE,
|
||||
0,
|
||||
xOBDItemsPerTick,
|
||||
xOBDSwingHighBuffer);
|
||||
|
||||
//
|
||||
// XOBD Swing Low ...
|
||||
CopyBuffer(
|
||||
xOBDHandler,
|
||||
X_XOBD_SWING_LOW_LINE,
|
||||
0,
|
||||
xOBDItemsPerTick,
|
||||
xOBDSwingLowBuffer);
|
||||
|
||||
//
|
||||
// XOBD Signal ...
|
||||
CopyBuffer(
|
||||
xOBDHandler,
|
||||
X_XOBD_SIGNAL_LINE,
|
||||
0,
|
||||
xOBDItemsPerTick,
|
||||
xOBDSignalBuffer);
|
||||
}
|
||||
|
||||
//
|
||||
// END Handler Funcions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Signal Related Conditions ...
|
||||
//
|
||||
|
||||
//
|
||||
// XOBD Long Conditions ...
|
||||
bool XOBDHasLongConditions(
|
||||
int xOBDItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isVale = XOBDIsVale();
|
||||
bool isInPeak = IsInPeak(
|
||||
xOBDItemsPerTick,
|
||||
xOBDSignalBuffer);
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isVale
|
||||
//
|
||||
&&
|
||||
//
|
||||
!isInPeak
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// XOBD Short Conditions ...
|
||||
bool XOBDHasShortConditions(
|
||||
int xOBDItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END Signal Related Conditions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START XOBD Custom Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Check SC is Peak ...
|
||||
bool XOBDIsPeak()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isIncreasing = IsIncreasing(
|
||||
10,
|
||||
3,
|
||||
xOBDSignalBuffer);
|
||||
|
||||
//
|
||||
bool isDecreasing = IsDecreasing(
|
||||
3,
|
||||
1,
|
||||
xOBDSignalBuffer);
|
||||
|
||||
//
|
||||
// Generating Result ...
|
||||
result =
|
||||
//
|
||||
isIncreasing
|
||||
//
|
||||
&&
|
||||
//
|
||||
isDecreasing
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check SC is Vale ...
|
||||
bool XOBDIsVale()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isIncreasing = IsIncreasing(
|
||||
5,
|
||||
1,
|
||||
xOBDSignalBuffer);
|
||||
|
||||
//
|
||||
bool isDecreasing = IsDecreasing(
|
||||
20,
|
||||
5,
|
||||
xOBDSignalBuffer);
|
||||
|
||||
//
|
||||
// Generating Result ...
|
||||
result =
|
||||
//
|
||||
isIncreasing
|
||||
//
|
||||
&&
|
||||
//
|
||||
isDecreasing
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END XOBD Custom Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,154 @@
|
||||
///////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XOBD Signal Provider Indicators Library
|
||||
// ----------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Include Provider Inputs ...
|
||||
#include "x-saherelm.xobd.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// Imports all Indicators Helper here ...
|
||||
input group "XOBD Provider Indicators";
|
||||
#include "x-saherelm.xobd.oscillator.helper.lib.mq5";
|
||||
|
||||
//
|
||||
int xOBDMaxLengthOfInputs = 0;
|
||||
int xOBDCalculatedBars = 0;
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool XOBDInitIndicators()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check and Calculate Max Length in Inputs ...
|
||||
xOBDMaxLengthOfInputs = MathMax(
|
||||
xOBDNumberOfItemsPerTick,
|
||||
xOBDLength);
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XOBD Init ...
|
||||
result = XOBDInitHandlers();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void XOBDReleaseIndicators()
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XOBDReleaseHandlers();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XOBDHandleReadingBuffers()
|
||||
{
|
||||
//
|
||||
// Reading Calculated Bars for a Simple Handler ...
|
||||
xOBDCalculatedBars = BarsCalculated(xOBDHandler);
|
||||
|
||||
//
|
||||
// Read Indicators Buffers ...
|
||||
XOBDReadBuffers(xOBDNumberOfItemsPerTick);
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// START Combination Functions ...
|
||||
//
|
||||
//
|
||||
|
||||
//
|
||||
// Can Open Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XOBDCanOpenLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XOBDHasLongConditions(xOBDNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XOBDCanCloseLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Open Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XOBDCanOpenShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XOBDHasShortConditions(xOBDNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XOBDCanCloseShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// END Combination Functions ...
|
||||
//
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,63 @@
|
||||
///////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XOBD Signal Provider Library Inputs
|
||||
// -----------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
input group "XOBD Provider";
|
||||
|
||||
//
|
||||
input group "XOBD Common";
|
||||
input bool xOBDEnableProvider = true; // Enable Provider
|
||||
input bool xOBDEnableAlerts = false; // Enable Events Alert
|
||||
input int xOBDNumberOfItemsPerTick = 110; // Number Of items Readed In Each Tick
|
||||
|
||||
//
|
||||
input group "XOBD Trader";
|
||||
input int xOBDMagicNumber = 16940563; // Trader MagicNumber
|
||||
input int xOBDSlippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "XOBD Trade Management";
|
||||
input bool xOBDAllowLongTrades = true; // Allow Long Trades
|
||||
input bool xOBDAllowShortTrades = true; // Allow Short Trades
|
||||
|
||||
//
|
||||
input group "XOBD Risk Management";
|
||||
input int xOBDMaxAllowedTrades = 5; // Max Allowed Trades at Same Time
|
||||
input int xOBDMaxInProfitTradeAge = 0; // Max In Profit Trades Age
|
||||
input int xOBDMaxInDrawDownTradeAge = 576; // Max In DrawDown Trades Age
|
||||
input double xOBDStaticVolume = 0.02; // Static Volume
|
||||
input double xOBDVolumeMultiplier = 2; // Volume Multiplier
|
||||
input double xOBDMinRewardPerTradeInPips = 2; // Min Reward Per Trade In Pips
|
||||
input double xOBDFreeMarginFactorForOpenTrades = 0.5; // Minimum Free Marging for Open Trades
|
||||
input double xOBDBalanceFactorForOpenTrades = 0.5; // Minimum Balance for Open Trades
|
||||
input bool xOBDEnableSupportTrades = false; // Enable Support Trade
|
||||
|
||||
//
|
||||
// Validate Inputs before Initialization ...
|
||||
bool XOBDValidateInputs()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Fix this ...
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
@@ -0,0 +1,861 @@
|
||||
////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XOBD Signal Provider Library
|
||||
// --------------------------------------------------------
|
||||
// Name: XOBDSignalProvider
|
||||
// Description: XOBD based signal provider ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
#define XOBDProviderName "XOBD"
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
#include "x-saherelm.xobd.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Include Common Library ...
|
||||
#include "x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Logger Library ...
|
||||
#include "x-saherelm.log.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Alert Library ...
|
||||
#include "x-saherelm.alert.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Draw Library ...
|
||||
#include "x-saherelm.draw.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Class Libraries ...
|
||||
#include "x-saherelm.class.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
XCTrade *xOBDTrader;
|
||||
XCAccountInfo xOBDAccountInfo;
|
||||
|
||||
//
|
||||
#include "x-saherelm.xobd.provider.indicators.lib.mq5"
|
||||
|
||||
//
|
||||
double xOBDDeposit = 0;
|
||||
double xOBDBalance = 0;
|
||||
double xOBDFreeMargin = 0;
|
||||
double xOBDFreeMarginForOpenTrades = 0;
|
||||
double xOBDBalanceForOpenTrades = 0;
|
||||
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool XOBDInitSignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
result = XOBDValidateInputs();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
result = XOBDInitIndicators();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Account Deposit ...
|
||||
xOBDDeposit = xOBDAccountInfo.GetInitialBalance();
|
||||
|
||||
//
|
||||
// Calculate Min Balance for Trades ...
|
||||
if (xOBDBalanceFactorForOpenTrades > 0)
|
||||
{
|
||||
xOBDBalanceForOpenTrades = xOBDBalanceFactorForOpenTrades * xOBDDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Claculate Min Free Marging for Trades ...
|
||||
if (xOBDFreeMarginFactorForOpenTrades > 0)
|
||||
{
|
||||
xOBDFreeMarginForOpenTrades = xOBDFreeMarginFactorForOpenTrades * xOBDDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Make XCTrader instance ...
|
||||
xOBDTrader = new XCTrade(
|
||||
_Symbol,
|
||||
xOBDSlippage,
|
||||
xOBDMagicNumber);
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XOBDIssueInitializationSucceedAlert();
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void XOBDDeinitSignalProviderLibrary(
|
||||
const int reason)
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XOBDReleaseIndicators();
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XOBDIssueDeinitializationSucceedAlert();
|
||||
}
|
||||
|
||||
//
|
||||
// this is a Globally Function which do all of
|
||||
// checkings and positions handling ...
|
||||
void XOBDSignalProviderHandleTick()
|
||||
{
|
||||
//
|
||||
// Update account Balance ...
|
||||
xOBDBalance = xOBDAccountInfo.GetBalance();
|
||||
xOBDFreeMargin = xOBDAccountInfo.GetFreeMargin();
|
||||
|
||||
//
|
||||
// Check Provider is Enable or Not ...
|
||||
if (!xOBDEnableProvider) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Reading Indicator Buffers ...
|
||||
XOBDHandleReadingBuffers();
|
||||
if (xOBDCalculatedBars < xOBDMaxLengthOfInputs)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
XOBDHandleOpenTrades();
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
XOBDHandleCloseTrades();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
void XOBDHandleOpenTrades()
|
||||
{
|
||||
//
|
||||
// Check Can Trade ...
|
||||
bool canTrade = xOBDAllowLongTrades || xOBDAllowShortTrades;
|
||||
if (!canTrade)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// First Check Signal Exists or NOt ...
|
||||
bool xOBDHasLongSignal = XOBDCanOpenLongTrade();
|
||||
bool xOBDHasShortSignal = XOBDCanOpenShortTrade();
|
||||
if (!xOBDHasLongSignal && !xOBDHasShortSignal)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Max Open Trades ...
|
||||
if (xOBDMaxAllowedTrades > 0)
|
||||
{
|
||||
//
|
||||
int count = xOBDTrader.Count();
|
||||
bool canOpenTrade = count < xOBDMaxAllowedTrades;
|
||||
if (!canOpenTrade)
|
||||
{
|
||||
//
|
||||
XOBDIssueMaxAllowedTradesReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Check Free Margin ...
|
||||
if (xOBDFreeMargin <= xOBDFreeMarginForOpenTrades)
|
||||
{
|
||||
//
|
||||
XOBDIssueMaxAllowedFreeMarginReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Account Balance ...
|
||||
if (xOBDBalance <= xOBDBalanceForOpenTrades)
|
||||
{
|
||||
//
|
||||
XOBDIssueMinAllowedBalanceReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Long Trade ...
|
||||
if (
|
||||
xOBDHasLongSignal &&
|
||||
xOBDAllowLongTrades)
|
||||
{
|
||||
//
|
||||
bool isLongSignalExecuted = XOBDOpenLongPosition();
|
||||
if (isLongSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Short Trade ...
|
||||
if (
|
||||
xOBDHasShortSignal &&
|
||||
xOBDAllowShortTrades)
|
||||
{
|
||||
//
|
||||
bool isShortSignalExecuted = XOBDOpenShortPosition();
|
||||
if (isShortSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
void XOBDHandleCloseTrades()
|
||||
{
|
||||
//
|
||||
// Handle Long/Buy Close ...
|
||||
if (xOBDTrader.CountLongs() > 0 && XOBDCanCloseLongTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xOBDTrader.CloseLongPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XOBDIssueForceCloseTradesAlert(X_SIGNAL_LONG);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell Close ...
|
||||
if (xOBDTrader.CountShorts() > 0 && XOBDCanCloseShortTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xOBDTrader.CloseShortPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XOBDIssueForceCloseTradesAlert(X_SIGNAL_SHORT);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In Profit Teades ...
|
||||
if (xOBDMaxInProfitTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xOBDTrader.GetLongTimeTrades(
|
||||
xOBDMaxInProfitTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit < 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
bool isClosed = xOBDTrader.Close(trade.ticket);
|
||||
if (isClosed)
|
||||
{
|
||||
Add(
|
||||
trade,
|
||||
closed);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XOBDIssueLongInProfitTradeClosed();
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In DrawDown Trades ...
|
||||
if (xOBDMaxInDrawDownTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xOBDTrader.GetLongTimeTrades(
|
||||
xOBDMaxInDrawDownTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit > 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Grid Trades ...
|
||||
XOBDOpenSuppurtTrade(trade);
|
||||
|
||||
// //
|
||||
// bool isClosed = xOBDTrader.Close(trade.ticket);
|
||||
// if (isClosed)
|
||||
// {
|
||||
// //
|
||||
// Add(
|
||||
// trade,
|
||||
// closed);
|
||||
// }
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XOBDIssueLongInDrawdownTradeClosed();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Open Long Position ...
|
||||
bool XOBDOpenLongPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XOBDGeneratePositionSignal(X_SIGNAL_LONG);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xOBDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xOBDTrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XOBDIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Short Position ...
|
||||
bool XOBDOpenShortPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XOBDGeneratePositionSignal(X_SIGNAL_SHORT);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xOBDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xOBDTrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XOBDIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open a Support Signal ...
|
||||
bool XOBDOpenSuppurtTrade(
|
||||
XSignal &signal // Parent Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (!xOBDEnableSupportTrades) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Validate Signal ...
|
||||
if (!IsValid(signal, xOBDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Market Conditions ...
|
||||
bool hasLongSignal = XOBDCanOpenLongTrade();
|
||||
bool hasShortSignal = XOBDCanOpenShortTrade();
|
||||
|
||||
//
|
||||
ENUM_X_SIGNAL_TYPE type = X_SIGNAL_UNKNOWN;
|
||||
|
||||
//
|
||||
// Detect Support Signal Direction ...
|
||||
XSignal support = {};
|
||||
switch (signal.type)
|
||||
{
|
||||
//
|
||||
case X_SIGNAL_LONG:
|
||||
//
|
||||
// First Check Long Support ...
|
||||
// Then Look for Short Support ...
|
||||
if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
|
||||
//
|
||||
case X_SIGNAL_SHORT:
|
||||
// First Check Short Support ...
|
||||
// Then Look for Long Support ...
|
||||
if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
//
|
||||
if (type == X_SIGNAL_UNKNOWN)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
// Find Common Used ...
|
||||
double entry = GetEntry(type);
|
||||
double volumeMultiplier = 2;
|
||||
if (xOBDVolumeMultiplier > 2)
|
||||
{
|
||||
volumeMultiplier = xOBDVolumeMultiplier;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal is Support ot nor ...
|
||||
int titlePosition = StringFind(
|
||||
signal.comment,
|
||||
"Support");
|
||||
bool isSupport = titlePosition >= 0;
|
||||
double priceDistance = MathAbs(signal.entry - entry);
|
||||
|
||||
//
|
||||
if (isSupport || priceDistance < PipsToPrice(5)) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
double volume = NormalizeVolume(isSupport ? signal.volume : signal.volume * volumeMultiplier);
|
||||
string comment = "Support_" + GetSignalType(type) + "_For_" + (string)signal.ticket + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XOBDCalculateTPSL(type);
|
||||
if (!IsValid(tpSL))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate reward of signal ...
|
||||
double reward = MathAbs(signal.entry - signal.tp) / 2;
|
||||
double tp = tpSL.sl; // isLong ? entry + reward : entry - reward;
|
||||
double sl = tpSL.sl;
|
||||
|
||||
//
|
||||
// Filling Support Signal ...
|
||||
support.tp = tp;
|
||||
support.sl = sl;
|
||||
support.type = type;
|
||||
support.time = time;
|
||||
support.entry = entry;
|
||||
support.volume = volume;
|
||||
support.symbol = _Symbol;
|
||||
support.comment = comment;
|
||||
support.magicNumber = xOBDMagicNumber;
|
||||
|
||||
//
|
||||
// Validate Generated Support ...
|
||||
if (!IsValid(support, xOBDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = xOBDTrader.ExecuteSignal(support);
|
||||
if (result)
|
||||
{
|
||||
XOBDIssueSignalExecutionAlert(support);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Generate Specific type of Signals for Trading ...
|
||||
XSignal XOBDGeneratePositionSignal(
|
||||
ENUM_X_SIGNAL_TYPE type // direction of position
|
||||
)
|
||||
{
|
||||
//
|
||||
XSignal result = {};
|
||||
|
||||
//
|
||||
if (type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double entry = GetEntry(type);
|
||||
|
||||
//
|
||||
double volume = XOBDCalculateVolume();
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
|
||||
//
|
||||
string typeString = GetSignalType(type);
|
||||
string comment = XOBDProviderName + "_" + typeString + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XOBDCalculateTPSL(type);
|
||||
if (IsValid(tpSL))
|
||||
{
|
||||
//
|
||||
// Apply TP ...
|
||||
if (tpSL.tp > 0)
|
||||
{
|
||||
result.tp = tpSL.tp;
|
||||
}
|
||||
|
||||
//
|
||||
// Apply SL ...
|
||||
if (tpSL.sl > 0)
|
||||
{
|
||||
result.sl = tpSL.sl;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.time = time;
|
||||
result.entry = entry;
|
||||
result.volume = volume;
|
||||
result.symbol = _Symbol;
|
||||
result.comment = comment;
|
||||
result.magicNumber = xOBDMagicNumber;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Private Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Calculating Volume for Tradings ...
|
||||
double XOBDCalculateVolume()
|
||||
{
|
||||
//
|
||||
// Assign default Value ...
|
||||
double result = xOBDStaticVolume;
|
||||
|
||||
//
|
||||
// we can count open trades and in draw down trades
|
||||
// then do check volume based on it for gridding ...
|
||||
int openTrades = xOBDTrader.Count();
|
||||
if (openTrades == 0)
|
||||
{
|
||||
openTrades = 1;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Normalized Multiplier ...
|
||||
double multiplier = xOBDVolumeMultiplier <= 0 ? 1 : xOBDVolumeMultiplier;
|
||||
|
||||
//
|
||||
result = multiplier * openTrades * xOBDStaticVolume;
|
||||
|
||||
//
|
||||
// Normalize Volume ...
|
||||
result = NormalizeVolume(result);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Signal TP and SL ...
|
||||
XTPSL XOBDCalculateTPSL(
|
||||
ENUM_X_SIGNAL_TYPE type // Position Type
|
||||
)
|
||||
{
|
||||
//
|
||||
XTPSL result = {};
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (
|
||||
type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double spread = GetSpread();
|
||||
double entry = isLong ? ask : bid;
|
||||
|
||||
//
|
||||
// TODO: Find Risk ..
|
||||
double risk = 0;
|
||||
|
||||
//
|
||||
// Calculate Reward ...
|
||||
double reward = PipsToPrice(xOBDMinRewardPerTradeInPips) + spread;
|
||||
|
||||
//
|
||||
// Calculate TP and SL ...
|
||||
double tp = isLong ? entry + reward : entry - reward;
|
||||
double sl = 0;
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.tp = tp;
|
||||
result.sl = sl;
|
||||
result.entry = entry;
|
||||
//
|
||||
// TODO: Calculate R2R ...
|
||||
result.r2r = 0;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
void XOBDIssueInitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "Initializion of (" + XOBDProviderName + " Provider" + " _ " + _Symbol + " _ " + EnumToString(_Period) + ") Succeeded ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueDeinitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "De Initializion of (" + XOBDProviderName + " Provider" + ") Succeeded ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueForceCloseTradesAlert(ENUM_X_SIGNAL_TYPE type) {
|
||||
//
|
||||
string typeStr = GetSignalType(type);
|
||||
if (StringLen(typeStr) == 0) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
string message = "Force Close " + typeStr + " Trades ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueMaxAllowedTradesReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached Max Allowed Same Time Trades ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueMaxAllowedFreeMarginReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached FreeMarigin For Open Trades ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueMinAllowedBalanceReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "doesn't have Minimum Balance For Open Trades ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueSignalExecutionAlert(
|
||||
XSignal &signal // Executed Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
XOBDIssueAlert(signal);
|
||||
}
|
||||
|
||||
void XOBDIssueLongInProfitTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueLongInDrawdownTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XOBDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XOBDIssueAlert(string message)
|
||||
{
|
||||
//
|
||||
if (xOBDEnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
void XOBDIssueAlert(XSignal &signal)
|
||||
{
|
||||
//
|
||||
if (xOBDEnableAlerts)
|
||||
{
|
||||
SendAlert(signal);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// END Private Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,917 @@
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTD Oscillator Helper for Signal Providers
|
||||
// --------------------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
/////////////////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Includes ...
|
||||
#include "..\Libraries\x-saherelm.log.lib.mq5"
|
||||
#include "..\Libraries\x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// START Enum Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// XTD Oscillator States ...
|
||||
enum ENUM_X_XTD_STATES
|
||||
{
|
||||
X_XTD_BULLISH_CROSSED_OVER_BEARISH = 2,
|
||||
X_XTD_BULLISH_OVER_BEARISH = 1,
|
||||
X_XTD_NEUTURAL = 0,
|
||||
X_XTD_BULLISH_UNDER_BEARISH = -1,
|
||||
X_XTD_BULLISH_CROSSED_UNDER_BEARISH = -2
|
||||
};
|
||||
|
||||
//
|
||||
// XTD Oscillator Buffer Lines ...
|
||||
enum ENUM_X_XTD_BUFFER_LINES
|
||||
{
|
||||
X_XTD_BULLISH_POWER_LINE = 0,
|
||||
X_XTD_BEARISH_POWER_LINE = 1,
|
||||
X_XTD_SIGNAL_LINE = 2,
|
||||
};
|
||||
|
||||
//
|
||||
// END Enum Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
input group "XTD Oscillator";
|
||||
input int xTDLength = 14; // Market Length
|
||||
input bool xTDDrawCrosses = false; // Draw Cross Arrows
|
||||
input uchar xTDBullishArrowCode = 228; // Cross Over Arrow Code
|
||||
input color xTDBullishArrowColor = clrAqua; // Cross Over Arrow Color
|
||||
input uchar xTDBearishArrowCode = 230; // Cross Under Arrow Code
|
||||
input color xTDBearishArrowColor = clrMagenta; // Cross Under Arrow Color
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Definitions ...
|
||||
//
|
||||
|
||||
int xTDHandler = INVALID_HANDLE;
|
||||
double xTDBullishBuffer[];
|
||||
double xTDBearishBuffer[];
|
||||
double xTDSignalBuffer[];
|
||||
//
|
||||
// END Definitions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Handler Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Init Oscillators ...
|
||||
bool XTDInitHandlers()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XTD Handler ...
|
||||
ArraySetAsSeries(xTDBullishBuffer, true);
|
||||
ArraySetAsSeries(xTDBearishBuffer, true);
|
||||
ArraySetAsSeries(xTDSignalBuffer, true);
|
||||
xTDHandler = iCustom(
|
||||
_Symbol,
|
||||
_Period,
|
||||
"x-saherelm.xtd.oscillator",
|
||||
//
|
||||
// Inputs ...
|
||||
xTDLength,
|
||||
xTDDrawCrosses,
|
||||
xTDBullishArrowCode,
|
||||
xTDBullishArrowColor,
|
||||
xTDBearishArrowCode,
|
||||
xTDBearishArrowColor);
|
||||
if (xTDHandler == INVALID_HANDLE)
|
||||
{
|
||||
//
|
||||
LogMessage("failed to Initialize XTD Oscillator: " + (string)GetLastError());
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Oscillators ...
|
||||
void XTDReleaseHandlers()
|
||||
{
|
||||
IndicatorRelease(xTDHandler);
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XTDReadBuffers(
|
||||
int xTDItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
// XTD Bullish Buffer ...
|
||||
CopyBuffer(
|
||||
xTDHandler,
|
||||
X_XTD_BULLISH_POWER_LINE,
|
||||
0,
|
||||
xTDItemsPerTick,
|
||||
xTDBullishBuffer);
|
||||
|
||||
//
|
||||
// XTD Bullish Buffer ...
|
||||
CopyBuffer(
|
||||
xTDHandler,
|
||||
X_XTD_BEARISH_POWER_LINE,
|
||||
0,
|
||||
xTDItemsPerTick,
|
||||
xTDBearishBuffer);
|
||||
|
||||
//
|
||||
// XTD Signal Buffer ...
|
||||
CopyBuffer(
|
||||
xTDHandler,
|
||||
X_XTD_SIGNAL_LINE,
|
||||
0,
|
||||
xTDItemsPerTick,
|
||||
xTDSignalBuffer);
|
||||
}
|
||||
|
||||
//
|
||||
// END Handler Funcions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Signal Related Conditions ...
|
||||
//
|
||||
|
||||
//
|
||||
// XTD Long Conditions ...
|
||||
bool XTDHasLongConditions(
|
||||
int xTDItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isVale = XTDIsSignalVale();
|
||||
|
||||
//
|
||||
bool isInPeak = IsInPeak(
|
||||
15,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
bool isSharpChanged = IsSharpChanged(
|
||||
15,
|
||||
1,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
double entry = GetEntry(X_SIGNAL_LONG);
|
||||
double maxPrice = GetHighestHigh(
|
||||
7,
|
||||
0);
|
||||
double minPrice = GetLowestLow(
|
||||
7,
|
||||
0);
|
||||
double priceDelta = maxPrice - minPrice;
|
||||
double priceStep = priceDelta / 7;
|
||||
|
||||
//
|
||||
bool isPricePassed =
|
||||
entry < maxPrice &&
|
||||
maxPrice - entry < (priceDelta / 4) * 3;
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isVale
|
||||
//
|
||||
&&
|
||||
//
|
||||
!isInPeak
|
||||
//
|
||||
&&
|
||||
//
|
||||
!isSharpChanged
|
||||
//
|
||||
&&
|
||||
//
|
||||
isPricePassed
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// XTD Short Conditions ...
|
||||
bool XTDHasShortConditions(
|
||||
int xTDItemsPerTick // Number Of Reading Buffer Items Per Tick
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
bool isPeak = XTDIsSignalPeak();
|
||||
|
||||
//
|
||||
bool isInVale = IsInVale(
|
||||
15,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
bool isSharpChanged = IsSharpChanged(
|
||||
15,
|
||||
1,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
double entry = GetEntry(X_SIGNAL_SHORT);
|
||||
double maxPrice = GetHighestHigh(
|
||||
7,
|
||||
0);
|
||||
double minPrice = GetLowestLow(
|
||||
7,
|
||||
0);
|
||||
double priceDelta = maxPrice - minPrice;
|
||||
double priceStep = priceDelta / 7;
|
||||
|
||||
//
|
||||
bool isPricePassed =
|
||||
entry > minPrice &&
|
||||
minPrice + entry > (priceDelta / 4);
|
||||
|
||||
//
|
||||
result =
|
||||
//
|
||||
isPeak
|
||||
//
|
||||
&&
|
||||
//
|
||||
!isInVale
|
||||
//
|
||||
&&
|
||||
//
|
||||
!isSharpChanged
|
||||
//
|
||||
&&
|
||||
//
|
||||
isPricePassed
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END Signal Related Conditions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START XTD Custom Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Check Signal Vale ...
|
||||
bool XTDIsSignalVale()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Must Decreasing ...
|
||||
bool isIncreasing = IsIncreasing(
|
||||
3,
|
||||
1,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
// Must Increasing ...
|
||||
bool isDecreasing = IsDecreasing(
|
||||
15,
|
||||
3,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
// Generating Result ...
|
||||
result =
|
||||
//
|
||||
isIncreasing
|
||||
//
|
||||
&&
|
||||
//
|
||||
isDecreasing
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal Peak ...
|
||||
bool XTDIsSignalPeak()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Must Decreasing ...
|
||||
bool isIncreasing = IsIncreasing(
|
||||
15,
|
||||
3,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
// Must Increasing ...
|
||||
bool isDecreasing = IsDecreasing(
|
||||
3,
|
||||
1,
|
||||
xTDSignalBuffer);
|
||||
|
||||
//
|
||||
// Generating Result ...
|
||||
result =
|
||||
//
|
||||
isIncreasing
|
||||
//
|
||||
&&
|
||||
//
|
||||
isDecreasing
|
||||
//
|
||||
;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal Peak ...
|
||||
|
||||
//
|
||||
// Check Bullish Crossed Over Bearish ...
|
||||
bool XTDIsBullCrossedOverBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossOver(
|
||||
xTDBullishBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Bullish Over Bearish ...
|
||||
bool XTDIsBullOverBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsOver(
|
||||
xTDBullishBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Bullish Crossed Under Bearish ...
|
||||
bool XTDIsBullCrossedUnderBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossUnder(
|
||||
xTDBullishBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Bullish Under Bearish ...
|
||||
bool XTDIsBullUnderBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsUnder(
|
||||
xTDBullishBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal Crossed Over Bearish ...
|
||||
bool XTDIsSignalCrossedOverBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossOver(
|
||||
xTDSignalBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal Over Bearish ...
|
||||
bool XTDIsSignalOverBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsOver(
|
||||
xTDSignalBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal Crossed Under Bearish ...
|
||||
bool XTDIsSignalCrossedUnderBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsCrossUnder(
|
||||
xTDSignalBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal Under Bearish ...
|
||||
bool XTDIsSignalUnderBear(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
!XTDIsValidBuffersSize(bar_index + 1))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = IsUnder(
|
||||
xTDSignalBuffer,
|
||||
xTDBearishBuffer,
|
||||
1);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Check all Buffers has valid Size ...
|
||||
bool XTDIsValidBuffersSize(
|
||||
int size // the size of buffers which min size for requirements
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (
|
||||
size <= 0 ||
|
||||
ArraySize(xTDBullishBuffer) < size ||
|
||||
ArraySize(xTDBullishBuffer) < size ||
|
||||
ArraySize(xTDSignalBuffer) < size)
|
||||
{
|
||||
result = false;
|
||||
}
|
||||
else
|
||||
{
|
||||
result = true;
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Signal Crossed Over Bear ...
|
||||
int XTDCountSignalCrossedOverBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = 0;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsSignalCrossedOverBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
result++;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Signal Crossed Under Bear ...
|
||||
int XTDCountSignalCrossedUnderBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = 0;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsSignalCrossedUnderBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
result++;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Bull Crossed Over Bear ...
|
||||
int XTDCountBullCrossedOverBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = 0;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsBullCrossedOverBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
result++;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Bull Crossed Under Bear ...
|
||||
int XTDCountBullCrossedUnderBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = 0;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsBullCrossedUnderBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
result++;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Find Last Signal Crossed Over Bear ...
|
||||
int XTDFindLastSignalCrossedOverBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = -1;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsSignalCrossedOverBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
//
|
||||
result = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Find Last Signal Crossed Onder Bear ...
|
||||
int XTDFindLastSignalCrossedUnderBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = -1;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsSignalCrossedUnderBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
//
|
||||
result = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Find Last Bull Crossed Over Bear ...
|
||||
int XTDFindLastBullCrossedOverBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = -1;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsBullCrossedOverBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
//
|
||||
result = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Find Last Bull Crossed Under Bear ...
|
||||
int XTDFindLastBullCrossedUnderBearIndex(
|
||||
int bar_index // Specified Bar Index
|
||||
)
|
||||
{
|
||||
//
|
||||
int result = -1;
|
||||
|
||||
//
|
||||
int count = ArraySize(xTDSignalBuffer) - 1;
|
||||
if (
|
||||
bar_index <= 0 ||
|
||||
count <= bar_index + 1)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Loop Through ...
|
||||
for (int i = bar_index + 1; i < count && result == -1; i++)
|
||||
{
|
||||
//
|
||||
// Check Cross On i Point ...
|
||||
bool isCrossedOnI = XTDIsBullCrossedUnderBear(i);
|
||||
if (isCrossedOnI)
|
||||
{
|
||||
//
|
||||
result = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END XTD Custom Functions ...
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,158 @@
|
||||
///////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTD Signal Provider Indicators Library
|
||||
// ----------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Include Provider Inputs ...
|
||||
#include "x-saherelm.xtd.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// Imports all Indicators Helper here ...
|
||||
input group "XTD Provider Indicators";
|
||||
#include "x-saherelm.xtd.oscillator.helper.lib.mq5";
|
||||
|
||||
//
|
||||
int xTDMaxLengthOfInputs = 0;
|
||||
int xTDCalculatedBars = 0;
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool XTDInitIndicators()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check and Calculate Max Length in Inputs ...
|
||||
xTDMaxLengthOfInputs = MathMax(
|
||||
xTDLength,
|
||||
xTDMaxLengthOfInputs);
|
||||
xTDMaxLengthOfInputs = MathMax(
|
||||
xTDNumberOfItemsPerTick,
|
||||
xTDMaxLengthOfInputs);
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XTD Init ...
|
||||
result = XTDInitHandlers();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void XTDReleaseIndicators()
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XTDReleaseHandlers();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XTDHandleReadingBuffers()
|
||||
{
|
||||
//
|
||||
// Reading Calculated Bars for a Simple Handler ...
|
||||
xTDCalculatedBars = BarsCalculated(xTDHandler);
|
||||
|
||||
//
|
||||
// Read Indicators Buffers ...
|
||||
XTDReadBuffers(xTDNumberOfItemsPerTick);
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// START Combination Functions ...
|
||||
//
|
||||
//
|
||||
|
||||
//
|
||||
// Can Open Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XTDCanOpenLongTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XTDHasLongConditions(xTDNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
// if (result) {
|
||||
// LogMessage("Salam");
|
||||
// }
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XTDCanCloseLongTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Open Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XTDCanOpenShortTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XTDHasShortConditions(xTDNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XTDCanCloseShortTrade() {
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// END Combination Functions ...
|
||||
//
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,63 @@
|
||||
///////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTD Signal Provider Library Inputs
|
||||
// -----------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
input group "XTD Provider";
|
||||
|
||||
//
|
||||
input group "XTD Common";
|
||||
input bool xTDEnableProvider = true; // Enable Provider
|
||||
input bool xTDEnableAlerts = false; // Enable Events Alert
|
||||
input int xTDNumberOfItemsPerTick = 110; // Number Of items Readed In Each Tick
|
||||
|
||||
//
|
||||
input group "XTD Trader";
|
||||
input int xTDMagicNumber = 16940561; // Trader MagicNumber
|
||||
input int xTDSlippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "XTD Trade Management";
|
||||
input bool xTDAllowLongTrades = true; // Allow Long Trades
|
||||
input bool xTDAllowShortTrades = true; // Allow Short Trades
|
||||
|
||||
//
|
||||
input group "XTD Risk Management";
|
||||
input int xTDMaxAllowedTrades = 5; // Max Allowed Trades at Same Time
|
||||
input int xTDMaxInProfitTradeAge = 0; // Max In Profit Trades Age
|
||||
input int xTDMaxInDrawDownTradeAge = 576; // Max In DrawDown Trades Age
|
||||
input double xTDStaticVolume = 0.02; // Static Volume
|
||||
input double xTDVolumeMultiplier = 2; // Volume Multiplier
|
||||
input double xTDMinRewardPerTradeInPips = 2; // Min Reward Per Trade In Pips
|
||||
input double xTDFreeMarginFactorForOpenTrades = 0.5; // Minimum Free Marging for Open Trades
|
||||
input double xTDBalanceFactorForOpenTrades = 0.5; // Minimum Balance for Open Trades
|
||||
input bool xTDEnableSupportTrades = false; // Enable Support Trade
|
||||
|
||||
//
|
||||
// Validate Inputs before Initialization ...
|
||||
bool XTDValidateInputs()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Fix this ...
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
@@ -0,0 +1,861 @@
|
||||
////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTD Signal Provider Library
|
||||
// --------------------------------------------------------
|
||||
// Name: XTDSignalProvider
|
||||
// Description: XTD based signal provider ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
#define XTDProviderName "XTD"
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
#include "x-saherelm.xtd.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Include Common Library ...
|
||||
#include "x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Logger Library ...
|
||||
#include "x-saherelm.log.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Alert Library ...
|
||||
#include "x-saherelm.alert.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Draw Library ...
|
||||
#include "x-saherelm.draw.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Class Libraries ...
|
||||
#include "x-saherelm.class.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
XCTrade *xTDTrader;
|
||||
XCAccountInfo xTDAccountInfo;
|
||||
|
||||
//
|
||||
#include "x-saherelm.xtd.provider.indicators.lib.mq5"
|
||||
|
||||
//
|
||||
double xTDDeposit = 0;
|
||||
double xTDBalance = 0;
|
||||
double xTDFreeMargin = 0;
|
||||
double xTDFreeMarginForOpenTrades = 0;
|
||||
double xTDBalanceForOpenTrades = 0;
|
||||
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool XTDInitSignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
result = XTDValidateInputs();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
result = XTDInitIndicators();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Account Deposit ...
|
||||
xTDDeposit = xTDAccountInfo.GetInitialBalance();
|
||||
|
||||
//
|
||||
// Calculate Min Balance for Trades ...
|
||||
if (xTDBalanceFactorForOpenTrades > 0)
|
||||
{
|
||||
xTDBalanceForOpenTrades = xTDBalanceFactorForOpenTrades * xTDDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Claculate Min Free Marging for Trades ...
|
||||
if (xTDFreeMarginFactorForOpenTrades > 0)
|
||||
{
|
||||
xTDFreeMarginForOpenTrades = xTDFreeMarginFactorForOpenTrades * xTDDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Make XCTrader instance ...
|
||||
xTDTrader = new XCTrade(
|
||||
_Symbol,
|
||||
xTDSlippage,
|
||||
xTDMagicNumber);
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XTDIssueInitializationSucceedAlert();
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void XTDDeinitSignalProviderLibrary(
|
||||
const int reason)
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XTDReleaseIndicators();
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XTDIssueDeinitializationSucceedAlert();
|
||||
}
|
||||
|
||||
//
|
||||
// this is a Globally Function which do all of
|
||||
// checkings and positions handling ...
|
||||
void XTDSignalProviderHandleTick()
|
||||
{
|
||||
//
|
||||
// Update account Balance ...
|
||||
xTDBalance = xTDAccountInfo.GetBalance();
|
||||
xTDFreeMargin = xTDAccountInfo.GetFreeMargin();
|
||||
|
||||
//
|
||||
// Check Provider is Enable or Not ...
|
||||
if (!xTDEnableProvider) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Reading Indicator Buffers ...
|
||||
XTDHandleReadingBuffers();
|
||||
if (xTDCalculatedBars < xTDMaxLengthOfInputs)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
XTDHandleOpenTrades();
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
XTDHandleCloseTrades();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
void XTDHandleOpenTrades()
|
||||
{
|
||||
//
|
||||
// Check Can Trade ...
|
||||
bool canTrade = xTDAllowLongTrades || xTDAllowShortTrades;
|
||||
if (!canTrade)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// First Check Signal Exists or NOt ...
|
||||
bool xTDHasLongSignal = XTDCanOpenLongTrade();
|
||||
bool xTDHasShortSignal = XTDCanOpenShortTrade();
|
||||
if (!xTDHasLongSignal && !xTDHasShortSignal)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Max Open Trades ...
|
||||
if (xTDMaxAllowedTrades > 0)
|
||||
{
|
||||
//
|
||||
int count = xTDTrader.Count();
|
||||
bool canOpenTrade = count < xTDMaxAllowedTrades;
|
||||
if (!canOpenTrade)
|
||||
{
|
||||
//
|
||||
XTDIssueMaxAllowedTradesReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Check Free Margin ...
|
||||
if (xTDFreeMargin <= xTDFreeMarginForOpenTrades)
|
||||
{
|
||||
//
|
||||
XTDIssueMaxAllowedFreeMarginReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Account Balance ...
|
||||
if (xTDBalance <= xTDBalanceForOpenTrades)
|
||||
{
|
||||
//
|
||||
XTDIssueMinAllowedBalanceReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Long Trade ...
|
||||
if (
|
||||
xTDHasLongSignal &&
|
||||
xTDAllowLongTrades)
|
||||
{
|
||||
//
|
||||
bool isLongSignalExecuted = XTDOpenLongPosition();
|
||||
if (isLongSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Short Trade ...
|
||||
if (
|
||||
xTDHasShortSignal &&
|
||||
xTDAllowShortTrades)
|
||||
{
|
||||
//
|
||||
bool isShortSignalExecuted = XTDOpenShortPosition();
|
||||
if (isShortSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
void XTDHandleCloseTrades()
|
||||
{
|
||||
//
|
||||
// Handle Long/Buy Close ...
|
||||
if (xTDTrader.CountLongs() > 0 && XTDCanCloseLongTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xTDTrader.CloseLongPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XTDIssueForceCloseTradesAlert(X_SIGNAL_LONG);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell Close ...
|
||||
if (xTDTrader.CountShorts() > 0 && XTDCanCloseShortTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xTDTrader.CloseShortPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XTDIssueForceCloseTradesAlert(X_SIGNAL_SHORT);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In Profit Teades ...
|
||||
if (xTDMaxInProfitTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xTDTrader.GetLongTimeTrades(
|
||||
xTDMaxInProfitTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit < 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
bool isClosed = xTDTrader.Close(trade.ticket);
|
||||
if (isClosed)
|
||||
{
|
||||
Add(
|
||||
trade,
|
||||
closed);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XTDIssueLongInProfitTradeClosed();
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In DrawDown Trades ...
|
||||
if (xTDMaxInDrawDownTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xTDTrader.GetLongTimeTrades(
|
||||
xTDMaxInDrawDownTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit > 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Grid Trades ...
|
||||
XTDOpenSuppurtTrade(trade);
|
||||
|
||||
// //
|
||||
// bool isClosed = xTDTrader.Close(trade.ticket);
|
||||
// if (isClosed)
|
||||
// {
|
||||
// //
|
||||
// Add(
|
||||
// trade,
|
||||
// closed);
|
||||
// }
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XTDIssueLongInDrawdownTradeClosed();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Open Long Position ...
|
||||
bool XTDOpenLongPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XTDGeneratePositionSignal(X_SIGNAL_LONG);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xTDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xTDTrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XTDIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Short Position ...
|
||||
bool XTDOpenShortPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XTDGeneratePositionSignal(X_SIGNAL_SHORT);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xTDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xTDTrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XTDIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open a Support Signal ...
|
||||
bool XTDOpenSuppurtTrade(
|
||||
XSignal &signal // Parent Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (!xTDEnableSupportTrades) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Validate Signal ...
|
||||
if (!IsValid(signal, xTDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Market Conditions ...
|
||||
bool hasLongSignal = XTDCanOpenLongTrade();
|
||||
bool hasShortSignal = XTDCanOpenShortTrade();
|
||||
|
||||
//
|
||||
ENUM_X_SIGNAL_TYPE type = X_SIGNAL_UNKNOWN;
|
||||
|
||||
//
|
||||
// Detect Support Signal Direction ...
|
||||
XSignal support = {};
|
||||
switch (signal.type)
|
||||
{
|
||||
//
|
||||
case X_SIGNAL_LONG:
|
||||
//
|
||||
// First Check Long Support ...
|
||||
// Then Look for Short Support ...
|
||||
if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
|
||||
//
|
||||
case X_SIGNAL_SHORT:
|
||||
// First Check Short Support ...
|
||||
// Then Look for Long Support ...
|
||||
if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
//
|
||||
if (type == X_SIGNAL_UNKNOWN)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
// Find Common Used ...
|
||||
double entry = GetEntry(type);
|
||||
double volumeMultiplier = 2;
|
||||
if (xTDVolumeMultiplier > 2)
|
||||
{
|
||||
volumeMultiplier = xTDVolumeMultiplier;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal is Support ot nor ...
|
||||
int titlePosition = StringFind(
|
||||
signal.comment,
|
||||
"Support");
|
||||
bool isSupport = titlePosition >= 0;
|
||||
double priceDistance = MathAbs(signal.entry - entry);
|
||||
|
||||
//
|
||||
if (isSupport || priceDistance < PipsToPrice(5)) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
double volume = NormalizeVolume(isSupport ? signal.volume : signal.volume * volumeMultiplier);
|
||||
string comment = "Support_" + GetSignalType(type) + "_For_" + (string)signal.ticket + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XTDCalculateTPSL(type);
|
||||
if (!IsValid(tpSL))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate reward of signal ...
|
||||
double reward = MathAbs(signal.entry - signal.tp) / 2;
|
||||
double tp = tpSL.sl; // isLong ? entry + reward : entry - reward;
|
||||
double sl = tpSL.sl;
|
||||
|
||||
//
|
||||
// Filling Support Signal ...
|
||||
support.tp = tp;
|
||||
support.sl = sl;
|
||||
support.type = type;
|
||||
support.time = time;
|
||||
support.entry = entry;
|
||||
support.volume = volume;
|
||||
support.symbol = _Symbol;
|
||||
support.comment = comment;
|
||||
support.magicNumber = xTDMagicNumber;
|
||||
|
||||
//
|
||||
// Validate Generated Support ...
|
||||
if (!IsValid(support, xTDMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = xTDTrader.ExecuteSignal(support);
|
||||
if (result)
|
||||
{
|
||||
XTDIssueSignalExecutionAlert(support);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Generate Specific type of Signals for Trading ...
|
||||
XSignal XTDGeneratePositionSignal(
|
||||
ENUM_X_SIGNAL_TYPE type // direction of position
|
||||
)
|
||||
{
|
||||
//
|
||||
XSignal result = {};
|
||||
|
||||
//
|
||||
if (type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double entry = GetEntry(type);
|
||||
|
||||
//
|
||||
double volume = XTDCalculateVolume();
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
|
||||
//
|
||||
string typeString = GetSignalType(type);
|
||||
string comment = XTDProviderName + "_" + typeString + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XTDCalculateTPSL(type);
|
||||
if (IsValid(tpSL))
|
||||
{
|
||||
//
|
||||
// Apply TP ...
|
||||
if (tpSL.tp > 0)
|
||||
{
|
||||
result.tp = tpSL.tp;
|
||||
}
|
||||
|
||||
//
|
||||
// Apply SL ...
|
||||
if (tpSL.sl > 0)
|
||||
{
|
||||
result.sl = tpSL.sl;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.time = time;
|
||||
result.entry = entry;
|
||||
result.volume = volume;
|
||||
result.symbol = _Symbol;
|
||||
result.comment = comment;
|
||||
result.magicNumber = xTDMagicNumber;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Private Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Calculating Volume for Tradings ...
|
||||
double XTDCalculateVolume()
|
||||
{
|
||||
//
|
||||
// Assign default Value ...
|
||||
double result = xTDStaticVolume;
|
||||
|
||||
//
|
||||
// we can count open trades and in draw down trades
|
||||
// then do check volume based on it for gridding ...
|
||||
int openTrades = xTDTrader.Count();
|
||||
if (openTrades == 0)
|
||||
{
|
||||
openTrades = 1;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Normalized Multiplier ...
|
||||
double multiplier = xTDVolumeMultiplier <= 0 ? 1 : xTDVolumeMultiplier;
|
||||
|
||||
//
|
||||
result = multiplier * openTrades * xTDStaticVolume;
|
||||
|
||||
//
|
||||
// Normalize Volume ...
|
||||
result = NormalizeVolume(result);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Signal TP and SL ...
|
||||
XTPSL XTDCalculateTPSL(
|
||||
ENUM_X_SIGNAL_TYPE type // Position Type
|
||||
)
|
||||
{
|
||||
//
|
||||
XTPSL result = {};
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (
|
||||
type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double spread = GetSpread();
|
||||
double entry = isLong ? ask : bid;
|
||||
|
||||
//
|
||||
// TODO: Find Risk ..
|
||||
double risk = 0;
|
||||
|
||||
//
|
||||
// Calculate Reward ...
|
||||
double reward = PipsToPrice(xTDMinRewardPerTradeInPips) + spread;
|
||||
|
||||
//
|
||||
// Calculate TP and SL ...
|
||||
double tp = isLong ? entry + reward : entry - reward;
|
||||
double sl = 0;
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.tp = tp;
|
||||
result.sl = sl;
|
||||
result.entry = entry;
|
||||
//
|
||||
// TODO: Calculate R2R ...
|
||||
result.r2r = 0;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
void XTDIssueInitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "Initializion of (" + XTDProviderName + " Provider" + " _ " + _Symbol + " _ " + EnumToString(_Period) + ") Succeeded ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueDeinitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "De Initializion of (" + XTDProviderName + " Provider" + ") Succeeded ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueForceCloseTradesAlert(ENUM_X_SIGNAL_TYPE type) {
|
||||
//
|
||||
string typeStr = GetSignalType(type);
|
||||
if (StringLen(typeStr) == 0) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
string message = "Force Close " + typeStr + " Trades ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueMaxAllowedTradesReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached Max Allowed Same Time Trades ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueMaxAllowedFreeMarginReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached FreeMarigin For Open Trades ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueMinAllowedBalanceReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "doesn't have Minimum Balance For Open Trades ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueSignalExecutionAlert(
|
||||
XSignal &signal // Executed Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
XTDIssueAlert(signal);
|
||||
}
|
||||
|
||||
void XTDIssueLongInProfitTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueLongInDrawdownTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XTDIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTDIssueAlert(string message)
|
||||
{
|
||||
//
|
||||
if (xTDEnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
void XTDIssueAlert(XSignal &signal)
|
||||
{
|
||||
//
|
||||
if (xTDEnableAlerts)
|
||||
{
|
||||
SendAlert(signal);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// END Private Functions ...
|
||||
//
|
||||
@@ -0,0 +1,166 @@
|
||||
///////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTEST Signal Provider Indicators Library
|
||||
// ----------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Include Provider Inputs ...
|
||||
#include "x-saherelm.xtest.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// Imports all Indicators Helper here ...
|
||||
input group "XTEST Provider Indicators";
|
||||
//
|
||||
#include "x-saherelm.xtm.indicator.helper.lib.mq5";
|
||||
|
||||
//
|
||||
int xTESTMaxLengthOfInputs = 0;
|
||||
int xTESTCalculatedBars = 0;
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool XTESTInitIndicators()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check and Calculate Max Length in Inputs ...
|
||||
xTESTMaxLengthOfInputs = MathMax(
|
||||
xTMMaPeriod,
|
||||
xTESTMaxLengthOfInputs);
|
||||
xTESTMaxLengthOfInputs = MathMax(
|
||||
xTESTNumberOfItemsPerTick,
|
||||
xTESTMaxLengthOfInputs);
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XTM Init ...
|
||||
result = XTMInitHandlers();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void XTESTReleaseIndicators()
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XTMReleaseHandlers();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XTESTHandleReadingBuffers()
|
||||
{
|
||||
//
|
||||
// Reading Calculated Bars for a Simple Handler ...
|
||||
xTESTCalculatedBars = BarsCalculated(xTMHandler);
|
||||
|
||||
//
|
||||
// Read Indicators Buffers ...
|
||||
XTMReadBuffers(xTESTNumberOfItemsPerTick);
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// START Combination Functions ...
|
||||
//
|
||||
//
|
||||
|
||||
//
|
||||
// Can Open Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XTESTCanOpenLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XTMHasLongConditions(xTESTNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XTESTCanCloseLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Check Market Conditions for Close Long Trades ...
|
||||
// result = XTESTHasLongCloseConditions(xTESTNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Open Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XTESTCanOpenShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XTMHasShortConditions(xTESTNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XTESTCanCloseShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Check Market Conditions for Close Short Trades ...
|
||||
// result = XTESTHasShortCloseConditions(xTESTNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// END Combination Functions ...
|
||||
//
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,65 @@
|
||||
///////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTEST Signal Provider Library Inputs
|
||||
// -----------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
input group "XTEST Provider";
|
||||
|
||||
//
|
||||
input group "XTEST Common";
|
||||
input bool xTESTEnableProvider = true; // Enable Provider
|
||||
input bool xTESTEnableAlerts = false; // Enable Events Alert
|
||||
input int xTESTNumberOfItemsPerTick = 110; // Number Of items Readed In Each Tick
|
||||
|
||||
//
|
||||
input group "XTEST Trader";
|
||||
input int xTESTMagicNumber = 16940562; // Trader MagicNumber
|
||||
input int xTESTSlippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "XTEST Trade Management";
|
||||
input bool xTESTUseVirtualTPSL = true; // Use Virtual TP SL
|
||||
input bool xTESTAllowLongTrades = true; // Allow Long Trades
|
||||
input bool xTESTAllowShortTrades = true; // Allow Short Trades
|
||||
|
||||
//
|
||||
input group "XTEST Risk Management";
|
||||
input int xTESTMaxAllowedTrades = 5; // Max Allowed Trades at Same Time
|
||||
input int xTESTMaxInProfitTradeAge = 0; // Max In Profit Trades Age
|
||||
input int xTESTMaxInDrawDownTradeAge = 576; // Max In DrawDown Trades Age
|
||||
input double xTESTStaticVolume = 0.02; // Static Volume
|
||||
input double xTESTVolumeMultiplier = 2; // Volume Multiplier
|
||||
input double xTESTMinRewardPerTradeInPips = 2; // Min Reward Per Trade In Pips
|
||||
input double xTESTFreeMarginFactorForOpenTrades = 0.5; // Minimum Free Marging for Open Trades
|
||||
input double xTESTBalanceFactorForOpenTrades = 0.5; // Minimum Balance for Open Trades
|
||||
input int xTESTMaxAllowedSupportTrades = 5; // Max Allowed Support Trade
|
||||
input int xTESTSupportTradesPriceDistanceInPips = 5; // Distance Price to Open Support Trade
|
||||
|
||||
//
|
||||
// Validate Inputs before Initialization ...
|
||||
bool XTESTValidateInputs()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Fix this ...
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
@@ -0,0 +1,670 @@
|
||||
////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTEST Signal Provider Library
|
||||
// --------------------------------------------------------
|
||||
// Name: XTESTSignalProvider
|
||||
// Description: XTEST based signal provider ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
#define XTESTProviderName "XTEST"
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
|
||||
#include "x-saherelm.xtest.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Include Common Library ...
|
||||
#include "x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Logger Library ...
|
||||
#include "x-saherelm.log.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Alert Library ...
|
||||
#include "x-saherelm.alert.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Draw Library ...
|
||||
#include "x-saherelm.draw.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Class Libraries ...
|
||||
#include "x-saherelm.class.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
XCTrade *xTESTTrader;
|
||||
XCAccountInfo xTESTAccountInfo;
|
||||
|
||||
//
|
||||
#include "x-saherelm.xtest.provider.indicators.lib.mq5"
|
||||
|
||||
//
|
||||
double xTESTDeposit = 0;
|
||||
double xTESTBalance = 0;
|
||||
double xTESTFreeMargin = 0;
|
||||
double xTESTMinRewardPerTrade = 0;
|
||||
double xTESTFreeMarginForOpenTrades = 0;
|
||||
double xTESTBalanceForOpenTrades = 0;
|
||||
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool XTESTInitSignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
result = XTESTValidateInputs();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
result = XTESTInitIndicators();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Account Deposit ...
|
||||
xTESTDeposit = xTESTAccountInfo.GetInitialBalance();
|
||||
|
||||
//
|
||||
// Calculate xTESTMinRewardPerTrade ...
|
||||
if (xTESTMinRewardPerTradeInPips > 0)
|
||||
{
|
||||
xTESTMinRewardPerTrade = PipsToPrice(xTESTMinRewardPerTradeInPips);
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Min Balance for Trades ...
|
||||
if (xTESTBalanceFactorForOpenTrades > 0)
|
||||
{
|
||||
xTESTBalanceForOpenTrades = xTESTBalanceFactorForOpenTrades * xTESTDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Claculate Min Free Marging for Trades ...
|
||||
if (xTESTFreeMarginFactorForOpenTrades > 0)
|
||||
{
|
||||
xTESTFreeMarginForOpenTrades = xTESTFreeMarginFactorForOpenTrades * xTESTDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Make XCTrader instance ...
|
||||
xTESTTrader = new XCTrade(
|
||||
XTESTProviderName,
|
||||
_Symbol,
|
||||
xTESTSlippage,
|
||||
xTESTMagicNumber,
|
||||
xTESTMaxAllowedTrades,
|
||||
xTESTMaxAllowedSupportTrades,
|
||||
xTESTMinRewardPerTradeInPips,
|
||||
xTESTSupportTradesPriceDistanceInPips,
|
||||
xTESTFreeMarginForOpenTrades,
|
||||
xTESTBalanceForOpenTrades);
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XTESTIssueInitializationSucceedAlert();
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void XTESTDeinitSignalProviderLibrary(
|
||||
const int reason)
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XTESTReleaseIndicators();
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XTESTIssueDeinitializationSucceedAlert();
|
||||
}
|
||||
|
||||
//
|
||||
// this is a Globally Function which do all of
|
||||
// checkings and positions handling ...
|
||||
void XTESTSignalProviderHandleTick()
|
||||
{
|
||||
//
|
||||
// Update account Balance ...
|
||||
xTESTBalance = xTESTAccountInfo.GetBalance();
|
||||
xTESTFreeMargin = xTESTAccountInfo.GetFreeMargin();
|
||||
|
||||
//
|
||||
// Check Provider is Enable or Not ...
|
||||
if (!xTESTEnableProvider)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Reading Indicator Buffers ...
|
||||
XTESTHandleReadingBuffers();
|
||||
if (xTESTCalculatedBars < xTESTMaxLengthOfInputs)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
XTESTHandleOpenTrades();
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
XTESTHandleCloseTrades();
|
||||
|
||||
//
|
||||
// Handle Support Trades ...
|
||||
XTESTHandleSupportTrades();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
void XTESTHandleOpenTrades()
|
||||
{
|
||||
//
|
||||
// Check Can Trade ...
|
||||
bool canTrade = xTESTAllowLongTrades || xTESTAllowShortTrades;
|
||||
if (!canTrade)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signals Exists ...
|
||||
bool hasLongSignal = XTESTCanOpenLongTrade();
|
||||
bool hasShortSignal = XTESTCanOpenShortTrade();
|
||||
if (!hasLongSignal && !hasShortSignal)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Long Trades ...
|
||||
if (
|
||||
//
|
||||
hasLongSignal &&
|
||||
xTESTAllowLongTrades)
|
||||
{
|
||||
//
|
||||
bool isOpened = XTESTOpenLongPosition();
|
||||
}
|
||||
|
||||
//
|
||||
// Open Short Trades ...
|
||||
if (
|
||||
//
|
||||
hasShortSignal &&
|
||||
xTESTAllowShortTrades)
|
||||
{
|
||||
//
|
||||
bool isOpened = XTESTOpenShortPosition();
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
void XTESTHandleCloseTrades()
|
||||
{
|
||||
//
|
||||
// All Close Mechanism Handles Here ...
|
||||
// - Force Close;
|
||||
// - Partial Close;
|
||||
// - Risk Free Close;
|
||||
// - Virtual TP/SL Close;
|
||||
|
||||
//
|
||||
// Force Close Long Trades ...
|
||||
bool canCloseLongTrades = XTESTCanCloseLongTrade();
|
||||
if (xTESTAllowLongTrades && canCloseLongTrades)
|
||||
{
|
||||
//
|
||||
ENUM_X_SIGNAL_TYPE type = X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
XSignal closed[];
|
||||
xTESTTrader.ClosePositionsByType(
|
||||
type,
|
||||
closed);
|
||||
|
||||
//
|
||||
bool isClosed = ArraySize(closed) > 0;
|
||||
if (isClosed)
|
||||
{
|
||||
XTESTIssueForceCloseTradesAlert(type);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Force Close Short Trades ...
|
||||
bool canCloseShortTrades = XTESTCanCloseShortTrade();
|
||||
if (xTESTAllowShortTrades && canCloseShortTrades)
|
||||
{
|
||||
//
|
||||
ENUM_X_SIGNAL_TYPE type = X_SIGNAL_SHORT;
|
||||
|
||||
//
|
||||
XSignal closed[];
|
||||
xTESTTrader.ClosePositionsByType(
|
||||
type,
|
||||
closed);
|
||||
|
||||
//
|
||||
bool isClosed = ArraySize(closed) > 0;
|
||||
if (isClosed)
|
||||
{
|
||||
XTESTIssueForceCloseTradesAlert(type);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Close Risk Free Trades ...
|
||||
XSignal riskFrees[];
|
||||
xTESTTrader.RiskFreeSignals(riskFrees);
|
||||
bool isRiskFree = ArraySize(riskFrees) > 0;
|
||||
if (isRiskFree)
|
||||
{
|
||||
XTESTIssueRiskFreeTradesAlert();
|
||||
}
|
||||
|
||||
//
|
||||
// Close Virtual TP / SL Trades ...
|
||||
if (xTESTUseVirtualTPSL)
|
||||
{
|
||||
//
|
||||
XSignal takeProfits[];
|
||||
XSignal stopLosses[];
|
||||
|
||||
//
|
||||
xTESTTrader.HandleVirtualTPSL(
|
||||
takeProfits,
|
||||
stopLosses);
|
||||
|
||||
//
|
||||
// Take Profits ...
|
||||
int takeProfitsCount = ArraySize(takeProfits);
|
||||
if (takeProfitsCount > 0)
|
||||
{
|
||||
//
|
||||
// Do What we Want in Profits Trades ...
|
||||
}
|
||||
|
||||
//
|
||||
// Stop Losses ...
|
||||
int stopLossesCount = ArraySize(stopLosses);
|
||||
if (stopLossesCount > 0)
|
||||
{
|
||||
//
|
||||
// Do What we Want in Stop Losses Trades ...
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Close Max DrawDown Trades ...
|
||||
|
||||
//
|
||||
// Close Long Time Trades ...
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Support Trades ...
|
||||
void XTESTHandleSupportTrades()
|
||||
{
|
||||
}
|
||||
|
||||
//
|
||||
// Open Long Position ...
|
||||
bool XTESTOpenLongPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
double tp = PipsToPrice(xTESTMinRewardPerTradeInPips * 3);
|
||||
double riskFree = PipsToPrice(xTESTMinRewardPerTradeInPips);
|
||||
double riskFreeRate = 0.75;
|
||||
double volume = XTESTCalculateVolume();
|
||||
|
||||
//
|
||||
XSignal signal = {};
|
||||
signal = xTESTTrader.GenerateTradeSignal(
|
||||
X_SIGNAL_LONG,
|
||||
tp,
|
||||
0,
|
||||
volume,
|
||||
riskFree,
|
||||
riskFreeRate,
|
||||
true);
|
||||
bool isValidSignal = IsValid(
|
||||
signal,
|
||||
xTESTMagicNumber);
|
||||
if (!isValidSignal)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
int error = -1;
|
||||
result = xTESTTrader.ExecuteSignal(signal, error);
|
||||
if (result)
|
||||
{
|
||||
XTESTIssueSignalExecutionAlert(signal);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Short Position ...
|
||||
bool XTESTOpenShortPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
double tp = PipsToPrice(xTESTMinRewardPerTradeInPips * 3);
|
||||
double riskFree = PipsToPrice(xTESTMinRewardPerTradeInPips);
|
||||
double riskFreeRate = 0.75;
|
||||
double volume = XTESTCalculateVolume();
|
||||
|
||||
//
|
||||
XSignal signal = {};
|
||||
signal = xTESTTrader.GenerateTradeSignal(
|
||||
X_SIGNAL_LONG,
|
||||
tp,
|
||||
0,
|
||||
volume,
|
||||
riskFree,
|
||||
riskFreeRate,
|
||||
true);
|
||||
bool isValidSignal = IsValid(
|
||||
signal,
|
||||
xTESTMagicNumber);
|
||||
if (!isValidSignal)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
int error = -1;
|
||||
result = xTESTTrader.ExecuteSignal(signal, error);
|
||||
if (result)
|
||||
{
|
||||
XTESTIssueSignalExecutionAlert(signal);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open a Support Signal ...
|
||||
bool XTESTOpenSupportTrade(
|
||||
XSignal &signal // Parent Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Private Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Calculating Volume for Tradings ...
|
||||
double XTESTCalculateVolume()
|
||||
{
|
||||
//
|
||||
// Assign default Value ...
|
||||
double result = xTESTStaticVolume;
|
||||
|
||||
//
|
||||
// we can count open trades and in draw down trades
|
||||
// then do check volume based on it for gridding ...
|
||||
int openTrades = xTESTTrader.Count();
|
||||
if (openTrades == 0)
|
||||
{
|
||||
openTrades = 1;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Normalized Multiplier ...
|
||||
double multiplier = xTESTVolumeMultiplier <= 0 ? 1 : xTESTVolumeMultiplier;
|
||||
|
||||
//
|
||||
result = multiplier * openTrades * xTESTStaticVolume;
|
||||
|
||||
//
|
||||
// Normalize Volume ...
|
||||
result = NormalizeVolume(result);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Signal TP and SL ...
|
||||
XTPSL XTESTCalculateTPSL(
|
||||
ENUM_X_SIGNAL_TYPE type // Position Type
|
||||
)
|
||||
{
|
||||
//
|
||||
XTPSL result = {};
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (
|
||||
type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double spread = GetSpread();
|
||||
double entry = isLong ? ask : bid;
|
||||
|
||||
//
|
||||
// TODO: Find Risk ..
|
||||
double risk = 0;
|
||||
|
||||
//
|
||||
// Calculate Reward ...
|
||||
double reward = PipsToPrice(xTESTMinRewardPerTradeInPips) + spread;
|
||||
|
||||
//
|
||||
// Calculate TP and SL ...
|
||||
double tp = isLong ? entry + reward : entry - reward;
|
||||
double sl = 0;
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.tp = tp;
|
||||
result.sl = sl;
|
||||
result.entry = entry;
|
||||
//
|
||||
// TODO: Calculate R2R ...
|
||||
result.r2r = 0;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
void XTESTIssueInitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "Initializion of (" + XTESTProviderName + " Provider" + " _ " + _Symbol + " _ " + EnumToString(_Period) + ") Succeeded ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueDeinitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "De Initializion of (" + XTESTProviderName + " Provider" + ") Succeeded ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueForceCloseTradesAlert(ENUM_X_SIGNAL_TYPE type)
|
||||
{
|
||||
//
|
||||
string typeStr = GetSignalType(type);
|
||||
if (StringLen(typeStr) == 0)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
string message = "Force Close " + typeStr + " Trades ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueMaxAllowedTradesReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached Max Allowed Same Time Trades ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueMaxAllowedFreeMarginReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached FreeMarigin For Open Trades ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueMinAllowedBalanceReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "doesn't have Minimum Balance For Open Trades ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueSignalExecutionAlert(
|
||||
XSignal &signal // Executed Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
XTESTIssueAlert(signal);
|
||||
}
|
||||
|
||||
void XTESTIssueSignalExecutionError(int error)
|
||||
{
|
||||
//
|
||||
string message = GetSignalExecutionError(error);
|
||||
if (StringLen(message) == 0)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueRiskFreeTradesAlert()
|
||||
{
|
||||
//
|
||||
string message = "Make Some Trades Risk Free ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueLongInProfitTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueLongInDrawdownTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XTESTIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTESTIssueAlert(string message)
|
||||
{
|
||||
//
|
||||
if (xTESTEnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
void XTESTIssueAlert(XSignal &signal)
|
||||
{
|
||||
//
|
||||
if (xTESTEnableAlerts)
|
||||
{
|
||||
SendAlert(signal);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// END Private Functions ...
|
||||
//
|
||||
@@ -0,0 +1,157 @@
|
||||
///////////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTM Signal Provider Indicators Library
|
||||
// ----------------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
// Include Provider Inputs ...
|
||||
#include "x-saherelm.xtm.provider.inputs.lib.mq5";
|
||||
|
||||
//
|
||||
// Imports all Indicators Helper here ...
|
||||
input group "XTM Provider Indicators";
|
||||
#include "x-saherelm.xtm.indicator.helper.lib.mq5";
|
||||
|
||||
//
|
||||
int xTMMaxLengthOfInputs = 0;
|
||||
int xTMCalculatedBars = 0;
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
bool XTMInitIndicators()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Check and Calculate Max Length in Inputs ...
|
||||
xTMMaxLengthOfInputs = MathMax(
|
||||
xTMMaPeriod,
|
||||
xTMMaxLengthOfInputs);
|
||||
xTMMaxLengthOfInputs = MathMax(
|
||||
xTMNumberOfItemsPerTick,
|
||||
xTMMaxLengthOfInputs);
|
||||
|
||||
//
|
||||
// Initialize Indicator/Oscillator Handlers ...
|
||||
ResetLastError();
|
||||
|
||||
//
|
||||
// XTM Init ...
|
||||
result = XTMInitHandlers();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Release Indicators ...
|
||||
void XTMReleaseIndicators()
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XTMReleaseHandlers();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Reading Buffers ...
|
||||
void XTMHandleReadingBuffers()
|
||||
{
|
||||
//
|
||||
// Reading Calculated Bars for a Simple Handler ...
|
||||
xTMCalculatedBars = BarsCalculated(xTMHandler);
|
||||
|
||||
//
|
||||
// Read Indicators Buffers ...
|
||||
XTMReadBuffers(xTMNumberOfItemsPerTick);
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// START Combination Functions ...
|
||||
//
|
||||
//
|
||||
|
||||
//
|
||||
// Can Open Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XTMCanOpenLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XTMHasLongConditions(xTMNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Long Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Long Signals ...
|
||||
bool XTMCanCloseLongTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Open Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XTMCanOpenShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
result = XTMHasShortConditions(xTMNumberOfItemsPerTick);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Can Close Short Trade ...
|
||||
// this is a Function will Check all market Conditions and get all
|
||||
// Strategy requirement Verifications for Short Signals ...
|
||||
bool XTMCanCloseShortTrade()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
//
|
||||
// END Combination Functions ...
|
||||
//
|
||||
//
|
||||
Binary file not shown.
@@ -0,0 +1,63 @@
|
||||
///////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTM Signal Provider Library Inputs
|
||||
// -----------------------------------------------------------
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
//
|
||||
input group "XTM Provider";
|
||||
|
||||
//
|
||||
input group "XTM Common";
|
||||
input bool xTMEnableProvider = true; // Enable Provider
|
||||
input bool xTMEnableAlerts = false; // Enable Events Alert
|
||||
input int xTMNumberOfItemsPerTick = 72; // Number Of items Readed In Each Tick
|
||||
|
||||
//
|
||||
input group "XTM Trader";
|
||||
input int xTMMagicNumber = 16940560; // Trader MagicNumber
|
||||
input int xTMSlippage = 10; // Trader Slippage
|
||||
|
||||
//
|
||||
input group "XTM Trade Management";
|
||||
input bool xTMAllowLongTrades = true; // Allow Long Trades
|
||||
input bool xTMAllowShortTrades = true; // Allow Short Trades
|
||||
|
||||
//
|
||||
input group "XTM Risk Management";
|
||||
input int xTMMaxAllowedTrades = 5; // Max Allowed Trades at Same Time
|
||||
input int xTMMaxInProfitTradeAge = 0; // Max In Profit Trades Age
|
||||
input int xTMMaxInDrawDownTradeAge = 576; // Max In DrawDown Trades Age
|
||||
input double xTMStaticVolume = 0.02; // Static Volume
|
||||
input double xTMVolumeMultiplier = 2; // Volume Multiplier
|
||||
input double xTMMinRewardPerTradeInPips = 1; // Min Reward Per Trade In Pips
|
||||
input double xTMFreeMarginFactorForOpenTrades = 0.5; // Minimum Free Marging for Open Trades
|
||||
input double xTMBalanceFactorForOpenTrades = 0.5; // Minimum Balance for Open Trades
|
||||
input bool xTMEnableSupportTrades = false; // Enable Support Trade
|
||||
|
||||
//
|
||||
// Validate Inputs before Initialization ...
|
||||
bool XTMValidateInputs()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// TODO: Fix this ...
|
||||
result = true;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
@@ -0,0 +1,859 @@
|
||||
////////////////////////////////////////////////////////////
|
||||
//
|
||||
// SaherElm IT Center MQL5 XTM Signal Provider Library
|
||||
// --------------------------------------------------------
|
||||
// Name: XTMSignalProvider
|
||||
// Description: XTM based signal provider ...
|
||||
//
|
||||
//
|
||||
// Maintainer:
|
||||
// ------------
|
||||
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
|
||||
//
|
||||
//////////////////////////////////////////////////////
|
||||
//
|
||||
// Global Properties ...
|
||||
#property library
|
||||
#property copyright "Copyright 2023, SaherElm IT Center"
|
||||
#property link "https://www.saherelm.ir"
|
||||
#property version "1.00"
|
||||
#property strict
|
||||
|
||||
#define XTMProviderName "XTM"
|
||||
|
||||
//
|
||||
// START Inputs ...
|
||||
//
|
||||
#include "x-saherelm.xtm.provider.inputs.lib.mq5";
|
||||
//
|
||||
// END Inputs ...
|
||||
//
|
||||
|
||||
//
|
||||
// Include Common Library ...
|
||||
#include "x-saherelm.common.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Logger Library ...
|
||||
#include "x-saherelm.log.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Alert Library ...
|
||||
#include "x-saherelm.alert.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Draw Library ...
|
||||
#include "x-saherelm.draw.lib.mq5"
|
||||
|
||||
//
|
||||
// Include Class Libraries ...
|
||||
#include "x-saherelm.class.lib.mq5"
|
||||
|
||||
//
|
||||
// START Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
XCTrade *xTMTrader;
|
||||
XCAccountInfo xTMAccountInfo;
|
||||
|
||||
//
|
||||
#include "x-saherelm.xtm.provider.indicators.lib.mq5"
|
||||
|
||||
//
|
||||
double xTMDeposit = 0;
|
||||
double xTMBalance = 0;
|
||||
double xTMFreeMargin = 0;
|
||||
double xTMFreeMarginForOpenTrades = 0;
|
||||
double xTMBalanceForOpenTrades = 0;
|
||||
|
||||
//
|
||||
// END Global Definitions: Variables, Properties and etc ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Initial Library if required ...
|
||||
bool XTMInitSignalProviderLibrary()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Validate Inputs ...
|
||||
result = XTMValidateInputs();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Init Indicators ...
|
||||
result = XTMInitIndicators();
|
||||
if (!result)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Account Deposit ...
|
||||
xTMDeposit = xTMAccountInfo.GetInitialBalance();
|
||||
|
||||
//
|
||||
// Calculate Min Balance for Trades ...
|
||||
if (xTMBalanceFactorForOpenTrades > 0)
|
||||
{
|
||||
xTMBalanceForOpenTrades = xTMBalanceFactorForOpenTrades * xTMDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Claculate Min Free Marging for Trades ...
|
||||
if (xTMFreeMarginFactorForOpenTrades > 0)
|
||||
{
|
||||
xTMFreeMarginForOpenTrades = xTMFreeMarginFactorForOpenTrades * xTMDeposit;
|
||||
}
|
||||
|
||||
//
|
||||
// Make XCTrader instance ...
|
||||
xTMTrader = new XCTrade(
|
||||
_Symbol,
|
||||
xTMSlippage,
|
||||
xTMMagicNumber);
|
||||
|
||||
//
|
||||
result = true;
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XTMIssueInitializationSucceedAlert();
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// DeInitial Library if required ...
|
||||
void XTMDeinitSignalProviderLibrary(
|
||||
const int reason)
|
||||
{
|
||||
//
|
||||
// Release Handlers ...
|
||||
XTMReleaseIndicators();
|
||||
|
||||
//
|
||||
// Logging State ...
|
||||
XTMIssueDeinitializationSucceedAlert();
|
||||
}
|
||||
|
||||
//
|
||||
// this is a Globally Function which do all of
|
||||
// checkings and positions handling ...
|
||||
void XTMSignalProviderHandleTick()
|
||||
{
|
||||
//
|
||||
// Update account Balance ...
|
||||
xTMBalance = xTMAccountInfo.GetBalance();
|
||||
xTMFreeMargin = xTMAccountInfo.GetFreeMargin();
|
||||
|
||||
//
|
||||
// Check Provider is Enable or Not ...
|
||||
if (!xTMEnableProvider) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Reading Indicator Buffers ...
|
||||
XTMHandleReadingBuffers();
|
||||
if (xTMCalculatedBars < xTMMaxLengthOfInputs)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
XTMHandleOpenTrades();
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
XTMHandleCloseTrades();
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Open Trades ...
|
||||
void XTMHandleOpenTrades()
|
||||
{
|
||||
//
|
||||
// Check Can Trade ...
|
||||
bool canTrade = xTMAllowLongTrades || xTMAllowShortTrades;
|
||||
if (!canTrade)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// First Check Signal Exists or NOt ...
|
||||
bool xTMHasLongSignal = XTMCanOpenLongTrade();
|
||||
bool xTMHasShortSignal = XTMCanOpenShortTrade();
|
||||
if (!xTMHasLongSignal && !xTMHasShortSignal)
|
||||
{
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Count Max Open Trades ...
|
||||
if (xTMMaxAllowedTrades > 0)
|
||||
{
|
||||
//
|
||||
int count = xTMTrader.Count();
|
||||
bool canOpenTrade = count < xTMMaxAllowedTrades;
|
||||
if (!canOpenTrade)
|
||||
{
|
||||
//
|
||||
XTMIssueMaxAllowedTradesReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Check Free Margin ...
|
||||
if (xTMFreeMargin <= xTMFreeMarginForOpenTrades)
|
||||
{
|
||||
//
|
||||
XTMIssueMaxAllowedFreeMarginReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Account Balance ...
|
||||
if (xTMBalance <= xTMBalanceForOpenTrades)
|
||||
{
|
||||
//
|
||||
XTMIssueMinAllowedBalanceReachedAlert();
|
||||
|
||||
//
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Long Trade ...
|
||||
if (
|
||||
xTMHasLongSignal &&
|
||||
xTMAllowLongTrades)
|
||||
{
|
||||
//
|
||||
bool isLongSignalExecuted = XTMOpenLongPosition();
|
||||
if (isLongSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Primary Short Trade ...
|
||||
if (
|
||||
xTMHasShortSignal &&
|
||||
xTMAllowShortTrades)
|
||||
{
|
||||
//
|
||||
bool isShortSignalExecuted = XTMOpenShortPosition();
|
||||
if (isShortSignalExecuted)
|
||||
{
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close Trades ...
|
||||
void XTMHandleCloseTrades()
|
||||
{
|
||||
//
|
||||
// Handle Long/Buy Close ...
|
||||
if (xTMTrader.CountLongs() > 0 && XTMCanCloseLongTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xTMTrader.CloseLongPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XTMIssueForceCloseTradesAlert(X_SIGNAL_LONG);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Short/Sell Close ...
|
||||
if (xTMTrader.CountShorts() > 0 && XTMCanCloseShortTrade())
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
xTMTrader.CloseShortPositions(closed);
|
||||
bool hasClosed = ArraySize(closed) > 0;
|
||||
if (hasClosed)
|
||||
{
|
||||
XTMIssueForceCloseTradesAlert(X_SIGNAL_SHORT);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In Profit Teades ...
|
||||
if (xTMMaxInProfitTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xTMTrader.GetLongTimeTrades(
|
||||
xTMMaxInProfitTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit < 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
bool isClosed = xTMTrader.Close(trade.ticket);
|
||||
if (isClosed)
|
||||
{
|
||||
Add(
|
||||
trade,
|
||||
closed);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XTMIssueLongInProfitTradeClosed();
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Handle Close In DrawDown Trades ...
|
||||
if (xTMMaxInDrawDownTradeAge > 0)
|
||||
{
|
||||
//
|
||||
XSignal closed[];
|
||||
XSignal longTimeTrades[];
|
||||
xTMTrader.GetLongTimeTrades(
|
||||
xTMMaxInDrawDownTradeAge,
|
||||
_Period,
|
||||
longTimeTrades);
|
||||
int count = ArraySize(longTimeTrades);
|
||||
if (count > 0)
|
||||
{
|
||||
//
|
||||
// Loop ...
|
||||
for (int i = 0; i < count; i++)
|
||||
{
|
||||
//
|
||||
XSignal trade = longTimeTrades[i];
|
||||
if (trade.profit > 0)
|
||||
{
|
||||
continue;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Grid Trades ...
|
||||
XTMOpenSuppurtTrade(trade);
|
||||
|
||||
// //
|
||||
// bool isClosed = xTMTrader.Close(trade.ticket);
|
||||
// if (isClosed)
|
||||
// {
|
||||
// //
|
||||
// Add(
|
||||
// trade,
|
||||
// closed);
|
||||
// }
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
if (ArraySize(closed) > 0)
|
||||
{
|
||||
XTMIssueLongInDrawdownTradeClosed();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// Open Long Position ...
|
||||
bool XTMOpenLongPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XTMGeneratePositionSignal(X_SIGNAL_LONG);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xTMMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xTMTrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XTMIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open Short Position ...
|
||||
bool XTMOpenShortPosition()
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
// Generate Position Signal and Validate it ...
|
||||
XSignal position = XTMGeneratePositionSignal(X_SIGNAL_SHORT);
|
||||
if (!IsValid(
|
||||
position,
|
||||
xTMMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Try to Open Position ...
|
||||
result = xTMTrader.ExecuteSignal(position);
|
||||
if (result)
|
||||
{
|
||||
XTMIssueSignalExecutionAlert(position);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Open a Support Signal ...
|
||||
bool XTMOpenSuppurtTrade(
|
||||
XSignal &signal // Parent Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
bool result = false;
|
||||
|
||||
//
|
||||
if (!xTMEnableSupportTrades) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Validate Signal ...
|
||||
if (!IsValid(signal, xTMMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Market Conditions ...
|
||||
bool hasLongSignal = XTMCanOpenLongTrade();
|
||||
bool hasShortSignal = XTMCanOpenShortTrade();
|
||||
|
||||
//
|
||||
ENUM_X_SIGNAL_TYPE type = X_SIGNAL_UNKNOWN;
|
||||
|
||||
//
|
||||
// Detect Support Signal Direction ...
|
||||
XSignal support = {};
|
||||
switch (signal.type)
|
||||
{
|
||||
//
|
||||
case X_SIGNAL_LONG:
|
||||
//
|
||||
// First Check Long Support ...
|
||||
// Then Look for Short Support ...
|
||||
if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
|
||||
//
|
||||
case X_SIGNAL_SHORT:
|
||||
// First Check Short Support ...
|
||||
// Then Look for Long Support ...
|
||||
if (hasShortSignal)
|
||||
{
|
||||
type = X_SIGNAL_SHORT;
|
||||
}
|
||||
else if (hasLongSignal)
|
||||
{
|
||||
type = X_SIGNAL_LONG;
|
||||
}
|
||||
else
|
||||
{
|
||||
type = signal.type;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
//
|
||||
if (type == X_SIGNAL_UNKNOWN)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
// Find Common Used ...
|
||||
double entry = GetEntry(type);
|
||||
double volumeMultiplier = 2;
|
||||
if (xTMVolumeMultiplier > 2)
|
||||
{
|
||||
volumeMultiplier = xTMVolumeMultiplier;
|
||||
}
|
||||
|
||||
//
|
||||
// Check Signal is Support ot nor ...
|
||||
int titlePosition = StringFind(
|
||||
signal.comment,
|
||||
"Support");
|
||||
bool isSupport = titlePosition >= 0;
|
||||
double priceDistance = MathAbs(signal.entry - entry);
|
||||
|
||||
//
|
||||
if (isSupport || priceDistance < PipsToPrice(5)) {
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
double volume = NormalizeVolume(isSupport ? signal.volume : signal.volume * volumeMultiplier);
|
||||
string comment = "Support_" + GetSignalType(type) + "_For_" + (string)signal.ticket + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XTMCalculateTPSL(type);
|
||||
if (!IsValid(tpSL))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate reward of signal ...
|
||||
double reward = MathAbs(signal.entry - signal.tp) / 2;
|
||||
double tp = tpSL.sl; // isLong ? entry + reward : entry - reward;
|
||||
double sl = tpSL.sl;
|
||||
|
||||
//
|
||||
// Filling Support Signal ...
|
||||
support.tp = tp;
|
||||
support.sl = sl;
|
||||
support.type = type;
|
||||
support.time = time;
|
||||
support.entry = entry;
|
||||
support.volume = volume;
|
||||
support.symbol = _Symbol;
|
||||
support.comment = comment;
|
||||
support.magicNumber = xTMMagicNumber;
|
||||
|
||||
//
|
||||
// Validate Generated Support ...
|
||||
if (!IsValid(support, xTMMagicNumber))
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
result = xTMTrader.ExecuteSignal(support);
|
||||
if (result)
|
||||
{
|
||||
XTMIssueSignalExecutionAlert(support);
|
||||
}
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Generate Specific type of Signals for Trading ...
|
||||
XSignal XTMGeneratePositionSignal(
|
||||
ENUM_X_SIGNAL_TYPE type // direction of position
|
||||
)
|
||||
{
|
||||
//
|
||||
XSignal result = {};
|
||||
|
||||
//
|
||||
if (type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double entry = GetEntry(type);
|
||||
|
||||
//
|
||||
double volume = XTMCalculateVolume();
|
||||
|
||||
//
|
||||
datetime time = iTime(
|
||||
_Symbol,
|
||||
_Period,
|
||||
0);
|
||||
|
||||
//
|
||||
string typeString = GetSignalType(type);
|
||||
string comment = XTMProviderName + "_" + typeString + "_" + (string)volume + "_" + (string)time;
|
||||
|
||||
//
|
||||
XTPSL tpSL = XTMCalculateTPSL(type);
|
||||
if (IsValid(tpSL))
|
||||
{
|
||||
//
|
||||
// Apply TP ...
|
||||
if (tpSL.tp > 0)
|
||||
{
|
||||
result.tp = tpSL.tp;
|
||||
}
|
||||
|
||||
//
|
||||
// Apply SL ...
|
||||
if (tpSL.sl > 0)
|
||||
{
|
||||
result.sl = tpSL.sl;
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.time = time;
|
||||
result.entry = entry;
|
||||
result.volume = volume;
|
||||
result.symbol = _Symbol;
|
||||
result.comment = comment;
|
||||
result.magicNumber = xTMMagicNumber;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
//
|
||||
// END Provided Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// START Private Functions ...
|
||||
//
|
||||
|
||||
//
|
||||
// Calculating Volume for Tradings ...
|
||||
double XTMCalculateVolume()
|
||||
{
|
||||
//
|
||||
// Assign default Value ...
|
||||
double result = xTMStaticVolume;
|
||||
|
||||
//
|
||||
// we can count open trades and in draw down trades
|
||||
// then do check volume based on it for gridding ...
|
||||
int openTrades = xTMTrader.Count();
|
||||
if (openTrades == 0)
|
||||
{
|
||||
openTrades = 1;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Normalized Multiplier ...
|
||||
double multiplier = xTMVolumeMultiplier <= 0 ? 1 : xTMVolumeMultiplier;
|
||||
|
||||
//
|
||||
result = multiplier * openTrades * xTMStaticVolume;
|
||||
|
||||
//
|
||||
// Normalize Volume ...
|
||||
result = NormalizeVolume(result);
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
// Calculate Signal TP and SL ...
|
||||
XTPSL XTMCalculateTPSL(
|
||||
ENUM_X_SIGNAL_TYPE type // Position Type
|
||||
)
|
||||
{
|
||||
//
|
||||
XTPSL result = {};
|
||||
|
||||
//
|
||||
// Validate Args ...
|
||||
if (
|
||||
type != X_SIGNAL_LONG &&
|
||||
type != X_SIGNAL_SHORT)
|
||||
{
|
||||
return result;
|
||||
}
|
||||
|
||||
//
|
||||
bool isLong = type == X_SIGNAL_LONG;
|
||||
|
||||
//
|
||||
double ask = GetAsk();
|
||||
double bid = GetBid();
|
||||
double spread = GetSpread();
|
||||
double entry = isLong ? ask : bid;
|
||||
|
||||
//
|
||||
// TODO: Find Risk ..
|
||||
double risk = 0;
|
||||
|
||||
//
|
||||
// Calculate Reward ...
|
||||
double reward = PipsToPrice(xTMMinRewardPerTradeInPips) + spread;
|
||||
|
||||
//
|
||||
// Calculate TP and SL ...
|
||||
double tp = isLong ? entry + reward : entry - reward;
|
||||
double sl = 0;
|
||||
|
||||
//
|
||||
result.type = type;
|
||||
result.tp = tp;
|
||||
result.sl = sl;
|
||||
result.entry = entry;
|
||||
//
|
||||
// TODO: Calculate R2R ...
|
||||
result.r2r = 0;
|
||||
|
||||
//
|
||||
return result;
|
||||
}
|
||||
|
||||
void XTMIssueInitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "Initializion of (" + XTMProviderName + " Provider" + " _ " + _Symbol + " _ " + EnumToString(_Period) + ") Succeeded ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueDeinitializationSucceedAlert()
|
||||
{
|
||||
//
|
||||
string message = "De Initializion of (" + XTMProviderName + " Provider" + ") Succeeded ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueForceCloseTradesAlert(ENUM_X_SIGNAL_TYPE type) {
|
||||
//
|
||||
string typeStr = GetSignalType(type);
|
||||
if (StringLen(typeStr) == 0) {
|
||||
return;
|
||||
}
|
||||
|
||||
//
|
||||
string message = "Force Close " + typeStr + " Trades ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueMaxAllowedTradesReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached Max Allowed Same Time Trades ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueMaxAllowedFreeMarginReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "reached FreeMarigin For Open Trades ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueMinAllowedBalanceReachedAlert()
|
||||
{
|
||||
//
|
||||
string message = "doesn't have Minimum Balance For Open Trades ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueSignalExecutionAlert(
|
||||
XSignal &signal // Executed Signal
|
||||
)
|
||||
{
|
||||
//
|
||||
XTMIssueAlert(signal);
|
||||
}
|
||||
|
||||
void XTMIssueLongInProfitTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueLongInDrawdownTradeClosed()
|
||||
{
|
||||
//
|
||||
string message = "Closed Long Time in Profit Trades ...";
|
||||
XTMIssueAlert(message);
|
||||
}
|
||||
|
||||
void XTMIssueAlert(string message)
|
||||
{
|
||||
//
|
||||
if (xTMEnableAlerts)
|
||||
{
|
||||
SendAlert(message);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogMessage(message);
|
||||
}
|
||||
}
|
||||
void XTMIssueAlert(XSignal &signal)
|
||||
{
|
||||
//
|
||||
if (xTMEnableAlerts)
|
||||
{
|
||||
SendAlert(signal);
|
||||
}
|
||||
else
|
||||
{
|
||||
LogSignal(signal);
|
||||
}
|
||||
}
|
||||
|
||||
//
|
||||
// END Private Functions ...
|
||||
//
|
||||
Reference in New Issue
Block a user