My Crudeoil Trades.

[Vipul_84]

Arjun please post AFL of this chart.
Bottom OBV pane AFL.

 

[arjun.panda]

that one is not the final one...

 

[arjun.panda]

i ll post the the final afl of the setup...but where can i find the afl in amibroker?

 

[checkmate7]

i ll post the the final afl of the setup...but where can i find the afl in amibroker?

Right click in the pane from where you need afl and click on edit formula and copy it

 

[arjun.panda]

_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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

_SECTION_BEGIN("EMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

_SECTION_BEGIN("EMA1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

_SECTION_BEGIN("Keltner Bands");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorCycle );
Style = ParamStyle("Style", styleLine | styleNoLabel);

CenterLine = MA( P, Periods );
KTop = CenterLine + Width * ATR( Periods );
KBot = CenterLine - Width * ATR( Periods );

Plot( KTop, "KBTop" + _PARAM_VALUES(), Color, Style );
Plot( KBot, "KBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("Keltner Bands1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorCycle );
Style = ParamStyle("Style", styleLine | styleNoLabel);

CenterLine = MA( P, Periods );
KTop = CenterLine + Width * ATR( Periods );
KBot = CenterLine - Width * ATR( Periods );

Plot( KTop, "KBTop" + _PARAM_VALUES(), Color, Style );
Plot( KBot, "KBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("TEMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( TEMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

_SECTION_BEGIN("Keltner Bands2");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorCycle );
Style = ParamStyle("Style", styleLine | styleNoLabel);

CenterLine = MA( P, Periods );
KTop = CenterLine + Width * ATR( Periods );
KBot = CenterLine - Width * ATR( Periods );

Plot( KTop, "KBTop" + _PARAM_VALUES(), Color, Style );
Plot( KBot, "KBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("TEMA1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( TEMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

 

[Vipul_84]

Thanks Arjun ji

_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", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();

_SECTION_BEGIN("EMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

_SECTION_BEGIN("EMA1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

_SECTION_BEGIN("Keltner Bands");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorCycle );
Style = ParamStyle("Style", styleLine | styleNoLabel);

CenterLine = MA( P, Periods );
KTop = CenterLine + Width * ATR( Periods );
KBot = CenterLine - Width * ATR( Periods );

Plot( KTop, "KBTop" + _PARAM_VALUES(), Color, Style );
Plot( KBot, "KBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("Keltner Bands1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorCycle );
Style = ParamStyle("Style", styleLine | styleNoLabel);

CenterLine = MA( P, Periods );
KTop = CenterLine + Width * ATR( Periods );
KBot = CenterLine - Width * ATR( Periods );

Plot( KTop, "KBTop" + _PARAM_VALUES(), Color, Style );
Plot( KBot, "KBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("TEMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( TEMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

_SECTION_BEGIN("Keltner Bands2");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorCycle );
Style = ParamStyle("Style", styleLine | styleNoLabel);

CenterLine = MA( P, Periods );
KTop = CenterLine + Width * ATR( Periods );
KBot = CenterLine - Width * ATR( Periods );

Plot( KTop, "KBTop" + _PARAM_VALUES(), Color, Style );
Plot( KBot, "KBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("TEMA1");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( TEMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END();

 

[Vipul_84]

Arjun ji, can you post OBV Pane AFL the same way? That will not have price etc. Its OBV and other channels with blue/red color changing line.

 

[arjun.panda]

anytime my friend.
but on my opinion all thank should go to Mr Varunkochhar
without his knowledge, wisdom and effort it wouldn''t have been possible..

my heartfelt gratitude.

 

[arjun.panda]

//================================================== ================================================== =======================
GraphXSpace=5;
_SECTION_BEGIN("On Balance Volume");
Ob = OBV(); e36 = EMA(Ob,36); e200 = EMA(Ob,200);
Plot(Ob,"",IIf(e36<Ob,colorBlue,colorRed),styleNoTitle|styleThick);
Plot(0,"",colorWhite,styleNoLabel|styleNoRescale|styleDashed,0,0,5,-5);
Plot(e200,"",colorBrightGreen,styleNoLabel|styleNoRescale);
Plot(e36, "",colorGold,styleNoLabel|styleNoRescale|styleDashed);
_SECTION_END();


_SECTION_BEGIN("OBV HOURLY Hi-Lo");
n = Param("Periods", 60, 15, 300, 15 );
Ob = OBV();
ObHHi = HHV(Ob,n); ObHLo = LLV(Ob,n);

Plot(ObHHi,"",colorLime,styleNoLabel|styleNoRescale,0,0,2);
Plot(ObHLo,"",colorLime,styleNoLabel|styleNoRescale,0,0,2);
_SECTION_END();


_SECTION_BEGIN("OBV ID Zero Level");
ND = Day()!=Ref(Day(),-1); LB = Ref(ND,-1);
Ob = OBV(); Zero = ValueWhen(LB,Ob);
Plot(Zero,"",colorRed,styleNoLabel|styleNoRescale| styleStaircase|styleDashed,0,0,0,-5);
_SECTION_END();


_SECTION_BEGIN("OBV & Price Hi Lo Breaks");
Ob = OBV();
H15 = HHV(Ob,15); L15 = LLV(Ob,15); B1 = Cross(Ob,Ref(H15,-1)); S1 = Cross(Ref(L15,-1),Ob);
H30 = HHV(Ob,30); L30 = LLV(Ob,30); B2 = Cross(Ob,Ref(H30,-1)); S2 = Cross(Ref(L30,-1),Ob);
H60 = HHV(Ob,60); L60 = LLV(Ob,60); B3 = Cross(Ob,Ref(H60,-1)); S3 = Cross(Ref(L60,-1),Ob);

B1 = ExRem(B1,S1); S1 = ExRem(S1,B1); UP1 = Flip(B1,S1); DN1 = Flip(S1,B1);
B2 = ExRem(B2,S2); S2 = ExRem(S2,B2); UP2 = Flip(B2,S2); DN2 = Flip(S2,B2);
B3 = ExRem(B3,S3); S3 = ExRem(S3,B3); UP3 = Flip(B3,S3); DN3 = Flip(S3,B3);

P15 = HHV(H,15); Q15 = LLV(L,15); X1 = Cross(C,Ref(P15,-1)); Y1 = Cross(Ref(Q15,-1),C);
P30 = HHV(H,30); Q30 = LLV(L,30); X2 = Cross(C,Ref(P30,-1)); Y2 = Cross(Ref(Q30,-1),C);
P60 = HHV(H,60); Q60 = LLV(L,60); X3 = Cross(C,Ref(P60,-1)); Y3 = Cross(Ref(Q60,-1),C);

X1 = ExRem(X1,Y1); Y1 = ExRem(Y1,X1); LG1 = Flip(X1,Y1); SH1 = Flip(Y1,X1);
X2 = ExRem(X2,Y2); Y2 = ExRem(Y2,X2); LG2 = Flip(X2,Y2); SH2 = Flip(Y2,X2);
X3 = ExRem(X3,Y3); Y3 = ExRem(Y3,X3); LG3 = Flip(X3,Y3); SH3 = Flip(Y3,X3);

B15 = UP1 AND LG1; S15 = DN1 AND SH1;
B30 = UP2 AND LG2; S30 = DN2 AND SH2;
B60 = UP3 AND LG3; S60 = DN3 AND SH3;

B15 = ExRem(B15,S15); S15 = ExRem(S15,B15); UP15 = Flip(B15,S15); DN15 = Flip(S15,B15);
B30 = ExRem(B30,S30); S30 = ExRem(S30,B30); UP30 = Flip(B30,S30); DN30 = Flip(S30,B30);
B60 = ExRem(B60,S60); S60 = ExRem(S60,B60); UP60 = Flip(B60,S60); DN60 = Flip(S60,B60);

Plot(30,"",IIf(UP1,colorBlue,colorRed),styleOwnScale|styleNoLabel|styleThick,0,250,0,0,3);
Plot(20,"",IIf(UP2,colorBlue,colorRed),styleOwnScale|styleNoLabel|styleThick,0,250,0,0,3);
Plot(10,"",IIf(UP3,colorBlue,colorRed),styleOwnScale|styleNoLabel|styleThick,0,250,0,0,3);

Title = "Varun's OBV & Price Breakout Ribbons, Topmost: 15 Minutes, Lowest: 60 Minutes & Middle 30 Minutes";
_SECTION_END();


_SECTION_BEGIN("OBV ID Zero Line");
ND = Day()!=Ref(Day(),-1); LB = Ref(ND,-1); // LB: Last Bar of the day
Ob = OBV(); Zero = ValueWhen(LB,Ob);
Plot(Zero,"",colorWhite,styleNoLabel|styleNoRescale|styleStaircase|styleDashed,0,0,0,-5);
_SECTION_END();

Ob = OBV(); T = TimeNum();
T1 = 110000; T2 = 130000;
Funds = ValueWhen(T==T1,Ob);
Plot(IIf(T>=T1,Funds,Null),"",colorLightGrey,styleNoLabel|styleNoRescale|styleStaircase|styleDashed, 0,0,0,-5);
Plot(IIf(T==T1,1,Null),"",colorLightGrey,styleNoLabel|styleOwnScale|styleHistogram|styleDashed,0,1,0 ,-5);
Europe = ValueWhen(T==T2,Ob);
Plot(IIf(T>=T2,Europe,Null),"",colorYellow,styleNoLabel|styleNoRescale|styleStaircase|styleDashed,0, 0,0,-5);
Plot(IIf(T==T2,1,Null),"",colorYellow,styleNoLabel |styleOwnScale|styleHistogram|styleDashed,0,1,0,-5);


//================================================== ================================================== =======================

/*

 

[arjun.panda]

this is what u are asking for i guess