MULTIMOVING AVERGES WITH COLOUR for Amibroker (AFL)
venkatgr over 11 years ago Amibroker (AFL)
COLOUR CHANGES WITH TREND. NO NEED FOR ANY INDICATORS. ALWAYS WITH TREND.
Indicator / Formula
Copy & Paste Friendly
_SECTION_BEGIN("GUPPY MULTIMOVING AVERAGES AS SHOWN ON GUPPYs BOOK");
SetChartOptions(0, chartShowArrows | chartShowDates);
FastMAColor = ParamColor("Fast Group MA Color", colorRed);
SlowMAColor = ParamColor("Slow Group MA Color", colorGreen);
Plot(WMA(C, 3), _DEFAULT_NAME(), IIf(C > WMA( Close,3),colorGreen, colorRed), styleLine);
Plot(WMA(C,4), _DEFAULT_NAME(), IIf(C > WMA( Close,4),colorGreen, colorRed) ,styleLine);
Plot(WMA(C, 5), _DEFAULT_NAME(), IIf(C > WMA( Close,4),colorGreen, colorRed), styleLine);
Plot(WMA(C, 6), _DEFAULT_NAME(), IIf(C > WMA( Close,6),colorGreen, colorRed), styleLine);
Plot(WMA(C, 7), _DEFAULT_NAME(), IIf(C > WMA( Close,7),colorGreen, colorRed), styleLine);
Plot(WMA(C, 8), _DEFAULT_NAME(), IIf(C > WMA( Close,8),colorGreen, colorRed), styleLine);
Plot(WMA(C, 9), _DEFAULT_NAME(), IIf(C > WMA( Close,9),colorGreen, colorRed), styleLine);
Plot(WMA(C, 10), _DEFAULT_NAME(), IIf(C > WMA( Close,10),colorGreen, colorRed), styleLine);
Plot(WMA(C, 11), _DEFAULT_NAME(), IIf(C > WMA( Close,11),colorGreen, colorRed), styleLine);
Plot(WMA(C, 12), _DEFAULT_NAME(), IIf(C > WMA( Close,12),colorGreen, colorRed), styleLine);
Plot(WMA(C, 13), _DEFAULT_NAME(), IIf(C > WMA( Close,13),colorGreen, colorRed), styleLine);
Plot(WMA(C, 14), _DEFAULT_NAME(), IIf(C > WMA( Close,14),colorGreen, colorRed), styleLine);
Plot(WMA(C,15), _DEFAULT_NAME(), IIf(C > WMA( Close,15),colorGreen, colorRed), styleLine);
Plot(WMA(C, 16), _DEFAULT_NAME(), IIf(C > WMA( Close,16),colorGreen, colorRed), styleLine);
Plot(WMA(C, 17), _DEFAULT_NAME(), IIf(C > WMA( Close,17),colorGreen, colorRed), styleLine);
Plot(WMA(C, 18), _DEFAULT_NAME(), IIf(C > WMA( Close,18),colorGreen, colorRed), styleLine);
Plot(WMA(C, 19), _DEFAULT_NAME(), IIf(C > WMA( Close,19),colorGreen, colorRed), styleLine);
Plot(WMA(C, 20), _DEFAULT_NAME(), IIf(C > WMA( Close,20),colorGreen, colorRed), styleLine);
Plot(WMA(C, 21), _DEFAULT_NAME(), IIf(C > WMA( Close,21),colorGreen, colorRed), styleLine);
Plot(WMA(C,22), _DEFAULT_NAME(), IIf(C > WMA( Close,22),colorGreen, colorRed), styleLine);
Plot(WMA(C, 23), _DEFAULT_NAME(), IIf(C > WMA( Close,23),colorGreen, colorRed), styleLine);
Plot(WMA(C,24), _DEFAULT_NAME(), IIf(C > WMA( Close,24),colorGreen, colorRed), styleLine);
Plot(WMA(C, 25), _DEFAULT_NAME(), IIf(C > WMA( Close,25),colorGreen, colorRed), styleLine);
Plot(WMA(C, 26), _DEFAULT_NAME(), IIf(C > WMA( Close,26),colorGreen, colorRed), styleLine);
Plot(WMA(C, 27), _DEFAULT_NAME(), IIf(C > WMA( Close,27),colorGreen, colorRed), styleLine);
Plot(WMA(C, 28), _DEFAULT_NAME(), IIf(C > WMA( Close,28),colorGreen, colorRed), styleLine);
Plot(WMA(C,29), _DEFAULT_NAME(), IIf(C > WMA( Close,29),colorGreen, colorRed), styleLine);
Plot(WMA(C, 30), _DEFAULT_NAME(), IIf(C > WMA( Close,30),colorGreen, colorRed), styleLine);
Plot(WMA(C, 31), _DEFAULT_NAME(), IIf(C > WMA( Close,31),colorGreen, colorRed), styleLine);
Plot(WMA(C, 32), _DEFAULT_NAME(), IIf(C > WMA( Close,32),colorGreen, colorRed), styleLine);
Plot(WMA(C, 33), _DEFAULT_NAME(), IIf(C > WMA( Close,33),colorGreen, colorRed), styleLine);
Plot(WMA(C, 34), _DEFAULT_NAME(), IIf(C > WMA( Close,34),colorGreen, colorRed), styleLine);
Plot(WMA(C, 35), _DEFAULT_NAME(), IIf(C > WMA( Close,35),colorGreen, colorRed), styleLine);
Plot(WMA(C,36), _DEFAULT_NAME(), IIf(C > WMA( Close,36),colorGreen, colorRed), styleLine);
Plot(WMA(C, 37), _DEFAULT_NAME(), IIf(C > WMA( Close,37),colorGreen, colorRed), styleLine);
Plot(WMA(C, 38), _DEFAULT_NAME(), IIf(C > WMA( Close,38),colorGreen, colorRed), styleLine);
Plot(WMA(C, 39), _DEFAULT_NAME(), IIf(C > WMA( Close,39),colorGreen, colorRed), styleLine);
Plot(WMA(C, 40), _DEFAULT_NAME(), IIf(C > WMA( Close,40),colorGreen, colorRed), styleLine);
Plot(WMA(C, 41), _DEFAULT_NAME(), IIf(C > WMA( Close,41),colorGreen, colorRed), styleLine);
Plot(WMA(C, 42), _DEFAULT_NAME(), IIf(C > WMA( Close,42),colorGreen, colorRed), styleLine);
Plot(WMA(C, 43), _DEFAULT_NAME(), IIf(C > WMA( Close,43),colorGreen, colorRed), styleLine);
Plot(WMA(C, 44), _DEFAULT_NAME(), IIf(C > WMA( Close,44),colorGreen, colorRed), styleLine);
Plot(WMA(C, 45), _DEFAULT_NAME(), IIf(C > WMA( Close,45),colorGreen, colorRed), styleLine);
Plot(WMA(C, 46), _DEFAULT_NAME(), IIf(C > WMA( Close,46),colorGreen, colorRed), styleLine);
Plot(WMA(C, 47), _DEFAULT_NAME(), IIf(C > WMA( Close,47),colorGreen, colorRed), styleLine);
Plot(WMA(C, 48), _DEFAULT_NAME(), IIf(C > WMA( Close,48),colorGreen, colorRed), styleLine);
Plot(WMA(C, 49), _DEFAULT_NAME(), IIf(C > WMA( Close,49),colorGreen, colorRed), styleLine);
Plot(WMA(C, 50), _DEFAULT_NAME(), IIf(C > WMA( Close,50),colorGreen, colorRed), styleLine);
Plot(WMA(C, 51), _DEFAULT_NAME(), IIf(C > WMA( Close,51),colorGreen, colorRed), styleLine);
Plot(WMA(C, 52), _DEFAULT_NAME(), IIf(C > WMA( Close,52),colorGreen, colorRed), styleLine);
Plot(WMA(C, 53), _DEFAULT_NAME(), IIf(C > WMA( Close,53),colorGreen, colorRed), styleLine);
Plot(WMA(C, 54), _DEFAULT_NAME(), IIf(C > WMA( Close,54),colorGreen, colorRed), styleLine);
Plot(WMA(C, 55), _DEFAULT_NAME(), IIf(C > WMA( Close,55),colorGreen, colorRed), styleLine);
Plot(WMA(C, 56), _DEFAULT_NAME(), IIf(C > WMA( Close,56),colorGreen, colorRed), styleLine);
Plot(WMA(C, 57), _DEFAULT_NAME(), IIf(C > WMA( Close,57),colorGreen, colorRed), styleLine);
Plot(WMA(C, 58), _DEFAULT_NAME(), IIf(C > WMA( Close,58),colorGreen, colorRed), styleLine);
Plot(WMA(C, 59), _DEFAULT_NAME(), IIf(C > WMA( Close,59),colorGreen, colorRed), styleLine);
Plot(WMA(C, 60), _DEFAULT_NAME(), IIf(C > WMA( Close,60),colorGreen, colorRed), styleLine);
_SECTION_END();
SetChartOptions(0,chartShowArrows|chartShowDates);
GraphXSpace=5;
Plot(C,"",colorBlack,styleBar);
_SECTION_BEGIN("Magnified Market Price");
//by Vidyasagar, vkunisetty@yahoo.com//
FS=Param("Font Size",30,11,100,1);
GfxSelectFont("Times New Roman", FS, 700, True );
GfxSetBkMode( colorBlack );
GfxSetTextColor( ParamColor("Color",colorYellow) );
Hor=Param("Horizontal Position",1050,1,1200,1);
Ver=Param("Vertical Position",1,1,830,1);
GfxTextOut(""+C, Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Times New Roman", 11, 700, True );
GfxSetBkMode( colorYellow );
GfxSetTextColor(ParamColor("Color",colorGreen) );
GfxTextOut(""+DD+" ("+xx+"%)", Hor , Ver+45 );
_SECTION_END();4 comments
Leave Comment
Please login here to leave a comment.
Venkatgr ji, thanks for such a nice AFL .
What is suitable timeframe for intraday trading while using this AFL.
THANK YOU K3325.
Use 30 minutes Time Frame as the Primary TREND and 5 minutes for timing entry and exit.
BUY WHEN YOU SEE GREEN ABOVE THE LAST TOP MOST RED AND SELL WHEN YOU SEE RED BELOW LOWEST GREEN. IF YOU SEE COLOUR CHANGES WITHIN SHORT INTERVALS IN 5 MINUTES OR ANY OTHER TIME FRAME THE MARKET IS CHOPPY.AVOID .
Venkat Ji,
Can u please upload some screenshots explaining the Entry and Exit points.
Thanks.