[EquisMetaStock Group] Re: SVAPO

["miche1a" <mguibert@xxxxxxxxxxxx>]

{calculate the heikin-ashi closing average haCl and get the input 
variables}
haO:= (Ref((O+H+L+C)/4,-1) + PREV)/2;
haCl:= ((O+H+L+C)/4+haO+Max((O+H+L+C)/4,Max(H,haO))+Min
((O+H+L+C)/4,Min(L,haO)))/4;
period:= Input("SVAPO period :", 2, 20, 8);
cutoff:= Input("Minimum % price change :", 0, 10, 1);

{Inputs for standard deviation bands}
devH:= Input("Standard Deviation High :", 0.1, 5, 1.5);
devL:= Input("Standard Deviation Low :", 0.1, 5, 1.3);
stdevper:= Input("Standard Deviation Period :", 1, 200, 100);

{Smooth HaCl closing price}
haC:= Tema(haCl, period/1.6);

{Medium term MA of Volume to limit extremes and division factor}
vave:= Ref(Mov(V, period*5, S), -1);
vmax:= vave*2;
vc:= If(V < vmax, V, vmax);

{Basic volume trend}
vtr:= Tema(LinRegSlope(V, period), period);

{SVAPO result of price and volume}
SVAPO:= Tema(Sum(If(haC > (Ref(haC, -1)*(1+cutoff/1000)) AND
         Alert(vtr >= Ref(vtr, -1), 2), vc, If(haC < (Ref(haC, -1)*
(1-
cutoff/1000)) AND
         Alert(vtr > Ref(vtr, -1), 2), -vc, 0)), period)/(vave+1), 
period);
devH*Stdev(SVAPO, stdevper);
-devL*Stdev(SVAPO, stdevper);
zeroref:=0;
zeroref;
SVAPO





 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/equismetastock/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/equismetastock/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:equismetastock-digest@xxxxxxxxxxxxxxx 
    mailto:equismetastock-fullfeatured@xxxxxxxxxxxxxxx

<*> To unsubscribe from this group, send an email to:
    equismetastock-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/