Stock Portfolio Organizer
The ultimate porfolio management solution.
Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Aroon Exploration for Amibroker (AFL)
Rating:
5 / 5 (Votes 1)
Tags:
amibroker, osicllator, exploration
Made Aroon exploration. Aroonp = ), means prices will or is rising. Members please add / modify and refine for better. Check out.
Indicator / Formula
Copy & Paste Friendly
Filter = Close > 0.1;
Filter = Volume > 1;
i=0;
_SECTION_BEGIN("Aroon");
L14 = LLV( Low, 14 );
H14 = HHV( High, 14 );
AroonDn =
100* (14 - (( IIf(Ref(L,-1) == L14 ,1 , IIf( Ref(L ,-2 ) == L14 ,2 , IIf( Ref(L
,- 3 ) ==
L14 ,3 ,IIf( Ref(L ,-4 ) == L14 ,4 ,IIf(Ref( L ,-5 ) == L14 ,5 ,IIf(Ref(L ,-6 )
==
L14 ,6 ,IIf( Ref(L ,-7 ) == L14 ,7 ,IIf(Ref( L ,-8 ) == L14 ,8 ,IIf(Ref( L ,-9
) ==
L14 ,9 ,IIf( Ref(L,-10) == LLV(L,14 ) ,10 ,IIf(Ref(L ,-11) == L14 ,11
,IIf(Ref(L,-12 ) ==
LLV(L ,14) ,12,IIf( Ref(L,-13) == LLV(L ,14 ) ,13 ,IIf( Ref( L,-14) == L14 ,14
,0) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) ) / 14;
AroonUp =
100 * ( 14 - ( ( IIf(Ref(H ,-1) == H14 ,1 ,IIf(Ref(H ,-2 ) == H14 ,2 ,IIf(Ref(H
,- 3 ) ==
H14 ,3, IIf(Ref(H ,-4 ) == H14 ,4 ,IIf(Ref(H ,-5 ) == H14 ,5 ,IIf(Ref(H ,-6 )
==
H14 ,6 ,IIf(Ref(H,-7 ) == H14 ,7 ,IIf(Ref(H ,-8 ) == H14 ,8 , IIf(Ref(H ,-9 )
==
H14 ,9 ,IIf(Ref(H ,-10 ) == H14 ,10 ,IIf(Ref(H ,-11 ) == H14 ,11 ,IIf(Ref(H
,-12 ) ==
H14 ,12 ,IIf(Ref(H ,-13) == H14 ,13 ,IIf(Ref(H ,-14 ) == H14 ,14 ,0 ) ) ) ) ) )
) ) ) ) ) ) ) ) ) ) ) / 14;
PL = Param("PL",14,4,200,1);
ALen = PL;
AroonUp = 100 * (ALen - (HHVBars(H, ALen + 1))) / Alen;
AroonDn = 100 * (ALen - (LLVBars(L, ALen + 1))) / ALen;
Plot(AroonUp, "Aroon Up", ParamColor( "Color up", colorCycle ), ParamStyle("Style up"));
Plot(AroonDn, "Aroon Dn", ParamColor( "Color Dn", colorCycle ), ParamStyle("Style Dn"));
sa= Cross(AroonUp,AroonDn);
sb= Cross(AroonDn,AroonUp);
AroonOsc=AroonUp-AroonDn;
Aroon=AroonOsc>0;
IIf(Aroon,i+1,i);
AroonStatus=WriteIf(Aroon,"Bullish",WriteIf(IsNull(RSI(14)),"N/A","Bearish"));
AroonColor=IIf(Aroon,colorGreen,IIf(IsNull(RSI(14)),colorLightGrey,colorRed));
AddTextColumn(AroonStatus,"Aroon",1,colorWhite,AroonColor);
AddColumn(Volume,"Volume",1.0);
AddColumn(Close, "Close", 1.2);
AddColumn(Ref(Close,-1), "Prev-Cl", 1.2);
AddColumn(AroonUp,"AroonUp",1.2);
AddColumn(AroonDn,"AroonDn",1.2);
AddColumn(sa,"Aup Cross Adn",1.2);
AddColumn(sb,"Adn Cross Aup",1.2);
AddColumn(MACD(12, 26), "MACD", 1.2 );
AddColumn(StochD(15,3, 3), "Stoch", 1.2 );
AddColumn( RSI(15), "RSI", 1.2 );
_SECTION_END();0 comments
Leave Comment
Please login here to leave a comment.
Back