(T_S_R) SIGNAL Alert_Alarm #7





//+------------------------------------------------------------------+
//|                                (T_S_R) SIGNAL Alert_Alarm #7.mq4 |
//|                      Copyright © 2006, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"
#property link      "Display by cja" 
// Thanks to the coders who supplied some of the code and ideas; 
// Xdard777 for his label code & Ogeima For the Comments code. 

#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1 Coral
#property indicator_width1 2

//---- indicator buffers

#define Daily "Daily"
#define Daily1 "Daily1"
#define Daily2 "Daily2"
#define Daily3 "Daily3"
#define Daily4 "Daily4"
#define Open1 "Open1"
#define PVT "PVT"
extern bool Alert_ON = true;// ON/true = Pop up window single sound 
extern bool Alarm_ON = false;// If ALERT ON - & Alarm set on true - gives alarm sound
extern color DailyColor =Maroon;// C'109,44,44'
extern color DailyColor1 =DarkGreen;// C'89,0,0'C'0,54,80'
extern color DailyColor2= C'0,44,09';//C'15,14,64'
extern color DailyColor3= C'40,20,00';//was C'40,50,00'
extern color DailyColor4= C'40,20,00';
extern int DailyFACTOR =6;//Standard is 4
extern int F_TEXT = 0;
extern int SHIFTDaily_TEXT = 0;
extern int SHIFT_Daily_HI_LOW_TEXT = 0;
extern int SHIFT_OPEN_TEXT = 12;
extern int SHIFT_PIVOT_TEXT = 12;
extern int SHIFT_TOP_LOW_DailyRangeTEXT = 30;
extern int GRAPHICS_TEXT_Size = 9;


extern bool Show_TSR_TEXT = true;

extern bool Show_PivotLines = false;
extern bool Show_M_PivotLines = false;
extern int SHIFT_PivotPointText = 30;
extern int SHIFT_M_PivotText = 0;
extern int PivotPoint_ExtendLINE = 0;

extern bool Show_FibLines = false;
extern bool Show_EXTRAFibLines = false;
extern int SHIFT_FibText = 50;
extern int FIB_ExtendDISPLAY = 1;
extern int FibLines_Back_DATE = 0;

extern bool Show_Daily_HI_LOW = false;
extern int SHIFT_HI_LOW_TEXT = 70;
#define DHI "DHI"
#define DLO "DLO"

#define PP1 "PP1"
#define RR3 "RR3"
#define RR2 "RR2"
#define RR1 "RR1"
#define SS1 "SS1"
#define SS2 "SS2"
#define SS3 "SS3"

#define MM1 "MM1"
#define MM2 "MM2"
#define MM3 "MM3"
#define MM4 "MM4"
#define MM5 "MM5"
#define MM0 "MM0"

#define FibP100 "FibP100"
#define FibP618   "FibP618"
#define FibP50  "FibP50"
#define FibP382   "FibP382"
#define Fib100 "Fib100"
#define Fib764   "Fib764"
#define Fib618   "Fib618"
#define Fib50  "Fib50"
#define Fib382   "Fib382"
#define Fib236   "Fib236"
#define Fib0   "Fib0"
#define FibM100 "FibM100"
#define FibM618   "FibM618"
#define FibM50  "FibM50"
#define FibM382   "FibM382"


#define FibP236   "FibP236"
#define FibP764   "FibP764"
#define FibM236   "FibM236"
#define FibM764   "FibM764"
#define FibM150   "FibM150"
#define FibP150   "FibP150"
#define FibM200   "FibM200"
#define FibP200   "FibP200"
#define FibM250   "FibM250"
#define FibP250   "FibP250"
#define FibM300   "FibM300"
#define FibP300   "FibP300"

//---- buffers

