//+------------------------------------------------------------------+ //| FX-NVATC_PTECZ_Trader.ex4 | //| Dadas | //| www.fx-nvatc.comeze.com | //+------------------------------------------------------------------+ #property copyright "Copyright @ Dariusz Surdel aka. Dadas" #property link "www.fx-nvatc.comeze.com" #property indicator_chart_window #include extern bool PTECZ_Cleanup = false; //--- Pass section string Section_0_________________ = "Input your Pass_Code:" ; string Trial_Version = "Unlimited Version"; int Expiry_Year = 9999999; int Expiry_Month = 5; int Expiry_Day = 13; string Pass = "Follow the PTECZ"; string Pass_Code = "Follow the PTECZ"; extern color Label_Color = Snow; //---- Trade Section extern string Section_1_________________ = "Define Tf for general Trading Context:" ; extern int Trading_Master_Tf = 1440; extern int Master_CSCZ_Tf = 15; extern int Master_HLC_Quotes_Shift = 0; extern color Master_HLC_RColorH = Crimson ; extern color Master_HLC_RColorL = MediumSeaGreen; extern color Master_Time_Lines_Color = Snow; extern int Master_Time_Lines_Style = 3; extern int Master_Time_Lines_Width = 0; extern string Section_2_________________ = "Define Tf for inside Trading Context:" ; extern bool Show_Slave_Candles = true; extern bool Four_Hour_Mode = false; extern int Trading_Slave_Tf = 240; extern int Slave_Quotes_Shift = 0; extern int NumberOfSlaveBars = 200; extern color ColorUp = FireBrick; extern color ColorDown = CadetBlue; extern color ColorShadow = Snow; extern int Offset = 60; //---- Zone Candles section int TFBar,Four_Hour; bool Shadows_On = true; //Master_HLC section: int Master_HLC_Master_Tf; int Master_HLC_BarBeg1 = 0 ; int Master_HLC_BarBeg2 = 0 ; bool Master_HLC_ModeClose = false ; bool Master_HLC_ExcludeSundayData = false; int Master_HLC_OffsetTf = PERIOD_H1; int Master_HLC_RectFrame = 2 ; bool Master_HLC_RectBckg = true ; color Master_HLC_RColorH2 = PaleTurquoise; color Master_HLC_RColorL2 = PaleTurquoise; int Master_HLC_RectFrame2 = 2 ; bool Master_HLC_RectBckg2 = true ; string Master_HLC_nameRH = "rectH" ; string Master_HLC_nameRL = "rectL" ; int Master_HLC_indexBar ; int Master_HLC_shift,Master_HLC_indexL,Master_HLC_indexH ; double Master_HLC_priceL_1,Master_HLC_priceL_2,Master_HLC_priceH_1, Master_HLC_priceH_2; datetime Master_HLC_timeL,Master_HLC_timeH,Master_HLC_start_time,Master_HLC_end_time ; //---- // PTECZ_Label section extern string Section_3_________________ = "Define PTECZs to follow:" ; extern bool Follow_MN_PTECZ = false; extern color MN_PTECZ_Color = FireBrick; extern int MN_PTECZ_Offset =1; extern bool Follow_W1_PTECZ = false; extern color W1_PTECZ_Color = Blue; extern int W1_PTECZ_Offset =1; extern bool Follow_D1_PTECZ = false; extern color D1_PTECZ_Color = Purple; extern int D1_PTECZ_Offset =1; extern bool Follow_H4_PTECZ = false; extern color H4_PTECZ_Color = Magenta; extern int H4_PTECZ_Offset =1; extern bool Follow_H1_PTECZ = false; extern color H1_PTECZ_Color = Goldenrod; extern int H1_PTECZ_Offset =1; extern bool Follow_M30_PTECZ = false; extern color M30_PTECZ_Color = Goldenrod; extern int M30_PTECZ_Offset =1; extern bool Follow_M15_PTECZ = false; extern color M15_PTECZ_Color = Goldenrod; extern int M15_PTECZ_Offset =1; extern bool Follow_M5_PTECZ = false; extern color M5_PTECZ_Color = Goldenrod; extern int M5_PTECZ_Offset =1; extern bool Follow_M1_PTECZ = false; extern color M1_PTECZ_Color = Goldenrod; extern int M1_PTECZ_Offset =1; extern int If_PTECZ_Label_Corner = 3; extern color If_No_PTECZ_Color = DarkOrange; extern int If_PTECZ_Label_FontSize = 12; int PTECZ_Label_Index = 1; int MN_PTECZ_Label_Tf = 43200; int W1_PTECZ_Label_Tf = 10080; int D1_PTECZ_Label_Tf = 1440; int H4_PTECZ_Label_Tf = 240; int H1_PTECZ_Label_Tf = 60; int M30_PTECZ_Label_Tf = 30; int M15_PTECZ_Label_Tf = 15; int M5_PTECZ_Label_Tf = 5; int M1_PTECZ_Label_Tf = 1; string MN_PTECZ_Label_String = "MN"; string W1_PTECZ_Label_String = "W1"; string D1_PTECZ_Label_String = "D1"; string H4_PTECZ_Label_String = "H4"; string H1_PTECZ_Label_String = "H1"; string M30_PTECZ_Label_String = "M30"; string M15_PTECZ_Label_String = "M15"; string M5_PTECZ_Label_String = "M5"; string M1_PTECZ_Label_String = "M1"; int MN_YDISTANCE,W1_YDISTANCE,D1_YDISTANCE,H4_YDISTANCE,H1_YDISTANCE,M30_YDISTANCE, M15_YDISTANCE,M5_YDISTANCE,M1_YDISTANCE; //---- // Master_Time_Lines section: datetime M_T_L_Open_Hour,M_T_L_Close_Hour,M_T_L_Next_Close_Hour; //---- extern string Section_4_________________ = "Define Helpers parameters:" ; // Helpers: // Symbol_Period_Time section: extern string Symbol_Period_Time_________ = "Upper left corner description:" ; extern bool Show_Symbol_Period_Time = true; extern color S_P_T_Color=Black; int S_P_T_FontSize=11; extern int S_P_T_LocalTimeShift=1; extern int S_P_T_Corner = 3; extern int S_P_T_X = 9; extern int S_P_T_Y = 9; string S_P_T_Tf,S_P_T_Minutes; //---- //Daily_Range_Stats section: extern string Daily_Range_Stats__________ = "Daily Range Statistics parameters:" ; extern bool Show_DR_Stats = true; extern bool Is_Saturday_Candles = false; extern bool Is_Sunday_Candles = false; int DR_Stats_DisplayCorner = 2; int Last_Week_y = 21; int This_Week_y = 9; extern int Day_Label_x = 207; extern color DR_Stats_Color = Black; double DR_Last_Mon,DR_Last_Tue,DR_Last_Wed,DR_Last_Thu,DR_Last_Fri, DR_This_Mon,DR_This_Tue,DR_This_Wed,DR_This_Thu,DR_This_Fri, WR_This_Week,WR_Last_Week,Factor,WADR_This_Week,WADR_Last_Week; int Mon_Shift,Tue_Shift,Wed_Shift,Thu_Shift,Fri_Shift,Spread; string text,points; //---- //Candle_Time section: extern string Candle_Time______________ = "Current Candle_Time parameters:" ; //+------------------------------------------------------------------+ //| Core time code by Nick Bilak | //| Modified by Dariusz Surdel http://www.FxNVATC.com | //+------------------------------------------------------------------+ extern bool Show_Candle_Time = true; extern color Candle_Time_Color = Black; double Candle_Time_i; int Candle_Time_m,Candle_Time_s,Candle_Time_k; //---- // Master_Start_Line section: extern string Custom_Period_Line______ = "Trading Period Start Line:" ; extern int Custom_Period_Line_Tf = 1440; extern color Custom_Period_Line_Color = LimeGreen; extern int Custom_Period_Line_Style = 1; extern int Custom_Period_Line_Width = 0; datetime Custom_Period_Line_Hour; //---- //FX_HG section: int FX_HG_Tf; int FX_HG_Candle = 1; bool FX_HG_RectBckg = false; int FX_HG_RectFrame = 2; datetime FX_HG_time1,FX_HG_time2; double FX_HG_price1,FX_HG_price2; bool Dadas = false; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { //---- ObjectCreate("FX-NVATC_Label",OBJ_LABEL,0,0,0); ObjectCreate("Expiry_Label",OBJ_LABEL,0,0,0); if( Expiry_Year>TimeYear(TimeCurrent()) || (Expiry_Year==TimeYear(TimeCurrent())&&Expiry_Month>TimeMonth(TimeCurrent())) || (Expiry_Year==TimeYear(TimeCurrent())&&Expiry_Month==TimeMonth(TimeCurrent())&&Expiry_Day>=TimeDay(TimeCurrent())) ) {Dadas=true;}else { ObjectSetText("FX-NVATC_Label", "FX-NVATC_PTECZ_Trader", 9, "Berlin Sans FB",Label_Color); ObjectSet("FX-NVATC_Label",OBJPROP_CORNER,1); ObjectSet("FX-NVATC_Label",OBJPROP_XDISTANCE,18); ObjectSet("FX-NVATC_Label",OBJPROP_YDISTANCE,27); ObjectSetText("Expiry_Label", "Trial Version has expired.", 9, "Berlin Sans FB",Label_Color); ObjectSet("Expiry_Label",OBJPROP_CORNER,1); ObjectSet("Expiry_Label",OBJPROP_XDISTANCE,18); ObjectSet("Expiry_Label",OBJPROP_YDISTANCE,45); return(0); } if(Pass_Code==Pass&&Dadas==true) { //---- Zone Candles section TFBar = Trading_Slave_Tf; int i; if(TFBar > Period()) { for (i=0; i12){If_PTECZ_Label_FontSize=12;} //---- // Symbol_Period_Time section: if(Show_Symbol_Period_Time == true) { if(Period()==1) {S_P_T_Tf="M1";} if(Period()==5) {S_P_T_Tf="M5";} if(Period()==15) {S_P_T_Tf="M15";} if(Period()==30) {S_P_T_Tf="M30";} if(Period()==60) {S_P_T_Tf="H1";} if(Period()==240) {S_P_T_Tf="H4";} if(Period()==1440) {S_P_T_Tf="D1";} if(Period()==10080) {S_P_T_Tf="W1";} if(Period()==43200) {S_P_T_Tf="MN";} ObjectCreate("INSTR",OBJ_LABEL,0,0,0); ObjectSet("INSTR",OBJPROP_CORNER,0); ObjectSetText("INSTR",Symbol()+" "+S_P_T_Tf+" "+TimeToStr(TimeCurrent(),TIME_DATE)+" "+TimeToStr(TimeCurrent(),TIME_MINUTES)+" / "+(Hour()+S_P_T_LocalTimeShift)+":"+S_P_T_Minutes+Minute(),S_P_T_FontSize, "Berlin Sans FB", S_P_T_Color); ObjectSet("INSTR", OBJPROP_XDISTANCE, 9); ObjectSet("INSTR", OBJPROP_YDISTANCE, 3); } //---- // Daily Range Stats section: if(Show_DR_Stats==true) { ObjectCreate("DR_Last_Mon", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_Last_Mon", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_Last_Mon", OBJPROP_XDISTANCE, Day_Label_x); ObjectSet("DR_Last_Mon", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("DR_Last_Tue", OBJ_LABEL, 0, 0, 0); ObjectSet("DR_Last_Tue", OBJPROP_CORNER, DR_Stats_DisplayCorner); // ObjectSet("DR_Last_Tue", OBJPROP_XDISTANCE, Day_Label_x+50); ObjectSet("DR_Last_Tue", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("DR_Last_Wed", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_Last_Wed", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_Last_Wed", OBJPROP_XDISTANCE, Day_Label_x+100); ObjectSet("DR_Last_Wed", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("DR_Last_Thu", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_Last_Thu", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_Last_Thu", OBJPROP_XDISTANCE, Day_Label_x+150); ObjectSet("DR_Last_Thu", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("DR_Last_Fri", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_Last_Fri", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_Last_Fri", OBJPROP_XDISTANCE, Day_Label_x+200); ObjectSet("DR_Last_Fri", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("DR_This_Mon", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_This_Mon", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_This_Mon", OBJPROP_XDISTANCE, Day_Label_x); ObjectSet("DR_This_Mon", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("DR_This_Tue", OBJ_LABEL, 0, 0, 0); ObjectSet("DR_This_Tue", OBJPROP_CORNER, DR_Stats_DisplayCorner); // ObjectSet("DR_This_Tue", OBJPROP_XDISTANCE, Day_Label_x+50); ObjectSet("DR_This_Tue", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("DR_This_Wed", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_This_Wed", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_This_Wed", OBJPROP_XDISTANCE, Day_Label_x+100); ObjectSet("DR_This_Wed", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("DR_This_Thu", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_This_Thu", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_This_Thu", OBJPROP_XDISTANCE, Day_Label_x+150); ObjectSet("DR_This_Thu", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("DR_This_Fri", OBJ_LABEL, 0, 0, 0); // ObjectSet("DR_This_Fri", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("DR_This_Fri", OBJPROP_XDISTANCE, Day_Label_x+200); ObjectSet("DR_This_Fri", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("Monday", OBJ_LABEL, 0, 0, 0); // ObjectSet("Monday", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Monday", OBJPROP_XDISTANCE, Day_Label_x); ObjectSet("Monday", OBJPROP_YDISTANCE, 36); ObjectSetText("Monday","Mon",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Tuesday", OBJ_LABEL, 0, 0, 0); // ObjectSet("Tuesday", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Tuesday", OBJPROP_XDISTANCE, Day_Label_x+50); ObjectSet("Tuesday", OBJPROP_YDISTANCE, 36); ObjectSetText("Tuesday","Tue",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Wednesday", OBJ_LABEL, 0, 0, 0); // ObjectSet("Wednesday", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Wednesday", OBJPROP_XDISTANCE, Day_Label_x+100); ObjectSet("Wednesday", OBJPROP_YDISTANCE, 36); ObjectSetText("Wednesday","Wed",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Thursday", OBJ_LABEL, 0, 0, 0); // ObjectSet("Thursday", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Thursday", OBJPROP_XDISTANCE, Day_Label_x+150); ObjectSet("Thursday", OBJPROP_YDISTANCE, 36); ObjectSetText("Thursday","Thu",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Friday", OBJ_LABEL, 0, 0, 0); // ObjectSet("Friday", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Friday", OBJPROP_XDISTANCE, Day_Label_x+200); ObjectSet("Friday", OBJPROP_YDISTANCE, 36); ObjectSetText("Friday","Fri",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Last", OBJ_LABEL, 0, 0, 0); // ObjectSet("Last", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Last", OBJPROP_XDISTANCE, Day_Label_x-72); ObjectSet("Last", OBJPROP_YDISTANCE, Last_Week_y); ObjectSetText("Last","Last Week",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("This", OBJ_LABEL, 0, 0, 0); // ObjectSet("This", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("This", OBJPROP_XDISTANCE, Day_Label_x-72); ObjectSet("This", OBJPROP_YDISTANCE, This_Week_y); ObjectSetText("This","This Week",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Daily Range", OBJ_LABEL, 0, 0, 0); // ObjectSet("Daily Range", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Daily Range", OBJPROP_XDISTANCE, Day_Label_x-72); ObjectSet("Daily Range", OBJPROP_YDISTANCE, 36); ObjectSetText("Daily Range","Daily Range",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("Spread_", OBJ_LABEL, 0, 0, 0); // ObjectSet("Spread_", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Spread_", OBJPROP_XDISTANCE, Day_Label_x-72); ObjectSet("Spread_", OBJPROP_YDISTANCE, 54); ObjectSetText("Spread_","Spread: ",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("WR_Last_Week", OBJ_LABEL, 0, 0, 0); // ObjectSet("WR_Last_Week", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("WR_Last_Week", OBJPROP_XDISTANCE, Day_Label_x+250); ObjectSet("WR_Last_Week", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("WR_This_Week", OBJ_LABEL, 0, 0, 0); // ObjectSet("WR_This_Week", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("WR_This_Week", OBJPROP_XDISTANCE, Day_Label_x+250); ObjectSet("WR_This_Week", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("Weekly Range", OBJ_LABEL, 0, 0, 0); // ObjectSet("Weekly Range", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Weekly Range", OBJPROP_XDISTANCE, Day_Label_x+250); ObjectSet("Weekly Range", OBJPROP_YDISTANCE, 36); ObjectSetText("Weekly Range","WSum",9, "Berlin Sans FB", DR_Stats_Color); ObjectCreate("WADR_Last_Week", OBJ_LABEL, 0, 0, 0); // ObjectSet("WADR_Last_Week", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("WADR_Last_Week", OBJPROP_XDISTANCE, Day_Label_x+300); ObjectSet("WADR_Last_Week", OBJPROP_YDISTANCE, Last_Week_y); ObjectCreate("WADR_This_Week", OBJ_LABEL, 0, 0, 0); // ObjectSet("WADR_This_Week", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("WADR_This_Week", OBJPROP_XDISTANCE, Day_Label_x+300); ObjectSet("WADR_This_Week", OBJPROP_YDISTANCE, This_Week_y); ObjectCreate("Weekly ADR", OBJ_LABEL, 0, 0, 0); // ObjectSet("Weekly ADR", OBJPROP_CORNER, DR_Stats_DisplayCorner); ObjectSet("Weekly ADR", OBJPROP_XDISTANCE, Day_Label_x+300); ObjectSet("Weekly ADR", OBJPROP_YDISTANCE, 36); ObjectSetText("Weekly ADR","WADR",9, "Berlin Sans FB", DR_Stats_Color); } //---- } return(0); //---- } //+------------------------------------------------------------------+ //| Custom indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { ObjectDelete("FX-NVATC_Label"); ObjectDelete("Expiry_Label"); //---- Zone Candles section for (int i=0; iTimeYear(TimeCurrent()) || (Expiry_Year==TimeYear(TimeCurrent())&&Expiry_Month>TimeMonth(TimeCurrent())) || (Expiry_Year==TimeYear(TimeCurrent())&&Expiry_Month==TimeMonth(TimeCurrent())&&Expiry_Day>=TimeDay(TimeCurrent())) ) {Dadas=true;}else{return(0);} if(Pass_Code==Pass&&Dadas==true) { //---- ObjectDelete("PTECZ_Label"); //---- Zone Candles section ObjectSetText("FX-NVATC_Label", "FX-NVATC_PTECZ_Trader", 9, "Berlin Sans FB",Label_Color); ObjectSet("FX-NVATC_Label",OBJPROP_CORNER,1); ObjectSet("FX-NVATC_Label",OBJPROP_XDISTANCE,18); ObjectSet("FX-NVATC_Label",OBJPROP_YDISTANCE,27); ObjectSetText("Expiry_Label", Trial_Version, 9, "Berlin Sans FB",Label_Color); ObjectSet("Expiry_Label",OBJPROP_CORNER,1); ObjectSet("Expiry_Label",OBJPROP_XDISTANCE,18); ObjectSet("Expiry_Label",OBJPROP_YDISTANCE,45); ObjectSetText("Trading_Master_Tf_Label", "Trading_Master_Tf: "+Trading_Master_Tf, 9, "Berlin Sans FB",Label_Color); ObjectSet("Trading_Master_Tf_Label",OBJPROP_CORNER,1); ObjectSet("Trading_Master_Tf_Label",OBJPROP_XDISTANCE,18); ObjectSet("Trading_Master_Tf_Label",OBJPROP_YDISTANCE,63); ObjectSetText("Trading_Slave_Tf_Label", "Trading_Slave_Tf: "+TFBar, 9, "Berlin Sans FB",Label_Color); ObjectSet("Trading_Slave_Tf_Label",OBJPROP_CORNER,1); ObjectSet("Trading_Slave_Tf_Label",OBJPROP_XDISTANCE,18); ObjectSet("Trading_Slave_Tf_Label",OBJPROP_YDISTANCE,81); if(Show_Slave_Candles == true) { Four_Hour=Hour(); if(Four_Hour_Mode==true){NumberOfSlaveBars=0;} if(Four_Hour_Mode==true&&(Four_Hour==3||Four_Hour==7||Four_Hour==11||Four_Hour==15||Four_Hour==19||Four_Hour==23)){NumberOfSlaveBars=1;} int shb, sh1=1; double po, pc; // po - price open, pc - price close double ph=0, pl=500; // ph - price high, pl - price low datetime to, tc, ts; // to - time open, tc - time close, ts - time for shadow bool OK_Period=false; switch (TFBar) { case 1:OK_Period=true;break; case 5:OK_Period=true;break; case 15:OK_Period=true;break; case 30:OK_Period=true;break; case 60:OK_Period=true;break; case 240:OK_Period=true;break; case 1440:OK_Period=true;break; case 10080:OK_Period=true;break; case 43200:OK_Period=true;break; } shb=Slave_Quotes_Shift; //---- if(TFBar > Period()) { while (shbiClose(NULL,Master_CSCZ_Tf,Master_HLC_indexL)) {Master_HLC_priceL_2 = iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexL);} if(iOpen(NULL,Master_CSCZ_Tf,Master_HLC_indexL)<=iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexL)) {Master_HLC_priceL_2 = iOpen(NULL,Master_CSCZ_Tf,Master_HLC_indexL);} Master_HLC_priceH_1 = iHigh(NULL,Master_CSCZ_Tf,Master_HLC_indexH); if(iOpen(NULL,Master_CSCZ_Tf,Master_HLC_indexH)>iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexH)) {Master_HLC_priceH_2 = iOpen(NULL,Master_CSCZ_Tf,Master_HLC_indexH);} if(iOpen(NULL,Master_CSCZ_Tf,Master_HLC_indexH)<=iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexH)) {Master_HLC_priceH_2 = iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexH);} Master_HLC_timeL = iTime(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_timeH = iTime(NULL,Master_CSCZ_Tf,Master_HLC_indexH); } Master_HLC_start_time = iTime(NULL,0,5000); Master_HLC_end_time = iTime(NULL,Trading_Slave_Tf,0)+Trading_Slave_Tf*60;//-Master_HLC_Quotes_Shift*Master_HLC_OffsetTf*60; Master_HLC_SetObjectR(Master_HLC_nameRL+Master_CSCZ_Tf,Master_HLC_priceL_1,Master_HLC_priceL_2,Master_HLC_start_time,Master_HLC_end_time); Master_HLC_SetObjectR(Master_HLC_nameRH+Master_CSCZ_Tf,Master_HLC_priceH_1,Master_HLC_priceH_2,Master_HLC_start_time,Master_HLC_end_time); if(Master_HLC_BarBeg1 != Master_HLC_BarBeg2) { if(Master_HLC_ExcludeSundayData) { Master_HLC_indexBar = Master_HLC_ExcludeSunday(Master_HLC_BarBeg2); }else{ Master_HLC_indexBar = Master_HLC_BarBeg2 ; } //---- Master_HLC_shift = iBarShift(NULL,Master_CSCZ_Tf,iTime(NULL,Master_HLC_Master_Tf,Master_HLC_indexBar)-Master_HLC_Quotes_Shift*Master_HLC_OffsetTf*60); if(Master_HLC_ModeClose) { Master_HLC_indexL = iLowest(NULL,Master_CSCZ_Tf,MODE_CLOSE,Master_HLC_shift,Master_HLC_Quotes_Shift); Master_HLC_indexH = iHighest(NULL,Master_CSCZ_Tf,MODE_CLOSE,Master_HLC_shift,Master_HLC_Quotes_Shift); Master_HLC_priceL_1 = iLow(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_priceL_2 = iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_priceH_1 = iHigh(NULL,Master_CSCZ_Tf,Master_HLC_indexH); Master_HLC_priceH_2 = iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexH); Master_HLC_timeL = iTime(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_timeH = iTime(NULL,Master_CSCZ_Tf,Master_HLC_indexH); }else{ Master_HLC_indexL = iLowest(NULL,Master_CSCZ_Tf,MODE_LOW,Master_HLC_shift,Master_HLC_Quotes_Shift); Master_HLC_indexH = iHighest(NULL,Master_CSCZ_Tf,MODE_HIGH,Master_HLC_shift,Master_HLC_Quotes_Shift); Master_HLC_priceL_1 = iLow(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_priceL_2 = iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_priceH_1 = iHigh(NULL,Master_CSCZ_Tf,Master_HLC_indexH); Master_HLC_priceH_2 = iClose(NULL,Master_CSCZ_Tf,Master_HLC_indexH); Master_HLC_timeL = iTime(NULL,Master_CSCZ_Tf,Master_HLC_indexL); Master_HLC_timeH = iTime(NULL,Master_CSCZ_Tf,Master_HLC_indexH); } Master_HLC_start_time = iTime(NULL,0,5000); Master_HLC_end_time = iTime(NULL,Trading_Slave_Tf,0)+Trading_Slave_Tf*60;//-Master_HLC_Quotes_Shift*Master_HLC_OffsetTf*60; Master_HLC_SetObjectR("2"+Master_HLC_nameRL+Master_CSCZ_Tf,Master_HLC_priceL_1,Master_HLC_priceL_2,Master_HLC_start_time,Master_HLC_end_time); Master_HLC_SetObjectR("2"+Master_HLC_nameRH+Master_CSCZ_Tf,Master_HLC_priceH_1,Master_HLC_priceH_2,Master_HLC_start_time,Master_HLC_end_time); } // PTECZ_Label section string Cleanup = "PTECZ_Cleanup: OFF"; ObjectCreate("PTECZ_Clenup_OnOff_Label",OBJ_LABEL,0,0,0); ObjectSetText("PTECZ_Clenup_OnOff_Label",Cleanup,9,"Berlin Sans FB",Red); ObjectSet("PTECZ_Clenup_OnOff_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("PTECZ_Clenup_OnOff_Label",OBJPROP_XDISTANCE,9); ObjectSet("PTECZ_Clenup_OnOff_Label",OBJPROP_YDISTANCE,MN_YDISTANCE+If_PTECZ_Label_FontSize+3); if(PTECZ_Cleanup == true) { Cleanup = "PTECZ_Cleanup: ON"; ObjectSetText("PTECZ_Clenup_OnOff_Label",Cleanup,9,"Berlin Sans FB",LimeGreen); ObjectSet("PTECZ_Clenup_OnOff_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("PTECZ_Clenup_OnOff_Label",OBJPROP_XDISTANCE,9); ObjectSet("PTECZ_Clenup_OnOff_Label",OBJPROP_YDISTANCE,MN_YDISTANCE+If_PTECZ_Label_FontSize+3); ObjectDelete("PTECZ"+43200); ObjectDelete("PTECZ"+10080); ObjectDelete("PTECZ"+1440); ObjectDelete("PTECZ"+240); ObjectDelete("PTECZ"+60); ObjectDelete("PTECZ"+30); ObjectDelete("PTECZ"+15); ObjectDelete("PTECZ"+5); ObjectDelete("PTECZ"+1); } //---- ///* if(Follow_MN_PTECZ==true) { FX_HG_Tf=43200; //FX_HG section: FX_HG_price1 = iHigh(NULL, FX_HG_Tf, FX_HG_Candle); FX_HG_price2 = iLow(NULL, FX_HG_Tf, FX_HG_Candle); ///////////////////////////////////FX_HG_Candle ////-(Period()*43200*60*5) FX_HG_time1 = iTime(NULL, Period(), Bars); FX_HG_time2 = iTime(Symbol(), Trading_Slave_Tf, 0)+Trading_Slave_Tf*60*MN_PTECZ_Offset; //iTime(NULL, Period(), 0)+(TFBar*60*MN_PTECZ_Offset); //---- WindowRedraw(); //---- ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" TRENDING",If_PTECZ_Label_FontSize,"Berlin Sans FB",If_No_PTECZ_Color); ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE); if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)>iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",MN_PTECZ_Color); ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,MN_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("MN_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("MN_PTECZ_Label",MN_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",MN_PTECZ_Color); ObjectSet("MN_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("MN_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("MN_PTECZ_Label",OBJPROP_YDISTANCE,MN_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,MN_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,MN_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",W1_PTECZ_Color); ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,W1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("W1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("W1_PTECZ_Label",W1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",W1_PTECZ_Color); ObjectSet("W1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("W1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("W1_PTECZ_Label",OBJPROP_YDISTANCE,W1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,W1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,W1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",D1_PTECZ_Color); ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,D1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("D1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("D1_PTECZ_Label",D1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",D1_PTECZ_Color); ObjectSet("D1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("D1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("D1_PTECZ_Label",OBJPROP_YDISTANCE,D1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,D1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,D1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",H4_PTECZ_Color); ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,H4_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("H4_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("H4_PTECZ_Label",H4_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",H4_PTECZ_Color); ObjectSet("H4_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("H4_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("H4_PTECZ_Label",OBJPROP_YDISTANCE,H4_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,H4_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,H4_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",H1_PTECZ_Color); ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,H1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("H1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("H1_PTECZ_Label",H1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",H1_PTECZ_Color); ObjectSet("H1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("H1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("H1_PTECZ_Label",OBJPROP_YDISTANCE,H1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,H1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,H1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",M30_PTECZ_Color); ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M30_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M30_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M30_PTECZ_Label",M30_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",M30_PTECZ_Color); ObjectSet("M30_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M30_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M30_PTECZ_Label",OBJPROP_YDISTANCE,M30_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M30_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,M30_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",M15_PTECZ_Color); ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M15_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M15_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M15_PTECZ_Label",M15_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",M15_PTECZ_Color); ObjectSet("M15_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M15_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M15_PTECZ_Label",OBJPROP_YDISTANCE,M15_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M15_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,M15_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",M5_PTECZ_Color); ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M5_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M5_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M5_PTECZ_Label",M5_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",M5_PTECZ_Color); ObjectSet("M5_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M5_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M5_PTECZ_Label",OBJPROP_YDISTANCE,M5_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M5_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,M5_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)>=iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)&&iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)>=iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" PTECZ",If_PTECZ_Label_FontSize,"Berlin Sans FB",M1_PTECZ_Color); ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)) { ObjectCreate("M1_PTECZ_Label",OBJ_LABEL,0,0,0); ObjectSetText("M1_PTECZ_Label",M1_PTECZ_Label_String+" Doji",If_PTECZ_Label_FontSize,"Berlin Sans FB",M1_PTECZ_Color); ObjectSet("M1_PTECZ_Label",OBJPROP_CORNER,If_PTECZ_Label_Corner); ObjectSet("M1_PTECZ_Label",OBJPROP_XDISTANCE,9); ObjectSet("M1_PTECZ_Label",OBJPROP_YDISTANCE,M1_YDISTANCE); if((ObjectFind("PTECZ"+FX_HG_Tf) == -1)) { if(Period()!=240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price1,FX_HG_time2,FX_HG_price2);} if(Period()==240){ObjectCreate("PTECZ"+FX_HG_Tf, OBJ_RECTANGLE,0,FX_HG_time1,FX_HG_price2,FX_HG_time2,FX_HG_price1);} ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_BACK,FX_HG_RectBckg); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_COLOR,M1_PTECZ_Color); ObjectSet("PTECZ"+FX_HG_Tf, OBJPROP_WIDTH,FX_HG_RectFrame); } } } if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)==iOpen(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index)) { if(iClose(NULL,M1_PTECZ_Label_Tf,PTECZ_Label_Index+1)=10) { S_P_T_Minutes = "";} ObjectSetText("INSTR",Symbol()+" "+S_P_T_Tf+" "+TimeToStr(TimeCurrent(),TIME_DATE)+" "+TimeToStr(TimeCurrent(),TIME_MINUTES)+" / "+(Hour()+S_P_T_LocalTimeShift)+":"+S_P_T_Minutes+Minute(),S_P_T_FontSize, "Berlin Sans FB", S_P_T_Color); ObjectSet("INSTR", OBJPROP_CORNER,S_P_T_Corner); ObjectSet("INSTR", OBJPROP_XDISTANCE,S_P_T_X); ObjectSet("INSTR", OBJPROP_YDISTANCE,S_P_T_Y); } //--- // Daily Range Stats section: if(Show_DR_Stats==true) { Spread=NormalizeDouble(MarketInfo(Symbol(),MODE_SPREAD),0); if((Digits==5||Digits==3)&&Spread<10) {points="0.";} else points=""; ObjectSetText("Spread_","Spread: "+points+DoubleToStr(Spread,0),9,"Berlin Sans FB",DR_Stats_Color); if(Is_Saturday_Candles == false && Is_Sunday_Candles == false){int DayShift=0;} if(Is_Saturday_Candles == true && Is_Sunday_Candles == false){ DayShift=1;} if(Is_Saturday_Candles == false && Is_Sunday_Candles == true){ DayShift=1;} if(Is_Saturday_Candles == true && Is_Sunday_Candles == true){ DayShift=2;} //Last week if(DayOfWeek()==1) { Mon_Shift = 5+DayShift;Tue_Shift = 4+DayShift;Wed_Shift = 3+DayShift;Thu_Shift = 2+DayShift;Fri_Shift = 1+DayShift; DR_Last_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_Last_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_Last_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_Last_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_Last_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_Last_Week = (DR_Last_Mon+DR_Last_Tue+DR_Last_Wed+DR_Last_Thu+DR_Last_Fri)/5; } if(DayOfWeek()==2) { Mon_Shift = 6+DayShift;Tue_Shift = 5+DayShift;Wed_Shift = 4+DayShift;Thu_Shift = 3+DayShift;Fri_Shift = 2+DayShift; DR_Last_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_Last_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_Last_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_Last_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_Last_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_Last_Week = (DR_Last_Mon+DR_Last_Tue+DR_Last_Wed+DR_Last_Thu+DR_Last_Fri)/5; } if(DayOfWeek()==3) { Mon_Shift = 7+DayShift;Tue_Shift = 6+DayShift;Wed_Shift = 5+DayShift;Thu_Shift = 4+DayShift;Fri_Shift = 3+DayShift; DR_Last_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_Last_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_Last_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_Last_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_Last_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_Last_Week = (DR_Last_Mon+DR_Last_Tue+DR_Last_Wed+DR_Last_Thu+DR_Last_Fri)/5; } if(DayOfWeek()==4) { Mon_Shift = 8+DayShift;Tue_Shift = 7+DayShift;Wed_Shift = 6+DayShift;Thu_Shift = 5+DayShift;Fri_Shift = 4+DayShift; DR_Last_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_Last_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_Last_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_Last_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_Last_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_Last_Week = (DR_Last_Mon+DR_Last_Tue+DR_Last_Wed+DR_Last_Thu+DR_Last_Fri)/5; } if(DayOfWeek()==5||DayOfWeek()==6||DayOfWeek()==7) { Mon_Shift = 9+DayShift;Tue_Shift = 8+DayShift;Wed_Shift = 7+DayShift;Thu_Shift = 6+DayShift;Fri_Shift = 5+DayShift; DR_Last_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_Last_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_Last_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_Last_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_Last_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_Last_Week = (DR_Last_Mon+DR_Last_Tue+DR_Last_Wed+DR_Last_Thu+DR_Last_Fri)/5; } // This week if(DayOfWeek()==1) { Mon_Shift = 0;Tue_Shift = -1;Wed_Shift = -2;Thu_Shift = -3;Fri_Shift = -4; DR_This_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_This_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_This_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_This_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_This_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_This_Week = (DR_This_Mon)/DayOfWeek(); } if(DayOfWeek()==2) { Mon_Shift = 1;Tue_Shift = 0;Wed_Shift = -2;Thu_Shift = -3;Fri_Shift = -4; DR_This_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_This_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_This_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_This_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_This_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_This_Week = (DR_This_Mon+DR_This_Tue)/DayOfWeek(); } if(DayOfWeek()==3) { Mon_Shift = 2;Tue_Shift = 1;Wed_Shift = 0;Thu_Shift = -3;Fri_Shift = -4; DR_This_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_This_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_This_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_This_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_This_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_This_Week = (DR_This_Mon+DR_This_Tue+DR_This_Wed)/DayOfWeek(); } if(DayOfWeek()==4) { Mon_Shift = 3;Tue_Shift = 2;Wed_Shift = 1;Thu_Shift = 0;Fri_Shift = -4; DR_This_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_This_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_This_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_This_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_This_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_This_Week = (DR_This_Mon+DR_This_Tue+DR_This_Wed+DR_This_Thu)/DayOfWeek(); } if(DayOfWeek()==5||DayOfWeek()==6||DayOfWeek()==7) { Mon_Shift = 4;Tue_Shift = 3;Wed_Shift = 2;Thu_Shift = 1;Fri_Shift = 0; DR_This_Mon = NormalizeDouble((iHigh(NULL,1440,Mon_Shift)-iLow(NULL,1440,Mon_Shift))/Point,Digits); DR_This_Tue = NormalizeDouble((iHigh(NULL,1440,Tue_Shift)-iLow(NULL,1440,Tue_Shift))/Point,Digits); DR_This_Wed = NormalizeDouble((iHigh(NULL,1440,Wed_Shift)-iLow(NULL,1440,Wed_Shift))/Point,Digits); DR_This_Thu = NormalizeDouble((iHigh(NULL,1440,Thu_Shift)-iLow(NULL,1440,Thu_Shift))/Point,Digits); DR_This_Fri = NormalizeDouble((iHigh(NULL,1440,Fri_Shift)-iLow(NULL,1440,Fri_Shift))/Point,Digits); WADR_This_Week = (DR_This_Mon+DR_This_Tue+DR_This_Wed+DR_This_Thu+DR_This_Fri)/5; } if(Digits==5||Digits==3) {Factor=10;} else Factor=1; text=DoubleToStr(DR_Last_Mon/Factor,0); // ObjectSetText("DR_Last_Mon",text,9,"Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_Last_Tue/Factor,0); // ObjectSetText("DR_Last_Tue",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_Last_Wed/Factor,0); // ObjectSetText("DR_Last_Wed",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_Last_Thu/Factor,0); // ObjectSetText("DR_Last_Thu",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_Last_Fri/Factor,0); // ObjectSetText("DR_Last_Fri",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_This_Mon/Factor,0); // ObjectSetText("DR_This_Mon",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_This_Tue/Factor,0); // ObjectSetText("DR_This_Tue",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_This_Wed/Factor,0); // ObjectSetText("DR_This_Wed",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_This_Thu/Factor,0); // ObjectSetText("DR_This_Thu",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(DR_This_Fri/Factor,0); // ObjectSetText("DR_This_Fri",text,9, "Berlin Sans FB", DR_Stats_Color); WR_Last_Week=DR_Last_Mon+DR_Last_Tue+DR_Last_Wed+DR_Last_Thu+DR_Last_Fri; WR_This_Week=DR_This_Mon+DR_This_Tue+DR_This_Wed+DR_This_Thu+DR_This_Fri; text=DoubleToStr(WR_This_Week/Factor,0); // ObjectSetText("WR_This_Week",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(WR_Last_Week/Factor,0); // ObjectSetText("WR_Last_Week",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(WADR_Last_Week/Factor,0); // ObjectSetText("WADR_Last_Week",text,9, "Berlin Sans FB", DR_Stats_Color); text=DoubleToStr(WADR_This_Week/Factor,0); // ObjectSetText("WADR_This_Week",text,9, "Berlin Sans FB", DR_Stats_Color); } //---- //Candle_Time section: if(Show_Candle_Time==true) { Candle_Time_m=Time[0]+Period()*60-CurTime(); Candle_Time_i=Candle_Time_m/60.0; Candle_Time_s=Candle_Time_m%60; Candle_Time_m=(Candle_Time_m-Candle_Time_m%60)/60; ObjectDelete("Candle_Time"); if(ObjectFind( "Candle_Time")!=0){ObjectCreate("Candle_Time",OBJ_TEXT,0,Time[0],Open[0]);} else ObjectMove( "Candle_Time", 0, Time[0], Open[0] ); if(Candle_Time_s<10) { ObjectSetText("Candle_Time", " "+Candle_Time_m+":0"+Candle_Time_s,9,"Berlin Sans FB",Candle_Time_Color); } else { ObjectSetText("Candle_Time", " "+Candle_Time_m+":"+Candle_Time_s,9,"Berlin Sans FB",Candle_Time_Color); } } //---- // Custom_Period_Line section: Custom_Period_Line_Hour = iTime(NULL,Custom_Period_Line_Tf,0); ObjectSet("Custom_Period_Line", OBJPROP_BACK,true); ObjectSet("Custom_Period_Line", OBJPROP_WIDTH,Custom_Period_Line_Width); ObjectSet("Custom_Period_Line", OBJPROP_COLOR,Custom_Period_Line_Color); ObjectSet("Custom_Period_Line", OBJPROP_STYLE,Custom_Period_Line_Style); ObjectSet("Custom_Period_Line", OBJPROP_TIME1,Custom_Period_Line_Hour); //---- } return(0); } //+------------------------------------------------------------------+ //Master_HLC section: //+------------------------------------------------------------------+ void Master_HLC_CreateObjectR(string Master_HLC_name,color Master_HLC_c,bool Master_HLC_Bckg) { ObjectDelete(Master_HLC_name); ObjectCreate(Master_HLC_name, OBJ_RECTANGLE,0,0,0); ObjectSet(Master_HLC_name, OBJPROP_BACK,Master_HLC_Bckg); ObjectSet(Master_HLC_name, OBJPROP_COLOR,Master_HLC_c); } //-------------------------------------------------------------------+ void Master_HLC_SetObjectR(string Master_HLC_name,double Master_HLC_price1,double Master_HLC_price2,datetime Master_HLC_time1,datetime Master_HLC_time2) { ObjectSet(Master_HLC_name,OBJPROP_PRICE1,Master_HLC_price1); ObjectSet(Master_HLC_name,OBJPROP_PRICE2,Master_HLC_price2); ObjectSet(Master_HLC_name,OBJPROP_TIME1,Master_HLC_time1); ObjectSet(Master_HLC_name,OBJPROP_TIME2,Master_HLC_time2); ObjectSet(Master_HLC_name, OBJPROP_WIDTH,Master_HLC_RectFrame); } //+------------------------------------------------------------------+ int Master_HLC_ExcludeSunday (int Master_HLC_index) { int Master_HLC_i = Master_HLC_index ; datetime Master_HLC_time ; Master_HLC_time = iTime(NULL,PERIOD_D1,Master_HLC_i); if(TimeDayOfWeek(Master_HLC_time) == 0) { Master_HLC_i++; } return(Master_HLC_i); } //+-------------------------------------------------------------------------------------+ //+-------------------------------------------------------------------------------------+ //| Disclaimer: | //| The FX-NVATC_PTECZ_Trader.ex4 is a tool. As with any tool, the proper usage | //| depends on proper training and experience. Any tool can be used in the | //| occasional amateur style, the proffesional skilled craftsmen style, or the | //| artists style! And, as with any other tool, it can be missused, as well. | //| As mentioned before, ultimately, it is the investor who makes the final | //| decisions and judges or diagnoses the potential, and it is the investor who is | //| the amateur, the proffesional skilled craftsman, or the artist! | //| Just like the manufacturers of the simple hammer can not take responsibility | //| for the effects or damages arrising from using their simple tool, the creators | //| of the FX-NVATC_PTECZ_Trader.ex4 can not take any responsibility, whatsoever, | //| for the effects or damages arrising directly or indirectly from using their | //| fantastic Forex Trade Supporting tool. | //| Loss or Profit in Forex Trading is the sole responsibility and sole risk of | //| the investor, and has nothing to do, whatsoever, with any available tool, | //| indicator or other computer programme. There are a number of different factors, | //| other than the tool itself, which lead to success or failure in any trade, | //| including Forex Trading. It is extremely important to understand, that it is | //| the investor’s ability to make the right decisions at the right moments which | //| lead to success, and the tool, no matter how fantastic, is only the Supportive Aid, | //| and not the decisive factor. | //+-------------------------------------------------------------------------------------+