64 lines
3.1 KiB
MQL5
64 lines
3.1 KiB
MQL5
|
//+------------------------------------------------------------------+
|
||
|
|
//| CloseAll.mq5 |
|
||
|
|
//| Copyright 2021, Omega Joctan |
|
||
|
|
//| https://www.mql5.com/en/users/omegajoctan |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
#property copyright "Copyright 2021, Omega Joctan"
|
||
|
|
#property link "https://www.mql5.com/en/users/omegajoctan"
|
||
|
|
#property version "1.00"
|
||
|
|
//---
|
||
|
|
#include <Trade\Trade.mqh> //Instatiate Trades Execution Library
|
||
|
|
#include <Trade\OrderInfo.mqh> //Instatiate Library for Orders Information
|
||
|
|
#include <Trade\PositionInfo.mqh> //Instatiate Library for Positions Information
|
||
|
|
//---
|
||
|
|
CTrade m_trade; // Trades Info and Executions library
|
||
|
|
COrderInfo m_order; //Library for Orders information
|
||
|
|
CPositionInfo m_position; // Library for all position features and information
|
||
|
|
//---
|
||
|
|
input color OrdersColor = clrDodgerBlue; // Orders counter color on the chart
|
||
|
|
input color PositionsColor = clrGreenYellow; //Positions counter color on the chart
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| Script program start function |
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
void OnStart()
|
||
|
|
{
|
||
|
|
//---
|
||
|
|
|
||
|
|
ChartWrite("Positions", "Positions " + (string)PositionsTotal(), 100, 80, 20, clrGreen); // write number of positions on the chart
|
||
|
|
ChartWrite("Orders", "Orders " + (string)OrdersTotal(), 100, 50, 20, clrDodgerBlue); //Write Number of Orders on the Chart
|
||
|
|
|
||
|
|
{
|
||
|
|
for(int i = PositionsTotal() - 1; i >= 0; i--) // loop all Open Positions
|
||
|
|
if(m_position.SelectByIndex(i)) // select a position
|
||
|
|
{
|
||
|
|
m_trade.PositionClose(m_position.Ticket()); // then delete it --period
|
||
|
|
Sleep(100); // Relax for 100 ms
|
||
|
|
ChartWrite("Positions", "Positions " + (string)PositionsTotal(), 100, 80, 20, PositionsColor); //Re write number of positions on the chart
|
||
|
|
}
|
||
|
|
|
||
|
|
ObjectDelete(0, "Positions"); // At the End Delete
|
||
|
|
ObjectDelete(0, "Orders"); // All Objects
|
||
|
|
}
|
||
|
|
//---
|
||
|
|
}
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
void ChartWrite(string name,
|
||
|
|
string comment,
|
||
|
|
int x_distance,
|
||
|
|
int y_distance,
|
||
|
|
int FontSize,
|
||
|
|
color clr)
|
||
|
|
{
|
||
|
|
ObjectCreate(0, name, OBJ_LABEL, 0, 0, 0);
|
||
|
|
ObjectSetInteger(0, name, OBJPROP_CORNER, CORNER_LEFT_UPPER);
|
||
|
|
ObjectSetInteger(0, name, OBJPROP_COLOR, clr);
|
||
|
|
ObjectSetString(0, name, OBJPROP_TEXT, comment);
|
||
|
|
ObjectSetInteger(0, name, OBJPROP_FONTSIZE, FontSize);
|
||
|
|
ObjectSetString(0, name, OBJPROP_FONT, "Lucida Console");
|
||
|
|
ObjectSetInteger(0, name, OBJPROP_SELECTABLE, false);
|
||
|
|
ObjectSetInteger(0, name, OBJPROP_XDISTANCE, x_distance);
|
||
|
|
ObjectSetInteger(0, name, OBJPROP_YDISTANCE, y_distance);
|
||
|
|
}
|
||
|
|
//+------------------------------------------------------------------+
|
||
|
|
//| |
|
||
|
|
//+------------------------------------------------------------------+
|