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 ....
Buy And Sell for Amibroker (AFL)
Rating:
2 / 5 (Votes 9)
Tags:
trading system, amibroker, exploration
Safe Buy and sell
Similar Indicators / Formulas
OPTIMIZED ICHIMOKU
Submitted
by ritesh.bafna88 about 12 years ago
Reaction Trend System
Submitted
by ajayjain90 over 14 years ago
Behgozin Strength Finder
Submitted
by hotaro3 about 12 years ago
KPL with RSI
Submitted
by pdkg_gal over 14 years ago
Intraday Trend Break System
Submitted
by nishantndk over 14 years ago
ema crossovers
Submitted
by rushee.g1100 over 14 years ago
Indicator / Formula
Copy & Paste Friendly
wc = TimeFrameCompress( Close, in15Minute ); /* now the time frame is still unchanged (say daily) and our MA will operate on daily data */ dailyma = EMA( C, 39 ); /* but if we call MA on compressed array, it will give MA from other time frame */ weeklyma = EMA( wc, 39 ); // note that argument is time-compressed array weeklyma = TimeFrameExpand( weeklyma, in15Minute ); // expand for display Plot( weeklyma, "WeeklyMA", colorBlue ); wc = TimeFrameCompress( Close, in15Minute ); /* now the time frame is still unchanged (say daily) and our MA will operate on daily data */ dailyma = EMA( C, 104 ); /* but if we call MA on compressed array, it will give MA from other time frame */ weeklyma = EMA( wc, 104 ); // note that argument is time-compressed array weeklyma = TimeFrameExpand( weeklyma, in15Minute ); // expand for display Plot( weeklyma, "WeeklyMA", colorBrightGreen ); wc = TimeFrameCompress( Close, in15Minute ); /* now the time frame is still unchanged (say daily) and our MA will operate on daily data */ dailyma = MA( C, 104 ); /* but if we call MA on compressed array, it will give MA from other time frame */ weeklyma = MA( wc, 104 ); // note that argument is time-compressed array weeklyma = TimeFrameExpand( weeklyma, in15Minute ); // expand for display Plot( weeklyma, "WeeklyMA", colorLightGrey ); _SECTION_END(); _SECTION_BEGIN("Price"); SetChartOptions(0,chartShowArrows|chartShowDates); _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", colorWhite ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() ); _SECTION_END(); _SECTION_BEGIN("swing1"); no=20; res=HHV(H,no); sup=LLV(L,no); avd=IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0)); avn=ValueWhen(avd!=0,avd,1); supres=IIf(avn==1,sup,res); a=Cross(C,supres); b=Cross(supres,C); style = a * styleStaircase + b * styleStaircase; _SECTION_END(); DayH = SelectedValue(TimeFrameGetPrice("H", inDaily));// yesterdays high DayL = SelectedValue(TimeFrameGetPrice("L", inDaily));//low DayH1 = SelectedValue(TimeFrameGetPrice("H", inDaily, -1));// yesterdays high DayL1 = SelectedValue(TimeFrameGetPrice("L", inDaily, -1));//low DayH2 = SelectedValue(TimeFrameGetPrice("H", inDaily, -2));// yesterdays high DayL2 = SelectedValue(TimeFrameGetPrice("L", inDaily, -2));//low Range = ((DayH +DayH1 +DayH2)/3 - (DayL+DayL1+DayL2)/3); sr1= (Range *0.292)+DayL; sr2= Dayh-(Range *0.33); sr3= (Range *0.702)+DayL; sr4= DayH-(Range *0.655); style = styleLine | styleNoRescale|styleLine; Plot(sr1, "SR1",colorWhite ,styleDashed|styleNoRescale|styleThick); Plot(sr2, "SR2",colorGold ,styleDashed|styleNoRescale|styleThick); Plot(sr3, "SR3",colorPink , styleDashed|styleNoRescale|styleThick); Plot(sr4, "SR4",colorOrange ,styleDashed|styleNoRescale|styleThick); Bars_so_far_today = 1 + BarsSince( Day() != Ref(Day(), -1)); TT= RSIa(C,60); StartBar = ValueWhen(TimeNum() == 090000, BarIndex()); TodayVolume = Sum(TT,Bars_so_far_today); IIf (BarIndex() >= StartBar, VWAP = Sum (C * TT, Bars_so_far_today ) / TodayVolume,0); Plot (VWAP,"VWAP",colorOrange,4 +8+2048 ); _SECTION_BEGIN("Volume"); Plot( Volume, _DEFAULT_NAME(), ParamColor("Color", colorBrown ), styleNoTitle | ParamStyle( "Style", styleHistogram | styleOwnScale | styleThick | styleNoLabel, maskHistogram ), 2 ); _SECTION_END(); Plot(supres,"Swing",colorYellow,styleStaircase); SetChartBkGradientFill( ParamColor("BgTop", colorBlack), ParamColor("BgBottom", colorBlack),ParamColor("titleblock", colorBlack)); GraphXSpace = 5; _SECTION_BEGIN("EMA"); P = ParamField("Price field",-1); Periods = Param("Periods", 13); Plot( EMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") ); _SECTION_END(); _SECTION_BEGIN("DEMA"); P = ParamField("Price field",-1); Periods = Param("Periods", 65, 2, 3000, 1, 10 ); Plot( DEMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorAqua ), ParamStyle("Style") ); _SECTION_END(); A = DEMA (H,65); B = EMA (H,39); G = DEMA (L,65); I = EMA(L,39); D = Min (G,I); E = Max (A,B); /* Buy or Sell Condition */ Buy =Cover= Cross(Close,E); Sell = Short=Cross(D,Close); Buy = ExRem(Buy,Sell); Sell = ExRem(Sell,Buy); SellPrice=ValueWhen(Sell,C,1); BuyPrice=ValueWhen(Buy,C,1); Filter = Buy OR Sell; /* Exploration Parameters */ AddTextColumn( FullName(), "Company Name" ); AddColumn( Buy, "Buy", 1 ); AddColumn( Sell, "Sell", 1 ); AddColumn( C, "Close", 1.3 ); AddColumn( H, "High", 1.3 ); Title = EncodeColor(colorWhite)+ "Saihaj Arjit Rainy Rimple (SARR) Trading System" + " - " + Name() + " - " + EncodeColor(colorRed)+ Interval(2) + EncodeColor(colorWhite) + " - " + Date() +" - "+"\n" +EncodeColor(colorRed) +"Op-"+O+" "+"Hi-"+H+" "+"Lo-"+L+" "+ "Cl-"+C+" "+ "Vol= "+ WriteVal(V)+"\n"+ EncodeColor(colorLime)+ WriteIf (Buy , " GO LONG / Reverse Signal at "+C+" ","")+ WriteIf (Sell , " EXIT LONG / Reverse Signal at "+C+" ","")+"\n"+EncodeColor(colorWhite)+ WriteIf(Sell , "Total Profit/Loss for the Last Trade Rs."+(C-BuyPrice)+"","")+ WriteIf(Buy , "Total Profit/Loss for the Last trade Rs."+(SellPrice-C)+"",""); PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorGreen, 0, L, Offset=-40); PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorLime, 0,L, Offset=-50); PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset=-45); PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorRed, 0, H, Offset=40); PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorOrange, 0,H, Offset=50); PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset=-45); _SECTION_END();
1 comments
Leave Comment
Please login here to leave a comment.
Back
Good work. Thanks