1. I have written an afl code based on WOODIES Pivots.
2. The Pivot Point (PP) is calculated on daily data.
3. The levels are plotted on 5 min RT chart in Amibroker.
4. Now I want this code to use in Real Time scan to identify those scrips whose current value cross the PP.
5. Thus suitable Buy-Sell code is to be added but this Buy sell must be based on 5 min data crossing PP.
6. The code is given below.
7. kind help me.
_SECTION_BEGIN("Price");
TimeFrameSet(inDaily);
PP=(Ref(H,-1)+Ref(L,-1)+(2*O))/4;
R1 = (2 * PP) - Ref(L,-1);
R3 = Ref(H,-1) + 2 * (PP - Ref(L,-1));
R2 = PP + (Ref(H,-1)-Ref(L,-1));
S1 = (2 * PP) - Ref(H,-1);
S2 = PP - (Ref(H,-1)-Ref(L,-1));
S3 = Ref(L,-1) - 2 * (Ref(H,-1) - PP);
Plot(EndValue(R1),"\n\nR1",colorRed,styleLine|styl eThick,Null,0,0,5);
Plot(EndValue(R2),"\nR2",colorRed,styleLine|styleT hick,Null,0,0,5);
Plot(EndValue(R3),"\nR3",colorRed,styleLine|styleT hick,Null,0,0,5);
Plot(EndValue(PP),"\n\nPIV",colorBlue,styleLine|st yleThick,Null,0,0,5);
Plot(EndValue(S1),"\n\nS1",colorGreen,styleLine|st yleThick,Null,0,0,5);
Plot(EndValue(S2),"\nS2",colorGreen,styleLine|styl eThick,Null,0,0,5);
Plot(EndValue(S3),"\nS3",colorGreen,styleLine|styl eThick,Null,0,0,5);
TimeFrameRestore();
_SECTION_END();
Edit/Delete Message
2. The Pivot Point (PP) is calculated on daily data.
3. The levels are plotted on 5 min RT chart in Amibroker.
4. Now I want this code to use in Real Time scan to identify those scrips whose current value cross the PP.
5. Thus suitable Buy-Sell code is to be added but this Buy sell must be based on 5 min data crossing PP.
6. The code is given below.
7. kind help me.
_SECTION_BEGIN("Price");
TimeFrameSet(inDaily);
PP=(Ref(H,-1)+Ref(L,-1)+(2*O))/4;
R1 = (2 * PP) - Ref(L,-1);
R3 = Ref(H,-1) + 2 * (PP - Ref(L,-1));
R2 = PP + (Ref(H,-1)-Ref(L,-1));
S1 = (2 * PP) - Ref(H,-1);
S2 = PP - (Ref(H,-1)-Ref(L,-1));
S3 = Ref(L,-1) - 2 * (Ref(H,-1) - PP);
Plot(EndValue(R1),"\n\nR1",colorRed,styleLine|styl eThick,Null,0,0,5);
Plot(EndValue(R2),"\nR2",colorRed,styleLine|styleT hick,Null,0,0,5);
Plot(EndValue(R3),"\nR3",colorRed,styleLine|styleT hick,Null,0,0,5);
Plot(EndValue(PP),"\n\nPIV",colorBlue,styleLine|st yleThick,Null,0,0,5);
Plot(EndValue(S1),"\n\nS1",colorGreen,styleLine|st yleThick,Null,0,0,5);
Plot(EndValue(S2),"\nS2",colorGreen,styleLine|styl eThick,Null,0,0,5);
Plot(EndValue(S3),"\nS3",colorGreen,styleLine|styl eThick,Null,0,0,5);
TimeFrameRestore();
_SECTION_END();
Edit/Delete Message