LTS Trend Line
The ‘LTS Trend Line’ AFL in Amibroker utilizes the platform’s AFL functionalities and the crucial Amibroker data feed. This indicator likely generates visual trend lines based on market data, aiding traders in identifying prevailing trends and potential reversals. By leveraging the Amibroker data feed, ‘LTS Trend Line’ provides graphical representations that assist traders in assessing market directionality and making informed decisions aligned with ongoing trends or possible shifts in market sentiment.
/
_SECTION_BEGIN("Linkon's Day Trading System");
icol = IIf ( MA (Close,14) > Ref (MA (Close,14),-1),colorGreen,colorRed);
Plot( MA( High, 14 ),"", icol, styleThick);
Plot( MA( Low, 14 ), "",icol, styleThick);
Color_buy = IIf(Close > EMA(Close,89) AND Close > MA(High,14),colorBlue,IIf(Close < EMA(Close,89) AND Close < EMA(Low,14),colorRed,colorYellow));
PlotOHLC( Open, High, Low, Close, "", Color_buy, styleCandle );
_SECTION_END();
_SECTION_BEGIN("EMA fabonachi");
fab5 = EMA(Close,5);
fab8 = EMA(Close,8);
fab13 = EMA(Close,13);
fab21 = EMA(Close,21);
fab34 = EMA(Close,34);
fab55 = EMA(Close,55);
fab89 = EMA(Close,89);
Color_fab5 = IIf(Close > fab5,ColorRGB(197,254,214),colorPink);
Color_fab8 = IIf(Close > fab8,ColorRGB(197,254,214),colorPink);
Color_fab13 = IIf(Close > fab13,ColorRGB(197,254,214),colorPink);
Color_fab21 = IIf(Close > fab21,ColorRGB(197,254,214),colorPink);
Color_fab34 = IIf(Close > fab34,ColorRGB(197,254,214),colorPink);
Color_fab55 = IIf(Close > fab55,ColorRGB(197,254,214),colorPink);
Color_fab89 = IIf(Close > fab89,ColorRGB(197,254,214),colorPink);
Plot( fab89, "", Color_fab89, styleDashed );
_SECTION_END();
dist = 0.25*ATR(10);
Capital=Param("Total capital",100000,10000,1000000,1000);
drawdown=Param("Max. loss per trade as % of Capital", 1.0,0.5,25.0,0.1);
room=Param("Room for S/L as % of Pivot value",0.001,0.001,0.02,0.001);
PH= ValueWhen(
(Ref(H,-2) > Ref(H, -4)) AND
(Ref(H,-2) > Ref(H, -3)) AND
(Ref(H,-2) > Ref(H, -1)) AND
(Ref(H,-2) > H), Ref(H,-2));
PL= ValueWhen(
(Ref(L,-2) <= Ref(L, -4)) AND
(Ref(L,-2) <= Ref(L, -3)) AND
(Ref(L,-2) <= Ref(L, -1)) AND
(Ref(L,-2) <= L), Ref(L,-2));
phfilter=PH+(room*PH);
plfilter=PL-(room*PL);
//Plot(Ref(PH,2), "UpPivot", ParamColor("UpPivot Color",colorGreen), styleDashed);
//Plot(Ref(PL,2), "DownPivot",ParamColor("DownPivot Color",colorRed), styleDashed);
/*
for (a=4;a= H[a-4]) AND
(H[a-2] >= H[a-3]) AND
(H[a-2] >= H[a-1]) AND
(H[a-2] >= H[a]))
PlotText("PH \n"+H[a-2], a-2, H[a-2], colorGreen);
if ((L[a-2] <= L[a-4]) AND
(L[a-2] <= L[a-3]) AND
(L[a-2] <= L[a-1]) AND
(L[a-2] <= L[a]))
PlotText("PL \n"+L[a-2], a-2, L[a-2]-dist[a-2], colorRed);
}
*/
_SECTION_END();
_SECTION_BEGIN("fabo cloud");
Lo = IIf (fab89>fab55,fab55,fab89);
Hi = IIf (fab89fab34,fab34,fab55);
Hi1 = IIf (fab55fab21,fab21,fab34);
Hi2 = IIf (fab34fab13,fab13,fab21);
Hi3 = IIf (fab21fab8,fab8,fab13);
Hi4 = IIf (fab13fab5,fab5,fab8);
Hi5 = IIf (fab8 EMA(C, 89), WriteVal(MA(H,25)),WriteVal(EMA(C,89)))
+ EncodeColor(colorGreen)+ " Trailing SL of :"+ EncodeColor(colorWhite)+EMA(L,25)
+ EncodeColor(colorRed)+ "\n Pivot Low : "+EncodeColor(colorWhite)+PL+EncodeColor(colorRed)+" Place SHORT Trigger at :"+ EncodeColor(colorWhite)+WriteIf(MA (L, 25) < EMA(C, 89), WriteVal(MA(L,25)),WriteVal(EMA(C,89))) + EncodeColor(colorRed)+" Training SL of :"+ EncodeColor(colorWhite)+EMA (H,25)
;