Kursus Robot Forex 087821046424: Mql4 Break Even

Mql4 EA Break Even 5Ju24:

Mql4 EA BREAK EVEN 5JU24
//+------------------------------------------------------------------+
//|                                          EA BREAK EVEN 5JU24.mq4 |
//|                                 Website Tutorial Daftar Akun MT4 |
//|                                          https://daftarmt4.my.id |
//+------------------------------------------------------------------+
#property copyright "Website Tutorial Daftar Akun MT4"
#property link      "https://daftarmt4.my.id"

#include <stdlib.mqh>
#include <WinUser32.mqh>

// exported variables
extern double BuyLots3 = 0.1;
extern int BuyStoploss3 = 50;
extern int BuyTakeprofit3 = 100;
extern double SellLots8 = 0.1;
extern int SellStoploss8 = 50;
extern int SellTakeprofit8 = 100;
extern double LeaveLots2 = 0.05;
extern int BreakEvenPoint2 = 20;

// local variables
double PipValue=1;    // this variable is here to support 5-digit brokers
bool Terminated = false;
string LF = "\n";  // use this in custom or utility blocks where you need line feeds
int NDigits = 4;   // used mostly for NormalizeDouble in Flex type blocks
int ObjCount = 0;  // count of all objects created on the chart, allows creation of objects with unique names
int current = 0;   // current bar index, used by Cross Up, Cross Down and many other blocks
int varylots[101]; // used by Buy Order Varying, Sell Order Varying and similar

int init()
{
    NDigits = Digits;
    
    if (false) ObjectsDeleteAll();      // clear the chart
    
    
    Comment("");    // clear the chart
    return (0);
}

int deinit()
{
    if (false) ObjectsDeleteAll();
    
    
    return (0);
}

// Expert start
int start()
{
    if (Bars < 10)
    {
        Comment("Not enough bars");
        return (0);
    }
    if (Terminated == true)
    {
        Comment("EA Terminated.");
        return (0);
    }
    
    OnEveryTick1();
    return (0);
}

void OnEveryTick1()
{
    PipValue = 1;
    if (NDigits == 3 || NDigits == 5) PipValue = 10;
    
    IfNoOrderExist4();
    BreakEven2();
    label();
    
}

void label()
{
   
     Comment(       " Spread: ", DoubleToStr(MarketInfo(Symbol(), MODE_SPREAD),2),                   
                    " Leverage 1: ", DoubleToStr(AccountLeverage(), 0),
                    " Balance: ", DoubleToStr(AccountBalance(), 2),
                    " Equity: ", DoubleToStr(AccountEquity(), 2)
      );            
}

void IfNoOrderExist4()
{
    bool exists = false;
    for (int i=OrdersTotal()-1; i >= 0; i--)
    if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
    {
        if (OrderSymbol() == Symbol())
        {
            exists = true;
        }
    }
    else
    {
        Print("OrderSelect() error - ", ErrorDescription(GetLastError()));
    }
    
    if (exists == false)
    {
        if(Open[1]<Close[1])BuyOrder3();
        if(Open[1]>Close[1])SellOrder8();
        
    }
}

void BuyOrder3()
{
    double SL = Ask - BuyStoploss3*PipValue*Point;
    if (BuyStoploss3 == 0) SL = 0;
    double TP = Ask + BuyTakeprofit3*PipValue*Point;
    if (BuyTakeprofit3 == 0) TP = 0;
    int ticket = -1;
    if (true)
    ticket = OrderSend(Symbol(), OP_BUY, BuyLots3, Ask, 4, 0, 0, "My Expert", 1, 0, Blue);
    else
    ticket = OrderSend(Symbol(), OP_BUY, BuyLots3, Ask, 4, SL, TP, "My Expert", 1, 0, Blue);
    if (ticket > -1)
    {
        if (true)
        {
            bool sel = OrderSelect(ticket, SELECT_BY_TICKET);
            bool ret = OrderModify(OrderTicket(), OrderOpenPrice(), SL, TP, 0, Blue);
            if (ret == false)
            Print("OrderModify() error - ", ErrorDescription(GetLastError()));
        }
            
    }
    else
    {
        Print("OrderSend() error - ", ErrorDescription(GetLastError()));
    }
}

void SellOrder8()
{
    double SL = Bid + SellStoploss8*PipValue*Point;
    if (SellStoploss8 == 0) SL = 0;
    double TP = Bid - SellTakeprofit8*PipValue*Point;
    if (SellTakeprofit8 == 0) TP = 0;
    int ticket = -1;
    if (true)
    ticket = OrderSend(Symbol(), OP_SELL, SellLots8, Bid, 4, 0, 0, "My Expert", 1, 0, Red);
    else
    ticket = OrderSend(Symbol(), OP_SELL, SellLots8, Bid, 4, SL, TP, "My Expert", 1, 0, Red);
    if (ticket > -1)
    {
        if (true)
        {
            bool sel = OrderSelect(ticket, SELECT_BY_TICKET);
            bool ret = OrderModify(OrderTicket(), OrderOpenPrice(), SL, TP, 0, Red);
            if (ret == false)
            Print("OrderModify() error - ", ErrorDescription(GetLastError()));
        }
            
    }
    else
    {
        Print("OrderSend() error - ", ErrorDescription(GetLastError()));
    }
}

void BreakEven2()
{
    double lots = 0;
    double leave = LeaveLots2;
    
    for (int i=OrdersTotal()-1; i >= 0; i--)
    if (OrderSelect(i, SELECT_BY_POS, MODE_TRADES))
    {
        if (OrderSymbol() == Symbol() && OrderMagicNumber() == 1)
        {
            lots = OrderLots() - leave;
            lots = NormalizeDouble(lots, NDigits);
            if (lots < MarketInfo(Symbol(), MODE_MINLOT))
            continue;
            
            if (OrderType() == OP_BUY && Ask - OrderOpenPrice() > BreakEvenPoint2*PipValue*Point)
            {
                // make sure lot is not smaller than allowed value
                if (leave < MarketInfo(Symbol(), MODE_MINLOT))
                Print("BreakEven block error - Leave Lots value is smaller than minimal allowed value by your broker.");
                else
                {
                    bool ret1 = OrderClose(OrderTicket(), lots, OrderClosePrice(), 4, White);
                    if (ret1 == false)
                    Print("OrderModify() error - ", ErrorDescription(GetLastError()));
                }
            }
            if (OrderType() == OP_SELL && OrderOpenPrice() - Bid > BreakEvenPoint2*PipValue*Point)
            {
                // make sure lot is not smaller than allowed value
                if (leave < MarketInfo(Symbol(), MODE_MINLOT))
                Print("BreakEven block error - Leave Lots value is smaller than minimal allowed value by your broker.");
                else
                {
                    bool ret2 = OrderClose(OrderTicket(), lots, OrderClosePrice(), 4, White);
                    if (ret2 == false)
                    Print("OrderModify() error - ", ErrorDescription(GetLastError()));
                }
            }
        }
    }
    else
    Print("OrderSelect() error - ", ErrorDescription(GetLastError()));
    
}

Kursus EA Forex

Mql4 EA Break Even 5Ju24

Koleksi Mql4 EA:

Penginapan Murah

Testimoni:

Kategori

Daftar Isi

Kirimkan Pesan