Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
Intraday Swing Trading Strategy For Robo Traders for Amibroker (AFL)
Best Intraday Swing Trading strategy For Robo Traders,Back testable, Compatible with any robo Software (Buy Sell Short Cover) clearly mentioned. Swing Calculated using high and low of min 9bars .Stoploss with Initial and trailing Has been Added.
Screenshots
Indicator / Formula
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 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 | _SECTION_BEGIN ( "Best Intraday Strategy" ); //AFl by Viatrades // Created by viatrades team SetBarsRequired ( sbrAll , sbrAll ); SetPositionSize (1, spsShares ); 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 ) ) )); SetBarFillColor ( IIf ( C > O , colorDarkOliveGreen , IIf ( C <= O , colorBrown , colorLightGrey ))); Plot ( C , "\nPrice" , IIf ( C > O , colorBrightGreen , IIf ( C <= O , colorRed , colorLightGrey )),64| styleNoTitle ,0,0,0,0); DT = DateTime (); DN = DateNum (); TN = TimeNum (); function Asign(x) { y = Null ; for (i = 0; i < BarCount ; i++) { y[i] = x; } return y; } Slcalc = Param ( "Stop Loss %" , 1,0, 100, 0.01)/100; SlType = ParamToggle ( "StopLoss Type" , "Initial|Trailing" , 0); DayStart = DN != Ref (DN, -1); Dayscalc = Ref (DayStart, -9); DaysMeas = Flip (DayStart, Dayscalc); DayEnd = Ref (DayStart, 1); BY = Asign( False ); SL = Asign( False ); SH = Asign( False ); CV = Asign( False ); HGHcalc = HHV ( High , 5); LVLcalc = LLV ( Low , 5); LVLScalc = Null ; LVLTScalc = Null ; LVLTSArray = Null ; HVLTSArray = Null ; BYPrsV = Null ; SLPrsV = Null ; SHPrsV = Null ; CVPrsV = Null ; LSLV = Null ; SSLV = Null ; LSL = Null ; SSL = Null ; CCntr = 1; for (i = 1; i < BarCount ; i++) { if (CCntr == 1 && DayStart[i] == False ) { LVLScalc = HGHcalc[i-1]; LVLTScalc = LVLcalc[i-1]; } LVLTSArray[i] = LVLScalc; HVLTSArray[i] = LVLTScalc; CCntr--; if (CCntr <= 0 || DayStart[i] == True ) { CCntr = 1; } } Buy = High > LVLTSArray; Short = Low < HVLTSArray; Sell = Low < HVLTSArray; Cover = High > LVLTSArray; Buy = ExRem ( Buy , Sell ); Sell = ExRem ( Sell , Buy ); Short = ExRem ( Short , Cover ); Cover = ExRem ( Cover , Short ); BuyPrice = ValueWhen ( Buy , IIf ( Open > LVLTSArray, Open , LVLTSArray)); ShortPrice = ValueWhen ( Short , IIf ( Open < HVLTSArray, Open , HVLTSArray)); SellPrice = IIf ( Sell && Open < HVLTSArray, Open , HVLTSArray); CoverPrice = IIf ( Cover && Open > LVLTSArray, Open , LVLTSArray); LSL = BuyPrice - ( BuyPrice * Slcalc); SSL = ShortPrice + ( ShortPrice * Slcalc); if (SlType == True ) { HHVBy = HighestSince ( Buy , High ); LLVSh = LowestSince ( Short , Low ); LSL = IIf ( Buy , BuyPrice - ( BuyPrice * Slcalc), HHVBy - (HHVBy * Slcalc)); SSL = IIf ( Short , ShortPrice + ( ShortPrice * Slcalc), LLVSh + (LLVSh * Slcalc)); } Sell = Sell || Low <= LSL; Cover = Cover || High >= SSL; Buy = ExRem ( Buy , Sell ); Sell = ExRem ( Sell , Buy ); Short = ExRem ( Short , Cover ); Cover = ExRem ( Cover , Short ); SellPrice = IIf ( Sell && Low <= LSL && Open < LSL, Open , IIf ( Sell && Low <= LSL, LSL, SellPrice )); CoverPrice = IIf ( Cover && High >= SSL && Open > SSL, Open , IIf ( Cover && High >= SSL, SSL, CoverPrice )); PlotShapes ( IIf ( Buy , shapeUpArrow , shapeNone ), colorBrightGreen , 0, Low , -15, 0); PlotShapes ( IIf ( Sell , shapeStar , shapeNone ), colorRed , 0, High , -15, 0); PlotShapes ( IIf ( Short , shapeDownArrow , shapeNone ), colorOrange , 0, High , -35, 0); PlotShapes ( IIf ( Cover , shapeStar , shapeNone ), colorTurquoise , 0, Low , -35, 0); LongTrue = Flip ( Buy , Sell ) || Sell ; ShortTrue = Flip ( Short , Cover ) || Cover ; Plot (LVLTSArray, "LVLTSArray" , colorGrey50 , styleStaircase | styleDashed ); Plot (HVLTSArray, "HVLTSArray" , colorGrey50 , styleStaircase | styleDashed ); Plot ( IIf (LongTrue, BuyPrice , Null ), "BuyPrice" , colorYellow , styleDashed | styleStaircase , Null , Null , 0, 1, 1); Plot ( IIf (LongTrue, LSL, Null ), "Long Stoploss" , colorCustom12 , styleDashed | styleStaircase , Null , Null , 0, 1, 1); Plot ( IIf (ShortTrue, ShortPrice , Null ), "ShortPrice" , colorYellow , styleDashed | styleStaircase , Null , Null , 0, 1, 1); Plot ( IIf (ShortTrue, SSL, Null ), "Short Stoploss" , colorCustom12 , styleDashed | styleStaircase , Null , Null , 0, 1, 1); _SECTION_END (); |
6 comments
Leave Comment
Please login here to leave a comment.
Back
many afl errors not plotting pls edit afl
What version of Amibroker are you using? I’m not seeing any errors.
Now this is my favorite alf. Moreover which time frame is best for day trading and swing value.
Thanks!
I am using amibroker 5.5 and facing a lot of errors in this afl
many afl errors AMIBROKER V5.3