//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
#property copyright ""
#property link ""
#property link ""
#property indicator_separate_window
#property indicator_minimum 0
#property indicator_maximum 1
#define labelNames "Tickwatcher"
//---- user selectable stuff
extern string __1 = "Chose pairs";
extern string pair_1 = "GBPUSD";
extern string pair_2 = "USDCAD";
extern string pair_3 = "AUDUSD";
extern string __2 = "Chose timeframes";
extern bool show4h = true;
extern bool showDaily = true;
extern bool showWeekly = true;
extern bool showMonthly = true;
//
//
//
//
//
#define maxLabels 75
int totalLabels;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
IndicatorShortName("Tickwatcher");
totalLabels = 0;
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
for(int i = 1; i < totalLabels ; i++)
{
ObjectDelete(labelNames+i); deleteObject(i);
}
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int m = 80;
totalLabels = 0;
if (iClose(pair_1,0,2)!=0 )
{
showPair(pair_1,m);
m = m + 270;
}
if (iClose(pair_2,0,2)!=0 )
{
showPair(pair_2,m);
m = m + 270;
}
if (iClose(pair_3,0,2)!=0 )
{
showPair(pair_3,m);
m = m + 270;
}
//
//
//
//
//
for (m = totalLabels+1;m <= maxLabels; m++)
ObjectDelete(labelNames+m);
//
//
//
//
//
return(0);
}
//
//
//
//
//
void showPair(string pair, int xdistance)
{
int currentY = 15;
//
//
//
//
//
double adx_h4 = iADX(pair,PERIOD_H4,14,PRICE_CLOSE,0,0);
double di_p_h4 = iADX(pair,PERIOD_H4,14,PRICE_CLOSE,1,0);
double di_m_h4 = iADX(pair,PERIOD_H4,14,PRICE_CLOSE,2,0);
double adx_d1 = iADX(pair,PERIOD_D1,14,PRICE_CLOSE,0,0);
double di_p_d1 = iADX(pair,PERIOD_D1,14,PRICE_CLOSE,1,0);
double di_m_d1 = iADX(pair,PERIOD_D1,14,PRICE_CLOSE,2,0);
double adx_w1 = iADX(pair,PERIOD_W1,14,PRICE_CLOSE,0,0);
double di_p_w1 = iADX(pair,PERIOD_W1,14,PRICE_CLOSE,1,0);
double di_m_w1 = iADX(pair,PERIOD_W1,14,PRICE_CLOSE,2,0);
double adx_m1 = iADX(pair,PERIOD_MN1,14,PRICE_CLOSE,0,0);
double di_p_m1 = iADX(pair,PERIOD_MN1,14,PRICE_CLOSE,1,0);
double di_m_m1 = iADX(pair,PERIOD_MN1,14,PRICE_CLOSE,2,0);
//
//
//
//
//
double haso_h4 = iCustom(pair,PERIOD_H4 ,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,5,0);
double hasc_h4 = iCustom(pair,PERIOD_H4 ,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,6,0);
double haso_d1 = iCustom(pair,PERIOD_D1 ,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,5,0);
double hasc_d1 = iCustom(pair,PERIOD_D1 ,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,6,0);
double haso_w1 = iCustom(pair,PERIOD_W1 ,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,5,0);
double hasc_w1 = iCustom(pair,PERIOD_W1 ,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,6,0);
double haso_m1 = iCustom(pair,PERIOD_MN1,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,5,0);
double hasc_m1 = iCustom(pair,PERIOD_MN1,"Heiken_Ashi_Smoothed_Alert",2,6,3,2,false,false,6,0);
//---- define colors and arrows
color adx_color_h4,adx_color_d1,adx_color_w1,adx_color_m1;
string adx_arrow_h4,adx_arrow_d1,adx_arrow_w1,adx_arrow_m1;
color has_color_h4,has_color_d1,has_color_w1,has_color_m1;
string has_arrow_h4,has_arrow_d1,has_arrow_w1,has_arrow_m1;
has_color_h4 = setHColor(haso_h4,hasc_h4);
has_color_d1 = setHColor(haso_d1,hasc_d1);
has_color_w1 = setHColor(haso_w1,hasc_w1);
has_color_m1 = setHColor(haso_m1,hasc_m1);
has_arrow_h4 = setHArrow(haso_h4,hasc_h4);
has_arrow_d1 = setHArrow(haso_d1,hasc_d1);
has_arrow_w1 = setHArrow(haso_w1,hasc_w1);
has_arrow_m1 = setHArrow(haso_m1,hasc_m1);
//
//
//
//
//
string adx_value_h4 = adx_h4;
string adx_value_d1 = adx_d1;
string adx_value_w1 = adx_w1;
string adx_value_m1 = adx_m1;
adx_color_h4 = setColor(adx_h4 ,di_p_h4 ,di_m_h4);
adx_color_d1 = setColor(adx_d1 ,di_p_d1 ,di_m_d1);
adx_color_w1 = setColor(adx_w1 ,di_p_w1 ,di_m_w1);
adx_color_m1 = setColor(adx_m1 ,di_p_m1 ,di_m_m1);
adx_arrow_h4 = setArrow(adx_h4 ,di_p_h4 ,di_m_h4);
adx_arrow_d1 = setArrow(adx_d1 ,di_p_d1 ,di_m_d1);
adx_arrow_w1 = setArrow(adx_w1 ,di_p_w1 ,di_m_w1);
adx_arrow_m1 = setArrow(adx_m1 ,di_p_m1 ,di_m_m1);
setObject(next(),pair,xdistance,2);
if (show4h) { setLabel( "4 hours:",xdistance ,currentY,adx_value_h4 ,adx_color_h4 ,adx_arrow_h4); currentY += 13;}
if (showDaily) { setLabel( "1 day:" ,xdistance ,currentY,adx_value_d1 ,adx_color_d1 ,adx_arrow_d1); currentY += 13;}
if (showWeekly) { setLabel( "1 week:" ,xdistance ,currentY,adx_value_w1 ,adx_color_w1 ,adx_arrow_w1); currentY += 13;}
if (showMonthly){ setLabel( "1 month:",xdistance ,currentY,adx_value_m1 ,adx_color_m1 ,adx_arrow_m1);}
currentY = 15;
if (show4h) { setLabel( "4 hours:",xdistance+150,currentY," " ,has_color_h4 ,has_arrow_h4,false); currentY += 13;}
if (showDaily) { setLabel( "1 day:" ,xdistance+150,currentY," " ,has_color_d1 ,has_arrow_d1,false); currentY += 13;}
if (showWeekly) { setLabel( "1 week:" ,xdistance+150,currentY," " ,has_color_w1 ,has_arrow_w1,false); currentY += 13;}
if (showMonthly){ setLabel( "1 month:",xdistance+150,currentY," " ,has_color_m1 ,has_arrow_m1,false);}
}
//+------------------------------------------------------------------+
//| Custom functions and procedures |
//+------------------------------------------------------------------+
string next()
{
totalLabels += 1;
return(totalLabels);
}
color setHColor(double first,double second)
{
color retColor;
if (NormalizeDouble(first,Digits) <NormalizeDouble(second,Digits)) retColor = Red;
if (NormalizeDouble(first,Digits) >NormalizeDouble(second,Digits)) retColor = Lime;
if (NormalizeDouble(first,Digits)==NormalizeDouble(second,Digits)) retColor = LightSkyBlue;
return(retColor);
}
color setColor(double first,double second,double third)
{
color retColor;
if ((first < 23) && (first != 0)) { retColor = LightSkyBlue; }
if ((first >=23) && (second > third)) { retColor = Lime; }
if ((first >=23) && (second < third)) { retColor = Red; }
return(retColor);
}
//
//
// ---- assign arrows
// strong up: { adx_arrow_ = "é"; }
// strong down: { adx_arrow_ = "ê"; }
// up: { adx_arrow_ = "ì"; }
// down: { adx_arrow_ = "î"; }
// range: { adx_arrow_ = "h"; }
// use wingdings for these, the h is squiggly line
//
//
string setHArrow(double first, double second)
{
string arrow;
if (NormalizeDouble(first,Digits) <NormalizeDouble(second,Digits)) arrow = "ê";
if (NormalizeDouble(first,Digits) >NormalizeDouble(second,Digits)) arrow = "é";
if (NormalizeDouble(first,Digits)==NormalizeDouble(second,Digits)) arrow = "h";
return(arrow);
}
string setArrow(double first, double second, double third)
{
string arrow;
if ( first < 23 && first != 0) { arrow = "h"; }
if ((first >= 23 && first < 28) && (second > third)) { arrow = "ì"; }
if ((first >= 23 && first < 28) && (second < third)) { arrow = "î"; }
if ( first >= 28 && (second > third)) { arrow = "é"; }
if ( first >= 28 && (second < third)) { arrow = "ê"; }
return(arrow);
}
//
//
//
//
//
void setLabel(string text,int x,int y,string value, color theColor, string arrow, bool isADX=true)
{
string addition = " HAS ";
int last = 90;
if (isADX) {addition = " ADX "; last=128;}
setObject(next(),text ,x ,y);
setObject(next(),addition+StringSubstr(value,0,5),x+55 ,y,theColor);
setObject(next(),arrow ,x+last,y,theColor,"Wingdings");
}
//
//
//
//
//
void setObject(string name,string text,int x,int y,color theColor = LightSteelBlue, string font = "Lucida Sans Regular")
{
string indNames = "Tickwatcher";
int window = WindowFind(indNames);
if (ObjectFind(labelNames+name) == -1)
{
ObjectCreate(labelNames+name,OBJ_LABEL,window,0,0);
ObjectSet(labelNames+name,OBJPROP_CORNER,0);
}
//
//
//
//
//
ObjectSet(labelNames+name,OBJPROP_XDISTANCE,x);
ObjectSet(labelNames+name,OBJPROP_YDISTANCE,y);
ObjectSetText(labelNames+name,text,9,font,theColor);
}
void deleteObject(int name)
{
if (ObjectFind(labelNames+name) > 0) ObjectDelete(labelNames+name);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains close prices for each bar
Indicator Curves created:
Indicators Used:
Movement directional index
Custom Indicators Used:
Heiken_Ashi_Smoothed_Alert
Order Management characteristics:
Other Features: