Skip to main content

Support Indicator (Bottom) for Amibroker (AFL)

nowrajhere over 12 years ago Amibroker (AFL)

  • Rating:
    4 / 5 (Votes 7)
  • Tags:
    amibroker

Hi,

This is only support indicator.

No a full indicator and for the result, I have attached screen shot.

Naveen Raj

Screenshots

Indicator / Formula

Copy & Paste Friendly
n=89; Av=23; stp=9;
n = Param("Periods",n,20,190,1);
av = Param("Average",av,2,30,1);
//n = Optimize("Periods",n,20,190,1);
//av = Optimize("Average",av,2,30,1);
stp = Optimize("Stop",stp,4,15,1);

RR= (C-MA(C,n))/EMA(ATR(1),n);

Plot( RR, "RR (" +WriteVal( n, 1.0 )+")" , 5, 5 );
Plot( 3, "" , 5, styleDashed );
Plot( -3, "" , 4, styleDashed );

RRAVG=MA(RR,av);

Plot(RRAVG,"AVG"+"("+WriteVal(Av, 1.0 )+")" ,colorRed,styleDots,styleDashed); 

Buy=Cross(RR,3);
Sell=Cross(0,RR);

////////////////////////////////////////////////////////////////

TD1 = ParamToggle("DAY","Hide|Show",1);
if(TD1==1) {
acc = Param("Acceleration", 0.08, 0, 1, 0.001 );
accm = Param("Max. acceleration", 0.2, 0, 1, 0.001 );
 
// Vertical Daily Segment
segments = IIf( Interval() < inDaily, Day(), Month() );
segments = segments != Ref( segments , -1 );
Plot( segments, "", colorGold, styleHistogram | styleOwnScale | styleDashed | styleNoLabel );
 
Volbar = TimeFrameGetPrice( "V", in1Minute * 20, 0 );
_TRACE( "Volbar = " + Volbar );
 
// Seconds Remaining
}

_SECTION_BEGIN("Ribbon");

Tr2 = Ref(C,1);
Tr3=Ref(C,8);
Trend2 = MA(Tr2,8);
Trend3=MA(Tr3,8);
Slope1=((Trend3-Trend2)/Trend3)*100;
//Plot(Slope1,"Buy When it is Green and Sell when it is Red or Pink",colorGold,styleLine+styleDots|styleThick);
 
 
Tr4 = Ref(C,8);
Tr5=Ref(C,13);
Trend3 = MA(Tr4,13);
Trend4=MA(Tr5,13);
Slope2=((Trend4-Trend3)/Trend4)*100;
Buy= nwbull=slope1 > 0 AND slope2 > 0 ;
Sell=nwbear=slope1 < 0 AND slope2 < 0 ;
 Plot( 1, /*efines the height of the ribbon in percent of pane width */"ribbon",
 IIf( nwbull, colorLime, IIf( nwbear, colorRed,IIf(Signal()<MACD(), colorPink, colorPink ))), /* choose color */
 styleOwnScale|styleArea|styleNoLabel, 0, 50 );
_SECTION_END();


SetChartBkColor(ParamColor("Background Color", colorBlack));


GraphXSpace = Param("GraphXSpace",18,-35,20,0.5);

8 comments

1. dineshpal
over 12 years ago

Thanks Navin, Please let us know about How to use this indicator during trading….dp

Report as Spam
2. nowrajhere
over 12 years ago

I am not able to attach alternative screen shot for your query.

Use all in one indicator.afl from Basic charts along with support indicator and check the result.

- Naveen Raj

Report as Spam
3. niklravi
over 12 years ago

hi
mr. Naveen
what time frame has to be used for intraday? can u send me both the file for my email ravinikl@yahoo.com

regards
ravi
Qatar
middle east

Report as Spam
4. nowrajhere
over 12 years ago

Hi all,

Minimum Time frame to trade is 30 min (My suggestions and trade). for good result. Don’t not trade less than 30 min. You will get more confusion.

- Raj

Report as Spam
5. RBuck
over 12 years ago

Naveen . . .

In the calculation for Slope . . . the Ref indicator is used with positive numbers . . . which is a look ahead value . . . therefore the slope calculation has perfect future vision . . . is that what was intended ? thanks . . rbuck

Report as Spam
6. RBuck
over 12 years ago

Naveen . . .

I took the liberty of modifying your code . . . and I like it. In addition to your double slope approach I added my ranking and screen filter. The out-of-sample results for a 3 position portfolio YTD against the IBD Week End Review Stocks was a 73% gain with all 22 trades profitable. Hope you can improve my modifications . . .
. . . by grace, rbuck

Ranking and Filter was . . . 

    M1 = Optimize("M1",628,0,950,1);
    M2 = Optimize("M2", 70,0,950,1);
    M3 = Optimize("M3",716,0,950,1);
  

    D1 = Optimize("D1", 18,2,20,1);
    A2 = Optimize("A2", 9,2,20,1);
    A3 = Optimize("A3",11,3,20,1);

    D2 = D1 + A2;
    D3 = D2 + A3;

    ROC1 = ROC(C,D1);
    ROC2 = Ref(ROC(C,A2),-D1);
    ROC3 = Ref(ROC(C,A3),-D2);
 

  PositionScore = M1 * ROC1 + M2 * ROC2 + M3 * ROC3;

    //  Market Timing with SPY ETF

  SPY = Foreign("SPY","Close");
  LookBack = Optimize("LookBack",4,3,35,1);
  CurrROC = ROC(SPY,Lookback);
  PrevROC = Ref(CurrROC,-1);
  EMABuy = Optimize("EmaBuy", -2,-10,50,1);
  SPYbuy = PrevROC > EMABuy;


Modified Double Slope Code was . . . .

  Tr2Back = Optimize("Tr2Back",-5,-35,-2,1);
  Tr2=Ref(C,Tr2Back);
  Trend2 = MA(Tr2,-Tr2Back);

  Tr3Back = Optimize("Tr3Back",-29,-35,-2,1);
  Tr3 = Ref(C,Tr3Back);
  Trend3=MA(Tr3,-Tr3Back);
  Slope1=((Trend3-Trend2)/Trend3)*100;
 
  Tr4Back = Optimize("Tr4Back",-10,-35,-2,1);
  Tr5Back = Optimize("Tr5Back",-27,-35,-2,1); 
  Tr4 = Ref(C,Tr4Back);
  Tr5 = Ref(C,Tr5Back);
  Trend4 = MA(Tr4,-Tr4Back);
  Trend5 = MA(Tr5,-Tr5Back);
  Slope2=((Trend5-Trend4)/Trend5)*100;

  SlopeRatio = Slope2*100 / Slope1;

  Buy= nwbull=slope1 > 0 AND slope2 > 0 AND SPYBuy ;
  Sell=nwbear=slope1 < 0 AND slope2 < 0 ;

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

 Short = 0; Cover = 0;
Report as Spam
7. skyduck
over 12 years ago

Naveen, I could not understand. Could you please be let me know how to use it in the trading (not intraday)? Thanks.

Report as Spam

Leave Comment

Please login here to leave a comment.