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 ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

MULTIMOVING AVERGES WITH COLOUR for Amibroker (AFL)
venkatgr
almost 10 years ago
Amibroker (AFL)

Rating:
4 / 5 (Votes 4)
Tags:
amibroker

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

1. k3325

Venkatgr ji, thanks for such a nice AFL .
What is suitable timeframe for intraday trading while using this AFL.

2. venkatgr

THANK YOU K3325.

Use 30 minutes Time Frame as the Primary TREND and 5 minutes for timing entry and exit.

3. venkatgr

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 .

4. sanjoy_roy

Venkat Ji,

Can u please upload some screenshots explaining the Entry and Exit points.

Thanks.

Leave Comment

Please login here to leave a comment.

Back