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 ....
SAR - RSI SIGNAL for Amibroker (AFL)
Rating:
3 / 5 (Votes 7)
Tags:
amibroker
GOOD SIGNAL
Similar Indicators / Formulas
Kavach Of Karna v2
Submitted
by hbkwarez over 10 years ago
Advanced Elliott Waves
Submitted
by MarcosEn over 13 years ago
3_6Day GuaiLiLv
Submitted
by motorfly over 13 years ago
Williams Alligator System
Submitted
by durgesh1712 over 13 years ago
*Level Breakout system*
Submitted
by Tinych over 13 years ago
Horizontal Live Priceline Tool
Submitted
by northstar over 13 years ago
Indicator / Formula
Copy & Paste Friendly
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 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 | _SECTION_BEGIN("Price");SetChartOptions(0,chartShowArrows|chartShowDates);_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) ));trendup = IIf(MACD(12,26) > 0 AND MACD(12,26) > Signal(12,26,9), colorGreen, colorWhite);trendcolor = IIf(MACD(12,26) < 0 AND MACD(12,26) < Signal(12,26,9), colorRed, trendup);Plot( C, "Close", trendcolor, styleBar | styleThick );//RSIup = RSI(7) > 70;//RSIdown = RSI(7) < 30;sp = Param( "RSI Period", 7, 1, 100 );r = RSI( sp );RSIup = r > 70; RSIdown = r < 30;shape = RSIup * shapeSmallUpTriangle + RSIdown * shapeSmallDownTriangle;PlotShapes(shape, IIf( RSIup, colorGreen, colorRed ), 0, IIf( RSIup, Low, High ) ); if( ParamToggle("Tooltip shows", "All Values | Only Prices" ) ){ ToolTip=StrFormat("Open: %g\nHigh: %g\nLow: %g\nClose: %g (%.1f%%)\nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));}_SECTION_END();_SECTION_BEGIN("BBands");P = ParamField("Price field",-1);Periods = Param("Periods", 12, 2, 100, 1 );Width = Param("Width", 2, 0, 10, 0.05 );Color = ParamColor("Color", colorLightGrey );Style = ParamStyle("Style") | styleNoRescale;Plot( BBandTop( P, Periods, Width ), "BBTop" + _PARAM_VALUES(), Color, Style ); Plot( BBandBot( P, Periods, Width ), "BBBot" + _PARAM_VALUES(), Color, Style );// calcul average daily range pe ultimele 7 zileHD1 = TimeFrameGetPrice("H", inDaily, -1);LD1 = TimeFrameGetPrice("L", inDaily, -1);M1 = HD1 - LD1;HD2 = TimeFrameGetPrice("H", inDaily, -2);LD2 = TimeFrameGetPrice("L", inDaily, -2);M2 = HD2 - LD2;HD3 = TimeFrameGetPrice("H", inDaily, -3);LD3 = TimeFrameGetPrice("L", inDaily, -3);M3 = HD3 - LD3;HD4 = TimeFrameGetPrice("H", inDaily, -4);LD4 = TimeFrameGetPrice("L", inDaily, -4);M4 = HD4 - LD4;HD5 = TimeFrameGetPrice("H", inDaily, -5);LD5 = TimeFrameGetPrice("L", inDaily, -5);M5 = HD5 - LD5;HD6 = TimeFrameGetPrice("H", inDaily, -6);LD6 = TimeFrameGetPrice("L", inDaily, -6);M6 = HD6 - LD6;HD7 = TimeFrameGetPrice("H", inDaily, -7);LD7 = TimeFrameGetPrice("L", inDaily, -7);M7 = HD7 - LD7;//ADR = MA(High - Low,7);ADR = (M1+M2+M3+M4+M5+M6+M7)/7;tp = ADR*0.15;sl = ADR*0.1;//TimeFrameRestore();Plot(ADR, "\nADR", colorBlue, styleNoLine | styleNoRescale | styleNoLabel);Plot(tp, "TP", colorBlue, styleNoLine | styleNoRescale | styleNoLabel);Plot(sl, "SL", colorBlue, styleNoLine | styleNoRescale | styleNoLabel);// ---------------- _SECTION_END();_SECTION_BEGIN("Price");SetChartOptions(0,chartShowArrows|chartShowDates);_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) ));trendup = IIf(MACD(12,26) > 0 AND MACD(12,26) > Signal(12,26,9), colorGreen, colorBlack);trendcolor = IIf(MACD(12,26) < 0 AND MACD(12,26) < Signal(12,26,9), colorRed, trendup);Plot( C, "Close", trendcolor, styleBar | styleThick );//RSIup = RSI(7) > 70;//RSIdown = RSI(7) < 30;sp = Param( "RSI Period", 7, 1, 100 );r = RSI( sp );RSIup = r > 70; RSIdown = r < 30;shape = RSIup * shapeSmallUpTriangle + RSIdown * shapeSmallDownTriangle;PlotShapes(shape, IIf( RSIup, colorGreen, colorRed ), 0, IIf( RSIup, Low, High ) ); if( ParamToggle("Tooltip shows", "All Values | Only Prices" ) ){ ToolTip=StrFormat("Open: %g\nHigh: %g\nLow: %g\nClose: %g (%.1f%%)\nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));}_SECTION_END();_SECTION_BEGIN("SAR");acc = Param("Acceleration", 0.02, 0, 1, 0.001 );accm = Param("Max. acceleration", 0.2, 0, 1, 0.001 );Plot( SAR( acc, accm ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style", styleDots | styleNoLine, maskDefault | styleDots | styleNoLine ) );_SECTION_END(); |
2 comments
Leave Comment
Please login here to leave a comment.
Back
NICE AFL…….THANKS
This is a duplicate of one submitted earlier- “rockwell trading sytem”