[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [amibroker] Floor Trader Pivots

PureBytes Links

Trading Reference Links
hi,
 
here is code I use. It is written for ES futures trading. It needs to use 1-minute intraday charts. It looks at 24 hours continues data but to calculate the pivots it uses the price of regular trading hours. The regular trading hours (my local time is CET) are displayed in the chart as a dark grey background (see inserted chart). You will need to adjust:
 
starttime = 153000;
endtime = 220000;
 
lines like PV = round(PV * 4) / 4; I added because ES trades in steps of 0.25 point.
for your local opening and closing hours. When you load the code you will need to go to the parameter window and chose these support and resistance levels you want to display.
 
If anyone knows a succesful way to use this for trading ..... please let me know :)
 
rgds, Ed
 
 
 
 
 
 
 
freq = 1 * inDaily;

starttime = 153000;
endtime = 220000;

tn = TimeNum();
dn = DateNum();

timecond = tn >= starttime AND tn <= endtime;
startday = tn == starttime;

firstBarOfDay = deFlagFirstBarOfDay( starttime );
lastBarOfDay = deFlagLastBarOfDay( endtime);

myHigh = ValueWhen( timecond, HighestSince( firstBarOfDay, High) );
myLow = ValueWhen( timecond, LowestSince( firstBarOfDay, Low) );
myClose = ValueWhen(lastBarOfDay,C);

DH = TimeFrameCompress(myHigh, freq, compressLast);
DL = TimeFrameCompress(myLow, freq, compressLast);
DC = TimeFrameCompress(myClose, freq, compressLast);

DH = Ref(DH,-1);
DL = Ref(DL,-1);
DC = Ref(DC,-1);

DH = TimeFrameExpand( DH, freq, expandFirst );
DL = TimeFrameExpand( DL, freq, expandFirst );
DC = TimeFrameExpand( DC, freq, expandFirst );

rg = DH - DL;

PV = (DH+DL+DC)/3; PV = round(PV * 4) / 4;
R1 = PV + (PV - DL);  R1 = round(R1 * 4) / 4;
R2 = PV + rg;
R3 = R1 + rg;
R4 = R2 + rg;

S1 = PV - (DH - PV); S1 = round(S1 * 4) / 4;
S2 = PV - rg;
S3 = S1 - rg;
S4 = S2 - rg;

Type = ParamList("Type","Pivot,Pivot/S1/R1,Pivot/S1/S2/R1/R2,Pivot/S1/S2/S3/R1/R2/R3,Pivot/S1/S2/S3/S4/R1/R2/R3/R4,Yesterdays H/L/C");

if( Type == "Pivot" )  {

   SetBarsRequired(10000, 10000);

   SetChartOptions(0, chartShowDates);
   Plot(C,"C",1,64);
   Plot(PV,"PV",colorWhite,styleThick);
   Plot( timecond, "", colorDarkGrey, styleArea|styleOwnScale,0,1);

}

if( Type == "Pivot/S1/R1" )  {

   SetBarsRequired(10000, 10000);

   SetChartOptions(0, chartShowDates);
   Plot(C,"C",1,64);
   Plot(PV,"PV",colorWhite,styleThick);

   // resistance
   Plot(R1,"\nR1",colorRed,styleThick); PlotText( "R1\n", LastValue(Cum(1)), LastValue(R1), colorRed );

   // support
   Plot(S1,"\nS1",colorGreen,styleThick); PlotText( "S1\n", LastValue(Cum(1)), LastValue(S1), colorGreen );

   Plot( timecond, "", colorDarkGrey, styleArea|styleOwnScale,0,1);

}

if( Type == "Pivot/S1/S2/R1/R2" )  {

   SetBarsRequired(10000, 10000);

   SetChartOptions(0, chartShowDates);
   Plot(C,"C",1,64);
   Plot(PV,"PV",colorWhite,styleThick);

   // resistance
   Plot(R1,"\nR1",colorRed,styleThick); PlotText( "R1\n", LastValue(Cum(1)), LastValue(R1), colorRed );
   Plot(R2,"R2",colorOrange,styleThick); PlotText( "R2\n", LastValue(Cum(1)), LastValue(R2), colorOrange );

   // support
   Plot(S1,"\nS1",colorGreen,styleThick); PlotText( "S1\n", LastValue(Cum(1)), LastValue(S1), colorGreen );
   Plot(S2,"S2",colorBrightGreen,styleThick); PlotText( "S2\n", LastValue(Cum(1)), LastValue(S2), colorBrightGreen );

   Plot( timecond, "", colorDarkGrey, styleArea|styleOwnScale,0,1);

}

if( Type == "Pivot/S1/S2/S3/R1/R2/R3" )  {

   SetBarsRequired(10000, 10000);

   SetChartOptions(0, chartShowDates);
   Plot(C,"C",1,64);
   Plot(PV,"PV",colorWhite,styleThick);

   // resistance
   Plot(R1,"\nR1",colorRed,styleThick); PlotText( "R1\n", LastValue(Cum(1)), LastValue(R1), colorRed );
   Plot(R2,"R2",colorOrange,styleThick); PlotText( "R2\n", LastValue(Cum(1)), LastValue(R2), colorOrange );
   Plot(R3,"R3",colorLightOrange,styleThick); PlotText( "R3\n", LastValue(Cum(1)), LastValue(R3), colorLightOrange );

   // support
   Plot(S1,"\nS1",colorGreen,styleThick); PlotText( "S1\n", LastValue(Cum(1)), LastValue(S1), colorGreen );
   Plot(S2,"S2",colorBrightGreen,styleThick); PlotText( "S2\n", LastValue(Cum(1)), LastValue(S2), colorBrightGreen );
   Plot(S3,"S3",colorSeaGreen ,styleThick); PlotText( "S3\n", LastValue(Cum(1)), LastValue(S3), colorSeaGreen );

   Plot( timecond, "", colorDarkGrey, styleArea|styleOwnScale,0,1);

}

if( Type == "Pivot/S1/S2/S3/S4/R1/R2/R3/R4" )  {

   SetBarsRequired(10000, 10000);

   SetChartOptions(0, chartShowDates);
   Plot(C,"C",1,64);

   Plot(PV,"PV",colorWhite,styleThick);

   // resistance
   Plot(R1,"\nR1",colorRed,styleThick); PlotText( "R1\n", LastValue(Cum(1)), LastValue(R1), colorRed );
   Plot(R2,"R2",colorOrange,styleThick); PlotText( "R2\n", LastValue(Cum(1)), LastValue(R2), colorOrange );
   Plot(R3,"R3",colorLightOrange,styleThick); PlotText( "R3\n", LastValue(Cum(1)), LastValue(R3), colorLightOrange );
   Plot(R4,"R4",colorYellow,styleThick); PlotText( "R4\n", LastValue(Cum(1)), LastValue(R4), colorYellow );

   // support
   Plot(S1,"\nS1",colorGreen,styleThick); PlotText( "S1\n", LastValue(Cum(1)), LastValue(S1), colorGreen );
   Plot(S2,"S2",colorBrightGreen,styleThick); PlotText( "S2\n", LastValue(Cum(1)), LastValue(S2), colorBrightGreen );
   Plot(S3,"S3",colorSeaGreen ,styleThick); PlotText( "S3\n", LastValue(Cum(1)), LastValue(S3), colorSeaGreen );
   Plot(S4,"S4",colorPaleGreen ,styleThick); PlotText( "S4\n", LastValue(Cum(1)), LastValue(S4), colorPaleGreen );

   Plot( timecond, "", colorDarkGrey, styleArea|styleOwnScale,0,1);

}

if( Type == "Yesterdays H/L/C" )  {

   SetBarsRequired(10000, 10000);

   SetChartOptions(0, chartShowDates);
   Plot(C,"C",1,64);
   Plot(DC,"\nDC",colorLightBlue,styleDashed); PlotText( "Ys C\n", LastValue(Cum(1)), LastValue(DC), colorLightBlue );
   Plot(DH,"DH",colorSkyblue,styleDashed);  PlotText( "Ys H\n", LastValue(Cum(1)), LastValue(DH), colorSkyblue );
   Plot(DL,"DL",colorTurquoise,styleDashed);  PlotText( "Ys L\n", LastValue(Cum(1)), LastValue(DL), colorTurquoise );

   Plot( timecond, "", colorDarkGrey, styleArea|styleOwnScale,0,1);

}
 
 
 
----- Original Message -----
From: Mohammed
Sent: Friday, April 25, 2008 1:28 AM
Subject: [amibroker] Floor Trader Pivots

Hi All,

I'm trying to write the formula for Pivot Point, support and resistance as it showing in the following code.

/*

Pivot Point = [Yesterday's High + Yesterday's Low + Yesterday's Close] / 3

Support Levels

S1 = [Pivot Point * 2] - Yesterday's High

S2 = Pivot Point - Yesterday's High + Yesterday's Low

S3 = S2 - Yesterday's High + Yesterday's Low

Resistance Levels

R1 = [Pivot Point * 2] - Yesterday's Low

R2 = Pivot Point + Yesterday's High - Yesterday's Low

R3 = R2 + Yesterday's High - Yesterday's Low

*/

Piv = Ref(H,-1) + Ref(L,-1) + Ref(C,-1)/ 3;
S1 = Piv*2 - Ref(H,-1);
S2 = Piv - Ref(H,-1) + Ref(L,-1);
S3 = S2 - Ref(H,-1) + Ref(L,-1);

R1 = Piv*2 - Ref(L,-1);
R2 = Piv + Ref(H,-1) - Ref(L,-1);
R3 = R2 + Ref(H,-1) - Ref(L,-1);

Plot(S1,"S1",colorgreen, styleLine);
Plot(S2,"S3",colorgreen, styleLine);
Plot(S3,"S3",colorgreen, styleLine);

Plot(R1,"R1",colorRed, styleLine);
Plot(R2,"R2",colorRed, styleLine);
Plot(R3,"R3",colorRed, styleLine);

BUT this gives me wrong result???

 Any one can help please Why I got wrong result?

Also I would like to plot it as a horizontal line not as indicator.  As it showing here

FloorTrader Pivots 


All the best.

__._,_.___

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



Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___