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

[EquisMetaStock Group] Re: trade directional trend index from esignal



PureBytes Links

Trading Reference Links


KURECKI,

Try this

http://trader.online.pl/MSZ/e-w-Directional_Trend_Index.html


Preston


--- In equismetastock@xxxxxxxxxxxxxxx, "K U R E K C I" <kurekci@xxxx> 
wrote:
> 
> 
> 
> i have the following code from esignal. i have foud this indicator 
very useful. especially effective in intraday.
> 
> is there anyone out there who is familiar with the laguage to 
convert this into metastock.
> 
> i also sent this before to daryl guppy. he also seemed interested 
and kindly forwarded it to his research team. but nothing yet...
> 
> good luck.
> 
> function preMain()
> 
> {
> 
>     setPriceStudy(false);
> 
>     setStudyTitle("Trade Directional Trend Index");
> 
>     setCursorLabelName("DTI_Trade", 0);
> 
>     setCursorLabelName("DTI", 1);
> 
>     setCursorLabelName("ZeroLine", 2);
> 
>     setDefaultBarFgColor(Color.red, 0);
> 
>     setDefaultBarFgColor(Color.blue, 1);
> 
>     setDefaultBarFgColor(Color.green, 2);
> 
>     setPlotType(PLOTTYPE_DOT, 0);
> 
>     setDefaultBarThickness(3, 0);
> 
>     setDefaultBarThickness(2, 1);
> 
>     setDefaultBarThickness(2, 2);
> 
> }
> 
> var rXA = 0.0;
> 
> var sXA = 0.0;
> 
> var uXA = 0.0;
> 
> var rXAAbs = 0.0;
> 
> var sXAAbs = 0.0;
> 
> var uXAAbs = 0.0;
> 
> var Val3 = 0.0;
> 
>  
> 
> var lrXA = 0.0;
> 
> var lsXA = 0.0;
> 
> var luXA = 0.0;
> 
> var lrXAAbs = 0.0;
> 
> var lsXAAbs = 0.0;
> 
> var luXAAbs = 0.0;
> 
> var Val3_1 = 0.0;
> 
>  
> 
>  
> 
> function main(r, s, u, OB, OS)
> 
> {
> 
>     if (getBarState() == BARSTATE_NEWBAR)
> 
>     {
> 
>         lrXA = rXA;
> 
>         lsXA = sXA;
> 
>         luXA = uXA;
> 
>         lrXAAbs = rXAAbs;
> 
>         lsXAAbs = sXAAbs;
> 
>         luXAAbs = uXAAbs;
> 
>         Val3_1 = Val3;
> 
>     }
> 
>     if (r == null) r = 14;
> 
>     if (s == null) s = 10;
> 
>     if (u == null) u = 5;
> 
>     if (OB == null) OB = 25;
> 
>     if (OS == null) OS = -25;
> 
>     var rFactor = 2 / (r + 1);
> 
>     var sFactor = 2 / (s + 1);
> 
>     var uFactor = 2 / (u + 1);
> 
>     var HMU = 0.0;
> 
>     var LMD = 0.0;
> 
>     var High = getValue("High", 0, -2);
> 
>     var Low = getValue("Low", 0, -2);
> 
>     if ((High[0] - High[1]) > 0)
> 
>     {
> 
>         HMU = High[0] - High[1];
> 
>     }
> 
>     else HMU = 0.0;
> 
>     if ((Low[0] - Low[1]) < 0)
> 
>     {
> 
>         LMD = -(Low[0] - Low[1]);
> 
>     }
> 
>     else LMD = 0.0;
> 
>     var Price = HMU - LMD;
> 
>     var PriceAbs = Math.abs(Price);
> 
>     rXA = rFactor * Price + (1 - rFactor) * lrXA;
> 
>     sXA = sFactor * rXA + (1 - sFactor) * lsXA;
> 
>     uXA = uFactor * sXA + (1 - uFactor) * luXA;
> 
>     rXAAbs = rFactor * PriceAbs + (1 - rFactor) * lrXAAbs;
> 
>     sXAAbs = sFactor * rXAAbs + (1 - sFactor) * lsXAAbs;
> 
>     uXAAbs = uFactor * sXAAbs + (1 - uFactor) * luXAAbs;
> 
>     var Val1 = 100 * uXA;
> 
>     var Val2 = uXAAbs;
> 
>     var DTI = 0.0;
> 
>     if (Val2 != 0) DTI = Val1 / Val2;
> 
>     else DTI = 0.0;
> 
>     Val3 = DTI;
> 
>     var Val4 = 0.0;
> 
>     var Val5 = 0.0;
> 
>     if (((Val3 - Val3_1) > 0)&&(Val3 > 0)) Val4 = Val3;
> 
>     else Val4 = 0.0;
> 
>     if (((Val3 - Val3_1) < 0)&&(Val3 < 0)) Val5 = Val3;
> 
>     else Val5 = 0.0;
> 
>     var DTI_Trade = Val4 + Val5;
> 
>     return new Array(DTI_Trade, DTI, 0);
> 
> }
> 
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.300 / Virus Database: 265.6.13 - Release Date: 
1/16/2005





------------------------ Yahoo! Groups Sponsor --------------------~--> 
What would our lives be like without music, dance, and theater?
Donate or volunteer in the arts today at Network for Good!
http://us.click.yahoo.com/Tcy2bD/SOnJAA/cosFAA/BefplB/TM
--------------------------------------------------------------------~-> 

 
Yahoo! Groups Links

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

<*> 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/