All_usd_pair
Download script
This script is designed as a specialized visual tool for MetaTrader users who want to observe the correlation and price behavior of multiple currency pairs simultaneously relative to a primary chart.
Core Concept: Normalized Price Comparison
The primary goal of this logic is to "flatten" different currency values onto a single chart so they can be compared side-by-side. Because every currency pair has a different nominal value (for example, the price of USD/JPY is numerically very different from EUR/USD), looking at them on one chart normally would make some lines appear flat and others look exaggerated.
This script solves that by calculating a conversion coefficient. It aligns each secondary currency pair to the current price of the main chart you are viewing. This allows you to see how various pairs are moving in relation to one another in real-time.
How the Logic Works:
- Multi-Pair Monitoring: The script simultaneously tracks six specific currency pairs: EUR/USD, GBP/USD, AUD/USD, USD/CHF, USD/JPY, and USD/CAD.
- Directional Flexibility: The user can choose whether a pair is tracked in its standard orientation (Direct) or flipped (Inverse). This is useful for seeing correlations clearly regardless of how the currency is quoted.
- Moving Average Basis: Instead of just looking at the current price, the script calculates a moving average for every pair based on a user-defined number of bars (the
line_centresetting). This smooths out "noise" and helps identify broader trends. - Dynamic Scaling: The script performs a mathematical calculation to normalize each pair against the "center" value of the main chart. It effectively asks: "Based on the current average price of my main chart, what would the equivalent price of these other six pairs be?"
- Visual Output:
- It draws eight distinct lines on your chart, representing these normalized values.
- Each pair is assigned a unique color for easy identification.
- At the end of the current price action, the script automatically generates text labels that display the actual live price of each currency pair, providing both the visual trend and the raw data simultaneously.
Summary for the User
Think of this as a "Correlation Dashboard." By using this script, you can see at a glance if other major pairs are moving in harmony with your current chart or diverging from it. It removes the confusion of different price scales and presents a unified view of the market's behavior.
Miscellaneous
14
Views
0
Downloads
0
Favorites
All_usd_pair
//+------------------------------------------------------------------+
//| All_usd_pair.mq4 |
//| kukan |
//| www.kukan.ru |
//+------------------------------------------------------------------+
#property copyright "kukan"
#property link "www.kukan.ru"
#property indicator_chart_window
#property indicator_buffers 8
#property indicator_color1 Yellow
#property indicator_color2 OrangeRed
#property indicator_color3 PaleGreen
#property indicator_color4 Blue
#property indicator_color5 ForestGreen
#property indicator_color6 Tan
#property indicator_color7 SpringGreen
#property indicator_color8 Aqua
//---- buffers
extern int line_centre=400; //óñðåäíåíèå êîëëè÷åñòâî áàðîâ
extern int dir_EurUsd=1; //ôëàãè êîððåëÿöèé âàëþò 1 ïðÿìàÿ 0 îáðàòíàÿ
extern int dir_GbpUsd=1;
extern int dir_AudUsd=1;
extern int dir_UsdChf=0; //ïî óìîë÷àíèþ ê äîëëàðó íàñòðîåíî
extern int dir_UsdJpy=0;
extern int dir_UsdCad=0;
int ia,ib,ic,id,ie=0;
int cnt1,cnt2,temp0,temp1=0;
double centre_EurUsd,centre_UsdChf,centre_GbpUsd,centre_UsdJpy,centre_AudUsd,centre_UsdCad;
double centre_curent;
double ExtMapBuffer1[];
double ExtMapBuffer2[];
double ExtMapBuffer3[];
double ExtMapBuffer4[];
double ExtMapBuffer5[];
double ExtMapBuffer6[];
double ExtMapBuffer7[];
double ExtMapBuffer8[];
double EurUsd[],UsdChf[],GbpUsd[],UsdJpy[],AudUsd[],UsdCad[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,ExtMapBuffer1);
SetIndexStyle(1,DRAW_LINE);
SetIndexBuffer(1,ExtMapBuffer2);
SetIndexStyle(2,DRAW_LINE);
SetIndexBuffer(2,ExtMapBuffer3);
SetIndexStyle(3,DRAW_LINE);
SetIndexBuffer(3,ExtMapBuffer4);
SetIndexStyle(4,DRAW_LINE);
SetIndexBuffer(4,ExtMapBuffer5);
SetIndexStyle(5,DRAW_LINE);
SetIndexBuffer(5,ExtMapBuffer6);
SetIndexStyle(6,DRAW_LINE);
SetIndexBuffer(6,ExtMapBuffer7);
SetIndexStyle(7,DRAW_LINE);
SetIndexBuffer(7,ExtMapBuffer8);
//----
ArrayInitialize(ExtMapBuffer1,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer2,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer3,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer4,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer5,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer6,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer7,EMPTY_VALUE);
ArrayInitialize(ExtMapBuffer8,EMPTY_VALUE);
return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
ObjectDelete("EurUsd");
ObjectDelete("GbpUsd");
ObjectDelete("AudUsd");
ObjectDelete("UsdChf");
ObjectDelete("UsdJpy");
ObjectDelete("UsdCad");
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
//----
ArrayCopySeries(EurUsd,MODE_CLOSE,"EURUSD",Period());
ArrayCopySeries(GbpUsd,MODE_CLOSE,"GBPUSD",Period());
ArrayCopySeries(AudUsd,MODE_CLOSE,"AUDUSD",Period());
ArrayCopySeries(UsdChf,MODE_CLOSE,"USDCHF",Period());
ArrayCopySeries(UsdJpy,MODE_CLOSE,"USDJPY",Period());
ArrayCopySeries(UsdCad,MODE_CLOSE,"USDCAD",Period());
//íàõîäèì ðàçìåð íàèìåíüøåãî ìàññèâà
temp0=Bars-1;
if (ArraySize(EurUsd)<temp0+1) {temp0=ArraySize(EurUsd)-1;Comment("ìàëî äàííûõ íà EurUsd "+Period()+" "+ArraySize(EurUsd));}
if (ArraySize(GbpUsd)<temp0+1) {temp0=ArraySize(GbpUsd)-1;Comment("ìàëî äàííûõ íà GbpUsd "+Period()+" "+ArraySize(GbpUsd));}
if (ArraySize(AudUsd)<temp0+1) {temp0=ArraySize(AudUsd)-1;Comment("ìàëî äàííûõ íà AudUsd "+Period()+" "+ArraySize(AudUsd));}
if (ArraySize(UsdChf)<temp0+1) {temp0=ArraySize(UsdChf)-1;Comment("ìàëî äàííûõ íà UsdChf "+Period()+" "+ArraySize(UsdChf));}
if (ArraySize(UsdJpy)<temp0+1) {temp0=ArraySize(UsdJpy)-1;Comment("ìàëî äàííûõ íà UsdJpy "+Period()+" "+ArraySize(UsdJpy));}
if (ArraySize(UsdCad)<temp0+1) {temp0=ArraySize(UsdCad)-1;Comment("ìàëî äàííûõ íà UsdCad "+Period()+" "+ArraySize(UsdCad));}
//åñëè íà ãðàôèêå áàðîâ ìåíüøå ÷åì ëèíèÿ óñðåäíåíèÿ, òî âûõîä
if (line_centre>=temp0) {
Comment("ÍÅÕÂÀÒÀÅÒ ÄÀÍÍÛÕ Â ÀÐÕÈÂÀÕ.... ");
return(0);
}
//ñìîòðèì ñêîëüêî ñ÷èòàòü
if (temp0-line_centre<Bars-counted_bars) temp1=temp0-line_centre;
else temp1=Bars-counted_bars;
for (ia=temp1;ia>=0;ia--) {
//âû÷èñëÿåì ñðåäíèå çíà÷åíèÿ âûëþò
centre_EurUsd=0;
centre_GbpUsd=0;
centre_AudUsd=0;
centre_UsdChf=0;
centre_UsdJpy=0;
centre_UsdCad=0;
centre_curent=0;
for (ic=line_centre-1;ic>=0;ic--) {
centre_EurUsd=centre_EurUsd+EurUsd[ia+ic];
centre_GbpUsd=centre_GbpUsd+GbpUsd[ia+ic];
centre_AudUsd=centre_AudUsd+AudUsd[ia+ic];
centre_UsdChf=centre_UsdChf+UsdChf[ia+ic];
centre_UsdJpy=centre_UsdJpy+UsdJpy[ia+ic];
centre_UsdCad=centre_UsdCad+UsdCad[ia+ic];
centre_curent=centre_curent+Close[ia+ic];
}
centre_EurUsd=centre_EurUsd/line_centre;
centre_GbpUsd=centre_GbpUsd/line_centre;
centre_AudUsd=centre_AudUsd/line_centre;
centre_UsdChf=centre_UsdChf/line_centre;
centre_UsdJpy=centre_UsdJpy/line_centre;
centre_UsdCad=centre_UsdCad/line_centre;
centre_curent=centre_curent/line_centre;
//ïðèâîäèì ê åäèíîé öåíòðàëüíîé ëèíèè, ò.å. âû÷èñëÿåì êîîôèöèåíò ïåðåñ÷åòà
ExtMapBuffer1[ia]=
(dir_EurUsd*EurUsd[ia]+(1-dir_EurUsd)/EurUsd[ia])*centre_curent/(dir_EurUsd*centre_EurUsd+(1-dir_EurUsd)/centre_EurUsd);
ExtMapBuffer2[ia]=
(dir_GbpUsd*GbpUsd[ia]+(1-dir_GbpUsd)/GbpUsd[ia])*centre_curent/(dir_GbpUsd*centre_GbpUsd+(1-dir_GbpUsd)/centre_GbpUsd);
ExtMapBuffer3[ia]=
(dir_AudUsd*AudUsd[ia]+(1-dir_AudUsd)/AudUsd[ia])*centre_curent/(dir_AudUsd*centre_AudUsd+(1-dir_AudUsd)/centre_AudUsd);
ExtMapBuffer4[ia]=
(dir_UsdChf*UsdChf[ia]+(1-dir_UsdChf)/UsdChf[ia])*centre_curent/(dir_UsdChf*centre_UsdChf+(1-dir_UsdChf)/centre_UsdChf);
ExtMapBuffer5[ia]=
(dir_UsdJpy*UsdJpy[ia]+(1-dir_UsdJpy)/UsdJpy[ia])*centre_curent/(dir_UsdJpy*centre_UsdJpy+(1-dir_UsdJpy)/centre_UsdJpy);
ExtMapBuffer6[ia]=
(dir_UsdCad*UsdCad[ia]+(1-dir_UsdCad)/UsdCad[ia])*centre_curent/(dir_UsdCad*centre_UsdCad+(1-dir_UsdCad)/centre_UsdCad);
/*
Comment("îòíîñèòåëüíûå èçìåíåíèÿ âàëþòíûõ ïàð "+Period()
+"\nGBPUSD -"+GbpUsd[0]
+"\nUSDJPY -"+UsdJpy[0]
);
*/
if ((Bars-counted_bars)==1) {
//ïîäïèñûâàíèå êîòèðîâîê ðàçíûõ âàëþò
ObjectDelete("EurUsd");
ObjectCreate("EurUsd",OBJ_TEXT,0,Time[0]+Period()*11*60,ExtMapBuffer1[0]);
ObjectSet("EurUsd",OBJPROP_COLOR,Yellow);
ObjectSetText("EurUsd","EurUsd "+DoubleToStr(EurUsd[0],4),8,"arial");
//
ObjectDelete("GbpUsd");
ObjectCreate("GbpUsd",OBJ_TEXT,0,Time[0]+Period()*11*60,ExtMapBuffer2[0]);
ObjectSet("GbpUsd",OBJPROP_COLOR,OrangeRed);
ObjectSetText("GbpUsd","GbpUsd "+DoubleToStr(GbpUsd[0],4),8,"arial");
//
ObjectDelete("AudUsd");
ObjectCreate("AudUsd",OBJ_TEXT,0,Time[0]+Period()*11*60,ExtMapBuffer3[0]);
ObjectSet("AudUsd",OBJPROP_COLOR,PaleGreen);
ObjectSetText("AudUsd","AudUsd "+DoubleToStr(AudUsd[0],4),8,"arial");
//
ObjectDelete("UsdChf");
ObjectCreate("UsdChf",OBJ_TEXT,0,Time[0]+Period()*11*60,ExtMapBuffer4[0]);
ObjectSet("UsdChf",OBJPROP_COLOR,Blue);
ObjectSetText("UsdChf","UsdChf "+DoubleToStr(UsdChf[0],4),8,"arial");
//
ObjectDelete("UsdJpy");
ObjectCreate("UsdJpy",OBJ_TEXT,0,Time[0]+Period()*11*60,ExtMapBuffer5[0]);
ObjectSet("UsdJpy",OBJPROP_COLOR,ForestGreen);
ObjectSetText("UsdJpy","UsdJpy "+DoubleToStr(UsdJpy[0],2),8,"arial");
//
ObjectDelete("UsdCad");
ObjectCreate("UsdCad",OBJ_TEXT,0,Time[0]+Period()*11*60,ExtMapBuffer6[0]);
ObjectSet("UsdCad",OBJPROP_COLOR,Tan);
ObjectSetText("UsdCad","UsdCad "+DoubleToStr(UsdCad[0],4),8,"arial");
}
}
//----
return(0);
}
//+------------------------------------------------------------------+
Comments