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 ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

Sentimental Dashboard for Amibroker (AFL)

Rating:
3 / 5 (Votes 4)
Tags:
amibroker

Sentimental Dashboard – Rajandran

Rajandran is a trading strategy designer and founder of Marketcalls, a hugely popular trading site since 2007 and one of the most intelligent blog in the world to share knowledge on Technical Analysis, Trading systems & Trading strategies.

Source: Here

Indicator / Formula

Copy & Paste Friendly
_SECTION_BEGIN("Sentimental Dashboard");


function jmatrix(timeframe)
{


TimeFrameSet( timeframe ); // switch to 5 minute frame 

rmat = HMA(RSIa((H+L+C+O)/4,5),5);   
   
TimeFrameRestore(); // restore time frame to original

return rmat;

}




rsx  =jmatrix(in15Minute);
rsx15  =jmatrix(inHourly);
rsx60  =jmatrix(inDaily);


Plot(0,"",colorBlack,styleNoDraw);
Plot(100,"",colorBlack);

PlotTextSetFont("", "Arial", 9, BarCount-1, Close[ BarCount - 3 ], colorGreen, colorDefault, -20 ); 


PlotText(NumToStr(Ref(rsx,-1),1.1,False), BarCount-1, 65, colorWhite, ColorHSB(10+(rsx[BarCount-1]*2),160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-2),1.1,False), BarCount-6, 65, colorWhite, ColorHSB(10+rsx[BarCount-2]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-3),1.1,False), BarCount-11, 65, colorWhite, ColorHSB(10+rsx[BarCount-3]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-4),1.1,False), BarCount-16, 65, colorWhite, ColorHSB(10+rsx[BarCount-4]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-5),1.1,False), BarCount-21, 65, colorWhite, ColorHSB(10+rsx[BarCount-5]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-6),1.1,False), BarCount-26, 65, colorWhite, ColorHSB(10+rsx[BarCount-6]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-7),1.1,False), BarCount-31, 65, colorWhite, ColorHSB(10+rsx[BarCount-7]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx,-8),1.1,False), BarCount-36, 65, colorWhite, ColorHSB(10+rsx[BarCount-8]*2,160,140), yoffset = 0 ) ;

PlotText("15 min ", BarCount-43, 65, colorRed, colorBlack, yoffset = 0 ) ;


PlotText(NumToStr(rsx15,1.1,False), BarCount-1, 50, colorWhite, ColorHSB(10+rsx[BarCount-1]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-1),1.1,False), BarCount-6, 50, colorWhite, ColorHSB(10+rsx15[BarCount-2]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-2),1.1,False), BarCount-11, 50, colorWhite, ColorHSB(10+rsx15[BarCount-3]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-3),1.1,False), BarCount-16, 50, colorWhite, ColorHSB(10+rsx15[BarCount-4]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-4),1.1,False), BarCount-21, 50, colorWhite, ColorHSB(10+rsx15[BarCount-5]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-5),1.1,False), BarCount-26, 50, colorWhite, ColorHSB(10+rsx15[BarCount-6]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-6),1.1,False), BarCount-31, 50, colorWhite, ColorHSB(10+rsx15[BarCount-7]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx15,-7),1.1,False), BarCount-36, 50, colorWhite, ColorHSB(10+rsx15[BarCount-8]*2,160,140), yoffset = 0 ) ;

PlotText("60min ", BarCount-43, 50, colorRed, colorBlack, yoffset = 0 ) ;


PlotText(NumToStr(rsx60,1.1,False), BarCount-1, 35, colorWhite, ColorHSB(10+rsx60[BarCount-1]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-1),1.1,False), BarCount-6, 35, colorWhite, ColorHSB(10+rsx60[BarCount-2]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-2),1.1,False), BarCount-11, 35, colorWhite, ColorHSB(10+rsx60[BarCount-3]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-3),1.1,False), BarCount-16, 35, colorWhite, ColorHSB(10+rsx60[BarCount-4]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-4),1.1,False), BarCount-21, 35, colorWhite, ColorHSB(10+rsx60[BarCount-5]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-5),1.1,False), BarCount-26, 35, colorWhite, ColorHSB(10+rsx60[BarCount-6]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-6),1.1,False), BarCount-31, 35, colorWhite, ColorHSB(10+rsx60[BarCount-7]*2,160,140), yoffset = 0 ) ;
PlotText(NumToStr(Ref(rsx60,-7),1.1,False), BarCount-36, 35, colorWhite, ColorHSB(10+rsx60[BarCount-8]*2,160,140), yoffset = 0 ) ;

PlotText("Daily ", BarCount-43, 35, colorRed, colorBlack, yoffset = 0 ) ;



_SECTION_END();

4 comments

2. al-hukker

it doesnot work lots of erors

3. mehra3580

working fine. thanks.

4. koyickal

Looks like the AFL requires 6.0 or later… thanks.

5. isc0rpi0

how to use it ?

Leave Comment

Please login here to leave a comment.

Back