|
PureBytes Links
Trading Reference Links
|
--- In amibroker@xxxxxxxxxxxxxxx, "Roberts R. Stewart"
<stewart.rob@xxxx> wrote:
> Because I did not have the correct email setting for this group in
> my profile, I did not get the TSV attachment that was sent in
> message # 62917, and since Yahoo does not store attachments
anymore,
> could someone send it to me directly. Thanks.
>
> stewart.rob@xxxx
Hi Robert,here are two TSV formulas I currently use:
T = 18; // For a TSV with 18 day period
TMA = 9; // For MA of TSV
Alpha = 2/(T+1);
TSVd=Nz ( ( C-Ref(C,-1)) / ( H-L ) ) * V;
// The following calculates Exponential Average for TSV
TSV_exp = 100*(AMA(TSVd,Alpha) * T/10000000);
//TSV_ref= ( Sum((( C-Ref(C,-1)) / ( H-L ))*V, T ) ) / 1000000; //for
reference
TSV_ref=(Sum(TSVd,T))/1000000;
// The following is simple TSV
TSV = MA(TSVd,T) * T/10000000;
TSV_MA = MA(TSV_exp,TMA);
Plot(TSV_Exp,"TSV ",9,styleLine+styleThick);
Plot(TSV_MA,"TSV Smooth ",colorWhite,styleLine);
Plot(TSV_ref,"TSV Raw ",12,styleArea+styleLeftAxisScale);
And a second one:
/* Volume Oscillator */
/* Indicator, system, and exploration */
/* Steve Wiser slwiserr@xxxxxxxxx */
PlusDM= IIf(High>Ref(High,-1) AND Low>=Ref(Low,-1), High-Ref(High,-1),
IIf(High>Ref(High,-1) AND Low<Ref(Low,-1)
AND High-Ref(High,-1)>Ref(Low,-1)-Low,
High-Ref(High,-1),0));
Vm=log(EMA(V,3));
Buy= (C-L)*Vm+ (H-O)*Vm +
IIf(C>O,(C-O)*Vm,0) + PlusDM*Vm +
IIf(Ref(C,-1)<O,(O-Ref(C,-1))*Vm,0);
MinDM = IIf(Low<Ref(Low,-1) AND High<=Ref(High,-1), Ref(Low,-1)-
Low,
IIf(High>Ref(High,-1) AND Low<Ref(Low,-1)
AND High-Ref(High,-1)<Ref(Low,-1)-Low, Ref(Low,-1)-
Low, 0));
Sell= (H-C)*Vm + (O-L)*Vm +
IIf(C<O,(O-C)*Vm,0) + MinDM*Vm +
IIf(Ref(C,-1)>O,(Ref(C,-1)-O)*Vm,0);
Wm=Wilders(Wilders(Buy,3)-Wilders(Sell,3),3);
Buy=Cross(Wm,0);
Sell=Cross(0,Wm);
Graph1=Wm;
/*Graph2=Wilders(Wm,30);*/
Graph2=MA(Wm,8);
Graph0=0;
Graph0Style=Graph1Style=Graph2Style=5;
Graph2Color=6;
Filter= (Buy==1) ;
NumColumns = 6;
Column0 =Ref(C+0.065,-1);
Column0Format = 1.2;
Column0Name = "Trigger Price";WriteVal(C+0.065);
Column1 = C;
Column1Name = "Close ";WriteVal(C);
Column1Format = 1.2;
Column2 = MA(V,17);
Column2Name = "17 Ma Vol ";WriteVal(MA(V,17) );
Column2Format = 1.0;
Column3 = MA(C,17)/MA(C,50);
Column3Name = "% 17/50 ";WriteVal( MA(C,17)/MA(C,50) );
Column3Format = 1.2;
Column3Format = 1.2;
Column4= MA(C,17);
Column4Name="17 C ma"; WriteVal( MA(C,17) );
Column4Format = 1.2;
Column4= MA(C,50);
Column4Name="50 C ma"; WriteVal( MA(C,50) );
Column4Format = 1.2;
Column5=Wm;
Column5Name="Vol Osc"; WriteVal(Wm);
Column5Format=1.2;
/* End of Exploration Code. */
Have fun!
Friendly,
Gilles
------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for your HP, Epson, Canon or Lexmark
Printer at MyInks.com. Free s/h on orders $50 or more to the US & Canada.
http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/mOAaAA/3exGAA/qnsNAA/GHeqlB/TM
---------------------------------------------------------------------~->
Send BUG REPORTS to bugs@xxxxxxxxxxxxx
Send SUGGESTIONS to suggest@xxxxxxxxxxxxx
-----------------------------------------
Post AmiQuote-related messages ONLY to: amiquote@xxxxxxxxxxxxxxx
(Web page: http://groups.yahoo.com/group/amiquote/messages/)
--------------------------------------------
Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|