//---- input parameters
int shift=0,i2=0,WorkTime=0,Periods=0,CurPeriod=0,nTime=0;
int nDigits;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
{

IndicatorShortName("TSR");
  
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
    ObjectsDeleteAll(0,OBJ_TRENDBYANGLE);
    ObjectsDeleteAll(0,OBJ_RECTANGLE);
    ObjectsDeleteAll(0,OBJ_LABEL);
    ObjectsDeleteAll(0,OBJ_TEXT);
  
   
   Comment(""); 
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+

int start()
 {
 
   int counted_bars= IndicatorCounted();
  
CreateHL();
}

void CreateObj(string objName, double start, double end, color clr)
  {
   ObjectCreate(objName, OBJ_RECTANGLE, 0, iTime(NULL,1440,0), start, Time[0], end);
   ObjectSet(objName, OBJPROP_COLOR, clr);

  }
   void DeleteObjects()
   {
   ObjectDelete(Daily);
   //ObjectDelete(DailyColor);
   ObjectDelete(Daily1);
   //ObjectDelete(DailyColor1);
   ObjectDelete(Daily2);
   //ObjectDelete(DailyColor2);
   ObjectDelete(Daily3); ObjectDelete(Daily4);
   }
   void CreateHL()
   {
   ObjectsDeleteAll(0,OBJ_RECTANGLE);
       CreateOP();
}
void CreateObj2(string objName2, double start, double end,double w, double s,color clr)
  {
   ObjectCreate(objName2, OBJ_TRENDBYANGLE, 0, iTime(NULL,1440,PivotPoint_ExtendLINE), start, Time[0],w,s, end);
   ObjectSet(objName2, OBJPROP_COLOR, clr);
   ObjectSet(objName2,OBJPROP_RAY,false);
   ObjectSet(objName2,OBJPROP_WIDTH,w);
    ObjectSet(objName2,OBJPROP_STYLE,s);
   }
   ObjectDelete(Open1);
   ObjectDelete(PVT);
   ObjectDelete (DHI);ObjectDelete (DLO);
   
   ObjectDelete(PP1); ObjectDelete(RR3); ObjectDelete(RR2); ObjectDelete(RR1); ObjectDelete(SS1); ObjectDelete(SS2);
   ObjectDelete(SS3);
    
   ObjectDelete(MM1); ObjectDelete(MM2); ObjectDelete(MM3); ObjectDelete(MM4); ObjectDelete(MM5); ObjectDelete(MM0);
   
  
      
   void CreateOP()
   {
    ObjectsDeleteAll(0,OBJ_TRENDBYANGLE);
   DeleteObjects();
   
                 
  CreateFIB();
}
void CreateObj3(string objName3, double start, double end,double w, double s,color clr)
  {
   ObjectCreate(objName3, OBJ_TRENDBYANGLE, 0, iTime(NULL,1440,FIB_ExtendDISPLAY), start, Time[0],w,s, end);
   ObjectSet(objName3, OBJPROP_COLOR, clr);
   ObjectSet(objName3,OBJPROP_RAY,false);
   ObjectSet(objName3,OBJPROP_WIDTH,w);
    ObjectSet(objName3,OBJPROP_STYLE,s);
   }
    
    ObjectDelete (Fib100); ObjectDelete (Fib764);  ObjectDelete (Fib618); ObjectDelete (Fib50); ObjectDelete (Fib236); 
    ObjectDelete (Fib0); ObjectDelete (Fib382);
    ObjectDelete (FibP100); ObjectDelete (FibP618); ObjectDelete (FibP50); ObjectDelete (FibP382); 
    ObjectDelete (FibM100); ObjectDelete (FibM618); ObjectDelete (FibM50); ObjectDelete (FibM382);
    ObjectDelete (FibP236);ObjectDelete (FibM236);ObjectDelete (FibP764);ObjectDelete (FibM764); 
    ObjectDelete (FibP150);ObjectDelete (FibM150);ObjectDelete (FibP200);ObjectDelete (FibM200);
    ObjectDelete (FibP250);ObjectDelete (FibM250);ObjectDelete (FibP300);ObjectDelete (FibM300);
    
   void CreateFIB()
   {
    ObjectsDeleteAll(0,OBJ_TRENDBYANGLE);
     DeleteObjects();   

  double HI2 = iHigh(NULL,1440,0);
  double LOW2 = iLow(NULL,1440,0); 
  double HI3 = iHigh(NULL,1440,1);
  double LOW3 = iLow(NULL,1440,1);
  double HI4 = iHigh(NULL,1440,0);
  double LOW4 = iLow(NULL,1440,0);
  double HI5 = iHigh(NULL,1440,2);
  double LOW5 = iLow(NULL,1440,2);
  double HI6 = iHigh(NULL,1440,3);
  double LOW6 = iLow(NULL,1440,3);
  double HI7 = iHigh(NULL,1440,4);
  double LOW7 = iLow(NULL,1440,4);
  double HI8 = iHigh(NULL,1440,5);
  double LOW8 = iLow(NULL,1440,5);
  double HI9 = iHigh(NULL,1440,6);
  double LOW9 = iLow(NULL,1440,6);
  double HI10 = iHigh(NULL,1440,7);
  double LOW10 = iLow(NULL,1440,7);
  double HI11 = iHigh(NULL,1440,8);
  double LOW11 = iLow(NULL,1440,8);
  double HI12 = iHigh(NULL,1440,9);
  double LOW12 = iLow(NULL,1440,9);
  double HI13 = iHigh(NULL,1440,10);
  double LOW13 = iLow(NULL,1440,10);
  double HI14 = iHigh(NULL,1440,11);
  double LOW14 = iLow(NULL,1440,11);
  double HI15 = iHigh(NULL,1440,12);
  double LOW15 = iLow(NULL,1440,12);
  double HI16 = iHigh(NULL,1440,13);
  double LOW16 = iLow(NULL,1440,13);
  double HI17 = iHigh(NULL,1440,14);
  double LOW17 = iLow(NULL,1440,14);
  double HI18 = iHigh(NULL,1440,15);
  double LOW18 = iLow(NULL,1440,15);
  double HI19 = iHigh(NULL,1440,16);
  double LOW19 = iLow(NULL,1440,16);
  double HI20 = iHigh(NULL,1440,17);
  double LOW20 = iLow(NULL,1440,17);
  double HI21 = iHigh(NULL,1440,18);
  double LOW21 = iLow(NULL,1440,18);
  double HI22 = iHigh(NULL,1440,19);
  double LOW22 = iLow(NULL,1440,19);
  double HI23 = iHigh(NULL,1440,20);
  double LOW23 = iLow(NULL,1440,20);
  
  double OPEN = iOpen(NULL,1440,0);
  double CLOSE = iClose(NULL,1440,0);
  
  double ONE = (HI3-LOW3)/2;
  
  double FIVE = ((HI3-LOW3)+(HI5-LOW5)+(HI6-LOW6)+(HI7-LOW7)+(HI8-LOW8))/10;
                   
                
  double TEN = ((HI3-LOW3)+(HI5-LOW5)+(HI6-LOW6)+(HI7-LOW7)+(HI8-LOW8)+
                  (HI9-LOW9)+(HI10-LOW10)+(HI11-LOW11)+(HI12-LOW12)+(HI13-LOW13))/20;
                    
  double TWENTY = ((HI3-LOW3)+(HI5-LOW5)+(HI6-LOW6)+(HI7-LOW7)+(HI8-LOW8)+
               (HI9-LOW9)+(HI10-LOW10)+(HI11-LOW11)+(HI12-LOW12)+(HI13-LOW13)+
               (HI14-LOW14)+(HI15-LOW15)+(HI16-LOW16)+(HI17-LOW17)+(HI18-LOW18)+
               (HI19-LOW19)+(HI20-LOW20)+(HI21-LOW21)+(HI22-LOW22)+(HI23-LOW23))/40; 
                                              
  double AV = (ONE+FIVE+TEN+TWENTY)/4;// New Setting AV = (FIVE+TEN+TWENTY)/3;
  double AV1 = (ONE+FIVE+TEN+TWENTY)/DailyFACTOR;
  
  double HIDaily = iHigh(NULL,1440,0)-(AV);
  double LOWDaily = iLow(NULL,1440,0)+(AV);
  double HIDaily1 = iHigh(NULL,1440,0); 
  double LOWDaily1 =iLow(NULL,1440,0); 
  double HIDaily2 = iHigh(NULL,1440,0)-(AV)*2; 
  double LOWDaily2 =iLow(NULL,1440,0)+(AV)*2; 
  
  double FACTORDN = iHigh(NULL,1440,0)-(AV1);
  double FACTORUP = iLow(NULL,1440,0)+(AV1);
  
  double CURRPRICE = iMA(Symbol(),0,1,0,MODE_EMA,PRICE_CLOSE,0); 
  double Pivot = (iHigh(NULL,1440,1) + iLow(NULL,1440,1) + iClose(NULL,1440,1)) / 3; 
  string OPEN1,PIPS,HL,HI,LOW,TDR,BDR,FIFTY,LG,ST,PRO_L,PRO_S,CURR,FACTORDN1,FACTORUP1,FACTORR,PRO_L1,PRO_S1,DAR;
  
   double P = (iHigh(NULL,1440,1) + iLow(NULL,1440,1) + iClose(NULL,1440,1)) / 3;
         double rr3 = ( 2 * P ) + ( iHigh(NULL,1440,1) - ( 2 * iLow(NULL,1440,1) ));
         double rr2 = P + ( iHigh(NULL,1440,1) - iLow(NULL,1440,1) );
         double rr1 = ( 2 * P ) - iLow(NULL,1440,1);
         double ss1 = ( 2 * P ) - iHigh(NULL,1440,1);
         double ss2 = P - ( iHigh(NULL,1440,1)- iLow(NULL,1440,1));
         double ss3 = ( 2 * P ) - ( ( 2 * iHigh(NULL,1440,1) ) - iLow(NULL,1440,1) );
         
         double mm0 = (ss2 + ss3)/2;
         double mm1 = (ss1 + ss2)/2;
         double mm2 = (P + ss1)/2;
         double mm3 = (P + rr1)/2; 
         double mm4 = (rr1 + rr2)/2;
         double mm5 = (rr2 + rr3)/2; 
         
   //*****************************************************************************************************************************************
   //*****************************************************************************************************************************************       
    
   string Signal ="",Signalp ="";
   color col; 
   color col2;
         
            if (Alert_ON ==true) 
       {
     if(Ask>(FACTORUP-2*Point)&&Ask<(FACTORUP+2*Point)){ Alert(Symbol()," M",Period()," : TSR : BUY"," F"
     +(DoubleToStr(DailyFACTOR,Digits-4))+" Level" ,"  @  "+(DoubleToStr (FACTORUP,Digits))+"");}
           if (Alarm_ON ==true) 
       {
      PlaySound("Alarm Warning.wav");
     }
     if(Bid<(FACTORDN+2*Point)&&Bid>(FACTORDN-2*Point)){ Alert(Symbol()," M",Period()," : TSR : SELL"," F" 
     +(DoubleToStr(DailyFACTOR,Digits-4))+" Level" ,"  @  "+(DoubleToStr (FACTORDN,Digits))+"");}
            if (Alarm_ON ==true) 
       {
      PlaySound("Alarm Warning.wav");
     }
     if(Ask>(LOWDaily-2*Point)&&Ask<(LOWDaily+2*Point)){ Alert(Symbol()," M",Period()," : TSR : BUY 50% Level @  "+(DoubleToStr (LOWDaily,Digits))+"" );}
     if(Bid<(HIDaily+2*Point)&&Bid>(HIDaily-2*Point)){ Alert(Symbol()," M",Period()," : TSR : SELL 50%  @  "+(DoubleToStr (HIDaily,Digits))+"" );}   
      }   
         
        
    // Factor entries     
    if(Ask>(FACTORUP-3*Point)&&Ask<(FACTORUP+3*Point)){Signal = "BUY @ "+DoubleToStr(FACTORUP,Digits)+""
                                              +" , 1st TP @ "+DoubleToStr(LOWDaily,Digits)+""
                                              +" , 2nd TP @ "+DoubleToStr(LOWDaily2,Digits)+""
                                              +" , SL @ "+DoubleToStr(HIDaily,Digits)+"";
                                              col = Lime;}
    if(Bid<(FACTORDN+3*Point)&&Bid>(FACTORDN-3*Point)){Signal = "SELL @ "+DoubleToStr(FACTORDN,Digits)+""
                                              +" , 1st TP @ "+DoubleToStr(HIDaily,Digits)+""
                                              +" , 2nd TP @ "+DoubleToStr(HIDaily2,Digits)+""
                                              +" , SL @ "+DoubleToStr(LOWDaily,Digits)+"";
                                              col = Gold;}
    //50% entries                                          
         
    if(Ask>(LOWDaily-3*Point)&&Ask<(LOWDaily+3*Point)){Signal = "BUY 50% Level @ "+DoubleToStr(LOWDaily,Digits)+""
                                              +" , TP @ "+DoubleToStr(LOWDaily2,Digits)+""
                                              +" , SL @ "+DoubleToStr(FACTORDN,Digits)+"";
                                              col = Lime;}
    if(Bid<(HIDaily+3*Point)&&Bid>(HIDaily-3*Point)){Signal = "SELL 50% Level @ "+DoubleToStr(HIDaily,Digits)+""
                                              +"  , TP @ "+DoubleToStr(HIDaily2,Digits)+""
                                              +" , SL @ "+DoubleToStr(FACTORUP,Digits)+"";
                                              col = Gold;} 
                                                                                       
    if(Ask>(LOWDaily2-3*Point)&&Ask<(LOWDaily2+3*Point)){Signal = "CAUTION 100% Level @ "+DoubleToStr(LOWDaily2,Digits)+"";
                                              col = Lime;}
    if(Bid<(HIDaily2+3*Point)&&Bid>(HIDaily2-3*Point)){Signal = "CAUTION 100% Level @ "+DoubleToStr(HIDaily2,Digits)+"";
                                              col = Gold;} 
    if(Bid<(P-1*Point)&&Ask>(P+1*Point)){Signalp = "CAUTION CENTRAL PIVOT Level @ "+DoubleToStr(P,Digits)+"";
                                              col2 = Silver;} 
                                
                                              
   ObjectCreate("Signal", OBJ_LABEL, 0, 0, 0);
   ObjectSetText("Signal", Signal, 10, "Tahoma Narrow", col);
   ObjectSet("Signal", OBJPROP_CORNER, 0);
   ObjectSet("Signal", OBJPROP_XDISTANCE, 250);
   ObjectSet("Signal", OBJPROP_YDISTANCE, 20);     
   
   ObjectCreate("Signalp", OBJ_LABEL, 0, 0, 0);
   ObjectSetText("Signalp", Signalp, 10, "Tahoma Narrow", col2);
   ObjectSet("Signalp", OBJPROP_CORNER, 0);
   ObjectSet("Signalp", OBJPROP_XDISTANCE, 250);
   ObjectSet("Signalp", OBJPROP_YDISTANCE, 40);                                      
                                             
                                             
    
     /* if( iMA(Symbol(),0,1,0,MODE_EMA,PRICE_CLOSE,0)==(FACTORUP)){PlaySound("Alarm Warning.wav");}
     if( iMA(Symbol(),0,1,0,MODE_EMA,PRICE_CLOSE,0)==(FACTORDN)){PlaySound("Alarm Warning.wav");}*/
     
     //******************************************************************************************************************************************
     //******************************************************************************************************************************************
                                              
       
   double F;      
   F = (iHigh(NULL,1440,FibLines_Back_DATE+1)- iLow(NULL,1440,FibLines_Back_DATE+1));
   
   double FIBP300 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*4.00;
   double FIBP250 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*3.5;
   double FIBP200 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*3.00;
   double FIBP150 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*2.5;
   double FIBP100 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*2.00;
   double FIBP764 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*1.764;
   double FIBP618 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*1.618;
   double FIBP50 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*1.5;
   double FIBP382 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*1.382;
   double FIBP236 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*1.236;
   double FIB100 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*1.00;
   double FIB764 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*0.764;
   double FIB618 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*0.618;
   double FIB50 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*0.5;
   double FIB382 =  iLow(NULL,1440,FibLines_Back_DATE+1)+ F*0.382;
   double FIB236 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*0.236;
   double FIB0 = iLow(NULL,1440,FibLines_Back_DATE+1) + F*0.0;
   double FIBM236 = iLow(NULL,1440,FibLines_Back_DATE+1) - F*0.236;
   double FIBM382 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*0.382;
   double FIBM50 = iLow(NULL,1440,FibLines_Back_DATE+1) - F*0.5;
   double FIBM618 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*0.618;
   double FIBM764 = iLow(NULL,1440,FibLines_Back_DATE+1) - F*0.764;
   double FIBM100 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*1.00; 
   double FIBM150 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*1.5; 
   double FIBM200 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*2.00; 
   double FIBM250 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*2.5; 
   double FIBM300 =  iLow(NULL,1440,FibLines_Back_DATE+1)- F*3.00; 
  
 ObjectsRedraw();      
   
   if (Show_TSR_TEXT==true) 
   {
    OPEN1 = DoubleToStr(OPEN,Digits);
    PIPS =  DoubleToStr((CLOSE-OPEN)/Point,0);
    HL = 	DoubleToStr((HI2-LOW2)/Point,0);//DoubleToStr(AV/Point,0)
    HI =    DoubleToStr(HI2,Digits);
    LOW =   DoubleToStr(LOW2,Digits);
    TDR =   DoubleToStr(LOWDaily2,Digits);
    BDR =   DoubleToStr(HIDaily2,Digits);
    FIFTY = DoubleToStr(AV/Point,0);
    FACTORR = DoubleToStr(AV1/Point,0);
    LG =    DoubleToStr(LOWDaily,Digits);
    ST =    DoubleToStr(HIDaily,Digits);  
    PRO_L = DoubleToStr((CURRPRICE-LOWDaily)/Point,0);
    PRO_S = DoubleToStr((HIDaily-CURRPRICE)/Point,0);
    PRO_L1 = DoubleToStr((CURRPRICE-FACTORUP)/Point,0);
    PRO_S1 = DoubleToStr((FACTORDN-CURRPRICE)/Point,0);
    CURR =  DoubleToStr(CURRPRICE,Digits);
    FACTORUP1 = DoubleToStr(FACTORUP,Digits);
    FACTORDN1 = DoubleToStr(FACTORDN,Digits);
    DAR = DoubleToStr(AV*2/Point,0);
    			
	ObjectDelete("TSR");
   TSR( "TSR", 22, 12,4);
   ObjectSetText( "TSR", "( T_S_R ) SIGNAL Alert/Alarm # 7"  , 10, "Arial", Orange );
      ObjectDelete("TSRa");
   TSRa( "TSRa", 30, 12,4);
   ObjectSetText( "TSRa",",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,"  , 10, "Arial ", DarkTurquoise );//50%
   
   ObjectDelete("TSR2");
   TSR2( "TSR2", 50, 12,4);
   ObjectSetText( "TSR2", "Daily Open "  , 10, "Arial B", DarkTurquoise );//Open
   ObjectDelete("TSR3");
   TSR3( "TSR3", 50, 12,4);
   ObjectSetText( "TSR3"," "+ OPEN1 +"", 10, "Arial Bold", SkyBlue );
    
    ObjectDelete("TSR4");
   TSR4( "TSR4", 65, 12,4);
   ObjectSetText( "TSR4", "Pips from Open"  , 10, "Arial ", CadetBlue );//Pips from Open
   ObjectDelete("TSR5");
   TSR5( "TSR5", 65, 12,4);
   ObjectSetText( "TSR5"," "+PIPS+" " , 10, "Arial Bold", Orange );
   
   ObjectDelete("TSR10");
   TSR10( "TSR10", 80, 12,4);
   ObjectSetText( "TSR10", "From Hi to Low"  , 10, "Arial ", CadetBlue );//Hi/Low
   ObjectDelete("TSR11");
   TSR11( "TSR11", 80, 12,4);
   ObjectSetText( "TSR11"," "+HL+" " , 10, "Arial Bold", Orange );
   
    ObjectDelete("TSR6");
   TSR6( "TSR6", 100, 12,4);
   ObjectSetText( "TSR6", "Today's HIGH"  , 10, "Arial ", Green );//Hi
   ObjectDelete("TSR7");
   TSR7( "TSR7", 100, 12,4);
   ObjectSetText( "TSR7"," "+HI+" " , 10, "Arial Bold",  ForestGreen );
   
     ObjectDelete("TSR8");
   TSR8( "TSR8", 115, 12,4);
   ObjectSetText( "TSR8", "Today's LOW"  , 10, "Arial ", OrangeRed );//Low
   ObjectDelete("TSR9");
   TSR9( "TSR9", 115, 12,4);
   ObjectSetText( "TSR9"," "+LOW+" " , 10, "Arial Bold", Tomato );
   
   
   
     ObjectDelete("TSR12");
   TSR12( "TSR12", 140, 12,4);
   ObjectSetText( "TSR12", "Top Daily Range"  , 10, "Arial ", Green );//Top Range
   ObjectDelete("TSR13");
   TSR13( "TSR13", 140, 12,4);
   ObjectSetText( "TSR13"," "+TDR+" " , 10, "Arial Bold",  ForestGreen );
   
     ObjectDelete("TSR14");
   TSR14( "TSR14", 155, 12,4);
   ObjectSetText( "TSR14", "Low Daily Range"  , 10, "Arial ", OrangeRed );//Bottom Range
   ObjectDelete("TSR15");
   TSR15( "TSR15", 155, 12,4);
   ObjectSetText( "TSR15"," "+BDR+" " , 10, "Arial Bold", Tomato );
   
      ObjectDelete("TSR16a");
   TSR16a( "TSR16a", 165, 12,4);
   ObjectSetText( "TSR16a",",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,"  , 10, "Arial ", DarkTurquoise );//50%
     ObjectDelete("TSR16");
   TSR16( "TSR16", 185, 12,4);
   ObjectSetText( "TSR16","Daily 50% Range "  , 10, "Arial ", DarkTurquoise );//50%
   ObjectDelete("TSR17");
   TSR17( "TSR17", 185, 12,4);
   ObjectSetText( "TSR17"," "+FIFTY+"", 10, "Arial Bold", SkyBlue );
   
     ObjectDelete("TSR18");
   TSR18( "TSR18", 200, 12,4);
   ObjectSetText( "TSR18", "LONG Entry"  , 10, "Arial ", Green );//LONG
   ObjectDelete("TSR19");
   TSR19( "TSR19", 200, 12,4);
   ObjectSetText( "TSR19"," "+LG+" " , 10, "Arial Bold",  LimeGreen);
   
     ObjectDelete("TSR20");
   TSR20( "TSR20", 215, 12,4);
   ObjectSetText( "TSR20", "SHORT Entry"  , 10, "Arial ", OrangeRed );//SHORT
   ObjectDelete("TSR21");
   TSR21( "TSR21", 215, 12,4);
   ObjectSetText( "TSR21"," "+ST+" " , 10, "Arial Bold", Tomato );
   
    
     ObjectDelete("TSR22");
   TSR22( "TSR22", 230, 12,4);
   ObjectSetText( "TSR22", "Profit LONG"  , 10, "Arial ", Green );//PRO LONG
   ObjectDelete("TSR23");
   TSR23( "TSR23", 230, 12,4);
   ObjectSetText( "TSR23"," "+PRO_L+" " , 10, "Arial Bold", LimeGreen );
   
     ObjectDelete("TSR24");
   TSR24( "TSR24", 245, 12,4);
   ObjectSetText( "TSR24", "Profit SHORT "  , 10, "Arial ", OrangeRed );//PRO SHORT
   ObjectDelete("TSR25");
   TSR25( "TSR25", 245, 12,4);
   ObjectSetText( "TSR25"," "+PRO_S+" " , 10, "Arial Bold", Tomato );
       ObjectDelete("TSR25a");
   TSR25a( "TSR25a", 255, 12,4);
   ObjectSetText( "TSR25a",",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,"  , 10, "Arial ", DarkTurquoise );//50%
   
      ObjectDelete("TSR26");
   TSR26( "TSR26", 395, 12,4);
   ObjectSetText( "TSR26", "Price "  , 10, "Arial ", DarkTurquoise );//PRICE
   ObjectDelete("TSR27");
   TSR27( "TSR27", 395, 12,4);
   ObjectSetText( "TSR27"," "+CURR+" " , 15, "Arial Bold", SkyBlue );
   
      ObjectDelete("TSR28");
   TSR28( "TSR28", 275, 12,4);
   ObjectSetText( "TSR28", "Factor = "  , 10, "Arial ",  DarkTurquoise  );//FACTOR
   ObjectDelete("TSR29");
   TSR29( "TSR29", 275, 12,4);
   ObjectSetText( "TSR29"," "+DailyFACTOR+" " , 10, "Arial", SkyBlue );
   
       ObjectDelete("TSR30");
   TSR30( "TSR30", 290, 12,4);
   ObjectSetText( "TSR30", "LONG F Entry  "  , 10, "Arial ", Green   );//Weekly Av
   ObjectDelete("TSR31");
   TSR31( "TSR31", 290, 12,4);
   ObjectSetText( "TSR31"," "+FACTORUP1 +" " , 10, "Arial Bold", LimeGreen);
        ObjectDelete("TSR32");
   TSR32( "TSR32", 305, 12,4);
   ObjectSetText( "TSR32", "SHORT F Entry "  , 10, "Arial ", Tomato  );//Monthly Av
   ObjectDelete("TSR33");
   TSR33( "TSR33", 305, 12,4);
   ObjectSetText( "TSR33"," "+FACTORDN1 +" " , 10, "Arial Bold", Tomato);
    ObjectDelete("TSR34");
   TSR34( "TSR34", 320, 12,4);
   ObjectSetText( "TSR34", "Profit LONG"  , 10, "Arial ", Green );//PRO LONG
   ObjectDelete("TSR35");
   TSR35( "TSR35", 320, 12,4);
   ObjectSetText( "TSR35"," "+PRO_L1+" " , 10, "Arial Bold",  LimeGreen );
   
     ObjectDelete("TSR36");
   TSR36( "TSR36", 335, 12,4);
   ObjectSetText( "TSR36", "Profit SHORT "  , 10, "Arial ", OrangeRed );//PRO SHORT
   ObjectDelete("TSR37");
   TSR37( "TSR37", 335, 12,4);
   ObjectSetText( "TSR37"," "+PRO_S1+" " , 10, "Arial Bold", Tomato );
        ObjectDelete("TSR38");
   TSR38( "TSR38", 345, 12,4);
   ObjectSetText( "TSR38",",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,"  , 10, "Arial ", DarkTurquoise );//50%
   
      ObjectDelete("TSR39");
   TSR39( "TSR39", 365, 12,4);
   ObjectSetText( "TSR39", "Daily Average "  , 10, "Arial ", Orange );//Daily Average
   ObjectDelete("TSR40");
   TSR40( "TSR40", 365, 12,4);
   ObjectSetText( "TSR40"," "+DAR+" " , 10, "Arial Bold", Yellow );
   
   if (Show_FibLines==true)
{
     if(ObjectFind("FIB") != 0){
ObjectCreate("FIB", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB100);
ObjectSetText("FIB", "FIB 100% ", 8, "Arial", Green);
}else{ObjectMove("FIB", 0, Time[SHIFT_FibText], FIB100);}
     if(ObjectFind("FIB2") != 0){
ObjectCreate("FIB2", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB50);
ObjectSetText("FIB2", "FIB 50% ", 8, "Arial", Green);
}else{ObjectMove("FIB2", 0, Time[SHIFT_FibText], FIB50);}
     if(ObjectFind("FIB3") != 0){
ObjectCreate("FIB3", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB0);
ObjectSetText("FIB3", "FIB 0.00% ", 8, "Arial", Green);
}else{ObjectMove("FIB3", 0, Time[SHIFT_FibText], FIB0);}
     if(ObjectFind("FIB4") != 0){
ObjectCreate("FIB4", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB382);
ObjectSetText("FIB4", "FIB 0.382% ", 8, "Arial", Green);
}else{ObjectMove("FIB4", 0, Time[SHIFT_FibText], FIB382);}
     if(ObjectFind("FIB5") != 0){
ObjectCreate("FIB5", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB618);
ObjectSetText("FIB5", "FIB 0.618% ", 8, "Arial", Green);
}else{ObjectMove("FIB5", 0, Time[SHIFT_FibText], FIB618);}
     if(ObjectFind("FIB6") != 0){
ObjectCreate("FIB6", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP50);
ObjectSetText("FIB6", "FIB +1.50% ", 8, "Arial",  C'0,93,0');
}else{ObjectMove("FIB6", 0, Time[SHIFT_FibText], FIBP50);}
     if(ObjectFind("FIB7") != 0){
ObjectCreate("FIB7", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP100);
ObjectSetText("FIB7", "FIB +200% ", 8, "Arial", Green);
}else{ObjectMove("FIB7", 0, Time[SHIFT_FibText], FIBP100);}
     if(ObjectFind("FIB8") != 0){
ObjectCreate("FIB8", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM50);
ObjectSetText("FIB8", "FIB -1.50% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB8", 0, Time[SHIFT_FibText], FIBM50);}
     if(ObjectFind("FIB9") != 0){
ObjectCreate("FIB9", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM100);
ObjectSetText("FIB9", "FIB -200% ", 8, "Arial", Green);
}else{ObjectMove("FIB9", 0, Time[SHIFT_FibText], FIBM100);}
     if(ObjectFind("FIB10") != 0){
ObjectCreate("FIB10", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP382);
ObjectSetText("FIB10", "FIB +1.382% ", 8, "Arial", Green);
}else{ObjectMove("FIB10", 0, Time[SHIFT_FibText], FIBP382);}
     if(ObjectFind("FIB11") != 0){
ObjectCreate("FIB11", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM382);
ObjectSetText("FIB11", "FIB -1.382% ", 8, "Arial", Green);
}else{ObjectMove("FIB11", 0, Time[SHIFT_FibText], FIBM382);}
     if(ObjectFind("FIB12") != 0){
ObjectCreate("FIB12", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP618);
ObjectSetText("FIB12", "FIB +1.618% ", 8, "Arial", Green);
}else{ObjectMove("FIB12", 0, Time[SHIFT_FibText], FIBP618);}
     if(ObjectFind("FIB13") != 0){
ObjectCreate("FIB13", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM618);
ObjectSetText("FIB13", "FIB -1.618% ", 8, "Arial", Green);
}else{ObjectMove("FIB13", 0, Time[SHIFT_FibText], FIBM618);}
     if(ObjectFind("FIB14") != 0){
ObjectCreate("FIB14", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB764);
ObjectSetText("FIB14", "FIB 0.764% ", 8, "Arial", Green);
}else{ObjectMove("FIB14", 0, Time[SHIFT_FibText], FIB764);}
     if(ObjectFind("FIB15") != 0){
ObjectCreate("FIB15", OBJ_TEXT, 0, Time[SHIFT_FibText], FIB236);
ObjectSetText("FIB15", "FIB 0.236% ", 8, "Arial", Green);
}else{ObjectMove("FIB15", 0, Time[SHIFT_FibText], FIB236);}
     if(ObjectFind("FIB16") != 0){
ObjectCreate("FIB16", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM236);
ObjectSetText("FIB16", "FIB -1.236% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB16", 0, Time[SHIFT_FibText], FIBM236);}
     if(ObjectFind("FIB17") != 0){
ObjectCreate("FIB17", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP236);
ObjectSetText("FIB17", "FIB +1.236% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB17", 0, Time[SHIFT_FibText], FIBP236);}
     if(ObjectFind("FIB18") != 0){
ObjectCreate("FIB18", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM764);
ObjectSetText("FIB18", "FIB -1.764% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB18", 0, Time[SHIFT_FibText], FIBM764);}
     if(ObjectFind("FIB19") != 0){
ObjectCreate("FIB19", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP764);
ObjectSetText("FIB19", "FIB +1.764% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB19", 0, Time[SHIFT_FibText], FIBP764);}
}

if (Show_EXTRAFibLines==true)
{
     if(ObjectFind("FIB120") != 0){
ObjectCreate("FIB20", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP150);
ObjectSetText("FIB20", "FIB +250% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB20", 0, Time[SHIFT_FibText], FIBP150);}
     if(ObjectFind("FIB21") != 0){
ObjectCreate("FIB21", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM150);
ObjectSetText("FIB21", "FIB -250% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB21", 0, Time[SHIFT_FibText], FIBM150);}
     if(ObjectFind("FIB122") != 0){
ObjectCreate("FIB22", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP200);
ObjectSetText("FIB22", "FIB +300% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB22", 0, Time[SHIFT_FibText], FIBP200);}
     if(ObjectFind("FIB23") != 0){
ObjectCreate("FIB23", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM200);
ObjectSetText("FIB23", "FIB -300% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB23", 0, Time[SHIFT_FibText], FIBM200);}
     if(ObjectFind("FIB124") != 0){
ObjectCreate("FIB24", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP250);
ObjectSetText("FIB24", "FIB +350% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB24", 0, Time[SHIFT_FibText], FIBP250);}
     if(ObjectFind("FIB25") != 0){
ObjectCreate("FIB25", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM250);
ObjectSetText("FIB25", "FIB -350% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB25", 0, Time[SHIFT_FibText], FIBM250);}
     if(ObjectFind("FIB126") != 0){
ObjectCreate("FIB26", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBP300);
ObjectSetText("FIB26", "FIB +400% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB26", 0, Time[SHIFT_FibText], FIBP300);}
     if(ObjectFind("FIB27") != 0){
ObjectCreate("FIB27", OBJ_TEXT, 0, Time[SHIFT_FibText], FIBM300);
ObjectSetText("FIB27", "FIB -400% ", 8, "Arial", C'0,93,0');
}else{ObjectMove("FIB27", 0, Time[SHIFT_FibText], FIBM300);}
}
  if (Show_PivotLines==true)
    {    
      if(ObjectFind("P") != 0){
ObjectCreate("P", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], P);
ObjectSetText("P", "P ", 8, "Arial", Silver);
}else{ObjectMove("P", 0, Time[SHIFT_PivotPointText], P);}
     
     if(ObjectFind("S3") != 0){
ObjectCreate("S3", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], ss3);
ObjectSetText("S3", "S3 ", 8, "Arial", Silver);
}else{ObjectMove("S3", 0, Time[SHIFT_PivotPointText], ss3);}
     if(ObjectFind("S2") != 0){
ObjectCreate("S2", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], ss2);
ObjectSetText("S2", "S2 ", 8, "Arial", Silver);
}else{ObjectMove("S2", 0, Time[SHIFT_PivotPointText], ss2);}
     if(ObjectFind("S1") != 0){
ObjectCreate("S1", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], ss1);
ObjectSetText("S1", "S1 ", 8, "Arial", Silver);
}else{ObjectMove("S1", 0, Time[SHIFT_PivotPointText], ss1);}
     if(ObjectFind("R1") != 0){
ObjectCreate("R1", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], rr1);
ObjectSetText("R1", "R1 ", 8, "Arial", Silver);
}else{ObjectMove("R1", 0, Time[SHIFT_PivotPointText], rr1);}
     if(ObjectFind("R2") != 0){
ObjectCreate("R2", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], rr2);
ObjectSetText("R2", "R2 ", 8, "Arial", Silver);
}else{ObjectMove("R2", 0, Time[SHIFT_PivotPointText], rr2);}
     if(ObjectFind("R3") != 0){
ObjectCreate("R3", OBJ_TEXT, 0, Time[SHIFT_PivotPointText], rr3);
ObjectSetText("R3", "R3 ", 8, "Arial", Silver);
}else{ObjectMove("R3", 0, Time[SHIFT_PivotPointText], rr3);}
}
 if (Show_M_PivotLines==true) 
         {
 if(ObjectFind("M5") != 0){
ObjectCreate("M5", OBJ_TEXT, 0, Time[SHIFT_M_PivotText], mm5);
ObjectSetText("M5", "M5 ", 8, "Arial", Silver);
}else{ObjectMove("M5", 0, Time[SHIFT_M_PivotText], mm5);}
     if(ObjectFind("M4") != 0){
ObjectCreate("M4", OBJ_TEXT, 0, Time[SHIFT_M_PivotText], mm4);
ObjectSetText("M4", "M4 ", 8, "Arial", Silver);
}else{ObjectMove("M4", 0, Time[SHIFT_M_PivotText], mm4);}
     if(ObjectFind("M3") != 0){
ObjectCreate("M3", OBJ_TEXT, 0, Time[SHIFT_M_PivotText], mm3);
ObjectSetText("M3", "M3 ", 8, "Arial", Silver);
}else{ObjectMove("M3", 0, Time[SHIFT_M_PivotText], mm3);}
     if(ObjectFind("M2") != 0){
ObjectCreate("M2", OBJ_TEXT, 0, Time[SHIFT_M_PivotText], mm2);
ObjectSetText("M2", "M2 ", 8, "Arial", Silver);
}else{ObjectMove("M2", 0, Time[SHIFT_M_PivotText], mm2);}
     if(ObjectFind("M1") != 0){
ObjectCreate("M1", OBJ_TEXT, 0, Time[SHIFT_M_PivotText], mm1);
ObjectSetText("M1", "M1 ", 8, "Arial", Silver);
}else{ObjectMove("M1", 0, Time[SHIFT_M_PivotText], mm1);}
     if(ObjectFind("M0") != 0){
ObjectCreate("M0", OBJ_TEXT, 0, Time[SHIFT_M_PivotText], mm0);
ObjectSetText("M0", "M0 ", 8, "Arial", Silver);
}else{ObjectMove("M0", 0, Time[SHIFT_M_PivotText], mm0);}
}
if (Show_Daily_HI_LOW==true)
    {      
     if(ObjectFind("DHIGH") != 0){
ObjectCreate("DHIGH", OBJ_TEXT, 0, Time[SHIFT_HI_LOW_TEXT], HI3);
ObjectSetText("DHIGH", "Daily High ", GRAPHICS_TEXT_Size, "Arial", Red);
}else{ObjectMove("DHIGH", 0, Time[SHIFT_HI_LOW_TEXT], HI3);}
     if(ObjectFind("DLOW") != 0){
ObjectCreate("DLOW", OBJ_TEXT, 0, Time[SHIFT_HI_LOW_TEXT], LOW3);
ObjectSetText("DLOW", "Daily Low ", GRAPHICS_TEXT_Size, "Arial", Red);
}else{ObjectMove("DLOW", 0, Time[SHIFT_HI_LOW_TEXT], LOW3);}
}
}


