//+------------------------------------------------------------------+
//| |
//| Copyright © 2006, MetaQuotes Software Corp. |
//| http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, MetaQuotes Software Corp."
#property link "http://www.metaquotes.net"
/*********************************************************************
* Date: December 13, 2006
* Custom Indicator: DigiStoch.mq4
* Version: 1.0.1
* Description: Multi TimeFrame Digital Stochastic Indicator
*
* Change Logs
* Version 1.0.1
* - Fix little bugs for color and arrow. When price overbought or
* oversold color change to bearish or bullish begin color. Should be
* overbought or oversold color and arrow.
*
* Version 1.0
* - Release DigiStoch ;)
**********************************************************************/
#property indicator_separate_window
extern int K_period = 8;
extern int D_period = 3;
extern int S_period = 3;
extern int MA_Method = 1; // 0=Simple, 1=Exp, 2=Smoothed, 3=weighted
extern bool Show_Stoch_Value = true;
extern bool Show_Legend = true;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
IndicatorShortName("PERINTIS[1]");
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
ObjectsDeleteAll(0,OBJ_LABEL);
ObjectDelete("ObjLabel1"); ObjectDelete("ObjLabel2"); ObjectDelete("ObjLabel3"); ObjectDelete("ObjLabel4");
ObjectDelete("ObjLabel5"); ObjectDelete("ObjLabel6"); ObjectDelete("ObjLabel7"); ObjectDelete("ObjLabel8");
ObjectDelete("ObjLabel9"); ObjectDelete("ObjLabel10"); ObjectDelete("ObjLabel11"); ObjectDelete("ObjLabel12");
ObjectDelete("ObjLabel9a"); ObjectDelete("ObjLabel10a"); ObjectDelete("ObjLabel11a"); ObjectDelete("ObjLabel12a");
ObjectDelete("ObjLabel13"); ObjectDelete("ObjLabel14"); ObjectDelete("ObjLabel15"); ObjectDelete("ObjLabel16");
ObjectDelete("ObjLabel13a"); ObjectDelete("ObjLabel14a"); ObjectDelete("ObjLabel15a"); ObjectDelete("ObjLabel16a");
ObjectDelete("SSIG1"); ObjectDelete("SSIG2"); ObjectDelete("SSIG3"); ObjectDelete("SSIG4"); ObjectDelete("SSIG5"); ObjectDelete("SSIG6");
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
//m1 data
double stoch_main_m1 = iStochastic(NULL,PERIOD_M1,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
double stoch_sig_m1 = iStochastic(NULL,PERIOD_M1,K_period,D_period,S_period,MA_Method,1,MODE_SIGNAL,0);
//m5 data
double stoch_main_m5 = iStochastic(NULL,PERIOD_M5,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
double stoch_sig_m5 = iStochastic(NULL,PERIOD_M5,K_period,D_period,S_period,MA_Method,1,MODE_SIGNAL,0);
//m15 data
double stoch_main_m15 = iStochastic(NULL,PERIOD_M15,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
double stoch_sig_m15 = iStochastic(NULL,PERIOD_M15,K_period,D_period,S_period,MA_Method,1,MODE_SIGNAL,0);
//m30 data
double stoch_main_m30 = iStochastic(NULL,PERIOD_M30,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
double stoch_sig_m30 = iStochastic(NULL,PERIOD_M30,K_period,D_period,S_period,MA_Method,1,MODE_SIGNAL,0);
//h1 data
double stoch_main_h1 = iStochastic(NULL,PERIOD_H1,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
double stoch_sig_h1 = iStochastic(NULL,PERIOD_H1,K_period,D_period,S_period,MA_Method,1,MODE_SIGNAL,0);
//h4 data
double stoch_main_h4 = iStochastic(NULL,PERIOD_H4,K_period,D_period,S_period,MODE_SMA,1,MODE_MAIN,0);
double stoch_sig_h4 = iStochastic(NULL,PERIOD_H4,K_period,D_period,S_period,MA_Method,1,MODE_SIGNAL,0);
//define color
color stoch_color_m1, stoch_color_m5, stoch_color_m15, stoch_color_m30, stoch_color_h1, stoch_color_h4;
//define string
string stoch_level_m1, stoch_level_m5, stoch_level_m15, stoch_level_m30, stoch_level_h1, stoch_level_h4,
stoch_arrow_m1, stoch_arrow_m5, stoch_arrow_m15, stoch_arrow_m30, stoch_arrow_h1, stoch_arrow_h4;
//m1 up trend
if ((stoch_main_m1 >= stoch_sig_m1) && (stoch_sig_m1 < 20) && (stoch_sig_m1 != 0)) { stoch_color_m1 = Aqua; }
if ((stoch_main_m1 >= stoch_sig_m1) && (stoch_sig_m1 >= 20) && (stoch_sig_m1 <= 80)) { stoch_color_m1 = DodgerBlue; }
if ((stoch_main_m1 >= stoch_sig_m1) && (stoch_sig_m1 > 80)) { stoch_color_m1 = YellowGreen; }
//m1 down trend
if ((stoch_main_m1 <= stoch_sig_m1) && (stoch_sig_m1 > 80) && (stoch_sig_m1 != 100)) { stoch_color_m1 = Magenta; }
if ((stoch_main_m1 <= stoch_sig_m1) && (stoch_sig_m1 >= 20) && (stoch_sig_m1 <= 80)) { stoch_color_m1 = Crimson; }
if ((stoch_main_m1 <= stoch_sig_m1) && (stoch_sig_m1 < 20)) { stoch_color_m1 = Green; }
//m5 up trend
if ((stoch_main_m5 >= stoch_sig_m5) && (stoch_sig_m5 < 20) && (stoch_sig_m5 != 0)) { stoch_color_m5 = Aqua; }
if ((stoch_main_m5 >= stoch_sig_m5) && (stoch_sig_m5 >= 20) && (stoch_sig_m5 <= 80)) { stoch_color_m5 = DodgerBlue; }
if ((stoch_main_m5 >= stoch_sig_m5) && (stoch_sig_m5 > 80)) { stoch_color_m5 = YellowGreen; }
//m5 down trend
if ((stoch_main_m5 <= stoch_sig_m5) && (stoch_sig_m5 > 80) && (stoch_sig_m5 != 100)) { stoch_color_m5 = Magenta; }
if ((stoch_main_m5 <= stoch_sig_m5) && (stoch_sig_m5 >= 20) && (stoch_sig_m5 <= 80)) { stoch_color_m5 = Crimson; }
if ((stoch_main_m5 <= stoch_sig_m5) && (stoch_sig_m5 < 20)) { stoch_color_m5 = Green; }
//m15 up trend
if ((stoch_main_m15 >= stoch_sig_m15) && (stoch_sig_m15 < 20) && (stoch_sig_m15 != 0)) { stoch_color_m15 = Aqua; }
if ((stoch_main_m15 >= stoch_sig_m15) && (stoch_sig_m15 >= 20) && (stoch_sig_m15 <= 80)) { stoch_color_m15 = DodgerBlue; }
if ((stoch_main_m15 >= stoch_sig_m15) && (stoch_sig_m15 > 80)) { stoch_color_m15 = YellowGreen; }
//m15 down trend
if ((stoch_main_m15 <= stoch_sig_m15) && (stoch_sig_m15 > 80) && (stoch_sig_m15 != 100)) { stoch_color_m15 = Magenta; }
if ((stoch_main_m15 <= stoch_sig_m15) && (stoch_sig_m15 >= 20) && (stoch_sig_m15 <= 80)) { stoch_color_m15 = Crimson; }
if ((stoch_main_m15 <= stoch_sig_m15) && (stoch_sig_m15 < 20)) { stoch_color_m15 = Green; }
//m30 up trend
if ((stoch_main_m30 >= stoch_sig_m30) && (stoch_sig_m30 < 20) && (stoch_sig_m30 != 0)) { stoch_color_m30 = Aqua; }
if ((stoch_main_m30 >= stoch_sig_m30) && (stoch_sig_m30 >= 20) && (stoch_sig_m30 <= 80)) { stoch_color_m30 = DodgerBlue; }
if ((stoch_main_m30 >= stoch_sig_m30) && (stoch_sig_m30 > 80)) { stoch_color_m30 = YellowGreen; }
//m30 down trend
if ((stoch_main_m30 <= stoch_sig_m30) && (stoch_sig_m30 > 80) && (stoch_sig_m30 != 100)) { stoch_color_m30 = Magenta; }
if ((stoch_main_m30 <= stoch_sig_m30) && (stoch_sig_m30 >= 20) && (stoch_sig_m30 <= 80)) { stoch_color_m30 = Crimson; }
if ((stoch_main_m30 <= stoch_sig_m30) && (stoch_sig_m30 < 20)) { stoch_color_m30 = Green; }
//h1 up trend
if ((stoch_main_h1 >= stoch_sig_h1) && (stoch_sig_h1 < 20) && (stoch_sig_h1 != 0)) { stoch_color_h1 = Aqua; }
if ((stoch_main_h1 >= stoch_sig_h1) && (stoch_sig_h1 >= 20) && (stoch_sig_h1 <= 80)) { stoch_color_h1 = DodgerBlue; }
if ((stoch_main_h1 >= stoch_sig_h1) && (stoch_sig_h1 > 80)) { stoch_color_h1 = YellowGreen; }
//h1 down trend
if ((stoch_main_h1 <= stoch_sig_h1) && (stoch_sig_h1 > 80) && (stoch_sig_h1 != 100)) { stoch_color_h1 = Magenta; }
if ((stoch_main_h1 <= stoch_sig_h1) && (stoch_sig_h1 >= 20) && (stoch_sig_h1 <= 80)) { stoch_color_h1 = Crimson; }
if ((stoch_main_h1 <= stoch_sig_h1) && (stoch_sig_h1 < 20)) { stoch_color_h1 = Green; }
//h4 up trend
if ((stoch_main_h4 >= stoch_sig_h4) && (stoch_sig_h4 < 20) && (stoch_sig_h4 != 0)) { stoch_color_h4 = Aqua; }
if ((stoch_main_h4 >= stoch_sig_h4) && (stoch_sig_h4 >= 20) && (stoch_sig_h4 <= 80)) { stoch_color_h4 = DodgerBlue; }
if ((stoch_main_h4 >= stoch_sig_h4) && (stoch_sig_h4 > 80)) { stoch_color_h4 = YellowGreen; }
//h4 down trend
if ((stoch_main_h4 <= stoch_sig_h4) && (stoch_sig_h4 > 80) && (stoch_sig_h4 != 100)) { stoch_color_h4 = Magenta; }
if ((stoch_main_h4 <= stoch_sig_h4) && (stoch_sig_h4 >= 20) && (stoch_sig_h4 <= 80)) { stoch_color_h4 = Crimson; }
if ((stoch_main_h4 <= stoch_sig_h4) && (stoch_sig_h4 < 20)) { stoch_color_h4 = Green; }
//Signal Labels
/*ObjectCreate("ObjLabel1", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0); //LABEL
ObjectSetText("ObjLabel1","SIGNAL",8, "Arial Bold", Silver);
ObjectSet("ObjLabel1", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel1", OBJPROP_XDISTANCE, 105);
ObjectSet("ObjLabel1", OBJPROP_YDISTANCE, 3);*/
ObjectCreate("SSIG1", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);//M1 SIGNAL
ObjectSetText("SSIG1","M1",20, "Arial Bold", stoch_color_m1);
ObjectSet("SSIG1", OBJPROP_CORNER, 0);
ObjectSet("SSIG1", OBJPROP_XDISTANCE, 70);
ObjectSet("SSIG1", OBJPROP_YDISTANCE, 2);
ObjectCreate("SSIG2", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);//M5 SIGNAL
ObjectSetText("SSIG2","M5",20, "Arial Bold", stoch_color_m5);
ObjectSet("SSIG2", OBJPROP_CORNER, 0);
ObjectSet("SSIG2", OBJPROP_XDISTANCE, 160);
ObjectSet("SSIG2", OBJPROP_YDISTANCE, 2);
ObjectCreate("SSIG3", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);//M15 SIGNAL
ObjectSetText("SSIG3","M15",20, "Arial Bold", stoch_color_m15);
ObjectSet("SSIG3", OBJPROP_CORNER, 0);
ObjectSet("SSIG3", OBJPROP_XDISTANCE, 255);
ObjectSet("SSIG3", OBJPROP_YDISTANCE, 2);
ObjectCreate("SSIG4", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);//M30 SIGNAL
ObjectSetText("SSIG4","M30",20, "Arial Bold", stoch_color_m30);
ObjectSet("SSIG4", OBJPROP_CORNER, 0);
ObjectSet("SSIG4", OBJPROP_XDISTANCE, 365);
ObjectSet("SSIG4", OBJPROP_YDISTANCE, 2);
ObjectCreate("SSIG5", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);//H1 SIGNAL
ObjectSetText("SSIG5","H1",20, "Arial Bold", stoch_color_h1);
ObjectSet("SSIG5", OBJPROP_CORNER, 0);
ObjectSet("SSIG5", OBJPROP_XDISTANCE, 475);
ObjectSet("SSIG5", OBJPROP_YDISTANCE, 2);
ObjectCreate("SSIG6", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);//H4 SIGNAL
ObjectSetText("SSIG6","H4",20, "Arial Bold", stoch_color_h4);
ObjectSet("SSIG6", OBJPROP_CORNER, 0);
ObjectSet("SSIG6", OBJPROP_XDISTANCE, 565);
ObjectSet("SSIG6", OBJPROP_YDISTANCE, 2);
//Show Digital Stochastic Value
if (Show_Stoch_Value == true)
{
//stochastic value
string stoch_m1_val = stoch_sig_m1;
string stoch_m5_val = stoch_sig_m5;
string stoch_m15_val = stoch_sig_m15;
string stoch_m30_val = stoch_sig_m30;
string stoch_h1_val = stoch_sig_h1;
string stoch_h4_val = stoch_sig_h4;
if (stoch_main_m1 >= stoch_sig_m1 && stoch_sig_m1 > 0) { stoch_arrow_m1 = "Ù"; }
if (stoch_main_m1 <= stoch_sig_m1 && stoch_sig_m1 < 100) { stoch_arrow_m1 = "Ú"; }
if (stoch_main_m5 >= stoch_sig_m5 && stoch_sig_m5 > 0) { stoch_arrow_m5 = "Ù"; }
if (stoch_main_m5 <= stoch_sig_m5 && stoch_sig_m5 < 100) { stoch_arrow_m5 = "Ú"; }
if (stoch_main_m15 >= stoch_sig_m15 && stoch_sig_m15 > 0) { stoch_arrow_m15 = "Ù"; }
if (stoch_main_m15 <= stoch_sig_m15 && stoch_sig_m15 < 100) { stoch_arrow_m15 = "Ú"; }
if (stoch_main_m30 >= stoch_sig_m30 && stoch_sig_m30 > 0) { stoch_arrow_m30 = "Ù"; }
if (stoch_main_m30 <= stoch_sig_m30 && stoch_sig_m30 < 100) { stoch_arrow_m30 = "Ú"; }
if (stoch_main_h1 >= stoch_sig_h1 && stoch_sig_h1 > 0) { stoch_arrow_h1 = "Ù"; }
if (stoch_main_h1 <= stoch_sig_h1 && stoch_sig_h1 < 100) { stoch_arrow_h1 = "Ú"; }
if (stoch_main_h4 >= stoch_sig_h4 && stoch_sig_h4 > 0) { stoch_arrow_h4 = "Ù"; }
if (stoch_main_h4 <= stoch_sig_h4 && stoch_sig_h4 < 100) { stoch_arrow_h4 = "Ú"; }
/*/stochastic value
ObjectCreate("ObjLabel15", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel15","STOCH",8, "Arial Bold", Silver);
ObjectSet("ObjLabel15", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel15", OBJPROP_XDISTANCE, 325);
ObjectSet("ObjLabel15", OBJPROP_YDISTANCE, 2);*/
//stoch m1 value
ObjectCreate("ObjLabel9", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel9",""+StringSubstr(stoch_m1_val,0,5)+" ",12, "Arial Bold", stoch_color_m1);
ObjectSet("ObjLabel9", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel9", OBJPROP_XDISTANCE, 115);
ObjectSet("ObjLabel9", OBJPROP_YDISTANCE, 8);
//arrow m1
ObjectCreate("ObjLabel9a", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel9a",stoch_arrow_m1,8, "Wingdings", stoch_color_m1);
ObjectSet("ObjLabel9a", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel9a", OBJPROP_XDISTANCE, 105);
ObjectSet("ObjLabel9a", OBJPROP_YDISTANCE, 12);
//stoch m30 value
ObjectCreate("ObjLabel10", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel10",""+StringSubstr(stoch_m30_val,0,5),12, "Arial Bold", stoch_color_m30);
ObjectSet("ObjLabel10", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel10", OBJPROP_XDISTANCE, 430);
ObjectSet("ObjLabel10", OBJPROP_YDISTANCE, 8);
//arrow m30
ObjectCreate("ObjLabel10a", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel10a",stoch_arrow_m30,8, "Wingdings", stoch_color_m30);
ObjectSet("ObjLabel10a", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel10a", OBJPROP_XDISTANCE, 418);
ObjectSet("ObjLabel10a", OBJPROP_YDISTANCE, 12);
//stoch m5 value
ObjectCreate("ObjLabel11", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel11",""+StringSubstr(stoch_m5_val,0,5),12, "Arial Bold", stoch_color_m5);
ObjectSet("ObjLabel11", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel11", OBJPROP_XDISTANCE, 210);
ObjectSet("ObjLabel11", OBJPROP_YDISTANCE, 8);
//arrow m5
ObjectCreate("ObjLabel11a", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel11a",stoch_arrow_m5,8, "Wingdings", stoch_color_m5);
ObjectSet("ObjLabel11a", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel11a", OBJPROP_XDISTANCE, 200);
ObjectSet("ObjLabel11a", OBJPROP_YDISTANCE, 12);
//stoch h1 value
ObjectCreate("ObjLabel12", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel12",""+StringSubstr(stoch_h1_val,0,5),12, "Arial Bold", stoch_color_h1);
ObjectSet("ObjLabel12", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel12", OBJPROP_XDISTANCE, 518);
ObjectSet("ObjLabel12", OBJPROP_YDISTANCE, 8);
//arrow h1
ObjectCreate("ObjLabel12a", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel12a",stoch_arrow_h1,8, "Wingdings", stoch_color_h1);
ObjectSet("ObjLabel12a", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel12a", OBJPROP_XDISTANCE, 508);
ObjectSet("ObjLabel12a", OBJPROP_YDISTANCE, 12);
//stoch m15 value
ObjectCreate("ObjLabel13", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel13",""+StringSubstr(stoch_m15_val,0,5),12, "Arial Bold", stoch_color_m15);
ObjectSet("ObjLabel13", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel13", OBJPROP_XDISTANCE, 320);
ObjectSet("ObjLabel13", OBJPROP_YDISTANCE, 8);
//arrow m15
ObjectCreate("ObjLabel13a", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel13a",stoch_arrow_m15,8, "Wingdings", stoch_color_m15);
ObjectSet("ObjLabel13a", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel13a", OBJPROP_XDISTANCE, 308);
ObjectSet("ObjLabel13a", OBJPROP_YDISTANCE, 12);
//stoch h4 value
ObjectCreate("ObjLabel14", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel14",""+StringSubstr(stoch_h4_val,0,5),12, "Arial Bold", stoch_color_h4);
ObjectSet("ObjLabel14", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel14", OBJPROP_XDISTANCE, 610);
ObjectSet("ObjLabel14", OBJPROP_YDISTANCE, 8);
//arrow h4
ObjectCreate("ObjLabel14a", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel14a",stoch_arrow_h4,8, "Wingdings", stoch_color_h4);
ObjectSet("ObjLabel14a", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel14a", OBJPROP_XDISTANCE, 600);
ObjectSet("ObjLabel14a", OBJPROP_YDISTANCE, 12);
}
//Show Legend
if (Show_Legend == true)
{
ObjectCreate("ObjLabel2", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel2","LEGEND",8, "Arial Bold", Silver);
ObjectSet("ObjLabel2", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel2", OBJPROP_XDISTANCE, 670);
ObjectSet("ObjLabel2", OBJPROP_YDISTANCE, 3);
ObjectCreate("ObjLabel3", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel3","TREND UP",9, "Arial Bold", DodgerBlue);
ObjectSet("ObjLabel3", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel3", OBJPROP_XDISTANCE, 720);
ObjectSet("ObjLabel3", OBJPROP_YDISTANCE, 3);
ObjectCreate("ObjLabel4", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel4","TREND DN",9, "Arial Bold", Crimson);
ObjectSet("ObjLabel4", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel4", OBJPROP_XDISTANCE, 720);
ObjectSet("ObjLabel4", OBJPROP_YDISTANCE, 15);
ObjectCreate("ObjLabel5", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel5","OVERBOUGHT",9, "Arial Bold", YellowGreen);
ObjectSet("ObjLabel5", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel5", OBJPROP_XDISTANCE, 790);
ObjectSet("ObjLabel5", OBJPROP_YDISTANCE, 3);
ObjectCreate("ObjLabel6", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel6","OVERSOLD",9, "Arial Bold", Green);
ObjectSet("ObjLabel6", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel6", OBJPROP_XDISTANCE, 790);
ObjectSet("ObjLabel6", OBJPROP_YDISTANCE, 15);
ObjectCreate("ObjLabel7", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel7","BULLISH START",9, "Arial Bold", Aqua);
ObjectSet("ObjLabel7", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel7", OBJPROP_XDISTANCE, 880);
ObjectSet("ObjLabel7", OBJPROP_YDISTANCE, 3);
ObjectCreate("ObjLabel8", OBJ_LABEL, WindowFind("PERINTIS[1]"), 0, 0);
ObjectSetText("ObjLabel8","BEARISH START",9, "Arial Bold", Magenta);
ObjectSet("ObjLabel8", OBJPROP_CORNER, 0);
ObjectSet("ObjLabel8", OBJPROP_XDISTANCE, 880);
ObjectSet("ObjLabel8", OBJPROP_YDISTANCE, 15);
}
//----
return(0);
//----
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Indicator Curves created:
Indicators Used:
Stochastic oscillator
Custom Indicators Used:
Order Management characteristics:
Other Features: