On complique 8 moyennes mobiles UT 15 sur les CAC40 du 16.05

Présentation, Développement, Améliorations et Ressources pour les Stratégies de Trading Automatique.

Modérateur : Administrateurs

Répondre
Message
Auteur
lefeuvr3
Nouveau
Messages : 8
Inscription : 05 nov. 2012, 16:53

On complique 8 moyennes mobiles UT 15 sur les CAC40 du 16.05

#1 Message par lefeuvr3 »

//+------------------------------------------------------------------+
//| This MQL is generated by Expert Advisor Builder |
//| http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/ |
//| |
//| In no event will author be liable for any damages whatsoever. |
//| Use at your own risk. |
//| |
//+------------------- DO NOT REMOVE THIS HEADER --------------------+

#define SIGNAL_NONE 0
#define SIGNAL_BUY 1
#define SIGNAL_SELL 2
#define SIGNAL_CLOSEBUY 3
#define SIGNAL_CLOSESELL 4

#property copyright "Expert Advisor Builder"
#property link "http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/"

extern int MagicNumber = 0;
extern bool SignalMail = False;
extern bool EachTickMode = True;
extern double Lots = 1.0;
extern int Slippage = 3;
extern bool UseStopLoss = False;
extern int StopLoss = 30;
extern bool UseTakeProfit = False;
extern int TakeProfit = 60;
extern bool UseTrailingStop = False;
extern int TrailingStop = 30;
extern int PRICE = 0 ;
extern int MODE1 = 0;
extern int MODE2 = 0;
extern int MODE3 = 0;
extern int MODE4 = 0;
extern int PERIODE1 = 274;
extern int DecalageMODE1 = 0;
extern int PERIODE2 =250;
extern int DecalageMODE2 = 0;
extern int PERIODE3 =498;
extern int DecalageMODE3 = 0;
extern int PERIODE4 = 392;
extern int DecalageMODE4 = 0;
extern int PERIODE5 = 268;
extern int DecalageMODE5 = 0;
extern int PERIODE6 = 148;
extern int DecalageMODE6 = 0;
extern int PERIODE7 =284;
extern int DecalageMODE7 = 0;
extern int PERIODE8 = 122;
extern int DecalageMODE8 = 0;
extern int Shift0 = 0;
extern int Shift1 = 1;

int BarCount;
int Current;
bool TickCheck = False;
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init() {
BarCount = Bars;

if (EachTickMode) Current = 0; else Current = 1;

return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit() {
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start() {
int Order = SIGNAL_NONE;
int Total, Ticket;
double StopLossLevel, TakeProfitLevel;



if (EachTickMode && Bars != BarCount) TickCheck = False;
Total = OrdersTotal();
Order = SIGNAL_NONE;

//+------------------------------------------------------------------+
//| Variable Begin |
//+------------------------------------------------------------------+


double Buy1_1 = iMA(NULL, 0, PERIODE1, DecalageMODE1, MODE1, PRICE, Current + Shift1);
double Buy1_2 = iMA(NULL, 0, PERIODE2, DecalageMODE2, MODE2, PRICE, Current + Shift1);
double Buy2_1 = iMA(NULL, 0, PERIODE1, DecalageMODE1, MODE1, PRICE, Current + Shift0);
double Buy2_2 = iMA(NULL, 0, PERIODE2, DecalageMODE2, MODE2, PRICE, Current + Shift0);

double Sell1_1 = iMA(NULL, 0, PERIODE3, DecalageMODE5, MODE1, PRICE, Current + Shift1);
double Sell1_2 = iMA(NULL, 0, PERIODE4, DecalageMODE6, MODE2, PRICE, Current + Shift1);
double Sell2_1 = iMA(NULL, 0, PERIODE3, DecalageMODE5, MODE1, PRICE, Current + Shift0);
double Sell2_2 = iMA(NULL, 0, PERIODE4, DecalageMODE6, MODE2, PRICE, Current + Shift0);

double CloseBuy1_1 = iMA(NULL, 0, PERIODE5, DecalageMODE3, MODE1, PRICE, Current + Shift1);
double CloseBuy1_2 = iMA(NULL, 0, PERIODE6, DecalageMODE4, MODE2, PRICE, Current + Shift1);
double CloseBuy2_1 = iMA(NULL, 0, PERIODE5, DecalageMODE3, MODE1, PRICE, Current + Shift0);
double CloseBuy2_2 = iMA(NULL, 0, PERIODE6, DecalageMODE4, MODE2, PRICE, Current + Shift0);

double CloseSell1_1 = iMA(NULL, 0, PERIODE7, DecalageMODE7, MODE1, PRICE, Current + Shift1);
double CloseSell1_2 = iMA(NULL, 0, PERIODE8, DecalageMODE8, MODE2, PRICE, Current + Shift1);
double CloseSell2_1 = iMA(NULL, 0, PERIODE7, DecalageMODE7, MODE1, PRICE, Current + Shift0);
double CloseSell2_2 = iMA(NULL, 0, PERIODE8, DecalageMODE8, MODE2, PRICE, Current + Shift0);


//+------------------------------------------------------------------+
//| Variable End |
//+------------------------------------------------------------------+

//Check position
bool IsTrade = False;

for (int i = 0; i < Total; i ++) {
OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
if(OrderType() <= OP_SELL && OrderSymbol() == Symbol()) {
IsTrade = True;
if(OrderType() == OP_BUY) {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Buy) |
//+------------------------------------------------------------------+

if (CloseBuy1_1 > CloseBuy1_2 && CloseBuy2_1 < CloseBuy2_2) Order = SIGNAL_CLOSEBUY;


//+------------------------------------------------------------------+
//| Signal End(Exit Buy) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSEBUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Bid, Slippage, MediumSeaGreen);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Close Buy");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if(Bid - OrderOpenPrice() > Point * TrailingStop) {
if(OrderStopLoss() < Bid - Point * TrailingStop) {
OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
} else {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Sell) |
//+------------------------------------------------------------------+

if (CloseSell1_1 < CloseSell1_2 && CloseSell2_1 > CloseSell2_2) Order = SIGNAL_CLOSESELL;


//+------------------------------------------------------------------+
//| Signal End(Exit Sell) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSESELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Close Sell");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) {
if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) {
OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
}
}
}

//+------------------------------------------------------------------+
//| Signal Begin(Entry) |
//+------------------------------------------------------------------+

if (Buy1_1 < Buy1_2 && Buy2_1 > Buy2_2) Order = SIGNAL_BUY;

if (Sell1_1 > Sell1_2 && Sell2_1 < Sell2_2) Order = SIGNAL_SELL;


//+------------------------------------------------------------------+
//| Signal End |
//+------------------------------------------------------------------+

//Buy
if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Ask - StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Ask + TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, Slippage, StopLossLevel, TakeProfitLevel, "Buy(#" + MagicNumber + ")", MagicNumber, 0, DodgerBlue);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("BUY order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Open Buy");
} else {
Print("Error opening BUY order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

//Sell
if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Bid + StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Bid - TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_SELL, Lots, Bid, Slippage, StopLossLevel, TakeProfitLevel, "Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("SELL order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Open Sell");
} else {
Print("Error opening SELL order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

if (!EachTickMode) BarCount = Bars;

return(0);
}
//+------------------------------------------------------------------+
Haut
lefeuvr3
Nouveau
Messages : 8
Inscription : 05 nov. 2012, 16:53

Petite variante sur le style des 8 moyennes mobiles

#2 Message par lefeuvr3 »

Petite variante sur le style des 8 moyennes mobiles tjs sur le CAC 40 en UT 15 du 16.05.2012 a ce jour
Code

//+------------------------------------------------------------------+
//| This MQL is generated by Expert Advisor Builder |
//| http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/ |
//| |
//| In no event will author be liable for any damages whatsoever. |
//| Use at your own risk. |
//| |
//+------------------- DO NOT REMOVE THIS HEADER --------------------+

#define SIGNAL_NONE 0
#define SIGNAL_BUY 1
#define SIGNAL_SELL 2
#define SIGNAL_CLOSEBUY 3
#define SIGNAL_CLOSESELL 4

#property copyright "Expert Advisor Builder"
#property link "http://sufx.core.t3-ism.net/ExpertAdvisorBuilder/"

extern int MagicNumber = 0;
extern bool SignalMail = False;
extern bool EachTickMode = False;
extern double Lots = 1.0;
extern int Slippage = 3;
extern bool UseStopLoss = False;
extern int StopLoss = 30;
extern bool UseTakeProfit = False;
extern int TakeProfit = 60;
extern bool UseTrailingStop = False;
extern int TrailingStop = 30;
extern int PLT1 = 650;
extern int PLT2 = 400;
extern int PMT1 = 720;
extern int PMT2 = 470 ;
extern int PCT1 = 790;
extern int PCT2 = 250;
extern int PTCT1 = 750;
extern int PTCT2 = 220;
extern int SHIFT0 =0;
extern int SHIFT1 =1;


int BarCount;
int Current;
bool TickCheck = False;
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
int init() {
BarCount = Bars;

if (EachTickMode) Current = 0; else Current = 1;

return(0);
}
//+------------------------------------------------------------------+
//| expert deinitialization function |
//+------------------------------------------------------------------+
int deinit() {
return(0);
}
//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start() {
int Order = SIGNAL_NONE;
int Total, Ticket;
double StopLossLevel, TakeProfitLevel;



if (EachTickMode && Bars != BarCount) TickCheck = False;
Total = OrdersTotal();
Order = SIGNAL_NONE;

//+------------------------------------------------------------------+
//| Variable Begin |
//+------------------------------------------------------------------+


double Buy1_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy1_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy2_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy2_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy3_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy3_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy4_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy4_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy5_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy5_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy6_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy6_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy7_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy7_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Buy8_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Buy8_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);

double Sell1_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell1_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell2_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell2_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell3_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell3_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell4_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell4_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell5_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell5_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell6_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell6_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell7_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell7_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double Sell8_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double Sell8_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);

