AFL - Error

D

deekonda

Member
#1
#1
Hi,

Could you please correct this afl.
-------------------------------------------------------------

/**
*
http://www.myinvestmentmanager.com

Author : Nishant Kulkarni ([email protected])
Intraday Fibonacii Trend Break System. This system is based on the double
bottom and double top detection technique and fibonacii internal external by
David K.
A line joining two tops when connected together and another line joining bottom
line is connected together and when both line extended forms a funnel and
a break outside gives very strong break out.

It is recomended to have Heikin Ashi plot bellow main price plot as
confirmation. Big heikin ashi candles confirm price movement.

Note: Use 1 Hour interval for more stable results.

Disclaimer – Trade with caution. Author does not take any responsibility. The
system is to guide traders and does not
guaranty any performance. The system is used in Indian market condition. For
other markets, may need to be altered slightly. However I am personally using
this system and booking profit, hence contributing
this formula for community as give back.

The system also makes use of Fibonacci Internal and External Retracements
formula by David K.
http://www.amibroker.com/library/detail.php?id=1084

Visit : http://www.myinvestmentmanager.com for investment tips in Indian
market.

*/

_SECTION_BEGIN("INIT");
SetChartOptions(0,chartShowArrows|chartShowDates);
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
tchoice=Param("Title Selection ",2,1,2,1);
PlotCandle = ParamToggle("Plot Nifty Candle", "No,Yes", 0);
_SECTION_END();

_SECTION_BEGIN("Price");
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g,
Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C,
SelectedValue( ROC( C, 1 )) ));
Plot( C, _DEFAULT_NAME(), colorBlack , styleNoTitle | ParamStyle("Style") |
GetPriceStyle() );
_SECTION_END();

_SECTION_BEGIN("Index_Compare");
IndexName = ParamList("IndexName ","^NSEI|^NSEBANK|^CNXIT|",0);
PlotForeign(IndexName,_DEFAULT_NAME(),colorBrightGreen , styleNoTitle |
styleOwnScale | styleLine | styleThick );
_SECTION_END();

_SECTION_BEGIN("BBands");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 100, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorLightGrey );
Style = ParamStyle("Style", styleNoRescale | styleNoTitle | styleNoLabel |
styleThick);
BBTop = BBandTop( P, Periods, Width );
BBBot = BBandBot( P, Periods, Width );
BBMiddle = BBBot + ((BBTop-BBBot)/2);
Plot(BBTop , "BBTop" + _PARAM_VALUES(), Color, Style );
Plot(BBBot, "BBBot" + _PARAM_VALUES(), Color, Style );
Plot(BBMiddle , "BBMiddle" + _PARAM_VALUES(), Color, Style );

_SECTION_END();

_SECTION_BEGIN("Fib Retracements");
fibs = ParamToggle("Plot Fibs","Off|On",1);
pctH = Param ("Pivot Hi %", 0.325,0.001,2.0,0.002);
HiLB = Param ("Hi LookBack",1,1,BarCount-1,1);
pctL = Param ("Pivot Lo %", 0.325,0.001,2.0,0.002);
LoLB = Param ("Lo LookBack",1,1,BarCount-1,1);
Back = Param ("Extend Left = 2",1,1,500,1);
Fwd = Param("Plot Forward", 0, 0, 500, 1);
text = ParamToggle("Plot Text","Off|On",1);
hts = Param ("Text Shift", -33.5,-50,50,0.10);
style =ParamStyle("Line Style",styleLine,styleNoLabel);
x = BarIndex();
pRp = PeakBars( H, pctH, 1) == 0;
yRp0 = LastValue(ValueWhen( pRp, H, HiLB));
xRp0 = LastValue(ValueWhen( pRp, x, HiLB));
pSp = TroughBars( L, pctL, 1) == 0;
ySp0 = LastValue(ValueWhen( pSp, L, LoLB));
xSp0 = LastValue(ValueWhen( pSp, x, LoLB));
Delta = yRp0 - ySp0;

function fib(ret) {
retval = (Delta * ret);
Fibval = IIf(ret < 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret < 1.0
AND xSp0 > xRp0, ySp0 + retval,IIf(ret > 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret > 1.0
AND xSp0 > xRp0, ySp0 + retval, Null))));
return FibVal;
}

