2002 Jun: Trend Intensity Index, by M.H. Pee

ICE Data Services -


TrendIntensityIndex.efs  EFSLibrary - Discussion Board
  

File Name: TrendIntensityIndex.efs


Description:
Trend Intensity Index


Formula Parameters:
AvgLength: 60
DevCalcLength: 30
Thickness: 2
Line Color: Green
Display Cursor Labels: True

Notes:
The related article is copyrighted material. If you are not
a subscriber of Stocks & Commodities, please visit www.traders.com.

Download File:
TrendIntensityIndex.efs




EFS Code:






/*********************************Provided By:      eSignal (Copyright c eSignal), a division of Interactive Data     Corporation. 2008. All rights reserved. This sample eSignal     Formula Script (EFS) is for educational purposes only and may be     modified and saved under a new file name.  eSignal is not responsible    for the functionality once modified.  eSignal reserves the right     to modify and overwrite this EFS file with each new release.Description:            Trend Intensity Index Version:            1.0  01/12/2009Formula Parameters:                     Default:    AvgLength                           60    DevCalcLength                       30    Thickness                           2    Line Color                          Green    Display Cursor Labels               TrueNotes:     The related article is copyrighted material. If you are not    a subscriber of Stocks & Commodities, please visit www.traders.com.**********************************/var fpArray = new Array();var bInit = false;function preMain() {    setPriceStudy(false);    setShowCursorLabel(false);    setShowTitleParameters( false );        setStudyTitle("Trend Intensity Index ");    setCursorLabelName("TII", 0);    setCursorLabelName("Level Buy", 1);        setCursorLabelName("Level Sell", 2);    setDefaultBarFgColor(Color.green, 0);    setDefaultBarFgColor(Color.blue, 1);    setDefaultBarFgColor(Color.blue, 1);        setPlotType(PLOTTYPE_LINE, 0);     setPlotType(PLOTTYPE_LINE, 1);     setPlotType(PLOTTYPE_LINE, 2);         setDefaultBarThickness(2, 0);    setDefaultBarThickness(2, 1);    setDefaultBarThickness(2, 2);           askForInput();    var x=0;    fpArray[x] = new FunctionParameter("LineColor", FunctionParameter.COLOR);    with(fpArray[x++]){        setName("Line Color");        setDefault(Color.green);    }        fpArray[x] = new FunctionParameter("ViewValue", FunctionParameter.BOOLEAN);    with(fpArray[x++]){        setName("Display Cursor Labels");        setDefault(true);    }            fpArray[x] = new FunctionParameter("AvgLength", FunctionParameter.NUMBER);	with(fpArray[x++]){        setLowerLimit(1);		        setDefault(60);    }    fpArray[x] = new FunctionParameter("DevCalcLength", FunctionParameter.NUMBER);	with(fpArray[x++]){        setLowerLimit(1);		        setDefault(30);    }    fpArray[x] = new FunctionParameter("Thickness", FunctionParameter.NUMBER);	with(fpArray[x++]){        setName("Line Thickness");        setLowerLimit(1);		        setDefault(2);    }}var xAverage = null;function main(AvgLength, DevCalcLength, Thickness, LineColor, ViewValue) {var nSDPlus = 0;var nSDMinus = 0;var nDev = 0;var nOffset = 0;var nAvg = 0;var nTII = 0;    if ( bInit == false ) {         setDefaultBarFgColor(LineColor, 0);        setDefaultBarThickness(Thickness, 0);        setDefaultBarThickness(Thickness, 1);        setDefaultBarThickness(Thickness, 2);                setShowCursorLabel(ViewValue);           xAverage = sma(AvgLength);        bInit = true;     }     if (getCurrentBarCount() < AvgLength) return;    nAvg =  xAverage.getValue(0);    nSDPlus = 0 ;    nSDMinus = 0 ;    for (nOffset = 0; nOffset < DevCalcLength - 1; nOffset++) {        nDev = close(-nOffset) - nAvg ;        if (nDev > 0)             nSDPlus = nSDPlus + nDev;        else            nSDMinus = nSDMinus - nDev ;    }    nTII = nSDPlus / ( nSDPlus + nSDMinus ) * 100 ;    if (nTII == null) return;    return new Array(nTII, 80, 20); }