//Short Average

 if(ObjectFind("HIDaily1") != 0)
{
ObjectCreate("HIDaily1", OBJ_TEXT, 0, Time[SHIFTDaily_TEXT], HIDaily);
ObjectSetText("HIDaily1", "                        50% SHORT", GRAPHICS_TEXT_Size, "Verdana", Yellow);
}
else
{
ObjectMove("HIDaily1", 0, Time[SHIFTDaily_TEXT], HIDaily);
} 

//High Average
 if(ObjectFind("HIDaily2") != 0)
{
ObjectCreate("HIDaily2", OBJ_TEXT, 0, Time[SHIFTDaily_TEXT ], LOWDaily);
ObjectSetText("HIDaily2", "                      50% LONG", GRAPHICS_TEXT_Size, "Verdana", Yellow);
}
else
{
ObjectMove("HIDaily2", 0, Time[SHIFTDaily_TEXT], LOWDaily);
}

//Today's High
 if(ObjectFind("HIDaily3") != 0)
{
ObjectCreate("HIDaily3", OBJ_TEXT, 0, Time[SHIFT_Daily_HI_LOW_TEXT], HI4);
ObjectSetText("HIDaily3", "            High ", GRAPHICS_TEXT_Size, "Verdana", YellowGreen);
}
else
{
ObjectMove("HIDaily3", 0, Time[SHIFT_Daily_HI_LOW_TEXT], HI4);
}