x0 = Min(xSp0,xRp0)-Back;
x1 = (BarCount -1);
//////////////////////////////////////////////////////////////////
r236 = fib(0.236); r236I = LastValue (r236,1);
r382 = fib(0.382); r382I = LastValue (r382,1);
r050 = fib(0.50); r050I = LastValue (r050,1);
r618 = fib(0.618); r618I = LastValue (r618,1);
r786 = fib(0.786); r786I = LastValue (r786,1);
e127 = fib(1.27); e127I = LastValue (e127,1);
e162 = fib(1.62); e162I = LastValue (e162,1);
e200 = fib(2.00); e200I = LastValue (e200,1);
e262 = fib(2.62); e262I = LastValue (e262,1);
e424 = fib(4.24); e424I = LastValue (e424,1);
//////////////////////////////////////////////////////////////////
p00 = IIf(xSp0 > xRp0,ySp0,yRp0); p00I = LastValue (p00,1);
p100 = IIf(xSp0 < xRp0,ySp0,yRp0); p100I = LastValue (p100,1);
color00 =IIf(xSp0 > xRp0,colorLime,colorRed);
color100 =IIf(xSp0 < xRp0,colorLime,colorRed);
//////////////////////////////////////////////////////////////////
numbars = LastValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
//////////////////////////////////////////////////////////////////
if(fibs==1) {
Plot(LineArray(xRp0-Fwd,yRp0,x1,yRp0,Back),"PR",32,styleThick |
styleNoRescale | styleNoLabel | styleNoTitle,Null, Null,Fwd);
Plot(LineArray(xSp0-Fwd,ySp0,x1,ySp0,Back),"PS",27, styleThick |
styleNoRescale | styleNoLabel | styleNoTitle,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r236,x1,r236,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r382,x1,r382,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r050,x1,r050,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r618,x1,r618,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r786,x1,r786,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e127,x1,e127,Back),"e127",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e162,x1,e162,Back),"e162",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e200,x1,e200,Back),"p200",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e262,x1,e262,Back),"p262",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e424,x1,e424,Back),"p424",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);

}
//////////////////////////////////////////////////////////////////
if(text==1) {
PlotText(" 0% = " + WriteVal(p00,fraction),
LastValue(BarIndex())-(numbars/hts), p00I + 0.05, color00);
PlotText("23% = " + WriteVal(r236,fraction),
LastValue(BarIndex())-(numbars/hts), r236I + 0.05, colorBlack);
PlotText("38% = " + WriteVal(r382,fraction),
LastValue(BarIndex())-(numbars/hts), r382I + 0.05, colorBlack);
PlotText("50% = " + WriteVal(r050,fraction),
LastValue(BarIndex())-(numbars/hts), r050I + 0.05, colorBlack);
PlotText("62% = " + WriteVal(r618,fraction),
LastValue(BarIndex())-(numbars/hts), r618I + 0.05, colorBlack);
PlotText("78% = " + WriteVal(r786,fraction),
LastValue(BarIndex())-(numbars/hts), r786I + 0.05, colorBlack);
PlotText("100% = " + WriteVal(p100,fraction),
LastValue(BarIndex())-(numbars/hts),p100I + 0.05, color100);
PlotText("127% = " + WriteVal(e127,fraction),
LastValue(BarIndex())-(numbars/hts),e127I + 0.05, colorBlack);
PlotText("162% = " + WriteVal(e162,fraction),
LastValue(BarIndex())-(numbars/hts),e162I + 0.05, colorBlack);
PlotText("200% = " + WriteVal(e200,fraction),
LastValue(BarIndex())-(numbars/hts),e200I + 0.05, colorBlack);
PlotText("262% = " + WriteVal(e262,fraction),
LastValue(BarIndex())-(numbars/hts),e262I + 0.05, colorBlack);
PlotText("424% = " + WriteVal(e424,fraction),
LastValue(BarIndex())-(numbars/hts),e424I + 0.05, colorBlack);
}
_SECTION_END();

_SECTION_BEGIN("Pivot");

YH = TimeFrameGetPrice("H", inDaily, -1); // yesterdays high
YL = TimeFrameGetPrice("L", inDaily, -1); // low
YC = TimeFrameGetPrice("C", inDaily, -1); // close
YO = TimeFrameGetPrice("O", inDaily); // current day open

//Normal Pivot
PP = (YH + YL + YC) / 3;
R1 = (2 * PP) - YL;
R2 = PP + (YH - YL);
R3 = YH + 2*(PP-YL);
S1 = (2 * PP) - YH;
S2 = PP - (YH - YL);
S3 = YL - 2*(YH - PP) ;

_SECTION_END();

_SECTION_BEGIN("TITLE");

//////////////////////////////////////////////////////////////////
if (tchoice==1 ) {
_N(Title = EncodeColor(colorWhite)+StrFormat(" {{NAME}} - {{INTERVAL}}
{{DATE}} Open: %g, High: %g, Low: %g, Close: %g
{{VALUES}}",O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
}
//////////////////////////////////////////////////////////////////WriteVal(HC
,fraction)

if (tchoice==2 ) {
Title = EncodeColor(colorBlack)+ Date() + " Close = " +
EncodeColor(colorRed) +Close +
EncodeColor(colorBlack) + " Open = " + EncodeColor(colorBlack) + O +
EncodeColor(colorBlack) + " High = " + EncodeColor(5) + H +
EncodeColor(colorBlack) + " Low = " + EncodeColor(colorRed) + L +
EncodeColor(colorBlack) + " Volume = " + EncodeColor(colorBlack) + V +
"\n\n"+
EncodeColor(colorBlack) + "Pivot Point= " + EncodeColor(colorBlack) + PP +
EncodeColor(colorBlack) + " Day's Open= " + EncodeColor(colorBlack) + YO
+
EncodeColor(colorBlack) + " Nifty = " + EncodeColor(colorBlack) +
Foreign("^NSEI","C") +"\n\n"+
EncodeColor(colorRed) + "R1= " + EncodeColor(colorBlack) + R1 +
EncodeColor(colorRed) + " R2= " + EncodeColor(colorBlack) + R2 +
EncodeColor(colorRed) + " R3= " + EncodeColor(colorBlack) + R3 +"\n"+
EncodeColor(colorGreen) + "S1= " + EncodeColor(colorBlack) + S1 +
EncodeColor(colorGreen) + " S2= " + EncodeColor(colorBlack) + S2 +
EncodeColor(colorGreen) + " S3= " + EncodeColor(colorBlack) + S3 +"\n"+
EncodeColor( colorBlack) +"_______________"+"\n"+
EncodeColor( colorBlack) + "424% = " + EncodeColor(25)+ e424 + " "
+"\n"+
EncodeColor( colorBlack) + "262% = " + EncodeColor(47)+ e262 + " "
+"\n"+
EncodeColor( colorBlack) + "200% = " + EncodeColor(47)+ e200 + " "
+"\n"+
EncodeColor( colorBlack) + "162% = " + EncodeColor(47)+ e162 + " "
+"\n"+
EncodeColor( colorBlack) + "127% = " + EncodeColor(47)+ e127 + " "
+"\n"+
EncodeColor( colorRed) + "Res = " + EncodeColor(32)+ p100 + " "+"\n"+
EncodeColor( colorBlack) + "78% = " + EncodeColor(42)+ r786 + " " +"\n"+
EncodeColor( colorBlack) + "62% = " + EncodeColor(43)+ r618 + " "+"\n"+
EncodeColor( colorBlack) + "50% = " + EncodeColor(41)+ r050 + " "+"\n"+
EncodeColor( colorBlack) + "38% = " + EncodeColor(44)+ r382 + " "+"\n"+
EncodeColor( colorBlack) + "23% = " + EncodeColor(45)+ r236+ " " +"\n"+
EncodeColor( colorGreen) + "Sup = " + EncodeColor(34)+ p00 + " " ;

}

_SECTION_END();

_SECTION_BEGIN("Up Trend Line");
UTValue1=LastValue(Trough(L,1,2));
UTValue2=ySp0;
UTBar1=BarCount - 1 - LastValue(TroughBars(L,1,2));
price_utbar1=Close[UTBar1];
UTBar2=xSp0;
price_utbar2=Close[UTBar2];
UpTrendLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 1 );
UTLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 0 );
Plot( UpTrendLine , _DEFAULT_NAME(), colorGreen,styleDots | styleNoTitle |
styleNoLabel);

