[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Request for Easy Language help



PureBytes Links

Trading Reference Links


You could do something like this:


Inputs:

MFLen(21),
PersistLen(65);


Var:

Persist(0),
PcntPersist(0),
AccDist(0),  
MF(0), 
TotalSum(0);


If H - L <> 0 and V <> 0 then AccDist = ((C - L) - (H - C)) / (H - L) * V;

Totalsum = Summation(V, MFLen);

If Totalsum <> 0 then MF = 100 * Summation(AccDist, MFLen) / TotalSum;

If MF > 0 then Persist = 1 else Persist = 0;

PcntPersist = 100 * Summation(Persist, PersistLen)/PersistLen;


Plot1 (MF, "Money Flow");
Plot2 (0, "Zero");
Plot3(PcntPersist, "Persist");


Note:  I rescaled Money Flow (x100) in order to plot it on the same scale as PcntPersist.


The Omega Man


 ---- you wrote: 
> 
> Could someone kindly help transform the following ela code for Chaikin's
> Money Flow into his "Persistency of Money Flow."
> 
> As I understand it, the Persistency of Money Flow is the percentage of times
> the moneyflow stays above zero for a given number of days --- ie 65 days.
> Thanks for any help.
> 
>  Barry
>  ===================================================================
> 
>  Inputs:  length(21), UpVolColor(green), DownVolColor(Red),
>  low10color(white), uptencolor(white), topcolor(blue);
>  Variable: AccDist(0),  MF(0), totalsum(0);
> 
>  If high - low <> 0 and volume <> 0 then
>  AccDist = ((close-low) - (high - close)) / (high - low) * volume;
> 
>  Totalsum = summation(volume, length);
> 
>  If Totalsum <>0 then
>   MF = summation(AccDist, Length) / totalsum ;
> 
>     If MF > 0 Then
> 
> Plot1 (Mf, "money Flow");
> 
>   Plot2 (0, "0 line");
> 
>