Line=LinRegSlope(C,13)
+ 100 * ( EMA( EMA( C - Ref( C, -1 ) ,34 ) ,21)
/ EMA( EMA( abs( C - Ref( C, -1) ),34 ), 21 ) )
+100 * ( EMA( EMA( C - (0.5 * ( HHV(H,13) + LLV(L,13))),21),3)
/ (0.5 * EMA( EMA( HHV(H,13) - LLV(L,13),21),3 ) ) );
Buy = Cross(Line, 0);
Sell = Cross(0, Line);
Colors =
IIF(Line >= 0, colorGreen, colorRed);
Plot(0, "", colorDarkGrey, styleLine);
Plot(Line, "Line", Colors);
PlotShapes(Buy * shapeUpArrow + Sell * shapeDownArrow, Colors);
--- In amibroker@xxxxxxxxx
ps.com, Bob Waits <bobwaits2@xx .> wrote:
>
> I came across the formula below. Any suggestions on how to write a "BUY" and "SELL" signal if the indicator crosses zero. Thanks.
>
> /* CCT Kaleidoscope
> **
> ** Originally developed by Steve Karnish
> ** http://www.cedarcre ektrading. com> **
> ** AFL translation by Tomasz Janeczko
> **
> ** Set scaling: Automatic
> ** Grid: Middle
> */
>
> Graph0=LinRegSlope( C,13)
> + 100 * ( EMA( EMA( C - Ref( C, -1 ) ,34 ) ,21)
> / EMA( EMA( abs( C - Ref( C, -1) ),34 ), 21 ) )
> +100 * ( EMA( EMA( C - (0.5 * ( HHV(H,13) + LLV(L,13))), 21),3)
> / (0.5 * EMA( EMA( HHV(H,13) - LLV(L,13),21) ,3 ) ) );
>