Plot( UTLine , _DEFAULT_NAME(), colorGreen,styleDots | styleNoTitle |
styleNoLabel);
_SECTION_END();


_SECTION_BEGIN("Down Trend Line");
DTValue1=LastValue(Peak(H,1,2));
DTValue2=yRp0;
DTBar1=BarCount - 1 - LastValue(PeakBars(H,1,2));
price_dtbar1=Close[DTBar1];
DTBar2=xRp0;
price_dtbar2=Close[DTBar2];
DownTrendLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 1 );
DTLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 0 );

Plot( DownTrendLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle |
styleNoLabel);
Plot( DTLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle |
styleNoLabel);

PlotOHLC( DownTrendLine , DownTrendLine , UpTrendLine , UpTrendLine , "",
colorYellow, styleCloud | styleNoRescale);

DTLine = LineArray(xRp0-Fwd,yRp0,x1,yRp0,Back);
UTLine = LineArray(xSp0-Fwd,ySp0,x1,ySp0,Back);


CBuy = Cross(C,DownTrendLine );
CSell = Cross(UpTrendLine ,C);

baratcbuy = LastValue(ValueWhen(CBuy,BarIndex()));
baratcsell = LastValue(ValueWhen(CSell,BarIndex()));

CBuy = CBuy AND BarIndex() == baratcbuy ;
CSell = CSell AND BarIndex() == baratcsell ;

PlotShapes(shapeUpTriangle* CBuy ,colorBlue,O,L);
PlotShapes(shapeDownTriangle* CSell ,colorRed,O,H);

CBuy1 = Cross(C,DTLine );
CSell1 = Cross(UTLine ,C);

baratcbuy1 = LastValue(ValueWhen(CBuy1,BarIndex()));
baratcsell1 = LastValue(ValueWhen(CSell1,BarIndex()));

CBuy1 = CBuy1 AND BarIndex() == baratcbuy1 ;
CSell1 = CSell1 AND BarIndex() == baratcsell1 ;

PlotShapes(shapeHollowUpTriangle* CBuy1 ,colorBlue,O,L-1);
PlotShapes(shapeHollowDownTriangle* CSell1 ,colorRed,O,H-1);

_SECTION_END();


_SECTION_BEGIN("Auto");

ScanLookBack = Param("Scan Lookback", 1, 1, 25 );
Buy = ( CBuy OR CBuy1) AND ( (BarCount - baratcBuy )<=ScanLookBack OR
(BarCount - baratcbuy1 )<=ScanLookBack);
Sell = ( CSell OR CSell1) AND ( (BarCount - baratcsell )<=ScanLookBack OR
(BarCount - baratcsell1 )<=ScanLookBack ) ;

price = C[BarCount-1];

AlertIf(Buy,"","Buy @"+C+" Price @ Trigger="+price,1);
AlertIf(Sell,"","Sell @"+C+" Price @ Trigger="+price,2);

Filter = Buy OR Sell ;

Var = WriteIf(Buy,"BUY",WriteIf(Sell,"SELL",""));

