Nirvana - The Discussion

Nehal_s143

Well-Known Member
sir, can you explain more about above chart and method discussed in http://www.traderji.com/amibroker/69879-nirvana-afl-mrtq13-137.html#post695898

also i need afl for this chart



afl found on net :)

// Intraday Statregy - ELH5 : zerolag/////////////////
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
SetChartBkGradientFill( ParamColor("Inner panel upper",colorBlack),ParamColor("Inner panel lower",colorBlack));
pds = Param("pds", 5,1,40);

a1=EMA(EMA(H,pds),pds); //DEMA of High
a2=EMA(a1,pds);
Difference=a1-a2;
a=a1+difference; //zerolag

b1=EMA(EMA(L,pds),pds); // DEMA of Low
b2=EMA(b1,pds);
Difference=b1-b2;
b=b1+difference; //zerolag


Plot(a,"DEHi",colorBlack,4);
Plot(b,"DELi",colorBlack,4);

//.....................................................
HiDay = TimeFrameGetPrice("H", inDaily);
LoDay = TimeFrameGetPrice("L", inDaily);
Plot(HiDay ,"",colorRed,styleLine); // ,styleOwnScale);
Plot(LoDay ,"",colorBrightGreen,styleLine); // , styleOwnScale);


//================================
HiHrly = TimeFrameGetPrice("H", inHourly);
LoHrly = TimeFrameGetPrice("L", inHourly);
Plot(HiHrly ,"",10,styleLine); //,styleOwnScale );
Plot(LoHrly ,"",50,styleLine); //,styleOwnScale );

//GraphXSpace=10;

Buy = C>a AND Ref(C,-1) > Ref(a, -1);
Sell = C<b AND Ref(C,-1) < Ref(b, -1);

Col = IIf(BarsSince(Buy) > BarsSince(Sell),colorOrange,colorBrightGreen);
Plot( C, "Cl.", Col, styleCandle );


Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);

shape=Buy*shapeUpArrow + Sell*shapeDownArrow;
PlotShapes( shape, IIf( Buy, colorBrightGreen, colorRed ),0, IIf( Buy, Low, High ),Offset=-15 );

//PlotShapes(shapeSmallCircle*(H==HiDay),colorBlue,0,H,20);
//PlotShapes(shapeSmallCircle*(L==Loday),colorBlue,0,L,-20);

PlotShapes(shapeStar*(H==HiHrly),4,0,H,20);
PlotShapes(shapeStar*(L==LoHrly),51,0,L,-20);

GraphXSpace =5;
dist = 1.5*ATR(10);

for( i = 0; i < BarCount; i++ )
{
if( Buy ) PlotText( "Ln@\n" + L[ i ], i, L[ i ]-dist, colorBrightGreen);
if( Sell ) PlotText( "Srt@\n" + H[ i ], i, H[ i ]+dist, colorOrange);

}

DayChange = Day() != Ref(Day(), -1);
AvgTradePrice = Null;
CurDayBars = 0;
CurDayCloseSum = 0;

for (i = 0; i < BarCount; i++)
{
if (DayChange)
{
CurDayCloseSum = C;
CurDayBars = 1;
}
else
{
CurDayCloseSum = CurDayCloseSum + C;
CurDayBars++;
}
AvgTradePrice = CurDayCloseSum / CurDayBars;
}

Plot(AvgTradePrice, "AvgTradePrice", 11, 1);

//PlotShapes(shapeCircle * DayChange, colorBlue, 0, C, 0);

//DH = HHV(H, DayChange);
//DL = LLV(L, DayChange);

//R1=((DH-DL)*0.33)+DL;
//R2=((DH-DL)*0.67)+DL;

//Plot(R1,"\nFib1",40,styleLine,styleThick);
//Plot(R2,"\nFib2",40,styleLine,styleThick);



_SECTION_BEGIN("trending ribbon");
GraphXSpace=20;
uptrend =PDI()>MDI()AND Signal()<MACD();
downtrend =MDI()>PDI()AND Signal()>MACD();

Plot( 2, /* defines the height of the ribbon in percent of pane width*/"ribbon",
IIf( uptrend, colorBrightGreen, IIf( downtrend, colorRed, 0 )), /* choose color */styleOwnScale|styleArea|styleNoLabel, -1, 100 );

