Skip to main content

Wilders AFL Crossover



PM1 = Param("MA1",56,1,1500,1);
PM2 = Param("MA2",70,1,1500,1);

M1 = Wilders(Close,PM1);
M2 = Wilders(Close,PM2);
A = Cross(M1,M2);
B = Cross(M2,M1);


Hor1=Param(" LEFT/RIGHT",1,1,1660,1);
Ver1=Param(" UP DOWN",35,1,830,1);
FS1=Param(" Font Size",15,11,100,1);
GfxSelectFont("Tahoma", FS1, 200 );
GfxSetBkColor(colorBlack);
GfxSetTextColor(colorGold);
GfxTextOut("EMA "+ PM1 + " "+ Prec(M1,2),Hor1,Ver1);
GfxSetTextColor(colorGreen);
GfxTextOut("EMA "+ PM2 + " "+ Prec(M2,2),Hor1,Ver1+25);


Plot(M1," EMA: "+pm1,ParamColor("FAST EMA COLOR",colorGreen));
Plot(M2," EMA: "+pm2,ParamColor("SLOW EMA COLOR",colorRed));
PlotShapes(IIf(A,shapeUpArrow,shapeNone),colorYellow,0,L,Offset= -30);
PlotShapes(IIf(B,shapeDownArrow,shapeNone),colorCustom12,0,H,Offset = -30);
Filter = (A == 1) OR (B == 1);
AddColumn(A,"BUY/SELL",1,IIf(A,colorGreen,colorRed),colorWhite);
AddColumn(C,"CLOSE",1.2,colorGreen,colorWhite);
AddColumn(M1," EMA: "+PM1,1.2,ParamColor("FAST EMA COLOR",colorGreen),colorWhite);
AddColumn(M2," EMA: "+PM2,1.2,ParamColor("SLOW EMA COLOR",colorRed),colorWhite);

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

Comments

Post a Comment

Popular posts from this blog

ST GAP BUY SELL

 _SECTION_BEGIN("st gap buy sell"); Plot( C, "Close", ParamColor("Color", colorDefault ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); SetBarsRequired(sbrAll,sbrAll); xx=BarIndex();x=xx;Lx=LastValue(x); rightStrength=Optimize("R_S",Param("R_S",3,1,50,1) ,1,50,1); leftStrength=Optimize("L_S",Param("L_S",3,1,50,1), 1,50,1); function pkID(rightStrength,leftStrength) { pk=H>Ref(HHV(H,leftStrength),-1) AND H>=Ref(HHV(H,rightStrength),rightStrength); return pk; } function trID(rightStrength,leftStrength) { tr=L<Ref(LLV(L,leftStrength),-1) AND L<=Ref(LLV(L,rightStrength),rightStrength); return tr; } pk=pkID(rightStrength,leftStrength); tr=trID(rightStrength,leftStrength); SetChartBkColor(ColorRGB(0,0,0));SetChartOptions(0 ,chartShowDates); SetBarFillColor(IIf(C>O,colorGreen,IIf(C<=O,colorRed,colorLightGrey))); pkHigh1=Ref(ValueWhen(pk,H,1),-(rightStreng...
Post a Comment
Read more

TB 100.1.1 tsf tema linear

_SECTION_BEGIN("Magnified Market Price"); //by Vidyasagar, vkunisetty@yahoo.com// SetChartOptions(0,chartShowArrows|chartShowDates); FS=Param("Font Size",30,11,100,1); GfxSelectFont("Times New Roman", FS, 700, True ); GfxSetBkMode( colorWhite ); GfxSetTextColor( ParamColor("Color",colorWhite) ); Hor=Param("Horizontal Position",750,1,1200,1); Ver=Param("Vertical Position",7,1,830,1); GfxTextOut(""+C , Hor , Ver ); YC=TimeFrameGetPrice("C",inDaily,-1); DD=Prec(C-YC,2); xx=Prec((DD/YC)*100,2); GfxSelectFont("Times New Roman", 11, 700, True ); GfxSetBkMode( colorWhite ); GfxSetTextColor(ParamColor("Color",colorWhite) ); //GfxTextOut("Open - "+O+" High - "+H+" Low - "+L+" Close - "+C, Horr , Verr-14 ); //GraphXSpace = Param("Graph Space",500,-10,500,1); _SECTION_END(); _SECTION_BEGIN("Trend Blaster V1.2"); SetChartBkColor(...
Post a Comment
Read more

QQE LINE

function QQELine( indiValue, deltaRSIValue, smoothPeriod ) { local prevVal, prevIndi, qqeValue, indi_sum; local indi_diff, higherCond, lowerCond, result; prevVal = prevIndi = 0; qqeValue = Null; indi_sum = indiValue + deltaRSIValue; indi_diff = indiValue - deltaRSIValue; for ( i = 1; i < BarCount; i++ ) { prevVal = qqeValue[i - 1]; prevIndi = indiValue[i - 1]; higherCond = prevIndi > prevVal AND indiValue[i] > prevVal; lowerCond = prevIndi < prevVal AND indiValue[i] < prevVal; qqeValue[i] = Iif( indiValue[i] == prevVal, prevVal, Iif( lowerCond, Min( prevVal, indi_sum[i] ), Iif( higherCond, Max( prevVal, indi_diff[i] ), Iif( indiValue[i] > prevVal, indi_diff[i], indi_sum[i] ) ) ) ); } result = EMA( qqeValue, smoothPeriod );// EL XAverage is EMA return result; } // Modified Exponential Moving Average function MEMA( Price, Period ) { local smoothing, result; smoothing = 1 / Max( 1, Period ); result = AMA( Pric...
Post a Comment
Read more