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 ....
kani12121212 for Amibroker (AFL)
Copy & Paste Friendly
Back
_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 ) ) )); p=Param("Period",30,5,100,5); period=Optimize("Period",p,5,100,5); Hi=HHV(H,period); Lo=LLV(L,period); fib=Hi-Lo; fib382=(fib*0.382)+Lo; fib618=Hi-(fib*0.382); fib236=(fib*0.236); Hf236=Hi-fib236; Lf236=fib236+Lo; Plot(Lf236,"fib",colorYellow); Plot(Hf236,"fib",colorViolet); Plot(Hi,"Band",colorBlue); Plot(Lo,"Band",colorBlue); Plot(fib382,"fib",colorRed); Plot(fib618,"fib",colorWhite); parabuy= C>SAR(); parasell=C<SAR(); Buy=Cross(C,Lf236) AND C>O AND parabuy; Sell=Cross(Hf236,C) AND O>C AND parasell; Buy=ExRem(Buy,Sell); Sell=ExRem(Sell,Buy); PlotShapes(Buy*shapeUpArrow,colorGreen,0,L); PlotShapes(Sell*shapeDownArrow,colorRed,0,H); dist=3*ATR(10); for(i=0;i<BarCount;i++) { if(Buy[i]) PlotText(""+Lf236[i],i,L[i]-dist[i],colorWhite,colorBlack); if(Sell[i]) PlotText(""+Hf236[i],i,H[i]+dist[i],colorWhite,colorBlack); } //PM Ananth Exploration code bp=(abs(C)+abs(H))/2; target1=abs(H)+(H*0.045); target2=abs(H)+(H*0.09); stoploss=abs(H)-(H*0.021); Selltgt1=C-(C*0.03); Selltgt2=C-(C*0.05); Sellstop=C+(C*0.014); Filter= (Buy OR Sell) ; AddTextColumn(WriteIf(Buy,"Buy","Buy"), "Trade", 1.0, colorYellow, IIf(Buy, colorGreen,colorRed), 50); AddColumn((abs(H)*0.005)+abs(H),"BA/SB",1); AddColumn(IIf(Buy,target1,IIf(Sell,Selltgt1,0)),"Tgt 1",1); AddColumn(IIf(Buy,target2,IIf(Sell,Selltgt2,0)),"Tgt 2",1); AddColumn(IIf(Buy,stoploss,IIf(Sell,Sellstop,0)),"SL",1); AddColumn(V,"Volumn",1); //Exploration code is completed _SECTION_END(); "No Name Trading System"; //Listing - 1. Trigger Line and Close Line. /*__________________________________________________________________________________________________________________________________________ Credits - 1. No Name Trading System development for MT4 by Pip. 2. Trigger Lines & Close Line coded for MT4 by adoleh2000. 3. System transcoded for amibroker by rmike as per the original system developer's instructions. 4. Intellectual Copyright - Pip. ____________________________________________________________________________________________________________________________________________ Usage - Listing 1 Trading Template for the system. To be used in conjunction with Listing - 2 as per the system rules by the system developer (enclosed separately in the folder). The performance results of this system for live trades are available online - http://www.mt4i.com/users/pip Disclaimer - This AFL is for demonstration and educational purposes only as per the ideas presented by the system developer. The author neither makes any claims as to the efficacy of this template in live trading nor wishes to incite/ induce anyone to engage in live trading. If you use this AFL for live trading you are hereby forewarned that it will be entirely at your own discretion and risk and the system developer and author can in no way be held responsible for your decision. Warning - No one has the right to modify the code in any way or share this AFL without reference to and acknowledment of original authors. No one has the right to re-package and/ or commercialize/ market this strategy. __________________________________________________________________________________________________________________________________________*/ _SECTION_BEGIN("Trend Lines"); p1 = Param("TL 1 Periods", 20, 5, 50, 1); p2 = Param("TL 2 Periods", 5, 3, 25, 1); TL1 = LinearReg(C, p1); TL2 = EMA(TL1, p2); Col1 = IIf(TL1 > TL2, ParamColor("TL Up Colour", colorGreen), ParamColor("TL Dn Colour", colorRed)); Plot(TL1, "TriggerLine 1", Col1, styleLine|styleThick|styleNoLabel); Plot(TL2, "TriggerLine 2", Col1, styleLine|styleThick|styleNoLabel); _SECTION_END(); _SECTION_BEGIN("Close Line"); Col2 = IIf((C > TL1), ParamColor("CL Up Colour", colorBlue), ParamColor("CL Dn Colour", colorRed)); PlotShapes(shapeSmallCircle, Col2, 0, C, 0); 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", colorBlack ), styleNoTitle | styleBar); _SECTION_END(); ;