nique_372/FullMt5McpByLeo
1
1
Fork 0
Code Issues Pull requests Projects Releases 2 Packages 1 Wiki Activity Actions
FullMt5McpByLeo/Src/Charts/Charts.mqh
Nique_372 2c989fbac6
2026-04-29 21:15:35 -05:00

367 lines
13 KiB
MQL5
Raw Permalink Blame History

//+------------------------------------------------------------------+
//| Charts.mqh |
//| Copyright 2026, Niquel Mendoza. |
//| https://www.mql5.com/es/users/nique_372 |
//+------------------------------------------------------------------+
#property copyright "Copyright 2026, Niquel Mendoza."
#property link "https://www.mql5.com/es/users/nique_372"
#property strict
#ifndef FULLMT5MCPBYLEO_SRC_CHARTS_CHARTS_MQH
#define FULLMT5MCPBYLEO_SRC_CHARTS_CHARTS_MQH
//+------------------------------------------------------------------+
//| Include |
//+------------------------------------------------------------------+
#include "..\\Def\\Def.mqh"
//+------------------------------------------------------------------+
//| chart_list |
//+------------------------------------------------------------------+
class CMcpFuncChartList : public CMcpFunction
{
public:
CMcpFuncChartList() : CMcpFunction(0, false, "chart_list") {}
~CMcpFuncChartList(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartList::Run(CJsonNode& param, string& res)
{
//---
long currChart, prevChart = ChartFirst();
int i = 0, limit = CHARTS_MAX;
//---
res = "{\"ok\":true,\"result\":[";
//---
if(prevChart >= 0)
{
res += StringFormat("%I64d", prevChart);
while(i < limit)
{
currChart = ChartNext(prevChart);
if(currChart < 0)
break;
res += StringFormat(",%I64d", currChart);
prevChart = currChart;
i++;
}
}
res += "]}";
}
//+------------------------------------------------------------------+
//| chart_open |
//+------------------------------------------------------------------+
class CMcpFuncChartOpen : public CMcpFunction
{
public:
CMcpFuncChartOpen() : CMcpFunction(0, false, "chart_open") {}
~CMcpFuncChartOpen(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartOpen::Run(CJsonNode& param, string& res)
{
::ResetLastError();
//---
const long chart_id = ::ChartOpen(param["symbol"].ToString(_Symbol), CEnumReg::GetValueNoRef<ENUM_TIMEFRAMES>(param["timeframe"].ToString(), _Period));
//---
if(chart_id == 0)
{
res = StringFormat("{\"ok\":false,\"error\":\"chart_open failed, last mt5 error = %d\"}", ::GetLastError());
return;
}
res = StringFormat("{\"ok\":true,\"result\":%I64d}", chart_id);
}
//+------------------------------------------------------------------+
//| chart_close |
//+------------------------------------------------------------------+
class CMcpFuncChartClose : public CMcpFunction
{
public:
CMcpFuncChartClose() : CMcpFunction(0, false, "chart_close") {}
~CMcpFuncChartClose(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartClose::Run(CJsonNode& param, string& res)
{
::ResetLastError();
const bool result = ChartClose((long)param["chart_id"].ToInt(-1));
//---
if(!result)
{
res = StringFormat("{\"ok\":false,\"error\":\"chart_close failed, last mt5 error = %d\"}", ::GetLastError());
return;
}
res = "{\"ok\":true,\"result\":true}";
}
//+------------------------------------------------------------------+
//| chart_integer |
//+------------------------------------------------------------------+
class CMcpFuncChartInteger : public CMcpFunction
{
public:
CMcpFuncChartInteger() : CMcpFunction(0, false, "chart_integer") {}
~CMcpFuncChartInteger(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartInteger::Run(CJsonNode& param, string& res)
{
::ResetLastError();
//---
if(param.HasKey("value"))
{
if(ChartSetInteger(param["chart_id"].ToInt(0), CEnumReg::GetValueNoRef<ENUM_CHART_PROPERTY_INTEGER>(param["property"].ToString(""), WRONG_VALUE), param["value"].ToInt()))
{
res = "{\"ok\":true,\"result\":true}";
}
else
{
res = StringFormat("{\"ok\":false,\"error\":\"Error set chart double, last mt5 err = %d\"}", ::GetLastError());
}
}
else
{
long v = 0;
if(ChartGetInteger(param["chart_id"].ToInt(0), CEnumReg::GetValueNoRef<ENUM_CHART_PROPERTY_INTEGER>(param["property"].ToString(""), WRONG_VALUE), (int)param["sub_window"].ToInt(0), v))
{
res = StringFormat("{\"ok\":true,\"result\":%I64d}", v);
}
else
{
res = StringFormat("{\"ok\":false,\"error\":\"Error chart get integer, last err = %d\"}", ::GetLastError());
}
}
}
//+------------------------------------------------------------------+
//| chart_double |
//+------------------------------------------------------------------+
class CMcpFuncChartDouble : public CMcpFunction
{
public:
CMcpFuncChartDouble() : CMcpFunction(0, false, "chart_double") {}
~CMcpFuncChartDouble(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartDouble::Run(CJsonNode& param, string& res)
{
::ResetLastError();
//---
if(param.HasKey("value"))
{
if(ChartSetDouble(param["chart_id"].ToInt(0), CEnumReg::GetValueNoRef<ENUM_CHART_PROPERTY_DOUBLE>(param["property"].ToString(""), WRONG_VALUE), param["value"].ToDouble()))
{
res = "{\"ok\":true,\"result\":true}";
}
else
{
res = StringFormat("{\"ok\":false,\"error\":\"Error set chart double, last mt5 err = %d\"}", ::GetLastError());
}
}
else
{
double v;
if(ChartGetDouble(param["chart_id"].ToInt(0), CEnumReg::GetValueNoRef<ENUM_CHART_PROPERTY_DOUBLE>(param["property"].ToString(""), WRONG_VALUE), (int)param["sub_window"].ToInt(0), v))
{
res = StringFormat("{\"ok\":true,\"result\":%.8f}", v);
}
else
{
res = StringFormat("{\"ok\":false,\"error\":\"Error chart get double, last err = %d\"}", ::GetLastError());
}
}
//---
}
//+------------------------------------------------------------------+
//| chart_string |
//+------------------------------------------------------------------+
class CMcpFuncChartString : public CMcpFunction
{
public:
CMcpFuncChartString() : CMcpFunction(0, false, "chart_string") {}
~CMcpFuncChartString(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartString::Run(CJsonNode& param, string& res)
{
::ResetLastError();
//---
if(param.HasKey("value"))
{
if(ChartSetString(param["chart_id"].ToInt(0), CEnumReg::GetValueNoRef<ENUM_CHART_PROPERTY_STRING>(param["property"].ToString(""), WRONG_VALUE), param["value"].ToString()))
{
res = "{\"ok\":true,\"result\":true}";
}
else
{
res = StringFormat("{\"ok\":false,\"error\":\"Error set chart string, last mt5 err = %d\"}", ::GetLastError());
}
}
else
{
string v;
if(ChartGetString(param["chart_id"].ToInt(0), CEnumReg::GetValueNoRef<ENUM_CHART_PROPERTY_STRING>(param["property"].ToString(""), WRONG_VALUE), v))
{
res = "{\"ok\":true,\"result\":\"" + v + "\"}";
}
else
{
res = StringFormat("{\"ok\":false,\"error\":\"Error chart get string, last err = %d\"}", ::GetLastError());
}
}
//---
}
//+------------------------------------------------------------------+
//| chart_redraw |
//+------------------------------------------------------------------+
class CMcpFuncChartRedraw : public CMcpFunction
{
public:
CMcpFuncChartRedraw() : CMcpFunction(0, false, "chart_redraw") {}
~CMcpFuncChartRedraw(void) {}
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartRedraw::Run(CJsonNode& param, string& res)
{
::ResetLastError();
//---
ChartRedraw(param["chart_id"].ToInt(0));
//---
res = "{\"ok\":true,\"result\":\"okey\"}";
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
class CMcpFuncChartGetSymbolOrPeriod : public CMcpFunction
{
public:
CMcpFuncChartGetSymbolOrPeriod(void) : CMcpFunction(0, false, "chart_get_symbol_or_period") {}
~CMcpFuncChartGetSymbolOrPeriod(void) {}
//---
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartGetSymbolOrPeriod::Run(CJsonNode &param, string &res)
{
const int8_t mode = (int8_t)param["mode"].ToInt();
switch(mode)
{
case 0:
{
res = "{\"ok\":true,\"result\":\"" + EnumToString(ChartPeriod(param["chart_id"].ToInt(0))) + "\"}";
break;
}
case 1:
{
res = "{\"ok\":true,\"result\":\"" + ChartSymbol(param["chart_id"].ToInt(0)) + "\"}";
break;
}
default:
res = StringFormat("{\"ok\":false,\"error\":\"Invalid mode = %d, use 0=get timeframe, 1=get symbol\"}", mode);
break;
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
class CMcpFuncChartSrenshot : public CMcpFunction
{
public:
CMcpFuncChartSrenshot(void) : CMcpFunction(0, false, "chart_screenshot") {}
~CMcpFuncChartSrenshot(void) {}
//---
void Run(CJsonNode& param, string& res) override final;
};
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void CMcpFuncChartSrenshot::Run(CJsonNode &param, string &res)
{
//---
const string fn = param["file_name"].ToString();
const long chart_id = param["chart_id"].ToInt();
::ResetLastError();
if(!ChartScreenShot(chart_id, fn, (int)param["with"].ToInt(ChartGetInteger(chart_id, CHART_WIDTH_IN_PIXELS)),
(int)param["height"].ToInt(ChartGetInteger(chart_id, CHART_HEIGHT_IN_PIXELS)), ALIGN_CENTER))
{
res = StringFormat("{\"ok\":false,\"error\":\"Failed call ChartScreenShot, last mt5 error = %d\"}", ::GetLastError());
return;
}
//---
if(param["common_flag"].ToBool(true))
{
if(!FileMove(fn, 0, fn, FILE_COMMON | FILE_REWRITE))
{
res = StringFormat("{\"ok\":false,\"error\":\"Failed call FileMove, last mt5 error = %d\"}", ::GetLastError());
}
else
{
res = StringFormat("{\"ok\":true,\"result\":{\"full_path\":\"%s\"}}", (TERMINAL_MT5_COMMON_PATH + "\\Files\\" + fn));
}
}
else
{
res = StringFormat("{\"ok\":true,\"result\":{\"full_path\":\"%s\"}}", (TERMINAL_MT5_ROOT + "Files\\" + fn));
}
}
//+------------------------------------------------------------------+
#endif // FULLMT5MCPBYLEO_SRC_CHARTS_CHARTS_MQH
Reference in a new issue View git blame Copy permalink