mirror of
https://github.com/softwaredevelop/mql5.git
synced 2026-08-13 12:28:05 +00:00
new files added
This commit is contained in:
Toh4iem9
@@ -0,0 +1,225 @@
|
||||
//+------------------------------------------------------------------+
|
||||
//| Currency_Strength_Pro.mq5 |
|
||||
//| Copyright 2025, xxxxxxxx|
|
||||
//+------------------------------------------------------------------+
|
||||
#property copyright "Copyright 2025, xxxxxxxx"
|
||||
#property version "2.10" // Fixed Dashboard positioning and colors
|
||||
#property description "Displays the relative strength of 8 major currencies."
|
||||
|
||||
#property indicator_separate_window
|
||||
#property indicator_buffers 8
|
||||
#property indicator_plots 8
|
||||
|
||||
//--- Plot Settings
|
||||
#property indicator_label1 "USD"
|
||||
#property indicator_type1 DRAW_LINE
|
||||
#property indicator_color1 clrGreen
|
||||
#property indicator_width1 2
|
||||
|
||||
#property indicator_label2 "EUR"
|
||||
#property indicator_type2 DRAW_LINE
|
||||
#property indicator_color2 clrDodgerBlue
|
||||
#property indicator_width2 2
|
||||
|
||||
#property indicator_label3 "GBP"
|
||||
#property indicator_type3 DRAW_LINE
|
||||
#property indicator_color3 clrRed
|
||||
#property indicator_width3 2
|
||||
|
||||
#property indicator_label4 "JPY"
|
||||
#property indicator_type4 DRAW_LINE
|
||||
#property indicator_color4 clrGold
|
||||
#property indicator_width4 2
|
||||
|
||||
#property indicator_label5 "AUD"
|
||||
#property indicator_type5 DRAW_LINE
|
||||
#property indicator_color5 clrOrange
|
||||
#property indicator_width5 1
|
||||
|
||||
#property indicator_label6 "CAD"
|
||||
#property indicator_type6 DRAW_LINE
|
||||
#property indicator_color6 clrMagenta
|
||||
#property indicator_width6 1
|
||||
|
||||
#property indicator_label7 "CHF"
|
||||
#property indicator_type7 DRAW_LINE
|
||||
#property indicator_color7 clrSlateGray // Changed from White for visibility
|
||||
#property indicator_width7 1
|
||||
|
||||
#property indicator_label8 "NZD"
|
||||
#property indicator_type8 DRAW_LINE
|
||||
#property indicator_color8 clrTurquoise
|
||||
#property indicator_width8 1
|
||||
|
||||
#include <MyIncludes\Currency_Strength_Calculator.mqh>
|
||||
|
||||
//--- Input Parameters
|
||||
input int InpPeriod = 14; // ROC Period
|
||||
input ENUM_TIMEFRAMES InpTimeframe = PERIOD_CURRENT; // Calculation Timeframe
|
||||
input bool InpSmooth = true; // Smooth Results?
|
||||
input int InpSmoothPer = 5; // Smoothing Period
|
||||
input bool InpShowPanel = true; // Show Dashboard Panel?
|
||||
|
||||
//--- Buffers
|
||||
double BufUSD[], BufEUR[], BufGBP[], BufJPY[], BufAUD[], BufCAD[], BufCHF[], BufNZD[];
|
||||
|
||||
//--- Global Objects
|
||||
CCurrencyStrengthCalculator *g_calculator;
|
||||
string g_prefix;
|
||||
int g_window_idx;
|
||||
|
||||
//+------------------------------------------------------------------+
|
||||
int OnInit()
|
||||
{
|
||||
SetIndexBuffer(0, BufUSD, INDICATOR_DATA);
|
||||
SetIndexBuffer(1, BufEUR, INDICATOR_DATA);
|
||||
SetIndexBuffer(2, BufGBP, INDICATOR_DATA);
|
||||
SetIndexBuffer(3, BufJPY, INDICATOR_DATA);
|
||||
SetIndexBuffer(4, BufAUD, INDICATOR_DATA);
|
||||
SetIndexBuffer(5, BufCAD, INDICATOR_DATA);
|
||||
SetIndexBuffer(6, BufCHF, INDICATOR_DATA);
|
||||
SetIndexBuffer(7, BufNZD, INDICATOR_DATA);
|
||||
|
||||
for(int i=0; i<8; i++)
|
||||
PlotIndexSetInteger(i, PLOT_DRAW_BEGIN, InpPeriod + (InpSmooth ? InpSmoothPer : 0));
|
||||
|
||||
g_calculator = new CCurrencyStrengthCalculator();
|
||||
ENUM_TIMEFRAMES tf = (InpTimeframe == PERIOD_CURRENT) ? (ENUM_TIMEFRAMES)Period() : InpTimeframe;
|
||||
g_calculator.Init(InpPeriod, tf);
|
||||
|
||||
// Unique prefix
|
||||
g_prefix = "CS_Pro_" + IntegerToString(ChartID()) + "_";
|
||||
|
||||
// Find window index (might be 0 in OnInit, updated in OnCalculate if needed)
|
||||
g_window_idx = ChartWindowFind();
|
||||
|
||||
ObjectsDeleteAll(0, g_prefix);
|
||||
|
||||
IndicatorSetString(INDICATOR_SHORTNAME, "Currency Strength");
|
||||
return(INIT_SUCCEEDED);
|
||||
}
|
||||
|
||||
//+------------------------------------------------------------------+
|
||||
void OnDeinit(const int reason)
|
||||
{
|
||||
if(CheckPointer(g_calculator) != POINTER_INVALID)
|
||||
delete g_calculator;
|
||||
ObjectsDeleteAll(0, g_prefix);
|
||||
}
|
||||
|
||||
//+------------------------------------------------------------------+
|
||||
int OnCalculate(const int rates_total, const int prev_calculated, const datetime &time[], const double &open[], const double &high[], const double &low[], const double &close[], const long &tick_volume[], const long &volume[], const int &spread[])
|
||||
{
|
||||
// Update window index (sometimes OnInit returns -1 for subwindows)
|
||||
g_window_idx = ChartWindowFind();
|
||||
|
||||
int start_index;
|
||||
if(prev_calculated == 0)
|
||||
start_index = 0;
|
||||
else
|
||||
start_index = prev_calculated - 1;
|
||||
|
||||
if(start_index == 0 && rates_total > 500)
|
||||
start_index = rates_total - 500;
|
||||
|
||||
// --- 1. Calculate Raw Strength ---
|
||||
for(int i = start_index; i < rates_total; i++)
|
||||
{
|
||||
int shift = rates_total - 1 - i;
|
||||
double strengths[8];
|
||||
g_calculator.CalculateStep(shift, strengths);
|
||||
|
||||
BufUSD[i] = strengths[0];
|
||||
BufEUR[i] = strengths[1];
|
||||
BufGBP[i] = strengths[2];
|
||||
BufJPY[i] = strengths[3];
|
||||
BufAUD[i] = strengths[4];
|
||||
BufCAD[i] = strengths[5];
|
||||
BufCHF[i] = strengths[6];
|
||||
BufNZD[i] = strengths[7];
|
||||
}
|
||||
|
||||
// --- 2. Apply Smoothing ---
|
||||
if(InpSmooth && InpSmoothPer > 1)
|
||||
{
|
||||
double alpha = 2.0 / (InpSmoothPer + 1.0);
|
||||
int smooth_start = (start_index == 0) ? 1 : start_index;
|
||||
|
||||
for(int i = smooth_start; i < rates_total; i++)
|
||||
{
|
||||
BufUSD[i] = BufUSD[i] * alpha + BufUSD[i-1] * (1.0 - alpha);
|
||||
BufEUR[i] = BufEUR[i] * alpha + BufEUR[i-1] * (1.0 - alpha);
|
||||
BufGBP[i] = BufGBP[i] * alpha + BufGBP[i-1] * (1.0 - alpha);
|
||||
BufJPY[i] = BufJPY[i] * alpha + BufJPY[i-1] * (1.0 - alpha);
|
||||
BufAUD[i] = BufAUD[i] * alpha + BufAUD[i-1] * (1.0 - alpha);
|
||||
BufCAD[i] = BufCAD[i] * alpha + BufCAD[i-1] * (1.0 - alpha);
|
||||
BufCHF[i] = BufCHF[i] * alpha + BufCHF[i-1] * (1.0 - alpha);
|
||||
BufNZD[i] = BufNZD[i] * alpha + BufNZD[i-1] * (1.0 - alpha);
|
||||
}
|
||||
}
|
||||
|
||||
// --- 3. Update Dashboard ---
|
||||
if(InpShowPanel)
|
||||
DrawDashboard(rates_total - 1);
|
||||
|
||||
return(rates_total);
|
||||
}
|
||||
|
||||
//+------------------------------------------------------------------+
|
||||
//| Draw Dashboard Panel (Horizontal in Indicator Window) |
|
||||
//+------------------------------------------------------------------+
|
||||
void DrawDashboard(int last_idx)
|
||||
{
|
||||
string currencies[] = {"USD", "EUR", "GBP", "JPY", "AUD", "CAD", "CHF", "NZD"};
|
||||
color colors[] = {clrGreen, clrDodgerBlue, clrRed, clrGold, clrOrange, clrMagenta, clrSlateGray, clrTurquoise};
|
||||
double values[8];
|
||||
|
||||
values[0] = BufUSD[last_idx];
|
||||
values[1] = BufEUR[last_idx];
|
||||
values[2] = BufGBP[last_idx];
|
||||
values[3] = BufJPY[last_idx];
|
||||
values[4] = BufAUD[last_idx];
|
||||
values[5] = BufCAD[last_idx];
|
||||
values[6] = BufCHF[last_idx];
|
||||
values[7] = BufNZD[last_idx];
|
||||
|
||||
// Sort by strength
|
||||
int indices[] = {0, 1, 2, 3, 4, 5, 6, 7};
|
||||
for(int i=0; i<8; i++)
|
||||
for(int j=0; j<7-i; j++)
|
||||
if(values[indices[j]] < values[indices[j+1]])
|
||||
{
|
||||
int temp = indices[j];
|
||||
indices[j] = indices[j+1];
|
||||
indices[j+1] = temp;
|
||||
}
|
||||
|
||||
// Draw Objects
|
||||
int x_base = 10;
|
||||
int x_step = 95; // Increased slightly to fit 3 decimals
|
||||
int y_pos = 20;
|
||||
|
||||
for(int i=0; i<8; i++)
|
||||
{
|
||||
int idx = indices[i];
|
||||
string name = g_prefix + "Label_" + IntegerToString(i);
|
||||
//--- UPDATED: Use %.3f for higher precision
|
||||
string text = StringFormat("%s: %.3f", currencies[idx], values[idx]);
|
||||
|
||||
if(ObjectFind(0, name) < 0)
|
||||
{
|
||||
ObjectCreate(0, name, OBJ_LABEL, g_window_idx, 0, 0);
|
||||
ObjectSetInteger(0, name, OBJPROP_CORNER, CORNER_LEFT_LOWER);
|
||||
ObjectSetInteger(0, name, OBJPROP_YDISTANCE, y_pos);
|
||||
ObjectSetInteger(0, name, OBJPROP_FONTSIZE, 9);
|
||||
ObjectSetInteger(0, name, OBJPROP_ANCHOR, ANCHOR_LEFT_LOWER);
|
||||
}
|
||||
|
||||
ObjectSetInteger(0, name, OBJPROP_XDISTANCE, x_base + i * x_step);
|
||||
ObjectSetString(0, name, OBJPROP_TEXT, text);
|
||||
ObjectSetInteger(0, name, OBJPROP_COLOR, colors[idx]);
|
||||
}
|
||||
|
||||
ChartRedraw();
|
||||
}
|
||||
//+------------------------------------------------------------------+
|
||||
Reference in New Issue
Block a user