|
PureBytes Links
Trading Reference Links
|
SIR,
I HAVE PIVOT POINT FORMULA IN WHICH WE CAN SEE DAILY,WEEKLY AND
MONTHLY PIVOT.THE PROBLEM IS THAT WHEN YOU CLICK INTRADAY CHART PIVOT
ARE CALCULATED ON INTRADAY HIGH & LOW BASIS OF DAILY PERIOD.BUT I
WANT
THAT PIVOT SHOULD BE CALCULATED ON EOD BASIS AND PIVOTS CAN BE SEEN
IN
INTRADAY CHART.HIGH & LOW OF INTRADAY DATA ARE NOT PERFECT AND ON EOD
DATA IS PERFECT .I HAVE POSTED MY FORMULA PLEASE SUGGEST ME WHAT
CHANGES SHOULD ME MADE
PIVOT POINT FORMULA
_SECTION_BEGIN("pivots mw");
/***************************************/
/*SUPER PIVOT POINTS ver 1.3 day week month
by Avi b a
/***************************************/
/*
SUPER PIVOT POINTS can by used in 2 ways:
if you choose daily, the pivots are calculated from the previous day,
this can be used for daily charts.
the second option is next day for EOD charts.
for all the options available right click on the chart parameters.
to utilize all the program features you need amibroker from version
4.80.1 and above.
enjoy!
*/
/*-----------------data------------------*/
SetChartBkColor(2) ;
k=IIf(ParamList("select type","daily|next day")=="daily",-1,0);
k1=-1;
TimeFrameSet(inDaily);
day_h= LastValue(Ref(H,K));
day_l= LastValue(Ref(L,K));
day_c= LastValue(Ref(C,K));
TimeFrameRestore();
TimeFrameSet(inWeekly);
Week_h= LastValue(Ref(H,K1));
Week_l= LastValue(Ref(L,K1));;
Week_c= LastValue(Ref(C,K1));;
TimeFrameRestore();
TimeFrameSet(inMonthly);
month_h= LastValue(Ref(H,K1));
month_l= LastValue(Ref(L,K1));
month_c= LastValue(Ref(C,K1));
TimeFrameRestore();
/*--------------------------------------*/
// day
DH=Day_h;
DL=Day_L;
DC=Day_C;
// DAY PIVOT Calculation
pd = ( DH+ DL + DC )/3;
sd1 = (2*pd)-DH;
sd2 = pd -(DH - DL);
sd3 = Sd1 - (DH-DL);
sd4 = Sd2 - (DH-DL);
sd5 = Sd3 - (DH-DL);
rd1 = (2*pd)-DL;
rd2 = pd +(DH -DL);
rd3 = rd1 +(DH-DL);
rd4 = rd2 +(DH-DL);
rd5 = rd3 +(DH-DL);
// week
WH=Week_h;
WL=Week_l;
WC=Week_c;
// WEEK PIVOT Calculation
pw = ( WH+ WL + WC )/3;
sw1 = (2*pw)-WH;
sw2 = pw -(WH - WL);
sw3 = Sw1 - (WH-WL);
sw4 = Sw2 - (WH-WL);
rw1 = (2*pw)-WL;
rw2 = pw +(WH -WL);
rw3 = rw1 +(WH-WL);
rw4 = rw2 +(WH-WL);
// month
MH=month_h;
ML=month_l;
MC=month_c;
// MONTH PIVOT Calculation
pm = ( MH+ ML + MC )/3;
sm1 = (2*pm)-MH;
sm2 = pm -(MH - ML);
sm3 = Sm1 - (MH-ML);
rm1 = (2*pm)-ML;
rm2 = pm +(MH -ML);
rm3 = rm1 +(MH-ML);
/*--------------------------------------*/
// PARAMETERS
slide = Param("slide all",33,-1000,1000,1);
slide1 = Param("slide_day",50,0,1000,1);
slide2 = Param("slide_week",70,0,1000,1);
slide3 = Param("slide_month",90,0,1000,1);
slide_Hight = Param("slide_Hight",0,-1000,1000,1);
SHALD = ParamList("daily Pivots", "selected only|all|hide" );
SHALW = ParamList("weekly Pivots", "hide|all|selected only" );
SHALM = ParamList("monthly Pivots", "hide|all|selected only" );
//day
PDP = ParamList("DP", "SHOW|HIDE" );
PDR1 = ParamList("DR1", "SHOW|HIDE" );
PDR2 = ParamList("DR2", "SHOW|HIDE" );
PDR3 = ParamList("DR3", "SHOW|HIDE" );
PDR4 = ParamList("DR4", "HIDE|SHOW" );
PDR5 = ParamList("DR5", "HIDE|SHOW" );
PDS1 = ParamList("DS1", "SHOW|HIDE" );
PDS2 = ParamList("DS2", "SHOW|HIDE" );
PDS3 = ParamList("DS3", "SHOW|HIDE" );
PDS4 = ParamList("DS4", "HIDE|SHOW" );
PDS5 = ParamList("DS5", "HIDE|SHOW" );
//week
PWP = ParamList("WP", "HIDE|SHOW" );
PWR1 = ParamList("WR1", "HIDE|SHOW" );
PWR2 = ParamList("WR2", "HIDE|SHOW" );
PWR3 = ParamList("WR3", "HIDE|SHOW" );
PWR4 = ParamList("WR4", "HIDE|SHOW" );
PWS1 = ParamList("WS1", "HIDE|SHOW" );
PWS2 = ParamList("WS2", "HIDE|SHOW" );
PWS3 = ParamList("WS3", "HIDE|SHOW" );
PWS4 = ParamList("WS4", "HIDE|SHOW" );
//month
PMP = ParamList("MP", "HIDE|SHOW" );
PMR1 = ParamList("MR1", "HIDE|SHOW" );
PMR2 = ParamList("MR2", "HIDE|SHOW" );
PMR3 = ParamList("MR3", "HIDE|SHOW" );
PMS1 = ParamList("MS1", "HIDE|SHOW" );
PMS2 = ParamList("MS2", "HIDE|SHOW" );
PMS3 = ParamList("MS3", "HIDE|SHOW" );
PIVOTPOINTCOLOR=6;
DAILYSUPPORTCOLOR=5;
DayCOLOR =4;
weekCOLOR =9;
monthCOLOR =34;
/*--------------------------------------*/
// LABELS
for( i = 0; i < BarCount; i++ )
{
//day
if(i+slide1== BarCount && (PDP=="SHOW" OR SHALD=="all") && SHALD!
="hide") PlotText( "daily
Pivot "+pd ,i+slide,pd+slide_Hight ,PIVOTPOINTCOLOR);
if(i+slide1== BarCount && (PDR1=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
R1 "+rd1 ,i+slide,rd1+slide_Hight ,DayCOLOR );
if(i+slide1== BarCount && (PDR2=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
R2 "+rd2 ,i+slide,rd2+slide_Hight ,DayCOLOR );
if(i+slide1== BarCount && (PDR3=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
R3 "+rd3 ,i+slide,rd3+slide_Hight ,DayCOLOR );
if(i+slide1== BarCount && (PDR4=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
R4 "+rd4 ,i+slide,rd4+slide_Hight ,DayCOLOR );
if(i+slide1== BarCount && (PDR5=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
R5 "+rd5 ,i+slide,rd5+slide_Hight ,DayCOLOR );
if(i+slide1== BarCount && (PDS1=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
S1 "+sd1 ,i+slide,sd1+slide_Hight ,DAILYSUPPORTCOLOR);
if(i+slide1== BarCount && (PDS2=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
S2 "+sd2 ,i+slide,sd2+slide_Hight ,DAILYSUPPORTCOLOR );
if(i+slide1== BarCount && (PDS3=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
S3 "+sd3 ,i+slide,sd3+slide_Hight ,DAILYSUPPORTCOLOR );
if(i+slide1== BarCount && (PDS4=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
S4 "+sd4 ,i+slide,sd4+slide_Hight ,DAILYSUPPORTCOLOR );
if(i+slide1== BarCount && (PDS5=="SHOW" OR SHALD=="all")&& SHALD!
="hide") PlotText( "daily
S5 "+sd5 ,i+slide,sd5+slide_Hight ,DAILYSUPPORTCOLOR );
//week
if(i+slide2== BarCount && (PWP=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
Pivot "+pw ,i+slide,pw+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWR1=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
R1 "+rw1 ,i+slide,rw1+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWR2=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
R2 "+rw2 ,i+slide,rw2+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWR3=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
R3 "+rw3 ,i+slide,rw3+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWR4=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
R4 "+rw4 ,i+slide,rw4+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWS1=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
S1 "+sw1 ,i+slide,sw1+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWS2=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
S2 "+sw2 ,i+slide,sw2+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWS3=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
S3 "+sw3 ,i+slide,sw3+slide_Hight ,weekCOLOR );
if(i+slide2== BarCount && (PWS4=="SHOW" OR SHALW=="all")&& SHALW!
="hide") PlotText( "weekly
S4 "+sw4 ,i+slide,sw4+slide_Hight ,weekCOLOR );
//month
if(i+slide3== BarCount && (PMP=="SHOW" OR SHALM=="all")&& SHALM!
="hide") PlotText( "monthly
Pivot "+pm ,i+slide,Pm+slide_Hight ,monthCOLOR );
if(i+slide3== BarCount && (PMR1=="SHOW" OR SHALM=="all")&& SHALM!
="hide") PlotText( "monthly
R1 "+rm1 ,i+slide,rm1+slide_Hight ,monthCOLOR );
if(i+slide3== BarCount && (PMR2=="SHOW" OR SHALM=="all")&& SHALM!
="hide") PlotText( "monthly
R2 "+rm2 ,i+slide,rm2+slide_Hight ,monthCOLOR );
if(i+slide3== BarCount && (PMR3=="SHOW" OR SHALM=="all")&& SHALM!
="hide") PlotText( "monthly
R3 "+rm3 ,i+slide,rm3+slide_Hight ,monthCOLOR );
if(i+slide3== BarCount && (PMS1=="SHOW" OR SHALM=="all")&& SHALM!
="hide")PlotText( "monthly
S1 "+sm1 ,i+slide,sm1+slide_Hight ,monthCOLOR);
if(i+slide3== BarCount && (PMS2=="SHOW" OR SHALM=="all")&& SHALM!
="hide") PlotText( "monthly
S2 "+sm2 ,i+slide,sm2+slide_Hight ,monthCOLOR );
if(i+slide3== BarCount && (PMS3=="SHOW" OR SHALM=="all")&& SHALM!
="hide") PlotText( "monthly
S3 "+sm3 ,i+slide,sm3+slide_Hight ,monthCOLOR );
}
/*--------------------------------------*/
// PLOTS
// style = IIf(ParamList("Chart style", "styleCandle|styleBar")
=="styleCandle",64,128);
// Plot (C,Date ()+" close",11,style);
//day
if ((PDP=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot (pd,"daily
Pivot ",PIVOTPOINTCOLOR,8);
if ((PDR1=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(rd1,"daily R1 ",DayCOLOR,8);
if ((PDR2=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(rd2,"daily R2 ",DayCOLOR,8);
if ((PDR3=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(rd3,"daily R3 ",DayCOLOR,8);
if ((PDR4=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(rd4,"daily R4 ",DayCOLOR,8);
if ((PDR5=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(rd5,"daily R5 ",DayCOLOR,8);
if ((PDS1=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(sd1,"daily S1 ",DAILYSUPPORTCOLOR,8);
if ((PDS2=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(Sd2,"daily S2 ",DAILYSUPPORTCOLOR,8);
if ((PDS3=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(Sd3,"daily S3 ",DAILYSUPPORTCOLOR,8);
if ((PDS4=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(Sd4,"daily S4 ",DAILYSUPPORTCOLOR,8);
if ((PDS5=="SHOW" OR SHALD=="all") && SHALD!="hide") Plot
(Sd5,"daily S5 ",DAILYSUPPORTCOLOR,8);
//week
if ((PWP=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(pW,"weekly Pivot ",weekCOLOR,1);
if ((PWR1=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(rw1,"weekly R1 ",weekCOLOR,32);
if ((PWR2=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(rw2,"weekly R2 ",weekCOLOR,32);
if ((PWR3=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(rw3,"weekly R3 ",weekCOLOR,32);
if ((PWR4=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(rw4,"weekly R4 ",weekCOLOR,32);
if ((PWS1=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(sw1,"weekly S1 ",weekCOLOR,32);
if ((PWS2=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(Sw2,"weekly S2 ",weekCOLOR,32);
if ((PWS3=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(Sw3,"weekly S3 ",weekCOLOR,32);
if ((PWS4=="SHOW" OR SHALW=="all") && SHALW!="hide") Plot
(Sw4,"weekly S4 ",weekCOLOR,32);
//month
if ((PMP=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(pm,"monthly Pivot",monthCOLOR ,1);
if ((PMR1=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(rm1,"monthly R1",monthCOLOR ,32);
if ((PMR2=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(rm2,"monthly R2",monthCOLOR ,32);
if ((PMR3=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(rm3,"monthly R3",monthCOLOR ,32);
if ((PMS1=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(sm1,"monthly S1",monthCOLOR ,32);
if ((PMS2=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(sm2,"monthly S2",monthCOLOR ,32);
if ((PMS3=="SHOW" OR SHALM=="all") && SHALM!="hide") Plot
(sm3,"monthly S3",monthCOLOR ,32);
/*--------------------------------------*/
// TEXT
"high = "+H;
"low = "+L;
"close = "+C;
_SECTION_END();
_SECTION_BEGIN("Price");
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", colorBlack ), styleNoTitle |
ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
------------------------------------
Please note that this group is for discussion between users only.
To get support from AmiBroker please send an e-mail directly to
SUPPORT {at} amibroker.com
For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/
For other support material please check also:
http://www.amibroker.com/support.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/amibroker/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:amibroker-digest@xxxxxxxxxxxxxxx
mailto:amibroker-fullfeatured@xxxxxxxxxxxxxxx
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|