446 lines
9.9 KiB
Plaintext
446 lines
9.9 KiB
Plaintext
///////////////////////////////////////////////////////
|
|
//
|
|
// SaherElm IT Center MQL5 Class Library
|
|
// --------------------------------------
|
|
// Name: XSCXEMRNGStrategy
|
|
// Description: provides all based classes for use ...
|
|
//
|
|
//
|
|
// 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
|
|
|
|
//
|
|
// TODO: Complete this ...
|
|
|
|
//
|
|
/// Imports ...
|
|
#include "../Helpers/x-saherelm.xtm.helper.mq5"
|
|
#include "../Helpers/x-saherelm.xstr.helper.mq5"
|
|
#include "../Classes/x-saherelm.xstrategy.class.mq5"
|
|
|
|
//
|
|
string XEMRNGStartegyToken = "XEMRNG";
|
|
|
|
//
|
|
class XSCXEMRNGStrategy : public XSCBaseStrategy
|
|
{
|
|
//
|
|
// Public ...
|
|
public:
|
|
//
|
|
// Constructor(s) ...
|
|
void XSCXEMRNGStrategy(
|
|
//
|
|
// Base ...
|
|
string _symbol, // Trading Symbol
|
|
ENUM_TIMEFRAMES _period, // Trading TimeFrame
|
|
double _volume, // Voluem
|
|
double _r2r, // Risk/Reward Ratio
|
|
int _slippage, // Trader Slippage
|
|
long _magicNumber, // Trader Magic Number
|
|
bool _useTPSLAsPoint = false, // Converts TP and SL by Provided Points
|
|
bool _forceMaxTPSLAsPoint = false, // Force Max TP and SL by Provided Points
|
|
double _tpPoint = 0, // TP As Point
|
|
double _slPoint = 0, // SL As Point
|
|
bool _allowLong = true,
|
|
bool _allowShort = true,
|
|
int _maxAllowedLongs = 0,
|
|
int _maxAllowedShorts = 0 //
|
|
) : XSCBaseStrategy(_symbol,
|
|
_period,
|
|
_volume,
|
|
_r2r,
|
|
_slippage,
|
|
_magicNumber,
|
|
_useTPSLAsPoint,
|
|
_forceMaxTPSLAsPoint,
|
|
_tpPoint,
|
|
_slPoint,
|
|
_allowLong,
|
|
_allowShort,
|
|
_maxAllowedLongs,
|
|
_maxAllowedShorts //
|
|
)
|
|
{
|
|
//
|
|
ConfigureRequirements();
|
|
|
|
//
|
|
SetAlertPrefix(GetTag());
|
|
}
|
|
|
|
//
|
|
// Deconstructor ...
|
|
void ~XSCXEMRNGStrategy()
|
|
{
|
|
delete mTMHelper;
|
|
}
|
|
|
|
//
|
|
// Getter / Setter (s) ...
|
|
|
|
//
|
|
// Overrides ...
|
|
|
|
//
|
|
// Customize Strategy Identifier ...
|
|
string GetTag() override
|
|
{
|
|
return XEMRNGStartegyToken;
|
|
}
|
|
|
|
//
|
|
// Check Conditions For Signal ...
|
|
bool HasSignal(
|
|
XSignal &signal //
|
|
) override
|
|
{
|
|
//
|
|
bool result = false;
|
|
|
|
//
|
|
signal.Clean();
|
|
|
|
//
|
|
double sl = 0;
|
|
double tp = 0;
|
|
double risk = 0;
|
|
double entry = 0;
|
|
double reward = 0;
|
|
double r2r = R2R();
|
|
ENUM_POSITION_TYPE type = POSITION_TYPE_BUY;
|
|
ENUM_X_ORDER_MODES mode = X_ORDER_MODE_MARKET;
|
|
|
|
//
|
|
int start = 0;
|
|
int count = 5;
|
|
|
|
//
|
|
double tms[];
|
|
ArraySetAsSeries(tms, true);
|
|
mTMHelper.CopyMain(
|
|
start,
|
|
count,
|
|
tms //
|
|
);
|
|
|
|
//
|
|
XSTRConditions strConditions;
|
|
result = mSTRHelper.GetConditions(
|
|
strConditions,
|
|
start,
|
|
count //
|
|
);
|
|
if (!result)
|
|
{
|
|
return result;
|
|
}
|
|
|
|
//
|
|
XOHCL cBar;
|
|
result = cBar.Init(
|
|
mSymbol,
|
|
mPeriod,
|
|
1 //
|
|
);
|
|
if (!result)
|
|
{
|
|
return result;
|
|
}
|
|
|
|
//
|
|
double hh5 = cBar.FindHighest(
|
|
5,
|
|
MODE_HIGH //
|
|
);
|
|
double ll5 = cBar.FindLowest(
|
|
5,
|
|
MODE_LOW //
|
|
);
|
|
|
|
//
|
|
XOHCL pBar;
|
|
result = cBar.GetPreviousBar(pBar);
|
|
if (!result)
|
|
{
|
|
return result;
|
|
}
|
|
|
|
//
|
|
bool hasLong = false;
|
|
bool hasShort = false;
|
|
|
|
//
|
|
XOHCL tmpHSW[];
|
|
XOHCL tmpLSW[];
|
|
|
|
//
|
|
bool useHammer = true;
|
|
bool useMorningStar = false;
|
|
bool useBullishEngulfing = true;
|
|
bool useBullishMaurubozu = true;
|
|
|
|
//
|
|
bool useShootingStar = true;
|
|
bool useEveningStar = false;
|
|
bool useBearishEngulfing = true;
|
|
bool useBearishMaurubozu = true;
|
|
|
|
//
|
|
// Long ...
|
|
|
|
//
|
|
bool isHammer = !useHammer
|
|
? false
|
|
: cBar.IsHammer();
|
|
bool isMorningStar = !useMorningStar
|
|
? false
|
|
: cBar.IsMorningStar();
|
|
bool isBullishMarubozu = !useBullishEngulfing
|
|
? false
|
|
: cBar.IsBullishMarubozu();
|
|
bool isBullishEngulfing = !useBullishMaurubozu
|
|
? false
|
|
: cBar.IsBullishEngulfing();
|
|
|
|
//
|
|
bool isBullishTrend = cBar.HasBullishTrend(
|
|
tmpHSW,
|
|
tmpLSW,
|
|
true //
|
|
);
|
|
|
|
//
|
|
// Find Swing Low Above of EMA ...
|
|
// Find Swing High Above of EMA ...
|
|
// Fins Swing Low Below of EMA ...
|
|
// Detect Bullish Pattern ...
|
|
hasLong =
|
|
//
|
|
cBar.IsBullish()
|
|
//
|
|
&&
|
|
//
|
|
isBullishTrend
|
|
//
|
|
&&
|
|
//
|
|
cBar.close > tms[1]
|
|
//
|
|
&&
|
|
//
|
|
ll5 < tms[1]
|
|
//
|
|
&&
|
|
//
|
|
strConditions.isTrendSwitchedToBullish
|
|
//
|
|
&&
|
|
//
|
|
(
|
|
//
|
|
isHammer
|
|
//
|
|
||
|
|
//
|
|
isMorningStar
|
|
//
|
|
||
|
|
//
|
|
isBullishMarubozu
|
|
//
|
|
||
|
|
//
|
|
isBullishEngulfing
|
|
//
|
|
)
|
|
//
|
|
;
|
|
if (hasLong)
|
|
{
|
|
//
|
|
type = POSITION_TYPE_BUY;
|
|
|
|
//
|
|
sl = tmpLSW[ArraySize(tmpLSW) - 1].low;
|
|
}
|
|
|
|
//
|
|
// Short ...
|
|
bool isShootingStar = !useShootingStar
|
|
? false
|
|
: cBar.IsShootingStar();
|
|
bool isEveningStar = !useEveningStar
|
|
? false
|
|
: cBar.IsEveningStar();
|
|
bool isBearishEngulfing = !useBearishEngulfing
|
|
? false
|
|
: cBar.IsBearishEngulfing();
|
|
bool isBearishMaurubozu = !useBearishMaurubozu
|
|
? false
|
|
: cBar.IsBearishMarubozu();
|
|
|
|
//
|
|
bool isBearishTrend = cBar.HasBearishTrend(
|
|
tmpHSW,
|
|
tmpLSW,
|
|
true //
|
|
);
|
|
|
|
//
|
|
hasShort =
|
|
//
|
|
cBar.IsBearish()
|
|
//
|
|
&&
|
|
//
|
|
isBearishTrend
|
|
//
|
|
&&
|
|
//
|
|
cBar.close < tms[1]
|
|
//
|
|
&&
|
|
//
|
|
hh5 > tms[1]
|
|
//
|
|
&&
|
|
//
|
|
strConditions.isTrendSwitchedToBearish
|
|
//
|
|
&&
|
|
//
|
|
(
|
|
//
|
|
isShootingStar
|
|
//
|
|
||
|
|
//
|
|
isEveningStar
|
|
//
|
|
||
|
|
//
|
|
isBearishEngulfing
|
|
//
|
|
||
|
|
//
|
|
isBearishMaurubozu
|
|
//
|
|
)
|
|
//
|
|
;
|
|
if (hasShort)
|
|
{
|
|
//
|
|
type = POSITION_TYPE_SELL;
|
|
|
|
//
|
|
sl = tmpHSW[ArraySize(tmpHSW) - 1].high;
|
|
}
|
|
|
|
//
|
|
result = hasLong || hasShort;
|
|
if (!result)
|
|
{
|
|
return result;
|
|
}
|
|
|
|
//
|
|
entry = GetEntry(mSymbol, type);
|
|
CalculateTPSLByPrice(
|
|
sl,
|
|
tp,
|
|
type,
|
|
entry,
|
|
r2r //
|
|
);
|
|
|
|
//
|
|
result = signal.Prepare(
|
|
mSymbol,
|
|
GetTag(),
|
|
mPeriod,
|
|
type,
|
|
mode,
|
|
entry,
|
|
mVolume,
|
|
sl,
|
|
tp //
|
|
);
|
|
|
|
//
|
|
return result;
|
|
}
|
|
|
|
//
|
|
// Protected ...
|
|
protected:
|
|
//
|
|
// Props ...
|
|
|
|
//
|
|
XTMInputs mTMInputs; // Tren Magic Inputs ...
|
|
XSCXTMHelper *mTMHelper; // Trend Magic Helper Class ...
|
|
|
|
//
|
|
XSTRInputs mSTRInputs; // Super Trend Inputs ...
|
|
XSCXSTRHelper *mSTRHelper; // Super Trend Helper Class ...
|
|
|
|
//
|
|
// Private ...
|
|
private:
|
|
//
|
|
|
|
//
|
|
// Set Default TM Inputs ...
|
|
void ConfigureRequirements()
|
|
{
|
|
//
|
|
mTMInputs.maShift = 0;
|
|
mTMInputs.maPeriod = 100;
|
|
mTMInputs.maMethod = MODE_EMA;
|
|
mTMInputs.maAppliedTo = PRICE_CLOSE;
|
|
|
|
//
|
|
mTMInputs.showLine = true;
|
|
|
|
//
|
|
mTMHelper = new XSCXTMHelper();
|
|
|
|
//
|
|
mTMHelper.Init(
|
|
mSymbol,
|
|
mPeriod,
|
|
mTMInputs //
|
|
);
|
|
|
|
//
|
|
mSTRInputs.length = 14;
|
|
mSTRInputs.multiplier = 3.5;
|
|
mSTRInputs.appliedTo = PRICE_CLOSE;
|
|
|
|
//
|
|
mSTRInputs.showTrends = true;
|
|
mSTRInputs.fillTrends = false;
|
|
|
|
//
|
|
mSTRHelper = new XSCXSTRHelper();
|
|
mSTRHelper.Init(
|
|
mSymbol,
|
|
mPeriod,
|
|
mSTRInputs //
|
|
);
|
|
}
|
|
};
|
|
|
|
// |