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

VarMACD for Amibroker (AFL)
ippfx
about 12 years ago
Amibroker (AFL)

Rating:
2 / 5 (Votes 6)
Tags:
oscillator, amibroker

Variable MACD.

MACD indicator for different price fields and type of moving average.

Similar Indicators / Formulas

Febo RSI ..real indicator
Submitted by abhinavsingh over 12 years ago
Trading Volume Statistic
Submitted by tuanstock1 over 9 years ago
Ergodic Oscillator
Submitted by dljtrader over 13 years ago
3 Days Track
Submitted by janet0211 almost 14 years ago
Chande Momentum Oscillator
Submitted by klimpek over 13 years ago

Indicator / Formula

Copy & Paste Friendly
_SECTION_BEGIN("VarMACD");

MAType = ParamList("MA Type", "Simple,Exponential,Double Exponential,Triple Exponential,Wilders,Weighted");
PriceField = ParamField("Price Field");

r1 = Param( "Fast avg", 12 );
r2 = Param( "Slow avg", 26 );
r3 = Param( "Signal avg", 9 );

if (MAType == "Simple")					{ a = MA(PriceField, r1); b = MA(PriceField, r2); }
if (MAType == "Exponential")			{ a = EMA(PriceField, r1); b = EMA(PriceField, r2); }
if (MAType == "Double Exponential")	{ a = DEMA(PriceField, r1); b = DEMA(PriceField, r2); }
if (MAType == "Triple Exponential")	{ a = TEMA(PriceField, r1); b = TEMA(PriceField, r2); }
if (MAType == "Wilders")				{ a = Wilders(PriceField, r1); b = Wilders(PriceField, r2); }
if (MAType == "Weighted")				{ a = WMA(PriceField, r1); b = WMA(PriceField, r2); }

varMACD = a - b;

if (MAType == "Simple")					{ VarSignal = MA(VarMACD, r3); }
if (MAType == "Exponential")			{ VarSignal = EMA(VarMACD, r3); }
if (MAType == "Double Exponential")	{ VarSignal = DEMA(VarMACD, r3); }
if (MAType == "Triple Exponential")	{ VarSignal = TEMA(VarMACD, r3); }
if (MAType == "Wilders")				{ VarSignal = Wilders(VarMACD, r3); }
if (MAType == "Weighted")				{ VarSignal = WMA(VarMACD, r3); }


Plot( ml = varMACD, StrFormat(_SECTION_NAME()+"(%g,%g)", r1, r2), ParamColor("MACD color", colorRed ), ParamStyle("MACD style") );
Plot( sl = VarSignal, "Signal" + _PARAM_VALUES(), ParamColor("Signal color", colorBlue ), ParamStyle("Signal style") );

//HistogramColor = IIf(ml-sl > Ref(ml,-1)-Ref(sl,-1), colorSeaGreen, colorPink);
//Plot( ml-sl, "MACD Histogram", HistogramColor, styleNoLabel | styleNoTitle | styleHistogram | styleThick );

//ribbonHistogram = IIf( ml-sl > 0, colorGreen, IIf( ml-sl < 0, colorRed, colorLightGrey) );
//Plot(1, "", ribbonHistogram, styleOwnScale | styleArea | styleNoLabel | styleNoTitle, -0.5, 100);
GraphXSpace = 5;


_SECTION_END();

0 comments

Leave Comment

Please login here to leave a comment.

Back