- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2004-5-17
|
|
//DiNapoli MACD
A=(EMA(C,8.3896)-EMA(C,17.5185));
Sig=EMA(A,9.0503);
UpWard = BarsSince(A < Sig);
DnWard = BarsSince(A > Sig);
TrendBarCount = 2;
for( i = 0; i < BarCount; i++ )
{
if (UpWard >= TrendBarCount)
BarColor = 5;
else
if (DnWard >= TrendBarCount)
BarColor = 4;
else
BarColor = 3;
}
Plot(Sig,"",1,5);
Plot(a,"",4,1);
Plot(Sig,"Dinapoli MACD",IIf(Sig<0,BarColor,IIf(A<Sig,7,27)),6);
Plot(a,"Dinapoli MACD",IIf(A>0,27,4),6);
Plot(0,"",1,8);
//DiNapoli PER-STOCH
FK=((C - LLV(L,8))/(HHV(H,8) - LLV(L,8)))* 100;
FD=IIf(Cum(1)<4,FK,IIf(Cum(1)==4,MA(FK,3),AMA(FK,1/3)));
STO=IIf(Cum(1)<4,FD,IIf(Cum(1)==4,MA(FD,3),AMA(FK,1/3)));
Plot(STO,"",1,1);
Plot(MA(STO,3),"",2,1);
Plot(80,"Overbrought",15,1);
Plot(20,"Oversold",1,1);
Plot(50,"Mid",6,8);
Aside from Normal %K/D, only minor visual indifferences...
As MACD, Its Core intacted, I just throw in couple lines for fun.
So far... I believe the Fib-Nodes might be the only backbone of DiNapoli methods, since its concept based on overlapped Fib retracements from difference pivots/time frames.
later.:*6*:
[ Last edited by thingdi on 2005-2-28 at 14:31 ] |
|
|