double CloseBuy1_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy1_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy2_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy2_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy3_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy3_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy4_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy4_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy5_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy5_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy6_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy6_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy7_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy7_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseBuy8_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseBuy8_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);

double CloseSell1_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell1_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell2_1 = iMA(NULL, 0, PLT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell2_2 = iMA(NULL, 0, PLT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell3_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell3_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell4_1 = iMA(NULL, 0, PMT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell4_2 = iMA(NULL, 0, PMT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell5_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell5_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell6_1 = iMA(NULL, 0, PCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell6_2 = iMA(NULL, 0, PCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell7_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell7_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT1);
double CloseSell8_1 = iMA(NULL, 0, PTCT1, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);
double CloseSell8_2 = iMA(NULL, 0, PTCT2, 0, MODE_SMA, PRICE_CLOSE, Current + SHIFT0);


//+------------------------------------------------------------------+
//| Variable End |
//+------------------------------------------------------------------+

//Check position
bool IsTrade = False;

for (int i = 0; i < Total; i ++) {
OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
if(OrderType() <= OP_SELL && OrderSymbol() == Symbol()) {
IsTrade = True;
if(OrderType() == OP_BUY) {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Buy) |
//+------------------------------------------------------------------+

if (CloseBuy1_1 > CloseBuy1_2 && CloseBuy2_1 < CloseBuy2_2 || CloseBuy3_1 > CloseBuy3_2 && CloseBuy4_1 < CloseBuy4_2 || CloseBuy5_1 > CloseBuy5_2 && CloseBuy6_1 < CloseBuy6_2 || CloseBuy7_1 > CloseBuy7_2 && CloseBuy8_1 < CloseBuy8_2) Order = SIGNAL_CLOSEBUY;


//+------------------------------------------------------------------+
//| Signal End(Exit Buy) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSEBUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Bid, Slippage, MediumSeaGreen);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Close Buy");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if(Bid - OrderOpenPrice() > Point * TrailingStop) {
if(OrderStopLoss() < Bid - Point * TrailingStop) {
OrderModify(OrderTicket(), OrderOpenPrice(), Bid - Point * TrailingStop, OrderTakeProfit(), 0, MediumSeaGreen);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
} else {
//Close

//+------------------------------------------------------------------+
//| Signal Begin(Exit Sell) |
//+------------------------------------------------------------------+

if (CloseSell1_1 < CloseSell1_2 && CloseSell2_1 > CloseSell2_2 || CloseSell3_1 < CloseSell3_2 && CloseSell4_1 > CloseSell4_2 || CloseSell5_1 < CloseSell5_2 && CloseSell6_1 > CloseSell6_2 || CloseSell7_1 < CloseSell7_2 && CloseSell8_1 > CloseSell8_2) Order = SIGNAL_CLOSESELL;


//+------------------------------------------------------------------+
//| Signal End(Exit Sell) |
//+------------------------------------------------------------------+

if (Order == SIGNAL_CLOSESELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
OrderClose(OrderTicket(), OrderLots(), Ask, Slippage, DarkOrange);
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Close Sell");
if (!EachTickMode) BarCount = Bars;
IsTrade = False;
continue;
}
//Trailing stop
if(UseTrailingStop && TrailingStop > 0) {
if((OrderOpenPrice() - Ask) > (Point * TrailingStop)) {
if((OrderStopLoss() > (Ask + Point * TrailingStop)) || (OrderStopLoss() == 0)) {
OrderModify(OrderTicket(), OrderOpenPrice(), Ask + Point * TrailingStop, OrderTakeProfit(), 0, DarkOrange);
if (!EachTickMode) BarCount = Bars;
continue;
}
}
}
}
}
}

//+------------------------------------------------------------------+
//| Signal Begin(Entry) |
//+------------------------------------------------------------------+

if (Buy1_1 < Buy1_2 && Buy2_1 > Buy2_2 || Buy3_1 < Buy3_2 && Buy4_1 > Buy4_2 || Buy5_1 < Buy5_2 && Buy6_1 > Buy6_2 || Buy7_1 < Buy7_2 && Buy8_1 > Buy8_2) Order = SIGNAL_BUY;

if (Sell1_1 > Sell1_2 && Sell2_1 < Sell2_2 || Sell3_1 > Sell3_2 && Sell4_1 < Sell4_2 || Sell5_1 > Sell5_2 && Sell6_1 < Sell6_2 || Sell7_1 > Sell7_2 && Sell8_1 < Sell8_2) Order = SIGNAL_SELL;


//+------------------------------------------------------------------+
//| Signal End |
//+------------------------------------------------------------------+

//Buy
if (Order == SIGNAL_BUY && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Ask - StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Ask + TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_BUY, Lots, Ask, Slippage, StopLossLevel, TakeProfitLevel, "Buy(#" + MagicNumber + ")", MagicNumber, 0, DodgerBlue);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("BUY order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Ask, Digits) + " Open Buy");
} else {
Print("Error opening BUY order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

//Sell
if (Order == SIGNAL_SELL && ((EachTickMode && !TickCheck) || (!EachTickMode && (Bars != BarCount)))) {
if(!IsTrade) {
//Check free margin
if (AccountFreeMargin() < (1000 * Lots)) {
Print("We have no money. Free Margin = ", AccountFreeMargin());
return(0);
}

if (UseStopLoss) StopLossLevel = Bid + StopLoss * Point; else StopLossLevel = 0.0;
if (UseTakeProfit) TakeProfitLevel = Bid - TakeProfit * Point; else TakeProfitLevel = 0.0;

Ticket = OrderSend(Symbol(), OP_SELL, Lots, Bid, Slippage, StopLossLevel, TakeProfitLevel, "Sell(#" + MagicNumber + ")", MagicNumber, 0, DeepPink);
if(Ticket > 0) {
if (OrderSelect(Ticket, SELECT_BY_TICKET, MODE_TRADES)) {
Print("SELL order opened : ", OrderOpenPrice());
if (SignalMail) SendMail("[Signal Alert]", "[" + Symbol() + "] " + DoubleToStr(Bid, Digits) + " Open Sell");
} else {
Print("Error opening SELL order : ", GetLastError());
}
}
if (EachTickMode) TickCheck = True;
if (!EachTickMode) BarCount = Bars;
return(0);
}
}

if (!EachTickMode) BarCount = Bars;

return(0);
}
//+------------------------------------------------------------------+
Haut
Répondre

Revenir à « Trading Automatique »