//Todays Low 
 if(ObjectFind("HIDaily4") != 0)
{
ObjectCreate("HIDaily4", OBJ_TEXT, 0, Time[SHIFT_Daily_HI_LOW_TEXT], LOW4);
ObjectSetText("HIDaily4", "           Low ", GRAPHICS_TEXT_Size, "Verdana", YellowGreen);
}
else
{
ObjectMove("HIDaily4", 0, Time[SHIFT_Daily_HI_LOW_TEXT], LOW4);
}

//Open
 if(ObjectFind("HIDaily5") != 0)
{
ObjectCreate("HIDaily5", OBJ_TEXT, 0, Time[SHIFT_OPEN_TEXT ], OPEN);
ObjectSetText("HIDaily5", "             Open ", GRAPHICS_TEXT_Size, "Verdana",SandyBrown);
}
else
{
ObjectMove("HIDaily5", 0, Time[SHIFT_OPEN_TEXT ], OPEN);
}

//Bottom of Daily Range
 if(ObjectFind("HIDaily6") != 0)
{
ObjectCreate("HIDaily6", OBJ_TEXT, 0, Time[SHIFT_TOP_LOW_DailyRangeTEXT ],HIDaily2);
ObjectSetText("HIDaily6", "                              Low Daily Range", GRAPHICS_TEXT_Size, "Verdana",SandyBrown);
}
else
{
ObjectMove("HIDaily6", 0, Time[SHIFT_TOP_LOW_DailyRangeTEXT ], HIDaily2);
}
//TOP of Daily Range
 if(ObjectFind("HIDaily7") != 0)
{
ObjectCreate("HIDaily7", OBJ_TEXT, 0, Time[SHIFT_TOP_LOW_DailyRangeTEXT ],LOWDaily2);
ObjectSetText("HIDaily7", "                              Top Daily Range", GRAPHICS_TEXT_Size, "Verdana",SandyBrown);
}
else
{
ObjectMove("HIDaily7", 0, Time[SHIFT_TOP_LOW_DailyRangeTEXT ], LOWDaily2);
}
//Pivot
 if(ObjectFind("HIDaily8") != 0)
{
ObjectCreate("HIDaily8", OBJ_TEXT, 0, Time[SHIFT_PIVOT_TEXT ],Pivot);
ObjectSetText("HIDaily8", "            Pivot", GRAPHICS_TEXT_Size, "Verdana",Silver);
}
else
{
ObjectMove("HIDaily8", 0, Time[SHIFT_PIVOT_TEXT ], Pivot);
}
 if(ObjectFind("HIDaily9") != 0)
{
ObjectCreate("HIDaily9", OBJ_TEXT, 0, Time[F_TEXT],FACTORUP);
ObjectSetText("HIDaily9", "                    F-"+DailyFACTOR+" LONG", GRAPHICS_TEXT_Size, "Verdana",Silver);
}
else
{
ObjectMove("HIDaily9", 0, Time[F_TEXT], FACTORUP);
}
 if(ObjectFind("HIDaily10") != 0)
{
ObjectCreate("HIDaily10", OBJ_TEXT, 0, Time[F_TEXT],FACTORDN);
ObjectSetText("HIDaily10", "                     F-"+DailyFACTOR+" SHORT", GRAPHICS_TEXT_Size, "Verdana",Silver);
}
else
{
ObjectMove("HIDaily10", 0, Time[F_TEXT], FACTORDN);
}
 
   {
if( (WorkTime != Time[0]) || (Periods != Period()) ) {
CreateObj(Daily, HIDaily, LOWDaily, DailyColor);
CreateObj(Daily1, HIDaily1, LOWDaily1, DailyColor1);
CreateObj(Daily2, HIDaily2, LOWDaily2, DailyColor2);
CreateObj2(Open1,OPEN,OPEN,2,0, Coral);
CreateObj2(PVT,Pivot,Pivot,2,0, Silver);
CreateObj(Daily3,FACTORUP,HIDaily1, DailyColor3);
CreateObj(Daily4,FACTORDN,LOWDaily1,DailyColor4);}

     
    if (Show_PivotLines==true)
    {      
         CreateObj2(PP1,P,P,2,0, Gray);
         CreateObj2(RR3,rr3,rr3,1,0, Gray);
         CreateObj2(RR2,rr2,rr2,1,0, Gray);
         CreateObj2(RR1,rr1,rr1,1,0, Gray);
         CreateObj2(SS1,ss1,ss1,1,0, Gray);
         CreateObj2(SS2,ss2,ss2,1,0, Gray);
         CreateObj2(SS3,ss3,ss3,1,0, Gray);
        }
        
     if (Show_M_PivotLines==true) 
         {
          CreateObj2(MM1,mm1,mm1,1,2, DimGray);
          CreateObj2(MM2,mm2,mm2,1,2, DimGray);
          CreateObj2(MM3,mm3,mm3,1,2, DimGray);
          CreateObj2(MM4,mm4,mm4,1,2, DimGray);
          CreateObj2(MM5,mm5,mm5,1,2, DimGray);
          CreateObj2(MM0,mm0,mm0,1,2, DimGray);
          
        	}      
   if (Show_FibLines==true)
   { 
  CreateObj3(FibP100, FIBP100, FIBP100,1,0,Green );
  CreateObj3(FibP764, FIBP764, FIBP764,1,0, C'0,53,0' );
  CreateObj3(FibP618, FIBP618, FIBP618,1,0, Green);
  CreateObj3(FibP50, FIBP50, FIBP50,1,0, C'0,53,0' );
  CreateObj3(FibP382, FIBP382, FIBP382,1,0, Green );
  CreateObj3(FibP236, FIBP236, FIBP236,1,0, C'0,53,0' );      
  CreateObj3(Fib100, FIB100, FIB100,1,0,  C'0,200,0');
  CreateObj3(Fib764, FIB764, FIB764,1,0, C'0,53,0' );
  CreateObj3(Fib618, FIB618, FIB618,1,0, Green );
  CreateObj3(Fib50, FIB50, FIB50,1,0, C'0,53,0' );
  CreateObj3(Fib382, FIB382, FIB382,1,0, Green );
  CreateObj3(Fib236, FIB236, FIB236,1,0, C'0,53,0' );
  CreateObj3(Fib0, FIB0, FIB0,1,0,  C'0,200,0' );
  CreateObj3(FibM236, FIBM236, FIBM236,1,0, C'0,53,0' );
  CreateObj3(FibM382, FIBM382, FIBM382,1,0, Green );
  CreateObj3(FibM50, FIBM50, FIBM50,1,0, C'0,53,0' );
  CreateObj3(FibM618, FIBM618, FIBM618,1,0, Green );
  CreateObj3(FibM764, FIBM764, FIBM764,1,0,C'0,53,0');
  CreateObj3(FibM100, FIBM100, FIBM100,1,0, Green );
  }
  if (Show_EXTRAFibLines==true)
  {
  CreateObj3(FibP300, FIBP300, FIBP300,1,0, Green );
  CreateObj3(FibP250, FIBP250, FIBP250,1,0, Green );   
  CreateObj3(FibP200, FIBP200, FIBP200,1,0, Green );
  CreateObj3(FibP150, FIBP150, FIBP150,1,0, Green );      
  CreateObj3(FibM150, FIBM150, FIBM150,1,0, Green );
  CreateObj3(FibM200, FIBM200, FIBM200,1,0, Green );
  CreateObj3(FibM250, FIBM250, FIBM250,1,0, Green );
  CreateObj3(FibM300, FIBM300, FIBM300,1,0, Green );
  }
  if (Show_Daily_HI_LOW==true)
  {
  CreateObj2(DHI,HI3,HI3,1,0, Red);
  CreateObj2(DLO,LOW3,LOW3,1,0, Red);
}
       
    
} 
  
   
   return(0);
   
  }
