X-Pair…….. v3

I did a simple mod for X-Pair that was found in Forex-TSD (Dont ask me where is the original…. i cant find it!!!). The current mod included the major pairing of GBP, JPY, USD & NZD. It would provide a easier visual view of how the major pairs are affecting one another. Please note the screen requires at least 1280 x 720 as the data takes fixed alignment.

Just copy the text below and save it as X-Pair3.mq4 into your indicators folder for Metatrader program.

//+——————————————————————+
//_X-Pair____________________ \¦/
//_http://www.forex-tsd.com__(ò ó)
//______________________o0o___(_)___o0o__
//___¦_____¦_____¦mladen¦_____¦_____¦_____¦
//¦_cja_¦_____¦_____¦_____¦_____¦_____¦__
//___¦_____¦_____¦_____¦_Xard¦777__¦_____¦
//¦____¦ihldiaf¦_____¦_____¦_____¦____¦__
//___¦_____¦_____¦_____¦Baba¦Master_¦____¦
//¦FxSniper___¦_____¦_igor_¦_____¦_____¦__
//+——————————————————————+
#property indicator_chart_window
//+——————————————————————+
extern string BuySeLL_Settings0 = “————————–“;
extern string GBPNZD = ”  “;
extern string EURNZD = ”  “;
extern string NZDUSD = ”  “;
extern string NZDJPY = ”  “;
extern string AUDJPY = ”  “;
extern string CHFJPY = ”  “;
extern string EURJPY = ”  “;
extern string GBPJPY = ”  “;
extern string GBPCAD = ”  “;
extern string GBPCHF = ”  “;
extern string EURGBP = ”  “;
extern string GBPUSD = ”  “;
extern string USDCHF = ”  “;
extern string USDJPY = ”  “;
extern string AUDUSD = ”  “;
extern string EURUSD = ”  “;
extern string USDCAD = ”  “;
extern string CADJPY = ”  “;
extern string AUDNZD = ”  “;
extern string NZDCHF = ”  “;

