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 ....
Trend Manager by Karthikmarar for Amibroker (AFL)
Rating:
5 / 5 (Votes 1)
Tags:
trading system, amibroker
This is the Trend Manager translated from Metatrader 4 to Amibroker by karithikmara. Works with Amibroker 5.10 and above.
Similar Indicators / Formulas
EMA crossover
Submitted
by Ketan-0 about 14 years ago
Kase Peak Osc. V2 batu
Submitted
by batu1453 over 10 years ago
Kase CD V2batu
Submitted
by batu1453 over 10 years ago
Ichimoku
Submitted
by prashantrdx over 10 years ago
Adaptive Price Zone (APZ)
Submitted
by AndrewThomas about 14 years ago
LANDIS Modified
Submitted
by isfandi about 14 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 | //Trend Manager- Translated by karthikmarar from MT4 code for inditraders.com forum//AFL works on amibroker version 5.20 and aboveSetChartBkColor(colorBlack);p=Param("period",7,3,20,1); pl1=ParamToggle("Plot Stoploss line","No,Yes",0);pl2=ParamToggle("Plot Setup signals","No,Yes",0);Hx=IIf(H<Ref(H,-p),Ref(H,-p),H);Lx=IIf(L>Ref(L,-p),Ref(L,-p),L);Hxl=IIf(H<Ref(H,-p),Ref(H,-p),H);Lxl=IIf(L>Ref(L,-p),Ref(L,-p),L);spana=(Hx+Lx)/2;spanb=Ref(spana,-2);for( i = p; i < BarCount; i++ ) {if (spana[i]>spanb[i]) { H1[i]=spana[i]; L1[i]=spanb[i]; O1[i]=L1[i]; C1[i]=H1[i]; }else { H1[i]=spanb[i]; L1[i]=spana[i]; O1[i]=H1[i]; C1[i]=L1[i]; }}SetBarFillColor( IIf(C>spanb,colorBlue,colorRed) );PlotOHLC(O1,H1,L1,C1,"",IIf(H>spana,colorBlack,colorBlack),ParamStyle("Plot Style",styleBar,maskPrice));Plot(C,"",ParamColor("Bar Color",colorLime),128+4);pd=(C>spanb AND Ref(C,-1)>Ref(spanb,-1));nd=(C<spana AND Ref(C,-1)<Ref(spana,-1));Buysetup= PD;Shortsetup=nd;Buysetupvalid=Flip (Buysetup, Shortsetup);Shortsetupvalid=Flip (Shortsetup, Buysetup);Buy=Cover= Ref (Buysetupvalid, - 1) ==1 AND H>ValueWhen (buysetup, H) +0.01;Short=Sell=Ref (Shortsetupvalid, - 1) ==1 AND L<ValueWhen (Shortsetup, L) - 0.01;Buy=ExRem (Buy, Sell);Sell=ExRem (Sell, Buy);Short=ExRem (Short, Cover);Cover=ExRem (Cover, Short);inlong=Flip(Buy,Sell);inshort=Flip(Sell,Buy);Plot(IIf(Buysetup AND pl1,spanb,Null),"",colorRed,styleDashed);Plot(IIf(shortsetup AND pl1,spanb,Null),"",colorRed,styleDashed);shortsetupvalid=ExRem (shortsetupvalid, buysetupvalid);buysetupvalid=ExRem (buysetupvalid, shortsetupvalid);PlotShapes (IIf (shortsetupvalid AND pl2,shapeDownTriangle, shapeNone), colorRed, 0, H, - 40); PlotShapes (IIf (buysetupvalid AND pl2,shapeUpTriangle, shapeNone), colorGreen, 0, L, - 40);SetChartOptions(0,chartShowArrows|chartShowDates);Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) )+ "\n"+"tm High = "+WriteVal(spana,1.4) + "\n"+"tm Low = "+WriteVal(spanb,1.4); |
3 comments
Leave Comment
Please login here to leave a comment.
Back
can this be converted to amibroker 4.80
Remove line 34 and I think it should work. Not 100% sure though.
good