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

Time Frame Based 3 Averages Signals + MTF RSI Signal for Amibroker (AFL) V 1.2 for Amibroker (AFL)

Rating:
0 / 5 (Votes 0)
Tags:
rsi, MTF, averages, Signals, amibroker

Earlier I have made MTF Averages Signals, in Addition to that now MTF RSI status/signals are added.

RSI > 70 then colorBrightGreen // SuperBullish
RSI > 60 AND RSI <= 70 then colorPaleGreen // Bullish
RSI > 50 AND RSI <= 60 then colorTurquoise // Rising
RSI > 40 AND RSI <= 50 then colorYellow // FLAT
RSI >= 30 AND RSI <= 40 then colorLightOrange // Bearish
RSI <= colorCustom12 // Deep Bearish

Actually these status ranges are relative. Like – after fall* Rising stage of 50 to 60* can come and also when bullish trend is over it can come down in range of 60 to 50. So Trend is to be confirmed with Cross Over and direction of Averages
Same is applicable for all ranges.

Vertical and Horizontal Position is applicable to status/signal of RSI and Averages Cross Over both

Indicator / Formula

Copy & Paste Friendly

RSI is not on chart Price chart included

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
// By Mr. Abhimanyu Y. Altekar  abhimanyu.altekar@gmail.com
// 6th January 2025 V1.2
Hor=Param("Horizontal Position",55,05,1200,1);
Ver=Param("Vertical Position",90,5,1000,1);
IsxPlot2 = ParamToggle ("Plot Hourly & 5Min Averages Only", "No|Yes",1);
IsxPlot = ParamToggle ("Plot all Averages", "No|Yes",0);
 
function xSignalF(xTf,Hor,Ver,sxTf,isPlot)
{
TimeFrameSet(xTF);
ea5=EMA(C,5);
ea13=EMA(C,13);
ea21=EMA(C,21);
TRSI = RSI(14);
TimeFrameRestore();
    exTRSI= LastValue(SelectedValue( TimeFrameExpand( TRSI,xTF,expandLast )));
    RSIcolor =IIf(exTRSI > 70, colorBrightGreen,       // SuperBullish
              IIf(exTRSI > 60 AND exTRSI <= 70, colorpaleGreen,     // Bullish
              IIf(exTRSI > 50 AND exTRSI <= 60, colorTurquoise,      // Rising
              IIf(exTRSI > 40 AND exTRSI <= 50, colorYellow,    // FLAT
              IIf(exTRSI >= 30 AND exTRSI <= 40, colorLightOrange,   // Bearish
              colorCustom12)))));
 
 
exa5=TimeFrameExpand( ea5, xTF,expandLast );
exa13=TimeFrameExpand( ea13, xTF,expandLast );
exa21=TimeFrameExpand( ea21, xTF,expandLast );
if(isPlot)
{
Plot(exa5,"\n"+sxTf,colorGreen,styleThick);
Plot(exa13,sxTf,colorBlue,styleThick);
Plot(exa21,sxTf,colorOrange,styleThick);
}
sOK=WriteIf(exa5>exa13 OR exa5<exa13,"Ok" ,"Flat" );
sGood=WriteIf(exa5>exa13 AND exa5>exa21,"Good " ,"Flat" );
sBad=WriteIf(exa5<exa13 AND exa5<exa21,"Bad " ,"Flat" );
 
if(sOK=="Ok" )
 
GfxSetCoordsMode( 0 ); // bar/price mode (instead of pixel)
GfxSetZOrder(6);
GfxSelectSolidBrush(colorGold);
//PlotShapes(shapeCircle,colorGold,0,1,1,5);
if(sGood=="Good " )
GfxSelectSolidBrush(colorBrightGreen);
if(sBad=="Bad " )
GfxSelectSolidBrush(colorRed);
 
        GfxSelectFont("Times New Roman", 10, 400, True );
        GfxTextOut(sxTF,Hor+70, Ver-15);
        GfxRectangle( Hor+70,Ver+5,Hor+100,Ver+15 );
 
            GfxSelectFont("Times New Roman", 8, 300, True );
            GfxTextOut("R"+sxtf,Hor+68, Ver+50);
            GfxSelectSolidBrush(RSIColor);
            GfxRectangle( Hor+70,Ver+35,Hor+100,Ver+45 );
 
}
xSignalF(in5Minute,Hor,Ver,"5M",isxPlot);
xSignalF(in15Minute,Hor+40,Ver,"15M",isxPlot2);
xSignalF(in15Minute*2,Hor+85,Ver,"30M",isxPlot);
xSignalF(inHourly,Hor+125,Ver,"1H",isxPlot2);
xSignalF(inHourly*2,Hor+165,Ver,"2H",isxPlot);
xSignalF(inHourly*4,Hor+205,Ver,"4H",isxPlot);
xSignalF(inDaily,Hor+245,Ver,"Day",isxPlot);
xSignalF(inweekly,Hor+285,Ver,"WK",isxPlot);
 
 
 
SetChartOptions(0,chartShowDates|chartShowArrows|chartWrapTitle);
SetChartBkGradientFill( ParamColor("BgTop", colorLightGrey),ParamColor("BgBottom", colorTan),ParamColor("titleblock",colorLightGrey));
gxs=Param("GRAPH spaceing",5,5,50,5);
GraphXSpace = gxs;
_SECTION_BEGIN( "Price" ); 
GraphLabelDecimals = 2;
_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(),0,0,0,1 ); ;
_SECTION_END();

0 comments

Leave Comment

Please login here to leave a comment.

Back