// Downloaded From https://www.WiseStockTrader.com _SECTION_BEGIN("ALL PIVOT POINT"); SetChartOptions(0,chartShowArrows|chartShowDates); _N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) )); Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); k=IIf(ParamList("select type day","DAILY|next day")=="DAILY",-1,0); k1=-1; K2=-2; TimeFrameSet(inDaily); day_h= LastValue(Ref(H,K)); day_l= LastValue(Ref(L,K)); TimeFrameRestore(); TimeFrameSet(inWeekly); Week_h= LastValue(Ref(H,K1)); Week_l= LastValue(Ref(L,K1)); TWOWEEK_h= LastValue(Ref(H,K2)); TWOWEEK_l= LastValue(Ref(L,K2)); TimeFrameRestore(); TimeFrameSet(inMonthly); month_h= LastValue(Ref(H,K1)); month_l= LastValue(Ref(L,K1)); TimeFrameRestore(); TimeFrameSet(inQuarterly); QUARTER_h= LastValue(Ref(H,K1)); QUARTER_l= LastValue(Ref(L,K1)); TimeFrameRestore(); TimeFrameSet(inYearly); YEAR_h= LastValue(Ref(H,K1)); YEAR_l= LastValue(Ref(L,K1)); TimeFrameRestore(); // day DH=Day_h; DL=Day_L; DR = DH-DL; // DAY PIVOT Calculation DH5 = DH + DR; DH4 = DH + DR*0.62; DH3 = DH + DR*0.38; DH2 = DH; DH1 = DH - DR*0.38; DMID = (DH + DL) / 2; DL1 = DL + DR*0.38; DL2 = DL; DL3 = DL - DR*0.38; DL4 = DL - DR*0.62; DL5 = DL - DR; // week WH=Week_h; WL=Week_l; WR=WH-WL; // WEEK PIVOT Calculation WH5 = WH + WR; WH4 = WH + WR*0.62; WH3 = WH + WR*0.38; WH2 = WH; WH1 = WH - WR*0.38; WMID = (WH + WL) / 2; WL1 = WL + WR*0.38; WL2 = WL; WL3 = WL - WR*0.38; WL4 = WL - WR*0.62; WL5 = WL - WR; // TWO week TWH=TWOWEEK_h; TWL=TWOWEEK_l; TWR=TWH-TWL; //TWO WEEK PIVOT Calculation TWH5 = TWH + TWR; TWH4 = TWH + TWR*0.62; TWH3 = TWH + TWR*0.38; TWH2 = TWH; TWH1 = TWH - TWR*0.38; TWMID = (TWH + TWL) / 2; TWL1 = TWL + TWR*0.38; TWL2 = TWL; TWL3 = TWL - TWR*0.38; TWL4 = TWL - TWR*0.62; TWL5 = TWL - TWR; // month MH=month_h; ML=month_l; MR=MH-ML; // MONTH PIVOT Calculation MH5 = MH + MR; MH4 = MH + MR*0.62; MH3 = MH + MR*0.38; MH2 = MH; MH1 = MH - MR*0.38; MMID = (MH + ML) / 2; ML1 = ML + MR*0.38; ML2 = ML; ML3 = ML - MR*0.38; ML4 = ML - MR*0.62; ML5 = ML - MR; // QUARTER QH=QUARTER_h; QL=QUARTER_l; QR=QH-QL; // QUARTER PIVOT Calculation QH5 = QH + QR; QH4 = QH + QR*0.62; QH3 = QH + QR*0.38; QH2 = QH; QH1 = QH - QR*0.38; QMID = (QH + QL) / 2; QL1 = QL + QR*0.38; QL2 = QL; QL3 = QL - QR*0.38; QL4 = QL - QR*0.62; QL5 = QL - QR; // YEAR YH=YEAR_h; YL=YEAR_l; YR=YH-YL; // YEAR PIVOT Calculation YH5 = YH + YR; YH4 = YH + YR*0.62; YH3 = YH + YR*0.38; YH2 = YH; YH1 = YH - YR*0.38; YMID = (YH + YL) / 2; YL1 = YL + YR*0.38; YL2 = YL; YL3 = YL - YR*0.38; YL4 = YL - YR*0.62; YL5 = YL - YR; /*--------------------------------------*/ // PARAMETERS slide = Param("slide all",20,-1000,1000,1); slide1 = Param("slide_day",22,0,1000,1); slide2 = Param("slide_week",16,0,1000,1); slide3 = Param("slide_TWOweek",26,0,1000,1); slide4 = Param("slide_month",13,0,1000,1); slide5 = Param("slide_QUARTER",29,0,1000,1); slide6 = Param("slide_YEAR",33,0,1000,1); slide7 = Param("slide_HOUR",19,0,1000,1); slide_Hight = Param("slide_Hight",0,-1000,1000,1); SHALDH = ParamList("HOURLY Pivots", "selected only|all|hide" ); SHALD = ParamList("DAILY Pivots", "selected only|all|hide" ); SHALW = ParamList("weekly Pivots", "selected only|all|hide" ); SHALTW = ParamList("TWO weekly Pivots", "selected only|all|hide" ); SHALM = ParamList("monthly Pivots", "selected only|all|hide" ); SHALQ = ParamList("QUARTERLY Pivots", "selected only|all|hide" ); SHALY = ParamList("YEARLY Pivots", "selected only|all|hide" ); //HOUR PHH5 = ParamList("HH5", "HIDE|SHOW" ); PHH4 = ParamList("HH4", "HIDE|SHOW" ); PHH3 = ParamList("HH3", "HIDE|SHOW" ); PHH2 = ParamList("HH2", "SHOW|HIDE" ); PHH1 = ParamList("HH1", "HIDE|SHOW" ); PHMID = ParamList("HMID", "SHOW|HIDE" ); PHL1 = ParamList("HL1", "HIDE|SHOW" ); PHL2 = ParamList("HL2", "SHOW|HIDE" ); PHL3 = ParamList("HL3", "HIDE|SHOW" ); PHL4 = ParamList("HL4", "HIDE|SHOW" ); PHL5 = ParamList("HL5", "HIDE|SHOW" ); //day PDH5 = ParamList("DH5", "HIDE|SHOW" ); PDH4 = ParamList("DH4", "HIDE|SHOW" ); PDH3 = ParamList("DH3", "HIDE|SHOW" ); PDH2 = ParamList("DH2", "SHOW|HIDE" ); PDH1 = ParamList("DH1", "HIDE|SHOW" ); PDMID = ParamList("DMID", "SHOW|HIDE" ); PDL1 = ParamList("DL1", "HIDE|SHOW" ); PDL2 = ParamList("DL2", "SHOW|HIDE" ); PDL3 = ParamList("DL3", "HIDE|SHOW" ); PDL4 = ParamList("DL4", "HIDE|SHOW" ); PDL5 = ParamList("DL5", "HIDE|SHOW" ); //WEEK PWH5 = ParamList("WH5", "HIDE|SHOW" ); PWH4 = ParamList("WH4", "HIDE|SHOW" ); PWH3 = ParamList("WH3", "HIDE|SHOW" ); PWH2 = ParamList("WH2", "SHOW|HIDE" ); PWH1 = ParamList("WH1", "HIDE|SHOW" ); PWMID = ParamList("WMID", "HIDE|SHOW" ); PWL1 = ParamList("WL1", "HIDE|SHOW" ); PWL2 = ParamList("WL2", "SHOW|HIDE" ); PWL3 = ParamList("WL3", "HIDE|SHOW" ); PWL4 = ParamList("WL4", "HIDE|SHOW" ); PWL5 = ParamList("WL5", "HIDE|SHOW" ); // TWO WEEK PTWH5 = ParamList("TWH5", "HIDE|SHOW" ); PTWH4 = ParamList("TWH4", "HIDE|SHOW" ); PTWH3 = ParamList("TWH3", "HIDE|SHOW" ); PTWH2 = ParamList("TWH2", "SHOW|HIDE" ); PTWH1 = ParamList("TWH1", "HIDE|SHOW" ); PTWMID = ParamList("TWMID", "HIDE|SHOW" ); PTWL1 = ParamList("TWL1", "HIDE|SHOW" ); PTWL2 = ParamList("TWL2", "SHOW|HIDE" ); PTWL3 = ParamList("TWL3", "HIDE|SHOW" ); PTWL4 = ParamList("TWL4", "HIDE|SHOW" ); PTWL5 = ParamList("TWL5", "HIDE|SHOW" ); // MONTH PMH5 = ParamList("MH5", "HIDE|SHOW" ); PMH4 = ParamList("MH4", "HIDE|SHOW" ); PMH3 = ParamList("MH3", "HIDE|SHOW" ); PMH2 = ParamList("MH2", "SHOW|HIDE"); PMH1 = ParamList("MH1", "HIDE|SHOW" ); PMMID = ParamList("MMID", "HIDE|SHOW" ); PML1 = ParamList("ML1", "HIDE|SHOW" ); PML2 = ParamList("ML2", "SHOW|HIDE" ); PML3 = ParamList("ML3", "HIDE|SHOW" ); PML4 = ParamList("ML4", "HIDE|SHOW" ); PML5 = ParamList("ML5", "HIDE|SHOW" ); // QUARTER PQH5 = ParamList("QH5", "HIDE|SHOW" ); PQH4 = ParamList("QH4", "HIDE|SHOW" ); PQH3 = ParamList("QH3", "HIDE|SHOW" ); PQH2 = ParamList("QH2", "HIDE|SHOW" ); PQH1 = ParamList("QH1", "HIDE|SHOW" ); PQMID = ParamList("QMID", "HIDE|SHOW" ); PQL1 = ParamList("QL1", "HIDE|SHOW" ); PQL2 = ParamList("QL2", "HIDE|SHOW" ); PQL3 = ParamList("QL3", "HIDE|SHOW" ); PQL4 = ParamList("QL4", "HIDE|SHOW" ); PQL5 = ParamList("QL5", "HIDE|SHOW" ); // YEAR PYH5 = ParamList("YH5", "HIDE|SHOW" ); PYH4 = ParamList("YH4", "HIDE|SHOW" ); PYH3 = ParamList("YH3", "HIDE|SHOW" ); PYH2 = ParamList("YH2", "HIDE|SHOW" ); PYH1 = ParamList("YH1", "HIDE|SHOW" ); PYMID = ParamList("YMID", "HIDE|SHOW" ); PYL1 = ParamList("YL1", "HIDE|SHOW" ); PYL2 = ParamList("YL2", "HIDE|SHOW" ); PYL3 = ParamList("YL3", "HIDE|SHOW" ); PYL4 = ParamList("YL4", "HIDE|SHOW" ); PYL5 = ParamList("YL5", "HIDE|SHOW" ); DayCOLOR = 10; weekCOLOR =7; TWOWEEKCOLOR =9; monthCOLOR =11; QUARTERCOLOR = 14; YearCOLOR = 6; L2COLOR = 5; H2COLOR = 4; /*--------------------------------------*/ /*PRICE ANALYSIS OF STOCKS */ YH = Ref(HHV(High,255),-1); YL = Ref(LLV(Low,255),-1); THREEYEARHIGH = Ref(HHV(High,760),-1); THREEYEARLOW = Ref(LLV(Low,760),-1); PQH = TimeFrameGetPrice( "H", inQuarterly, -1 ); PQL= TimeFrameGetPrice( "L", inQuarterly, -1 ); PMH = TimeFrameGetPrice( "H", inMonthly, -1 ); PML = TimeFrameGetPrice( "L", inMonthly, -1 ); PTWH = TimeFrameGetPrice( "H", inWeekly*2, -1 ); PTWL = TimeFrameGetPrice( "L", inWeekly*2, -1 ); PWH = TimeFrameGetPrice( "H", inWeekly, -1 ); PWL = TimeFrameGetPrice( "L", inWeekly, -1 ); PDH = TimeFrameGetPrice( "H", inDaily, -1 ); PDL = TimeFrameGetPrice( "L", inDaily, -1 ); // Add Pivot levels AND PRICE LEVELS on charts as text Title = EncodeColor(colorDarkTeal)+ "\n"+ "\n"+"\n"+ "\n" + EncodeColor(DayCOLOR)+"DH5 = "+ DH5 +"\n"+ EncodeColor(DayCOLOR)+"DH4 = "+ DH4 +"\n"+ EncodeColor(DayCOLOR)+"DH3 = "+ DH3 +"\n"+ EncodeColor(H2COLOR)+"DH2 = "+ DH2 + "\n"+ EncodeColor(DayCOLOR)+"DH1 = "+ DH1 + "\n"+ "\n"+ EncodeColor(DayCOLOR)+"DMID = "+ DMID + "\n"+ "\n" + EncodeColor(DayCOLOR)+"DL1 = "+ DL1 + "\n"+ EncodeColor(L2COLOR)+"DL2 = "+ DL2 + "\n"+ EncodeColor(DayCOLOR)+"DL3 = "+ DL3 + "\n"+ EncodeColor(DayCOLOR)+"DL4 = "+ DL4 + " \n"+ EncodeColor(DayCOLOR)+"DL5 = "+ DL5 + "\n"+ "\n"+ EncodeColor(weekCOLOR)+"WH5 = "+ WH5 +"\n"+ EncodeColor(weekCOLOR)+"WH4 = "+ WH4 +"\n"+ EncodeColor(weekCOLOR)+"WH3 = "+ WH3 +"\n"+ EncodeColor(H2COLOR)+"WH2 = "+ WH2 + "\n"+ EncodeColor(weekCOLOR)+"WH1 = "+ WH1 + "\n"+ "\n"+ EncodeColor(weekCOLOR)+"WMID = "+ QMID + "\n"+ "\n" + EncodeColor(weekCOLOR)+"WL1 = "+ WL1 + "\n"+ EncodeColor(L2COLOR)+"WL2 = "+ WL2 + "\n"+ EncodeColor(weekCOLOR)+"WL3 = "+ WL3 + "\n"+ EncodeColor(weekCOLOR)+"WL4 = "+ WL4 + " \n"+ EncodeColor(weekCOLOR)+"WL5 = "+ WL5 + "\n"+ "\n"+ EncodeColor(H2COLOR)+"THREE YEARLY HIGH = "+ THREEYEARHIGH +"\n"+ EncodeColor(H2COLOR)+"YEARLY HIGH = "+ YH +"\n"+ EncodeColor(H2COLOR)+"PQH = "+ PQH+"\n"+ EncodeColor(H2COLOR)+"PMH = "+ PMH +"\n"+ EncodeColor(H2COLOR)+"PTWH = "+ PTWH + "\n"+ EncodeColor(H2COLOR)+"PWH = "+ PWH + "\n"+ EncodeColor(H2COLOR)+"PDH = "+ PDH + "\n"+ "\n" + EncodeColor(L2COLOR)+"PDL = "+ PDL + "\n"+ EncodeColor(L2COLOR)+"PWL = "+ PWL + " \n"+ EncodeColor(L2COLOR)+"PTWL = "+ PTWL + "\n"+ EncodeColor(L2COLOR)+"PML = "+ PML + "\n"+ EncodeColor(L2COLOR)+"PQL= "+ PQL + "\n"+ EncodeColor(L2COLOR)+"YEARLY LOW = "+ YL + "\n"+ EncodeColor(L2COLOR)+"THREE YEARLY LOW = "+ THREEYEARLOW + " \n" ; /*--------------------------------------*/ // LABELS for( i = 0; i < BarCount; i++ ) { //day if(i+slide1== BarCount && (PDH5=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY H5 = "+DH5 ,i+slide,DH5+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDH4=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY H4 = "+DH4 ,i+slide,DH4+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDH3=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY H3 = "+DH3 ,i+slide,DH3+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDH2=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY H2 = "+DH2 ,i+slide,DH2+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDH1=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY H1 = "+DH1 ,i+slide,DH1+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDMID=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY MID = "+DMID ,i+slide,DMID+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDL1=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY L1 = "+DL1 ,i+slide,DL1+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDL2=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY L2 = "+DL2 ,i+slide,DL2+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDL3=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY L3 = "+DL3 ,i+slide,DL3+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDL4=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY L4 = "+DL4 ,i+slide,DL4+slide_Hight ,DayCOLOR); if(i+slide1== BarCount && (PDL5=="SHOW" OR SHALD=="all") && SHALD!="hide") PlotText( "DAILY L5 = "+DL5 ,i+slide,DL5+slide_Hight ,DayCOLOR); //WEEK if(i+slide2== BarCount && (PWH5=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY H5 = "+WH5 ,i+slide,WH5+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWH4=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY H4 = "+WH4 ,i+slide,WH4+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWH3=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY H3 = "+WH3 ,i+slide,WH3+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWH2=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY H2 = "+WH2 ,i+slide,WH2+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWH1=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY H1 "+WH1 ,i+slide,WH1+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWMID=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY MID = "+WMID ,i+slide,WMID+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWL1=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY L1 = "+WL1 ,i+slide,WL1+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWL2=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY L2 "+WL2 ,i+slide,WL2+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWL3=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY L3 = "+WL3 ,i+slide,WL3+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWL4=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY L4 = "+WL4 ,i+slide,WL4+slide_Hight ,WEEKCOLOR); if(i+slide2== BarCount && (PWL5=="SHOW" OR SHALW=="all") && SHALW!="hide") PlotText( "WEEKLY L5 = "+WL5 ,i+slide,WL5+slide_Hight ,WEEKCOLOR); // TWO WEEK if(i+slide3== BarCount && (PTWH5=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK H5 = "+TWH5 ,i+slide,TWH5+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWH4=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK H4 = "+TWH4 ,i+slide,TWH4+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWH3=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK H3 = "+TWH3 ,i+slide,TWH3+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWH2=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK H2 = "+TWH2 ,i+slide,TWH2+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWH1=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK H1 = "+TWH1 ,i+slide,TWH1+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWMID=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK MID = "+TWMID ,i+slide,TWMID+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWL1=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK L1 = "+TWL1 ,i+slide,TWL1+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWL2=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK L2 = "+TWL2 ,i+slide,TWL2+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWL3=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK L3 = "+TWL3 ,i+slide,TWL3+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWL4=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK L4 = "+TWL4 ,i+slide,TWL4+slide_Hight ,TWOWEEKCOLOR); if(i+slide3== BarCount && (PTWL5=="SHOW" OR SHALTW=="all") && SHALTW!="hide") PlotText( "TWO WEEK L5 = "+TWL5 ,i+slide,TWL5+slide_Hight ,TWOWEEKCOLOR); // MONTHLY if(i+slide4== BarCount && (PMH5=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY H5 = "+MH5 ,i+slide,MH5+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PMH4=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY H4 = "+MH4 ,i+slide,MH4+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PMH3=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY H3 = "+MH3 ,i+slide,MH3+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PMH2=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY H2 = "+MH2 ,i+slide,MH2+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PMH1=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY H1 = "+MH1 ,i+slide,MH1+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PMMID=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY MID = "+MMID ,i+slide,MMID+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PML1=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY L1 = "+ML1 ,i+slide,ML1+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PML2=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY L2 = "+ML2 ,i+slide,ML2+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PML3=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY L3 = "+ML3 ,i+slide,ML3+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PML4=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY L4 = "+ML4 ,i+slide,ML4+slide_Hight ,MONTHCOLOR); if(i+slide4== BarCount && (PML5=="SHOW" OR SHALM=="all") && SHALM!="hide") PlotText( "MONTHLY L5 = "+ML5 ,i+slide,ML5+slide_Hight ,MONTHCOLOR); // QUARTERLY if(i+slide5== BarCount && (PQH5=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY H5 = "+QH5 ,i+slide,QH5+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQH4=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY H4 = "+QH4 ,i+slide,QH4+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQH3=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY H3 "+QH3 ,i+slide,QH3+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQH2=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY H2 = "+QH2 ,i+slide,QH2+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQH1=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY H1 = "+QH1 ,i+slide,QH1+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQMID=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY MID = "+QMID ,i+slide,QMID+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQL1=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY L1 = "+QL1 ,i+slide,QL1+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQL2=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY L2 = "+QL2 ,i+slide,QL2+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQL3=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY L3 = "+QL3 ,i+slide,QL3+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQL4=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY L4 = "+QL4 ,i+slide,QL4+slide_Hight ,QUARTERCOLOR); if(i+slide5== BarCount && (PQL5=="SHOW" OR SHALQ=="all") && SHALQ!="hide") PlotText( "QUARTERLY L5 = "+QL5 ,i+slide,QL5+slide_Hight ,QUARTERCOLOR); // YAERLY // YAERLY if(i+slide6== BarCount && (PYH5=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY H5 = "+YH5 ,i+slide,YH5+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYH4=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY H4 = "+YH4 ,i+slide,YH4+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYH3=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY H3 "+YH3 ,i+slide,YH3+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYH2=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY H2 = "+YH2 ,i+slide,YH2+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYH1=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY H1 = "+YH1 ,i+slide,YH1+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYMID=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY MID = "+YMID ,i+slide,YMID+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYL1=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY L1 = "+YL1 ,i+slide,YL1+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYL2=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY L2 = "+YL2 ,i+slide,YL2+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYL3=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY L3 = "+YL3 ,i+slide,YL3+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYL4=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY L4 = "+YL4 ,i+slide,YL4+slide_Hight ,YEARCOLOR); if(i+slide6== BarCount && (PYL5=="SHOW" OR SHALY=="all") && SHALY!="hide") PlotText( "YAERLY L5 = "+YL5 ,i+slide,YL5+slide_Hight ,YEARCOLOR); } /*--------------------------------------*/ // PLOTS //day if ((PDH5=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DH5,"daily H5",DayCOLOR,1); if ((PDH4=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DH4,"daily H4",DayCOLOR,1); if ((PDH3=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DH3,"daily H3",DayCOLOR,1); if ((PDH2=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DH2,"daily H2",H2COLOR,32); if ((PDH1=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DH1,"daily H1",DayCOLOR,1); if ((PDMID=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DMID,"daily MID",DayCOLOR,1); if ((PDL1=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DL1,"daily L1",DayCOLOR,1); if ((PDL2=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DL2,"daily L2",L2COLOR,32); if ((PDL3=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DL3,"daily L3",DayCOLOR,1); if ((PDL4=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DL4,"daily L4",DayCOLOR,1); if ((PDL5=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (DL5,"daily L5",DayCOLOR,1); //WEEK if ((PWH5=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WH5,"WEEKLY H5",WEEKCOLOR,1); if ((PWH4=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WH4,"WEEKLY H4",WEEKCOLOR,1); if ((PWH3=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WH3,"WEEKLY H3",WEEKCOLOR,1); if ((PWH2=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WH2,"WEEKLY H2",H2COLOR,32); if ((PWH1=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WH1,"WEEKLY H1",WEEKCOLOR,1); if ((PWMID=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WMID,"WEEKLY MID",WEEKCOLOR,1); if ((PWL1=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WL1,"WEEKLY L1",WEEKCOLOR,1); if ((PWL2=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WL2,"WEEKLY L2",L2COLOR,32); if ((PWL3=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WL3,"WEEKLY L3",WEEKCOLOR,1); if ((PWL4=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WL4,"WEEKLY L4",WEEKCOLOR,1); if ((PWL5=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot (WL5,"WEEKLY L5",WEEKCOLOR,1); //TWO WEEK if ((PTWH5=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWH5,"TWOWEEKLY H5",TWOWEEKCOLOR,1); if ((PTWH4=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWH4,"TWOWEEKLY H4",TWOWEEKCOLOR,1); if ((PTWH3=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWH3,"TWOWEEKLY H3",TWOWEEKCOLOR,1); if ((PTWH2=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWH2,"TWOWEEKLY H2",H2COLOR,32); if ((PTWH1=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWH1,"TWOWEEKLY H1",TWOWEEKCOLOR,1); if ((PTWMID=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWMID,"TWOWEEKLY MID",TWOWEEKCOLOR,1); if ((PTWL1=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWL1,"TWOWEEKLY L1",TWOWEEKCOLOR,1); if ((PTWL2=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWL2,"TWOWEEKLY L2",L2COLOR,32); if ((PTWL3=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWL3,"TWOWEEKLY L3",TWOWEEKCOLOR,1); if ((PTWL4=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWL4,"TWOWEEKLY L4",TWOWEEKCOLOR,1); if ((PTWL5=="SHOW" OR SHALTW=="all") && SHALTW!="hide") Plot (TWL5,"TWOWEEKLY L5",TWOWEEKCOLOR,1); //MONTH if ((PMH5=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (MH5,"MONTHLY H5",MONTHCOLOR,1); if ((PMH4=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (MH4,"MONTHLY H4",MONTHCOLOR,1); if ((PMH3=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (MH3,"MONTHLY H3",MONTHCOLOR,1); if ((PMH2=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (MH2,"MONTHLY H2",H2COLOR,32); if ((PMH1=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (MH1,"MONTHLY H1",MONTHCOLOR,1); if ((PMMID=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (MMID,"MONTHLY MID",MONTHCOLOR,1); if ((PML1=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (ML1,"MONTHLY L1",MONTHCOLOR,1); if ((PML2=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (ML2,"MONTHLY L2",L2COLOR,32); if ((PML3=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (ML3,"MONTHLY L3",MONTHCOLOR,1); if ((PML4=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (ML4,"MONTHLY L4",MONTHCOLOR,1); if ((PML5=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot (ML5,"MONTHLY L5",MONTHCOLOR,1); //QUARTER if ((PQH5=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QH5,"QUARTERLY H5",QUARTERCOLOR,1); if ((PQH4=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QH4,"QUARTERLY H4",QUARTERCOLOR,1); if ((PQH3=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QH3,"QUARTERLY H3",QUARTERCOLOR,1); if ((PQH2=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QH2,"QUARTERLY H2",H2COLOR,32); if ((PQH1=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QH1,"QUARTERLY H1",QUARTERCOLOR,1); if ((PQMID=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QMID,"QUARTERLY MID",QUARTERCOLOR,1); if ((PQL1=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QL1,"QUARTERLY L1",QUARTERCOLOR,1); if ((PQL2=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QL2,"QUARTERLY L2",L2COLOR,32); if ((PQL3=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QL3,"QUARTERLY L3",QUARTERCOLOR,1); if ((PQL4=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QL4,"QUARTERLY L4",QUARTERCOLOR,1); if ((PQL5=="SHOW" OR SHALQ=="all") && SHALQ!="hide") Plot (QL5,"QUARTERLY L5",QUARTERCOLOR,1); //YEAR if ((PYH5=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YH5,"YEARLY H5",YEARCOLOR,1); if ((PYH4=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YH4,"YEARLY H4",YEARCOLOR,1); if ((PYH3=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YH3,"YEARLY H3",YEARCOLOR,1); if ((PYH2=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YH2,"YEARLY H2",H2COLOR,32); if ((PYH1=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YH1,"YEARLY H1",YEARCOLOR,1); if ((PYMID=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YMID,"YEARLY MID",YEARCOLOR,1); if ((PYL1=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YL1,"YEARLY L1",YEARCOLOR,1); if ((PYL2=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YL2,"YEARLY L2",L2COLOR,32); if ((PYL3=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YL3,"YEARLY L3",YEARCOLOR,1); if ((PYL4=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YL4,"YEARLY L4",YEARCOLOR,1); if ((PYL5=="SHOW" OR SHALY=="all") && SHALY!="hide") Plot (YL5,"YEARLY L5",YEARCOLOR,1); /*--------------------------------------*/ // TEXT "high = "+H; "low = "+L; "close = "+C; GfxSetOverlayMode(1); GfxSelectFont("Tahoma", Status("pxheight")/8 ); GfxSetTextAlign( 6 );// center alignment GfxSetTextColor( ColorHSB( 42, 42, 42 ) ); GfxSetBkMode(1); // transparent GfxTextOut( Name(), Status("pxwidth")/2, Status("pxheight")/12 ); C11=ParamColor("up panel",colorBlack ); C12=ParamColor("dn panel",colorBlack ); C13=Param("fonts",100,10,30,1 ); C14=Param("left-right",1.2,1.0,5.0,0.1 ); C15=Param("up-down",9,1,30,1 ); Miny = Status("axisminy"); Maxy = Status("axismaxy"); lvb = Status("lastvisiblebar"); fvb = Status("firstvisiblebar"); pxwidth = Status("pxwidth"); pxheight = Status("pxheight"); GfxSetBkMode( 0 ); GfxSelectFont("Tahoma", 12, 500, False, False, 0); GfxSetTextColor(colorCustom12); GfxSetTextAlign( 6 ); GfxSelectFont("Tahoma", 40, 600, False, False, 0); GfxSetTextColor(colorWhite); GfxSetTextAlign( 6 ); GfxTextOut( "LTP: "+WriteVal(C,1.2), Status("pxwidth")/C14, Status("pxheight")/C15); GfxSelectFont("Tahoma", 12, 400, False, False, 0); GfxSetTextColor(colorBrightGreen); GfxSelectFont("Tahoma", 12, 400, False, False, 0); GfxSetTextColor(colorRed); GfxSelectFont("Tahoma", 12, 400, False, False, 0); GfxSetTextColor(colorYellow); GfxSelectFont("Tahoma", 12, 400, False, False, 0); GfxSetTextColor(colorGreen); GfxSelectFont("Tahoma", 12, 400, False, False, 0); GfxSetTextColor(colorGreen); pricechange=(C-Ref(C,-1))*100/Ref(C,-1); changeponit=C-Ref(C,-1); Vlp=Param("Volume lookback period",5,10,15,300,10); Vrg=MA(V,Vlp); St = StDev(Vrg,Vlp); VOC = Ref(HHV(Volume,10),-1); Vp3 = Vrg + 3*st; x=Param("xposn",1,0,1000,1); y=Param("yposn",1,0,1000,1); GfxGradientRect( 1, 1, 1400, 40, colorGrey50, colorDarkGrey); GfxSetBkMode(0); GfxSelectFont( "Georgia", 18, 800, False ); GfxSetTextColor( colorWhite ); GfxTextOut( "ALL PIVOT POINT EOD", x+600, y+10 ); GfxSelectFont( "Tahoma", 16, 800, False ); GfxSetTextColor( colorGold ); GfxTextOut( Name(), x+100, y+10 ); GfxSelectFont( "Century Gothic", 15, 100, False ); GfxSetTextColor( colorWhite ); GfxTextOut( Date(), x+1000, y+10 ); GfxSelectFont( "Comic Sans MS", 15, 500, False ); GfxSetTextColor( colorYellow ); GfxTextOut( Interval(2), x+275, y+10 ); //------------------------------------------------------------ H, L, O, C---------------------- GfxGradientRect( 1, 40, 1400, 55, colorGrey50, colorDarkGrey ); GfxSetBkMode(0); GfxSelectFont( "Areal", 9, 200, False ); GfxSetTextColor( colorWhite ); GfxTextOut( "High:"+WriteVal(H,1.2), x+100, y+40 ); GfxSelectFont( "Areal", 9, 200, False ); GfxSetTextColor( colorWhite ); GfxTextOut( "Low:"+WriteVal(L,1.2), x+200, y+40 ); GfxSelectFont( "Areal", 9, 200, False ); GfxSetTextColor( colorWhite ); GfxTextOut( "Open:"+WriteVal(O,1.2), x+300, y+40 ); GfxSelectFont( "Areal", 9, 200, False ); GfxSetTextColor( colorWhite ); GfxTextOut( "Close:"+WriteVal(C,1.2), x+400, y+40 ); //-----------------------------------------------------------VOlume------------------------------- GfxSelectFont( "Tahoma", 9, 200, False ); GfxSetTextColor( colorWhite ); GfxTextOut( "Volume="+WriteVal(V,1.2), x+550, y+40 ); GfxSelectFont( "Tahoma", 9, 200, False ); GfxSetTextColor( colorLime ); GfxTextOut( WriteIf(V>Vp3,"VOLUME CONFIRMATION",""), x+1000, y+40 ); GfxSelectFont( "Tahoma", 9, 200, False ); GfxSetTextColor( colorLime ); GfxTextOut( "VOC="+WriteVal(VOC,1.2), x+800, y+40 ); _SECTION_END();