// 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();