287 lines
10 KiB
MQL5
287 lines
10 KiB
MQL5
|
|
|
|
#property link "jfaris31@hotmail.com"
|
|
#property version "1.00"
|
|
//+------------------------------------------------------------------+
|
|
//| Include |
|
|
//+------------------------------------------------------------------+
|
|
|
|
// include the file Trade.mqh
|
|
#include<Trade\Trade.mqh>
|
|
|
|
// Create an instance of Ctrade
|
|
CTrade trade;
|
|
//--- available trailing
|
|
#include <Expert\Trailing\TrailingNone.mqh>
|
|
//--- available money management
|
|
#include <Expert\Money\MoneyFixedLot.mqh>
|
|
//+------------------------------------------------------------------+
|
|
//| Inputs |
|
|
//+------------------------------------------------------------------+
|
|
|
|
//--- inputs for main signal
|
|
input double Signal_TakeLevel =210.0; // Take Profit level (in points)
|
|
input double Price_Trigger =160.0; //Price Trigger
|
|
input int Balance_Range =2.0; //Balance Trigger
|
|
input int Max_Positions_Total =7.0; //Max Positions to be held
|
|
input double Gain_Percentage =1.25; //Gain Percentage in equity before close all
|
|
input double Equity_Stop_Loss =500; //Equity Stop Loss
|
|
input double Equity_Take_Profit =200; //Equity Take Profit
|
|
|
|
//--- inputs for money
|
|
input double Money_FixLot_Percent =1.0; // Percent
|
|
input double Money_FixLot_Lots =0.10; // Fixed volume
|
|
//+------------------------------------------------------------------+
|
|
//| Global expert object |
|
|
//+------------------------------------------------------------------+
|
|
|
|
|
|
//CExpert ExtExpert;
|
|
//+------------------------------------------------------------------+
|
|
//| Initialization function of the expert |
|
|
//+------------------------------------------------------------------+
|
|
|
|
|
|
|
|
|
|
|
|
void OnTick()
|
|
{
|
|
|
|
|
|
// Get the ask & bid price
|
|
double Ask=NormalizeDouble(SymbolInfoDouble(_Symbol,SYMBOL_ASK),4);
|
|
double Bid=NormalizeDouble(SymbolInfoDouble(_Symbol,SYMBOL_BID),4);
|
|
|
|
//Get the Account Balance
|
|
double Balance=AccountInfoDouble(ACCOUNT_BALANCE);
|
|
|
|
//Get the Account Equity
|
|
double Equity=AccountInfoDouble(ACCOUNT_EQUITY);
|
|
|
|
//Get the Account Margin Free
|
|
double Free_Margin=AccountInfoDouble(ACCOUNT_MARGIN_FREE);
|
|
|
|
//Get the Account Margin
|
|
double Account_Margin=AccountInfoDouble(ACCOUNT_MARGIN);
|
|
|
|
//Get total positions
|
|
|
|
int Total_Positions=PositionsTotal();
|
|
|
|
// Calculate the deposit load
|
|
double Deposit_Load = Account_Margin/Equity;
|
|
|
|
//Create an equity starting point
|
|
static double Base_Equity=0;
|
|
|
|
if (PositionsTotal()==0)
|
|
{
|
|
Base_Equity=Equity;
|
|
}
|
|
|
|
|
|
|
|
|
|
//Create an Array for prices
|
|
MqlRates PriceInformation[];
|
|
|
|
|
|
|
|
// Sort it from current candle to oldest candle
|
|
ArraySetAsSeries(PriceInformation,true);
|
|
|
|
//Copy price data into the array ------ old text that was in place of 50 --- Bars(Symbol(),Period())
|
|
int Data=CopyRates(Symbol(),_Period,0,10,PriceInformation);
|
|
|
|
|
|
|
|
|
|
|
|
//ORDER HISTORY PROFIT TUTORIAL START
|
|
|
|
|
|
|
|
|
|
|
|
uint TotalNumberOfDeals=HistoryDealsTotal();
|
|
ulong TicketNumber=0;
|
|
long OrderType, DealEntry;
|
|
double OrderProfit=0;
|
|
string MySymbol="";
|
|
string PositionDirection="";
|
|
string MyResult="";
|
|
static double open_price=0;
|
|
|
|
|
|
//get the history
|
|
HistorySelect(0,TimeCurrent());
|
|
|
|
//go through all the deals
|
|
for(uint i=0; i<TotalNumberOfDeals;i++)
|
|
{
|
|
|
|
//we look for a ticket number -- use an if statement, because if there are no open positions this avoids an error
|
|
if((TicketNumber=HistoryDealGetTicket(i))>0)
|
|
{
|
|
|
|
//Get the profit
|
|
OrderProfit=HistoryDealGetDouble(TicketNumber,DEAL_PROFIT);
|
|
|
|
// get the type
|
|
OrderType = HistoryDealGetInteger(TicketNumber,DEAL_TYPE);
|
|
|
|
//get the currency pair
|
|
MySymbol=HistoryDealGetString(TicketNumber,DEAL_SYMBOL);
|
|
|
|
//get the deal entry type to check for close types
|
|
DealEntry=HistoryDealGetInteger(TicketNumber,DEAL_ENTRY);
|
|
|
|
open_price=HistoryDealGetDouble(TicketNumber,DEAL_PRICE);
|
|
|
|
|
|
|
|
//+++++++++++++++SET THE BASE PRICE +++++++++++++++++++++++++++
|
|
double BasePrice=open_price;
|
|
|
|
//If the currency pair fits
|
|
if (MySymbol==_Symbol)
|
|
|
|
//if it is a buy or a sell order
|
|
if(OrderType==ORDER_TYPE_BUY || OrderType==ORDER_TYPE_SELL)
|
|
|
|
//if the order was closed
|
|
if (DealEntry==1)
|
|
|
|
{
|
|
// set sell order type if close type was buy
|
|
if (OrderType==ORDER_TYPE_BUY)
|
|
PositionDirection="SELL-TRADE";
|
|
|
|
//set buy order type if close type was sell
|
|
if (OrderType==ORDER_TYPE_SELL)
|
|
PositionDirection="BUY-TRADE";
|
|
|
|
// MyResult = "Profit:"+OrderProfit+ "Ticket:" +TicketNumber+ "Position Direction:"+PositionDirection;
|
|
|
|
|
|
//ORDER HISTORY PROFIT TUTORIAL END
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
if(PositionsTotal()<1)
|
|
{
|
|
trade.Buy((Money_FixLot_Percent),NULL,Ask,(Ask-Price_Trigger*_Point*1.1),(Ask+Price_Trigger*_Point*1.1),NULL);
|
|
// trade.Sell((Money_FixLot_Percent),NULL,Bid,(Ask+Signal_TakeLevel*_Point),(Bid-Signal_TakeLevel*_Point),NULL);
|
|
}
|
|
//check all open positions for the current symbol +++++++++++++++++++++++++++++CHANGED i=PositionsTotal ()-1; i>=0
|
|
for(int i=PositionsTotal()-1; i>=0; i--) // count all currency pair positions
|
|
{
|
|
|
|
string symbol=PositionGetSymbol(i); // get position symbol
|
|
if(_Symbol==symbol) // if chart symbol equals position symbol
|
|
|
|
// get the ticket number
|
|
ulong PositionTicket=PositionGetInteger(POSITION_TICKET);
|
|
|
|
//get the current Stop Loss
|
|
double CurrentStopLoss=PositionGetDouble(POSITION_SL);
|
|
|
|
//get the open price
|
|
// double open_price=PositionGetDouble(POSITION_PRICE_OPEN);
|
|
|
|
|
|
// datetime open_start_time=PositionGetDouble(POSITION_TIME_MSC);
|
|
}
|
|
|
|
// if(PositionsTotal()>=1)
|
|
// if(Bid<=open_price-Price_Trigger*_Point)
|
|
// trade.Sell(Money_FixLot_Lots,NULL,Bid,0,(Bid-Signal_TakeLevel*_Point),NULL);
|
|
|
|
|
|
|
|
if(PositionsTotal()>=1&& (OrdersTotal()+PositionsTotal())==PositionsTotal())
|
|
if(Ask>=open_price+Price_Trigger*_Point)
|
|
if(PositionsTotal()<=Max_Positions_Total)
|
|
// {trade.BuyStop(Money_FixLot_Lots,open_price+Price_Trigger*_Point,_Symbol,NULL,Signal_TakeLevel*_Point,ORDER_TIME_GTC,0,NULL); }
|
|
trade.Sell((Money_FixLot_Percent),NULL,Bid,(Ask+Signal_TakeLevel*_Point),0,NULL);
|
|
|
|
|
|
|
|
if(PositionsTotal()>=1&& (OrdersTotal()+PositionsTotal())==PositionsTotal())
|
|
if(Bid<=open_price-Price_Trigger*_Point)
|
|
if(PositionsTotal()<=Max_Positions_Total)
|
|
// {trade.BuyStop(Money_FixLot_Lots,open_price+Price_Trigger*_Point,_Symbol,NULL,Signal_TakeLevel*_Point,ORDER_TIME_GTC,0,NULL); }+++++(Bid-100*_Point)
|
|
trade.Buy((Money_FixLot_Percent),NULL,Ask,(Bid-Signal_TakeLevel*_Point),999999999,NULL);
|
|
|
|
// (Ask+Signal_TakeLevel*_Point) ++++++++ (Bid-Signal_TakeLevel*_Point)
|
|
|
|
|
|
//++++++++++++++Balancing Trades+++++++
|
|
|
|
|
|
//Buy & Sell Counter Variables
|
|
int Buy_Position_Counter=0;
|
|
int Sell_Position_Counter=0;
|
|
|
|
// count down until there are no positions left
|
|
for(int i=PositionsTotal()-1; i>=0; i--) // go through all positions
|
|
{
|
|
//Get the ticket number for the current position
|
|
int ticket=PositionGetTicket(i);
|
|
//
|
|
// Get the positon direction
|
|
int PositionDirection=PositionGetInteger(POSITION_TYPE);
|
|
|
|
//if it is a buy position
|
|
if (PositionDirection==POSITION_TYPE_BUY)
|
|
|
|
//close the current position add to buy counter here
|
|
// add 1 to the candleCounter
|
|
Buy_Position_Counter=Buy_Position_Counter+1;
|
|
|
|
//if it is a buy position
|
|
if (PositionDirection==POSITION_TYPE_SELL)
|
|
|
|
//close the current position add to buy counter here
|
|
// add 1 to the candleCounter
|
|
Sell_Position_Counter=Sell_Position_Counter+1;
|
|
}//End for loop
|
|
|
|
|
|
// Pull the counters into the logic for buying/selling here
|
|
|
|
if((Buy_Position_Counter-Sell_Position_Counter)>=Balance_Range)
|
|
trade.Sell((Money_FixLot_Percent*Total_Positions*2),NULL,Bid,0,(Bid-Signal_TakeLevel*_Point),NULL);
|
|
|
|
|
|
if((Sell_Position_Counter-Buy_Position_Counter)>=Balance_Range)
|
|
trade.Buy((Money_FixLot_Percent*Total_Positions*2),NULL,Ask,0,(Ask+Signal_TakeLevel*_Point),NULL);
|
|
|
|
//if we have a profit, close all positions "if the equity is above the balance, that means we made a profit" +++++++ Equity>=Balance)Free_Margin<=0 ||
|
|
if (Equity>=Base_Equity+Equity_Take_Profit || Equity<=Base_Equity-Equity_Stop_Loss)
|
|
{
|
|
CloseAllPositions();
|
|
}
|
|
|
|
}
|
|
|
|
// EXTERNAL CLOSE FUNCTION
|
|
void CloseAllPositions()
|
|
{
|
|
// from the number of positions count down to zero
|
|
for(int i=PositionsTotal()-1; i>=0; i--) //look at all positions
|
|
{
|
|
// get the ticket number for the current position
|
|
int ticket=PositionGetTicket(i);
|
|
|
|
// close the current postion
|
|
trade.PositionClose(ticket);
|
|
} // End the for loop
|
|
|
|
} // CloseAllPositions end
|