AddTextColumn( Var , "Buy/Sell", 1.2 , colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(price ,"Price",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(C ,"Price @ Trigger",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));

stoploss = IIf(Buy, (price * (1-0.01)) , IIf(Sell, (price * (1+0.01)),0));
target1per = IIf(Buy, (price * (1+0.01)) , IIf(Sell, (price *
(1-0.01)),0));
target15per = IIf(Buy, (price * (1+0.015)) , IIf(Sell, (price *
(1-0.015)),0));
target2per = IIf(Buy, (price * (1+0.02)) , IIf(Sell, (price *
(1-0.02)),0));

AddColumn(stoploss ,"Stop Loss",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(target1per ,"1% Target",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(target15per ,"1.5% Target",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(target2per ,"2% Target",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(V ,"Volume",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));

_SECTION_END();

GraphXSpace = 10 ;
 
HULK

HULK

Active Member
#2
#2
CHK NOW

_SECTION_BEGIN("INIT");
SetChartOptions(0,chartShowArrows|chartShowDates);
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
tchoice=Param("Title Selection ",2,1,2,1);
PlotCandle = ParamToggle("Plot Nifty Candle", "No,Yes", 0);
_SECTION_END();

_SECTION_BEGIN("Price");
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g,
Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C,
SelectedValue( ROC( C, 1 )) ));
Plot( C, _DEFAULT_NAME(), colorBlack , styleNoTitle | ParamStyle("Style") |
GetPriceStyle() );
_SECTION_END();

_SECTION_BEGIN("Index_Compare");
IndexName = ParamList("IndexName ","^NSEI|^NSEBANK|^CNXIT|",0);
PlotForeign(IndexName,_DEFAULT_NAME(),colorBrightGreen , styleNoTitle |
styleOwnScale | styleLine | styleThick );
_SECTION_END();

_SECTION_BEGIN("BBands");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 100, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorLightGrey );
Style = ParamStyle("Style", styleNoRescale | styleNoTitle | styleNoLabel |
styleThick);
BBTop = BBandTop( P, Periods, Width );
BBBot = BBandBot( P, Periods, Width );
BBMiddle = BBBot + ((BBTop-BBBot)/2);
Plot(BBTop , "BBTop" + _PARAM_VALUES(), Color, Style );
Plot(BBBot, "BBBot" + _PARAM_VALUES(), Color, Style );
Plot(BBMiddle , "BBMiddle" + _PARAM_VALUES(), Color, Style );

_SECTION_END();

_SECTION_BEGIN("Fib Retracements");
fibs = ParamToggle("Plot Fibs","Off|On",1);
pctH = Param ("Pivot Hi %", 0.325,0.001,2.0,0.002);
HiLB = Param ("Hi LookBack",1,1,BarCount-1,1);
pctL = Param ("Pivot Lo %", 0.325,0.001,2.0,0.002);
LoLB = Param ("Lo LookBack",1,1,BarCount-1,1);
Back = Param ("Extend Left = 2",1,1,500,1);
Fwd = Param("Plot Forward", 0, 0, 500, 1);
text = ParamToggle("Plot Text","Off|On",1);
hts = Param ("Text Shift", -33.5,-50,50,0.10);
style =ParamStyle("Line Style",styleLine,styleNoLabel);
x = BarIndex();
pRp = PeakBars( H, pctH, 1) == 0;
yRp0 = LastValue(ValueWhen( pRp, H, HiLB));
xRp0 = LastValue(ValueWhen( pRp, x, HiLB));
pSp = TroughBars( L, pctL, 1) == 0;
ySp0 = LastValue(ValueWhen( pSp, L, LoLB));
xSp0 = LastValue(ValueWhen( pSp, x, LoLB));
Delta = yRp0 - ySp0;

function fib(ret) {
retval = (Delta * ret);
Fibval = IIf(ret < 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret < 1.0
AND xSp0 > xRp0, ySp0 + retval,IIf(ret > 1.0
AND xSp0 < xRp0, yRp0 - retval, IIf(ret > 1.0
AND xSp0 > xRp0, ySp0 + retval, Null))));
return FibVal;
}

x0 = Min(xSp0,xRp0)-Back;
x1 = (BarCount -1);
//////////////////////////////////////////////////////////////////
r236 = fib(0.236); r236I = LastValue (r236,1);
r382 = fib(0.382); r382I = LastValue (r382,1);
r050 = fib(0.50); r050I = LastValue (r050,1);
r618 = fib(0.618); r618I = LastValue (r618,1);
r786 = fib(0.786); r786I = LastValue (r786,1);
e127 = fib(1.27); e127I = LastValue (e127,1);
e162 = fib(1.62); e162I = LastValue (e162,1);
e200 = fib(2.00); e200I = LastValue (e200,1);
e262 = fib(2.62); e262I = LastValue (e262,1);
e424 = fib(4.24); e424I = LastValue (e424,1);
//////////////////////////////////////////////////////////////////
p00 = IIf(xSp0 > xRp0,ySp0,yRp0); p00I = LastValue (p00,1);
p100 = IIf(xSp0 < xRp0,ySp0,yRp0); p100I = LastValue (p100,1);
color00 =IIf(xSp0 > xRp0,colorLime,colorRed);
color100 =IIf(xSp0 < xRp0,colorLime,colorRed);
//////////////////////////////////////////////////////////////////
numbars = LastValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
//////////////////////////////////////////////////////////////////
if(fibs==1) {
Plot(LineArray(xRp0-Fwd,yRp0,x1,yRp0,Back),"PR",32,styleThick |
styleNoRescale | styleNoLabel | styleNoTitle,Null, Null,Fwd);
Plot(LineArray(xSp0-Fwd,ySp0,x1,ySp0,Back),"PS",27, styleThick |
styleNoRescale | styleNoLabel | styleNoTitle,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r236,x1,r236,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r382,x1,r382,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r050,x1,r050,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r618,x1,r618,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,r786,x1,r786,Back),"",colorBlack,style|styleNoRescale |
styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e127,x1,e127,Back),"e127",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e162,x1,e162,Back),"e162",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e200,x1,e200,Back),"p200",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e262,x1,e262,Back),"p262",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);
Plot(LineArray(x0-Fwd,e424,x1,e424,Back),"p424",colorBlack,style|styleNoRescale
| styleNoLabel | styleDashed,Null, Null,Fwd);

}
//////////////////////////////////////////////////////////////////
if(text==1) {
PlotText(" 0% = " + WriteVal(p00,fraction),
LastValue(BarIndex())-(numbars/hts), p00I + 0.05, color00);
PlotText("23% = " + WriteVal(r236,fraction),
LastValue(BarIndex())-(numbars/hts), r236I + 0.05, colorBlack);
PlotText("38% = " + WriteVal(r382,fraction),
LastValue(BarIndex())-(numbars/hts), r382I + 0.05, colorBlack);
PlotText("50% = " + WriteVal(r050,fraction),
LastValue(BarIndex())-(numbars/hts), r050I + 0.05, colorBlack);
PlotText("62% = " + WriteVal(r618,fraction),
LastValue(BarIndex())-(numbars/hts), r618I + 0.05, colorBlack);
PlotText("78% = " + WriteVal(r786,fraction),
LastValue(BarIndex())-(numbars/hts), r786I + 0.05, colorBlack);
PlotText("100% = " + WriteVal(p100,fraction),
LastValue(BarIndex())-(numbars/hts),p100I + 0.05, color100);
PlotText("127% = " + WriteVal(e127,fraction),
LastValue(BarIndex())-(numbars/hts),e127I + 0.05, colorBlack);
PlotText("162% = " + WriteVal(e162,fraction),
LastValue(BarIndex())-(numbars/hts),e162I + 0.05, colorBlack);
PlotText("200% = " + WriteVal(e200,fraction),
LastValue(BarIndex())-(numbars/hts),e200I + 0.05, colorBlack);
PlotText("262% = " + WriteVal(e262,fraction),
LastValue(BarIndex())-(numbars/hts),e262I + 0.05, colorBlack);
PlotText("424% = " + WriteVal(e424,fraction),
LastValue(BarIndex())-(numbars/hts),e424I + 0.05, colorBlack);
}
_SECTION_END();