//+——————————————————————+
extern int Jendela = 0;
extern int Sisi = 0;
extern string BuySeLL_Settings1 = “————————–“;
extern int TF1 = 5;
extern int TF2 = 15;
extern int TF3 = 60;
extern int TF4 = 240;
extern string BuySeLL_TimeFrame1 = “————————–“;
extern int MAFastPeriod1 = 8;
extern int MAFastMethod1 = 1;
extern int MAFastApply_To1 = 0;
extern int MAFastShift1 = 0;
extern int MASlowPeriod1 = 34;
extern int MASlowMethod1 = 3;
extern int MASlowApply_To1 = 1;
extern int MASlowShift1 = 0;
extern string BuySeLL_TimeFrame2 = “————————–“;
extern int MAFastPeriod2 = 8;
extern int MAFastMethod2 = 1;
extern int MAFastApply_To2 = 0;
extern int MAFastShift2 = 0;
extern int MASlowPeriod2 = 34;
extern int MASlowMethod2 = 3;
extern int MASlowApply_To2 = 1;
extern int MASlowShift2 = 0;
extern string BuySeLL_TimeFrame3 = “————————–“;
extern int MAFastPeriod3 = 5;
extern int MAFastMethod3 = 1;
extern int MAFastApply_To3 = 0;
extern int MAFastShift3 = 0;
extern int MASlowPeriod3 = 20;
extern int MASlowMethod3 = 3;
extern int MASlowApply_To3 = 1;
extern int MASlowShift3 = 0;
extern string BuySeLL_TimeFrame4 = “————————–“;
extern int MAFastPeriod4 = 3;
extern int MAFastMethod4 = 1;
extern int MAFastApply_To4 = 0;
extern int MAFastShift4 = 0;
extern int MASlowPeriod4 = 13;
extern int MASlowMethod4 = 3;
extern int MASlowApply_To4 = 1;
extern int MASlowShift4 = 0;
extern string BuySeLL_Settings4 = “————————–“;
extern color Cross_Buy  = DodgerBlue;
extern color Cross_Sell = Tomato;
extern string TextColor_Settings = “————————–“;
extern color d1_Color = White;
extern color d2_Color = White;
extern color d3_Color = White;
extern color d4_Color = White;
extern color d5_Color = White;
extern color d6_Color = White;
extern color d7_Color = White;
extern color d8_Color = White;
extern color d9_Color = White;
extern color d10_Color = White;
//——————————————————————–
string CrossUp  = “p”; // pakai font “Wingdings 3”
string CrossDn  = “q”; // pakai font “Wingdings 3″
//+——————————————————————+
double vA, vB, d1, d2,d3,d4,d5,d6,d7,d8,d9,d10;
string BSstatus, BSstatus1, BSstatus2, BSstatus3, BSstatus4, Panah;
color  BS_color;
int nDigits;
//+——————————————————————+
int init()
{

if(Symbol()==”GBPNZD” || Symbol()==”whatz”) {d1=4;d2=4;d3=4;d4=2;d5=2;d6=2;d7=4;d8=4;d9=4;d10=4;}
if(Symbol()==”AUDUSD” || Symbol()==”EURUSD” || Symbol()==”GBPUSD” || Symbol()==”GBPJPY”) {d1=2;d2=2;d3=2;d4=0;d5=0;d6=0;d7=2;d8=2;d9=2;d10=2;}
if(Symbol()==”NZDJPY” || Symbol()==”USDJPY” || Symbol()==”USDCHF” || Symbol()==”NZDUSD”) {d1=0;d2=0;d3=0;d4=-2;d5=-2;d6=-2;d7=0;d8=0;d9=0;d10=0;}

return(0);
}
//+——————————————————————+
int deinit()
{
//—-
for(int i = ObjectsTotal() – 1; i >= 0; i–)
{
string label = ObjectName(i);
if(StringSubstr(label, 0, 3) != “MPS”)
continue;
ObjectDelete(label);
}
//—-
return(0);
}
//+——————————————————————+
int start()
{
int    counted_bars=IndicatorCounted();

//+——————————————————————+
Write(“MPS_01”, Jendela, Sisi, 1090, 16, “EURGBP”, 9, “Arial Bold”, d1_Color);
vA = iMA(“EURGBP”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“EURGBP”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_02”, Jendela, Sisi, 1150, 16, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURGBP”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“EURGBP”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_03”, Jendela, Sisi, 1170, 16, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURGBP”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“EURGBP”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_04”, Jendela, Sisi, 1190, 16, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURGBP”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“EURGBP”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_05”, Jendela, Sisi, 1210, 16, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_06”, Jendela, Sisi, 1090, 44, “GBPCAD”, 9, “Arial Bold”, d2_Color);
vA = iMA(“GBPCAD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPCAD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_07”, Jendela, Sisi, 1150, 44, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPCAD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPCAD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_08”, Jendela, Sisi, 1170, 44, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPCAD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPCAD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_09”, Jendela, Sisi, 1190, 44, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPCAD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPCAD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_10”, Jendela, Sisi, 1210, 44, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_11”, Jendela, Sisi, 1090, 58, “GBPCHF”, 9, “Arial Bold”, d2_Color);
vA = iMA(“GBPCHF”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPCHF”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_12”, Jendela, Sisi, 1150, 58, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPCHF”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPCHF”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_13”, Jendela, Sisi, 1170, 58, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPCHF”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPCHF”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_14”, Jendela, Sisi, 1190, 58, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPCHF”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPCHF”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_15”, Jendela, Sisi, 1210, 58, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_16”, Jendela, Sisi, 1090, 72, “GBPNZD”, 9, “Arial Bold”, d2_Color);
vA = iMA(“GBPNZD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPNZD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_17”, Jendela, Sisi, 1150, 72, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPNZD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPNZD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_18”, Jendela, Sisi, 1170, 72, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPNZD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPNZD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_19”, Jendela, Sisi, 1190, 72, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPNZD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPNZD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_20”, Jendela, Sisi, 1210, 72, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_21”, Jendela, Sisi, 1090, 86, “GBPUSD”, 9, “Arial Bold”, d2_Color);
vA = iMA(“GBPUSD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPUSD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_22”, Jendela, Sisi, 1150, 86, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPUSD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPUSD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_23”, Jendela, Sisi, 1170, 86, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPUSD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPUSD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_24”, Jendela, Sisi, 1190, 86, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPUSD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPUSD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_25”, Jendela, Sisi, 1210, 86, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_26”, Jendela, Sisi, 1090, 100, “GBPJPY”, 9, “Arial Bold”, d2_Color);
vA = iMA(“GBPJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_27”, Jendela, Sisi, 1150, 100, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_28”, Jendela, Sisi, 1170, 100, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_29”, Jendela, Sisi, 1190, 100, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_30”, Jendela, Sisi, 1210, 100, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_31”, Jendela, Sisi, 1090, 128, “EURJPY”, 9, “Arial Bold”, d3_Color);
vA = iMA(“EURJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“EURJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_32”, Jendela, Sisi, 1150, 128, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“EURJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_33”, Jendela, Sisi, 1170, 128, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“EURJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_34”, Jendela, Sisi, 1190, 128, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“EURJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_35”, Jendela, Sisi, 1210, 128, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_36”, Jendela, Sisi, 1090, 142, “GBPJPY”, 9, “Arial Bold”, d3_Color);
vA = iMA(“GBPJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_37”, Jendela, Sisi, 1150, 142, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_38”, Jendela, Sisi, 1170, 142, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_39”, Jendela, Sisi, 1190, 142, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_40”, Jendela, Sisi, 1210, 142, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_41”, Jendela, Sisi, 1090, 156, “AUDJPY”, 9, “Arial Bold”, d3_Color);
vA = iMA(“AUDJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“AUDJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_42”, Jendela, Sisi, 1150, 156, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“AUDJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_43”, Jendela, Sisi, 1170, 156, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“AUDJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_44”, Jendela, Sisi, 1190, 156, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“AUDJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_45”, Jendela, Sisi, 1210, 156, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_46”, Jendela, Sisi, 1090, 170, “CHFJPY”, 9, “Arial Bold”, d3_Color);
vA = iMA(“CHFJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“CHFJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_47”, Jendela, Sisi, 1150, 170, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“CHFJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“CHFJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_48”, Jendela, Sisi, 1170, 170, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“CHFJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“CHFJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_49”, Jendela, Sisi, 1190, 170, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“CHFJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“CHFJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_50”, Jendela, Sisi, 1210, 170, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_51”, Jendela, Sisi, 1090, 184, “NZDJPY”, 9, “Arial Bold”, d3_Color);
vA = iMA(“NZDJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“NZDJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_52”, Jendela, Sisi, 1150, 184, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“NZDJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_53”, Jendela, Sisi, 1170, 184, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“NZDJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_54”, Jendela, Sisi, 1190, 184, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“NZDJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_55”, Jendela, Sisi, 1210, 184, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_56”, Jendela, Sisi, 1090, 198, “CADJPY”, 9, “Arial Bold”, d3_Color);
vA = iMA(“CADJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“CADJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_57”, Jendela, Sisi, 1150, 198, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“CADJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“CADJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_58”, Jendela, Sisi, 1170, 198, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“CADJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“CADJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_59”, Jendela, Sisi, 1190, 198, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“CADJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“CADJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_60”, Jendela, Sisi, 1210, 198, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_61”, Jendela, Sisi, 1090, 226, “USDJPY”, 9, “Arial Bold”, d4_Color);
vA = iMA(“USDJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“USDJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_62”, Jendela, Sisi, 1150, 226, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“USDJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_63”, Jendela, Sisi, 1170, 226, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“USDJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_64”, Jendela, Sisi, 1190, 226, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“USDJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_65”, Jendela, Sisi, 1210, 226, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_66”, Jendela, Sisi, 1090, 240, “USDCAD”, 9, “Arial Bold”, d4_Color);
vA = iMA(“USDCAD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“USDCAD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_67”, Jendela, Sisi, 1150, 240, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDCAD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“USDCAD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_68”, Jendela, Sisi, 1170, 240, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDCAD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“USDCAD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_69”, Jendela, Sisi, 1190, 240, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDCAD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“USDCAD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_70”, Jendela, Sisi, 1210, 240, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_71”, Jendela, Sisi, 1090, 254, “USDCHF”, 9, “Arial Bold”, d4_Color);
vA = iMA(“USDCHF”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“USDCHF”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_72”, Jendela, Sisi, 1150, 254, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDCHF”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“USDCHF”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_73”, Jendela, Sisi, 1170, 254, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDCHF”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“USDCHF”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_74”, Jendela, Sisi, 1190, 254, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“USDCHF”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“USDCHF”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_75”, Jendela, Sisi, 1210, 254, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_76”, Jendela, Sisi, 1090, 282, “EURUSD”, 9, “Arial Bold”, d5_Color);
vA = iMA(“EURUSD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“EURUSD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_77”, Jendela, Sisi, 1150, 282, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURUSD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“EURUSD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_78”, Jendela, Sisi, 1170, 282, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURUSD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“EURUSD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_79”, Jendela, Sisi, 1190, 282, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURUSD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“EURUSD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_80”, Jendela, Sisi, 1210, 282, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_81”, Jendela, Sisi, 1090, 296, “GBPUSD”, 9, “Arial Bold”, d5_Color);
vA = iMA(“GBPUSD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPUSD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_82”, Jendela, Sisi, 1150, 296, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPUSD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPUSD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_83”, Jendela, Sisi, 1170, 296, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPUSD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPUSD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_84”, Jendela, Sisi, 1190, 296, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPUSD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPUSD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_85”, Jendela, Sisi, 1210, 296, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_86”, Jendela, Sisi, 1090, 310, “AUDUSD”, 9, “Arial Bold”, d5_Color);
vA = iMA(“AUDUSD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“AUDUSD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_87”, Jendela, Sisi, 1150, 310, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDUSD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“AUDUSD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_88”, Jendela, Sisi, 1170, 310, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDUSD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“AUDUSD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_89”, Jendela, Sisi, 1190, 310, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDUSD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“AUDUSD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_90”, Jendela, Sisi, 1210, 310, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_91”, Jendela, Sisi, 1090, 338, “NZDUSD”, 9, “Arial Bold”, d6_Color);
vA = iMA(“NZDUSD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“NZDUSD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_92”, Jendela, Sisi, 1150, 338, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDUSD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“NZDUSD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_93”, Jendela, Sisi, 1170, 338, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDUSD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“NZDUSD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_94”, Jendela, Sisi, 1190, 338, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDUSD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“NZDUSD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_95”, Jendela, Sisi, 1210, 338, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS_96”, Jendela, Sisi, 1090, 352, “NZDCHF”, 9, “Arial Bold”, d6_Color);
vA = iMA(“NZDCHF”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“NZDCHF”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_97”, Jendela, Sisi, 1150, 352, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDCHF”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“NZDCHF”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_98”, Jendela, Sisi, 1170, 352, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDCHF”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“NZDCHF”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS_99”, Jendela, Sisi, 1190, 352, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDCHF”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“NZDCHF”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS100”, Jendela, Sisi, 1210, 352, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS101”, Jendela, Sisi, 1090, 366, “NZDJPY”, 9, “Arial Bold”, d6_Color);
vA = iMA(“NZDJPY”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“NZDJPY”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS102”, Jendela, Sisi, 1150, 366, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDJPY”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“NZDJPY”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS103”, Jendela, Sisi, 1170, 366, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDJPY”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“NZDJPY”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS104”, Jendela, Sisi, 1190, 366, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“NZDJPY”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“NZDJPY”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS105”, Jendela, Sisi, 1210, 366, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS106”, Jendela, Sisi, 1090, 394, “GBPNZD”, 9, “Arial Bold”, d7_Color);
vA = iMA(“GBPNZD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“GBPNZD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS107”, Jendela, Sisi, 1150, 394, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPNZD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“GBPNZD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS108”, Jendela, Sisi, 1170, 394, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPNZD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“GBPNZD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS109”, Jendela, Sisi, 1190, 394, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“GBPNZD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“GBPNZD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS110”, Jendela, Sisi, 1210, 394, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS111”, Jendela, Sisi, 1090, 408, “EURNZD”, 9, “Arial Bold”, d7_Color);
vA = iMA(“EURNZD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“EURNZD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS112”, Jendela, Sisi, 1150, 408, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURNZD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“EURNZD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS113”, Jendela, Sisi, 1170, 408, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURNZD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“EURNZD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS114”, Jendela, Sisi, 1190, 408, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“EURNZD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“EURNZD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS115”, Jendela, Sisi, 1210, 408, Panah, 11, “Wingdings 3”, BS_color);

//+——————————————————————+
Write(“MPS116”, Jendela, Sisi, 1090, 422, “AUDNZD”, 9, “Arial Bold”, d7_Color);
vA = iMA(“AUDNZD”, TF1, MAFastPeriod1, MAFastShift1, MAFastMethod1, MAFastApply_To1, 0);
vB = iMA(“AUDNZD”, TF1, MASlowPeriod1, MASlowShift1, MASlowMethod1, MASlowApply_To1, 0);
if (vA>vB)
{ BSstatus1=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus1=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS117”, Jendela, Sisi, 1150, 422, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDNZD”, TF2, MAFastPeriod2, MAFastShift2, MAFastMethod2, MAFastApply_To2, 0);
vB = iMA(“AUDNZD”, TF2, MASlowPeriod2, MASlowShift2, MASlowMethod2, MASlowApply_To2, 0);
if (vA>vB)
{ BSstatus2=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus2=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS118”, Jendela, Sisi, 1170, 422, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDNZD”, TF3, MAFastPeriod3, MAFastShift3, MAFastMethod3, MAFastApply_To3, 0);
vB = iMA(“AUDNZD”, TF3, MASlowPeriod3, MASlowShift3, MASlowMethod3, MASlowApply_To3, 0);
if (vA>vB)
{ BSstatus3=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus3=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS119”, Jendela, Sisi, 1190, 422, Panah, 11, “Wingdings 3”, BS_color);

vA = iMA(“AUDNZD”, TF4, MAFastPeriod4, MAFastShift4, MAFastMethod4, MAFastApply_To4, 0);
vB = iMA(“AUDNZD”, TF4, MASlowPeriod4, MASlowShift4, MASlowMethod4, MASlowApply_To4, 0);
if (vA>vB)
{ BSstatus4=”BUY”; Panah=CrossUp; BS_color=Cross_Buy;}
else { BSstatus4=”SELL”; Panah=CrossDn; BS_color=Cross_Sell;}
Write(“MPS120”, Jendela, Sisi, 1210, 422, Panah, 11, “Wingdings 3”, BS_color);

//————————————————————————————-
return(0);
}
//+——————————————————————+
// Write Procedure
void Write(string LBL, int window, double side, int pos_x, int pos_y, string text, int fontsize, string fontname, color Tcolor=CLR_NONE)
{
ObjectCreate(LBL, OBJ_LABEL, 0, 0, 0);
ObjectSet(LBL, OBJPROP_CORNER, side);
ObjectSet(LBL, OBJPROP_XDISTANCE, pos_x);
ObjectSet(LBL, OBJPROP_YDISTANCE, pos_y+40);
ObjectSetText(LBL,text, fontsize, fontname, Tcolor);
}