//+------------------------------------------------------------------+

int TSR( string Text, int xOffset, int yOffset,int iCorner) //TITLE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSRa( string Text, int xOffset, int yOffset,int iCorner) //TITLE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR2( string Text, int xOffset, int yOffset,int iCorner) //OPEN
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR3( string Text, int xOffset, int yOffset,int iCorner) //OPEN
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 100);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR4( string Text, int xOffset, int yOffset,int iCorner) //PIPS
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR5( string Text, int xOffset, int yOffset,int iCorner) //PIPS
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 120);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR6( string Text, int xOffset, int yOffset,int iCorner) //HI/LOW
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR7( string Text, int xOffset, int yOffset,int iCorner) //HI/LOW
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 120);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR8( string Text, int xOffset, int yOffset,int iCorner) //HI
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR9( string Text, int xOffset, int yOffset,int iCorner) //HI
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 120);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR10( string Text, int xOffset, int yOffset,int iCorner) //LOW
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR11( string Text, int xOffset, int yOffset,int iCorner) //LOW
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 120);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR12( string Text, int xOffset, int yOffset,int iCorner) //TOP
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR13( string Text, int xOffset, int yOffset,int iCorner) //TOP
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 132);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR14( string Text, int xOffset, int yOffset,int iCorner) //BOT
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR15( string Text, int xOffset, int yOffset,int iCorner) //BOT
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 132);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR16( string Text, int xOffset, int yOffset,int iCorner) //50%
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR16a( string Text, int xOffset, int yOffset,int iCorner) //50%
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR17( string Text, int xOffset, int yOffset,int iCorner) //50%
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 132);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR18( string Text, int xOffset, int yOffset,int iCorner) //LONG
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR19( string Text, int xOffset, int yOffset,int iCorner) //LONG
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 110);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR20( string Text, int xOffset, int yOffset,int iCorner) //SHORT
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR21( string Text, int xOffset, int yOffset,int iCorner) //SHORT
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 110);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR22( string Text, int xOffset, int yOffset,int iCorner) //PRO L
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR23( string Text, int xOffset, int yOffset,int iCorner) //PRO L
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 110);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR24( string Text, int xOffset, int yOffset,int iCorner) //PRO S
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR25( string Text, int xOffset, int yOffset,int iCorner) //PRO S
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 110);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR25a( string Text, int xOffset, int yOffset,int iCorner) //PRO S
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR26( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR27( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 55);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR28( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR29( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 75);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR30( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR31( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 120);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR32( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR33( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 120);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR34( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR35( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 110);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR36( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20 );
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
} 
int TSR37( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 110);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR38( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR39( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 20);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}
int TSR40( string Text, int xOffset, int yOffset,int iCorner) //PRICE
{  ObjectCreate(Text,OBJ_LABEL         , 0, 0, 0 );
   ObjectSet   (Text,OBJPROP_CORNER    , iCorner);
   ObjectSet   (Text,OBJPROP_XDISTANCE , 115);
   ObjectSet   (Text,OBJPROP_YDISTANCE , xOffset );
   ObjectSet   (Text,OBJPROP_BACK      , True );
}



Sample





Analysis



Market Information Used:

Series array that contains open time of each bar
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Series array that contains open prices of each bar
Series array that contains close prices for each bar


Indicator Curves created:


Indicators Used:

Moving average indicator


Custom Indicators Used:

Order Management characteristics:

Other Features:

It issuies visual alerts to the screen
It plays sound alerts