_SECTION_BEGIN("Pivot");

YH = TimeFrameGetPrice("H", inDaily, -1); // yesterdays high
YL = TimeFrameGetPrice("L", inDaily, -1); // low
YC = TimeFrameGetPrice("C", inDaily, -1); // close
YO = TimeFrameGetPrice("O", inDaily); // current day open

//Normal Pivot
PP = (YH + YL + YC) / 3;
R1 = (2 * PP) - YL;
R2 = PP + (YH - YL);
R3 = YH + 2*(PP-YL);
S1 = (2 * PP) - YH;
S2 = PP - (YH - YL);
S3 = YL - 2*(YH - PP) ;

_SECTION_END();

_SECTION_BEGIN("TITLE");

//////////////////////////////////////////////////////////////////
if (tchoice=1 ) {
_N(Title = EncodeColor(colorWhite)+StrFormat(" {{NAME}} - {{INTERVAL}}
{{Date}} Open: %g, High: %g, Low: %g, Close: %g
{{VALUES}}",O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
}
//////////////////////////////////////////////////////////////////WriteVal(HC,fraction)

if (tchoice==2 ) {
Title = EncodeColor(colorBlack)+ Date() + " Close = " +
EncodeColor(colorRed) +Close +
EncodeColor(colorBlack) + " Open = " + EncodeColor(colorBlack) + O +
EncodeColor(colorBlack) + " High = " + EncodeColor(5) + H +
EncodeColor(colorBlack) + " Low = " + EncodeColor(colorRed) + L +
EncodeColor(colorBlack) + " Volume = " + EncodeColor(colorBlack) + V +
"\n\n"+
EncodeColor(colorBlack) + "Pivot Point= " + EncodeColor(colorBlack) + PP +
EncodeColor(colorBlack) + " Day's Open= " + EncodeColor(colorBlack) + YO
+
EncodeColor(colorBlack) + " Nifty = " + EncodeColor(colorBlack) +
Foreign("^NSEI","C") +"\n\n"+
EncodeColor(colorRed) + "R1= " + EncodeColor(colorBlack) + R1 +
EncodeColor(colorRed) + " R2= " + EncodeColor(colorBlack) + R2 +
EncodeColor(colorRed) + " R3= " + EncodeColor(colorBlack) + R3 +"\n"+
EncodeColor(colorGreen) + "S1= " + EncodeColor(colorBlack) + S1 +
EncodeColor(colorGreen) + " S2= " + EncodeColor(colorBlack) + S2 +
EncodeColor(colorGreen) + " S3= " + EncodeColor(colorBlack) + S3 +"\n"+
EncodeColor( colorBlack) +"_______________"+"\n"+
EncodeColor( colorBlack) + "424% = " + EncodeColor(25)+ e424 + " "
+"\n"+
EncodeColor( colorBlack) + "262% = " + EncodeColor(47)+ e262 + " "
+"\n"+
EncodeColor( colorBlack) + "200% = " + EncodeColor(47)+ e200 + " "
+"\n"+
EncodeColor( colorBlack) + "162% = " + EncodeColor(47)+ e162 + " "
+"\n"+
EncodeColor( colorBlack) + "127% = " + EncodeColor(47)+ e127 + " "
+"\n"+
EncodeColor( colorRed) + "Res = " + EncodeColor(32)+ p100 + " "+"\n"+
EncodeColor( colorBlack) + "78% = " + EncodeColor(42)+ r786 + " " +"\n"+
EncodeColor( colorBlack) + "62% = " + EncodeColor(43)+ r618 + " "+"\n"+
EncodeColor( colorBlack) + "50% = " + EncodeColor(41)+ r050 + " "+"\n"+
EncodeColor( colorBlack) + "38% = " + EncodeColor(44)+ r382 + " "+"\n"+
EncodeColor( colorBlack) + "23% = " + EncodeColor(45)+ r236+ " " +"\n"+
EncodeColor( colorGreen) + "Sup = " + EncodeColor(34)+ p00 + " " ;

}

_SECTION_END();

_SECTION_BEGIN("Up Trend Line");
UTValue1=LastValue(Trough(L,1,2));
UTValue2=ySp0;
UTBar1=BarCount - 1 - LastValue(TroughBars(L,1,2));
price_utbar1=Close[UTBar1];
UTBar2=xSp0;
price_utbar2=Close[UTBar2];
UpTrendLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 1 );
UTLine = LineArray( UTBar1, UTValue1, UTBar2,UTValue2, 0 );
Plot( UpTrendLine , _DEFAULT_NAME(), colorGreen,styleDots | styleNoTitle |
styleNoLabel);

Plot( UTLine , _DEFAULT_NAME(), colorGreen,styleDots | styleNoTitle |
styleNoLabel);
_SECTION_END();


_SECTION_BEGIN("Down Trend Line");
DTValue1=LastValue(Peak(H,1,2));
DTValue2=yRp0;
DTBar1=BarCount - 1 - LastValue(PeakBars(H,1,2));
price_dtbar1=Close[DTBar1];
DTBar2=xRp0;
price_dtbar2=Close[DTBar2];
DownTrendLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 1 );
DTLine = LineArray( DTBar1, DTValue1, DTBar2,DTValue2, 0 );

