[amibroker] Composite MACD Help requierd

["hitash_pandya" <hitash_pandya@xxxxxxxxxxx>]

Help required for AFL of MACD Composite, originally written by Mr. 
Jose Silva for Meta Stock.I have taken permission of Mr.Jose Silva 
regarding the same.

 
Metastock formula is as under:-
====================
MACD - composite EMA
====================
-----------------------------------------------

{ MACD or Histogram based on multiple EMA's }
{ Incorporating automatic overbought/oversold
  levels }
{ ©Copyright 2005 Jose Silva }
{ http://www.metastocktools.com }

{ User inputs }
plot1:=Input("[1]MACD,  [2]Histogram",1,2,1);
plot2:=Input("[1]MACD/Hist,  [2]Normalized",
1,2,1);
pds:=Input("Signal/Histogram EMA periods",
2,260,21);

{ Composite-EMA MACD/Histogram }
ema1:=
  Mov(C,3,E)
+Mov(C,5,E)
+Mov(C,8,E)
+Mov(C,11,E)
+Mov(C,14,E)
+Mov(C,17,E);
ema2:=
  Mov(C,30,E)
+Mov(C,35,E)
+Mov(C,40,E)
+Mov(C,45,E)
+Mov(C,50,E)
+Mov(C,56,E);
emaComp:=ema1-ema2;
signal:=Mov(emaComp,pds,E);
hist:=emaComp-signal;

{ Choose MACD or Histogram }
MacdH:=If(plot1=1,emaComp,hist);

{ Normalized MACD/Histogram }
normMod:=Highest(MacdH)-Lowest(MacdH);
normMod:=If(normMod=0,.000001,normMod);
MacdHnorm:=
((MacdH-Lowest(MacdH))/normMod-.5)*200;

{ Choose standard/normalized }
MacdComp:=If(plot2=1,MacdH,MacdHnorm);
signal:=Mov(MacdComp,pds,E);

{ MACD/Hist average }
avg:=Cum(MacdComp)/Cum(IsDefined(MacdComp));

{ MACD/Hist auto boundaries }
pk:=Ref(MacdComp,-1)>MacdComp
AND Ref(MacdComp,-1)>Ref(MacdComp,-2)
AND Ref(MacdComp,-1)>avg;
pkVal:=ValueWhen(1,pk,Ref(MacdComp,-1));
tr:=Ref(MacdComp,-1)<MacdComp
AND Ref(MacdComp,-1)<Ref(MacdComp,-2)
AND Ref(MacdComp,-1)<avg;
trVal:=ValueWhen(1,tr,Ref(MacdComp,-1));
Obought:=Cum(pkVal)/Cum(IsDefined(pkVal));
Osold:=Cum(trVal)/Cum(IsDefined(trVal));

{ Plot in own window }
Obought;                { Red  }
avg;                    { Grey }
Osold;                  { Blue }
If(plot1=1,signal,avg); { Green }
MacdComp                { Black }

Formula of Metastock available at 
http://www.metastocktools.com/MetaStock/MACDHcomp.txt also.

I have written part codes covering MACD and Signal in AFL as under:-

// Composite MACD
// Incorporating automatic overbought/oversold levels
// ©Copyright 2005 Jose Silva 

ema1=
EMA(C,3)
+EMA(C,5)
+EMA(C,8)
+EMA(C,11)
+EMA(C,14)
+EMA(C,17);
ema2=
EMA(C,30)
+EMA(C,35)
+EMA(C,40)
+EMA(C,45)
+EMA(C,50)
+EMA(C,56);
emaComp=ema1-ema2;
s=EMA(emaComp,21);
 
Plot(S , "SIGNAL", colorRed);
Plot(emaComp , "emaComp", colorBlue);
Plot(0,"",colorBlack,styleLine);
---------------------------------------------------

Unable to code for overbought/oversold.

Help requested for the complete code with Overbought/sold levels.

Thanks in advance.
Hitash Pandya



Content-Description: "AVG certification"
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.432 / Virus Database: 268.17.18/662 - Release Date: 1/31/2007 3:16 PM