_SECTION_END();

if( ParamToggle("Tooltip shows", "All Values|Only Prices" ) )
{
ToolTip=StrFormat("Open: %g\nHigh: %g\nLow: %g\nClose: %g (%.1f%%)\nVolume: "+NumToStr( V, 1.0 ), O, H, L, C, SelectedValue( ROC( C, 1 )));
}

Title =
EncodeColor(colorBrightGreen)+ "DELHi-7 zerolag" + " : " + Name() + " : " + EncodeColor(colorBrightGreen)+ Interval(1)
+ EncodeColor(colorBrightGreen) + " : " + Date() +" "
+"\n"+EncodeColor(10) +"Open -"+O +" ,"+" High -"+H +" ,"+" Low -"+L +" , "+ " Close -"+C +" , "+"Pr. Chng : " +StrFormat("%.2f%",C-Ref(C,-1))+ " , Volume : "+ WriteVal(V,1.0)
+EncodeColor(colorAqua)+ "\n Dz Hi : "+ EncodeColor(10)+WriteVal(a,1.2)
+EncodeColor(colorRed) + "\n Dz Lo : "+ EncodeColor(colorRed)+WriteVal(b,1.2)+"\n"+"\n"+
EncodeColor(colorBrightGreen) + "Day's Range = Rs." + EncodeColor(colorBrightGreen) + StrToNum(NumToStr((HiDay - LoDay), 1.2))+ "\n"+
EncodeColor(colorWhite) + "Hi of Day = Rs." + EncodeColor(colorWhite) + Hiday + "\n" +
EncodeColor(colorWhite) + "Lo of Day = Rs." + EncodeColor(colorWhite) + Loday + "\n" + "\n"+

EncodeColor(colorBrightGreen) + "Hourly Range = Rs." + EncodeColor(colorBrightGreen) + StrToNum(NumToStr((Hihrly - Lohrly), 1.2))+"\n"+
EncodeColor(colorWhite) + "Hi of Hr = Rs." + EncodeColor(colorWhite) + HiHrly + "\n" +
EncodeColor(colorWhite) + "Lo of Hr = Rs." + EncodeColor(colorWhite) + LoHrly + "\n" +"\n"+
EncodeColor(10)+"A.T.P : Rs. "+ EncodeColor(10)+AvgTradePrice ;
//EncodeColor(10)+"F2: Rs."+EncodeColor(10)+R2+"\n"+
//EncodeColor(10)+"F1: Rs."+EncodeColor(10)+R1+



_SECTION_BEGIN("Magnified Market Price");
//by Vidyasagar, [email protected]//
FS=Param("Font Size",28,11,100,1);
GfxSelectFont("Arial", FS, 700, italic = False, underline = False, True );
GfxSetBkMode( colorWhite );
GfxSetTextColor( ParamColor("Color",colorViolet) );
Hor=Param("Horizontal Position",766,1,1200,1);
Ver=Param("Vertical Position",1,1,1,1);
GfxTextOut("C:"+C,Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Arial", 12, 700, italic = False, underline = False, True );
GfxSetBkMode( colorWhite );
GfxSetTextColor(ParamColor("Color",colorViolet) );
//GfxTextOut(""+DD+" ("+xx+"%)", Hor+5, Ver+45 );

_SECTION_END();
 

sr114

Well-Known Member
I dont know how to use this afl in trading for good profit ?
Nehal , i compiled this afl for gettign the summary of the the day - that is - the the daily high and low and also the hourly hi and lo. it is not meant for any buy sell generation, so the concept of profit does not come here.

if u like it u use it, if u dont like it, dont use it.

btw where did u get this afl.

sr
 

Nehal_s143

Well-Known Member
Nehal , i compiled this afl for gettign the summary of the the day - that is - the the daily high and low and also the hourly hi and lo. it is not meant for any buy sell generation, so the concept of profit does not come here.

if u like it u use it, if u dont like it, dont use it.

btw where did u get this afl.

sr
I was searching on google for some afl, but accidentally found this, as too many site was open i don't remember exactly from where i downloaded this
 
Thread starter Similar threads Forum Replies Date
wisp Trading Diary 12
T AmiBroker 1
Y AmiBroker 1
E AmiBroker 4
A AmiBroker 1649

Similar threads