Plot( DownTrendLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle |
styleNoLabel);
Plot( DTLine ,_DEFAULT_NAME(), colorRed,styleDots | styleNoTitle |
styleNoLabel);

PlotOHLC( DownTrendLine , DownTrendLine , UpTrendLine , UpTrendLine , "",
colorYellow, styleCloud | styleNoRescale);

DTLine = LineArray(xRp0-Fwd,yRp0,x1,yRp0,Back);
UTLine = LineArray(xSp0-Fwd,ySp0,x1,ySp0,Back);


CBuy = Cross(C,DownTrendLine );
CSell = Cross(UpTrendLine ,C);

baratcbuy = LastValue(ValueWhen(CBuy,BarIndex()));
baratcsell = LastValue(ValueWhen(CSell,BarIndex()));

CBuy = CBuy AND BarIndex() == baratcbuy ;
CSell = CSell AND BarIndex() == baratcsell ;

PlotShapes(shapeUpTriangle* CBuy ,colorBlue,O,L);
PlotShapes(shapeDownTriangle* CSell ,colorRed,O,H);

CBuy1 = Cross(C,DTLine );
CSell1 = Cross(UTLine ,C);

baratcbuy1 = LastValue(ValueWhen(CBuy1,BarIndex()));
baratcsell1 = LastValue(ValueWhen(CSell1,BarIndex()));

CBuy1 = CBuy1 AND BarIndex() == baratcbuy1 ;
CSell1 = CSell1 AND BarIndex() == baratcsell1 ;

PlotShapes(shapeHollowUpTriangle* CBuy1 ,colorBlue,O,L-1);
PlotShapes(shapeHollowDownTriangle* CSell1 ,colorRed,O,H-1);

_SECTION_END();


_SECTION_BEGIN("Auto");

ScanLookBack = Param("Scan Lookback", 1, 1, 25 );
Buy = ( CBuy OR CBuy1) AND ( (BarCount - baratcBuy )<=ScanLookBack OR
(BarCount - baratcbuy1 )<=ScanLookBack);
Sell = ( CSell OR CSell1) AND ( (BarCount - baratcsell )<=ScanLookBack OR
(BarCount - baratcsell1 )<=ScanLookBack ) ;

price = C[BarCount-1];

AlertIf(Buy,"","Buy @"+C+" Price @ Trigger="+price,1);
AlertIf(Sell,"","Sell @"+C+" Price @ Trigger="+price,2);

Filter = Buy OR Sell ;

Var = WriteIf(Buy,"BUY",WriteIf(Sell,"SELL",""));

AddTextColumn( Var , "Buy/Sell", 1.2 , colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(price ,"Price",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(C ,"Price @ Trigger",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));

stoploss = IIf(Buy, (price * (1-0.01)) , IIf(Sell, (price * (1+0.01)),0));
target1per = IIf(Buy, (price * (1+0.01)) , IIf(Sell, (price *
(1-0.01)),0));
target15per = IIf(Buy, (price * (1+0.015)) , IIf(Sell, (price *
(1-0.015)),0));
target2per = IIf(Buy, (price * (1+0.02)) , IIf(Sell, (price *
(1-0.02)),0));

AddColumn(stoploss ,"Stop Loss",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(target1per ,"1% Target",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(target15per ,"1.5% Target",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(target2per ,"2% Target",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));
AddColumn(V ,"Volume",1.2,colorBlack, IIf( Buy, colorLime,
IIf(Sell,colorOrange,colorWhite) ));

_SECTION_END();

GraphXSpace = 10;
 
Last edited:
D

deekonda

Member
#4
#4
I have one more! If you could correct this, really helpful for me
-------------------------------------------------------------------

_SECTION_BEGIN ( "Chart Display Theme" );
ChartDisplayTheme = ParamList ( "Chart Display Theme", "White background with B/W candles|Black background with R/G candles", 1 );
param_ShowSystemTitle = ParamToggle ( "Show System Title ?", "No|Yes", 1 );
_SECTION_END ();
TA_ChartDisplayTheme (ChartDisplayTheme);
//============================End of Chart Display Style=============================//
//============================Take User Inputs=============================//
_SECTION_BEGIN ( "Alerts" );
Param_AudioAlert = ParamToggle ( "Audio / text Alert?", "No|Yes", 1 );
Param_ShowValuesBox = ParamToggle ( "Display values in Box?", "No|Yes", 1 );
Param_BoxLocation = ParamList ( "Box Location?", "Left Top|Left Bottom|Right Top|Right Bottom", 0 );
Param_BoxBackgroundColour = ParamColor ( "Box background colour?",colorDarkGrey);
Param_HideBoxBehindChart = ParamToggle ( "Hide Box behind Chart?", "No|Yes" );
_SECTION_END ();
_SECTION_BEGIN ( "Money Management" );
Param_Show_Equity = ParamToggle ( "Show Equity ?(Enter correct INITIAL EQUITY in AA Settings)", "No|Yes" );
Param_Margin = Param ( "Margin required (used for backtesting only)", 15, 0.001, 100, 0.001 );
Param_LotSize = Param ( "Lot Size - DO NOT CHANGE", 50, 5, 5000, 5 );
Param_NoOfLots = Param ( "No of lots normally traded (used for backtesting only)", 2, 1, 10000, 1 );
Param_drawdown= ParamList ( "Trailing Stoploss Method - DO NOT CHANGE", "% of total trade value|Fixed amount per share" );
Param_Stoploss_percent = Param ( "Stoploss % per trade", 0.7, 0.01, 5, 0.01 );
Param_Stoploss_amount = Param ( "Stoploss Amount per share", 15, 0.01, 50000, 0.01 );
_SECTION_END ();
//============================End of User Inputs=============================//
//==========================Start of Show Resistance and Support Lines===============================//
_SECTION_BEGIN ( "Support-Resistance" );
Param_ShowResSup = ParamToggle ( "Show Resistance / Support ?", "No|Yes" );
Param_HowManyRS = Param ( "How many Support / Resistance to show ?", 2, 0, 10, 1 );
Param_ResSupVolatility = Param ( "Support / Resistance Volatility ", 0.1, 0.1, 100, 0.1 );
Param_SupLineColor = ParamColor ( "Support Line Color",colorBrightGreen);
Param_SupLineStyle = ParamStyle ( "Support Line Style", styleLine|styleNoTitle);
Param_ResLineColor = ParamColor ( "Resistance Line Color",colorRed);
Param_ResLineStyle = ParamStyle ( "Resistance Line Style", styleLine|styleNoTitle);
if(Param_ShowResSup AND Param_HowManyRS> 0 ) TA_ShowSupportResistance (Param_HowManyRS,Param_ResSupVolatility,Param_SupLineColor,Param_ResLineColor,Param_SupLineStyle,Param_ResLineStyle);
_SECTION_END ();
//===========End of Resistance and Support Lines===========//
_SECTION_BEGIN ( "Trading System" );
//====================Show Reversals ?====================//
Param_ShowReversals = ParamToggle ( "Show possible reversals ?", "No|Yes" );
if(Param_ShowReversals) TA_ShowReversals ();
//====================End of Show Reversals ?====================//
//====================Start of Trading System====================//
Param_ShowArrows = ParamToggle ( "Show Buy/Sell/Short/Cover Arrows ?", "No|Yes", 1 );
firstBarEntryExit = ParamToggle ( "First bar trade entry / exit ?", "No|Yes" );
A = Param ( "A - 14, 2, 25, 1 );
B = Param ( "B - 5, 2, 25, 1 );
CC = Param ( "C - 5, 1, 25, 1 );
D = Param ( "D - 5, 1, 25, 1 );
E = Param ( "E - 18, 1, 20, 1 );
TA_TradingSystemCheckEntry (A,B,CC,D,E,firstBarEntryExit);
_SECTION_END ();
//Settings for Backtester
//SetOption("InitialEquity", 100000);
SetOption ( "AllowSameBarExit", False);
SetOption ( "AllowPositionShrinking", True);
SetOption ( "FuturesMode", True);
SetOption ( "InterestRate", 0 );
SetOption ( "MaxOpenPositions", 1 );
RoundLotSize = Param_LotSize;
SetOption ( "MinShares",RoundLotSize);
SetOption ( "PriceBoundChecking",False);
//SetOption("CommissionMode",3);
//SetOption("CommissionAmount",12.5/RoundLotSize);
SetOption ( "AccountMargin",Param_Margin);
SetOption ( "ReverseSignalForcesExit",True);
SetOption ( "UsePrevBarEquityForPosSizing",True);
SetOption ( "GenerateReport", 1 );
SetOption ( "MaxOpenLong", 1 );
SetOption ( "MaxOpenShort", 1 );
PositionSize = C*RoundLotSize*Param_NoOfLots;
SetTradeDelays ( 1, 1, 1, 1 );
BuyPrice = Open;
SetOption ( "RefreshWhenCompleted",True);
//End of Settings for Backtester
TA_TradingSystemCheckExit (Param_drawdown,Param_NoOfLots,Param_Stoploss_Percent,Param_Stoploss_amount,Param_LotSize,firstBarEntryExit);
//====================End of Trading System====================//
//==================Plot Equity, Arrows, AudioAlerts and box containing values================//
TA_PlotEquityArrowsAlertsValueBox (Param_BoxLocation, Param_Show_Equity,Param_ShowArrows,Param_AudioAlert,param_ShowSystemTitle,Param_ShowValuesBox, Param_HideBoxBehindChart,Param_BoxBackgroundColour);
//=================== End of Plot Arrows, AudioAlerts and box containing values================//
//=================== Start of Volume Display================//
_SECTION_BEGIN ( "Volume Selector" );
showVolume = ParamToggle ( "Show Volume ?", "No|Yes", 1 );
displayStyle = ParamList ( "Volume Display Mode", "Normal Volume|Coloured Volume|Volume at Price|Volume at Price (grouped)|Volume at Price + Volume|Volume at Price + Coloured Volume|Volume at Price (grouped) + Volume|Volume at Price (grouped) + Coloured Volume|Customised VAP / candles|Customised VAP / candles + Volume|Customised VAP / candles + Coloured Volume" );
Param_NormalVolumeColor = ParamColor ( "Normal Volume Colour", colorDarkBlue);
Param_NormalVolumeStyle = ParamStyle ( "Normal Volume Style", styleHistogram | styleOwnScale | styleNoLabel, maskHistogram );
Param_UpVolumeColor = ParamColor ( "Up Volume Colour", colorGreen);
Param_DownVolumeColor = ParamColor ( "Down Volume Colour", colorRed);
Param_ColouredVolumeStyle = ParamStyle ( "Coloured Volume Style", styleHistogram | styleOwnScale | styleNoLabel, maskHistogram);
Param_VAPLinesCount = Param ( "VAP Lines Count", 100, 5, 1000, 1 );
Param_VAPLinesWidth = Param ( "VAP Lines Width", 40, 1, 100, 1 );
Param_VAPVolumeColor = ParamColor ( "VAP Color", colorGold);
Param_VAPSide = ParamToggle ( "VAP Side", "Left|Right" );
Param_VAPOverlay = 4 * ParamToggle ( "VAP Z-order", "On top|Behind", 1 );
Param_VAPStyle = 2 * ParamToggle ( "VAP(grouped) Style", "Fill|Lines", 1 );
Param_Segment = Param ( "No. of candles for Customized VAP", 10, 2, 1000, 1 );
if(showVolume)
{
segmentValue = IIf ( Interval () < inDaily, Day (), Month () );
segmentValue = segmentValue != Ref ( segmentValue, - 1 );
if(displayStyle == "Normal Volume" )
{
Plot ( Volume, "Vol ", Param_NormalVolumeColor, Param_NormalVolumeStyle, 2 );
}
else if(displayStyle == "Coloured Volume" )
{
Plot ( Volume, "Vol ", IIf ( C > O, Param_UpVolumeColor,Param_DownVolumeColor), Param_ColouredVolumeStyle, 2 );
}
else if (displayStyle == "Volume at Price" )
{
PlotVAPOverlay ( Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide | Param_VAPOverlay );
}
else if (displayStyle== "Volume at Price (grouped)" )
{
PlotVAPOverlayA (segmentValue, Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide | Param_VAPStyle | Param_VAPOverlay);
}
else if (displayStyle == "Volume at Price + Volume" )
{
Plot ( Volume, "Vol ", Param_NormalVolumeColor, Param_NormalVolumeStyle, 2 );
PlotVAPOverlay ( Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide | Param_VAPOverlay );
}
else if (displayStyle == "Volume at Price + Coloured Volume" )
{
Plot ( Volume, "Vol ", IIf ( C > O, Param_UpVolumeColor,Param_DownVolumeColor), Param_ColouredVolumeStyle, 2 );
PlotVAPOverlay ( Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide | Param_VAPOverlay );
}
else if (displayStyle== "Volume at Price (grouped) + Volume" )
{
Plot ( Volume, "Vol ", Param_NormalVolumeColor, Param_NormalVolumeStyle, 2 );
PlotVAPOverlayA (segmentValue, Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide | Param_VAPStyle | Param_VAPOverlay);
}
else if (displayStyle== "Volume at Price (grouped) + Coloured Volume" )
{
Plot ( Volume, "Vol ", IIf ( C > O, Param_UpVolumeColor,Param_DownVolumeColor), Param_ColouredVolumeStyle, 2 );
PlotVAPOverlayA (segmentValue, Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide | Param_VAPStyle | Param_VAPOverlay);
}
else if(displayStyle== "Customised VAP / candles" ) TA_ShowCustomizedVAP (Param_Segment,Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide,Param_VAPStyle,Param_VAPOverlay);
else if(displayStyle== "Customised VAP / candles + Volume" )
{
Plot ( Volume, "Vol ", Param_NormalVolumeColor, Param_NormalVolumeStyle, 2 );
TA_ShowCustomizedVAP (Param_Segment,Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide,Param_VAPStyle,Param_VAPOverlay);
}
else if(displayStyle== "Customised VAP / candles + Coloured Volume" )
{
Plot ( Volume, "Vol ", IIf ( C > O, Param_UpVolumeColor,Param_DownVolumeColor), Param_ColouredVolumeStyle, 2 );
TA_ShowCustomizedVAP (Param_Segment,Param_VAPLinesCount, Param_VAPLinesWidth, Param_VAPVolumeColor, Param_VAPSide,Param_VAPStyle,Param_VAPOverlay);
}
_SECTION_END ();
}
//=================== End of Volume Display================//
 
You must log in or register to reply here.
Thread starter Similar threads Forum Replies Date
M HELP Error Code AFL // Buy 5 session before end of month and Sell 3 sessión next month AmiBroker 0
C AFL Syntax Error AmiBroker 5
A Afl Error help Software 4
S Can Any body correct this afl. This showing syntax error AmiBroker 3
C PLEASE HELP FIX ERROR WHILE SCAN IN BELOW AFL Advanced Trading Strategies 0

Similar threads