/*********************************************************
Alexis C. Montenegro © October 2005                       
Use and/or modify this code freely. If you redistribute it
please include this and/or any other comment blocks and a 
description of any changes you make.                      
**********************************************************/

// NOTE:                                                                          
// This efs requires amStudies.efsLib in the FunctionLibrary folder.              
// If you do not have this file you can download it at the link below.            
// http://share.esignal.com/groupcontents.jsp?folder=Formulas-Libraries&groupid=10

var fpArray = new Array();

function preMain() {
    setPriceStudy(false);
    setStudyTitle("Chande Trendscore");
    setCursorLabelName("CT", 0);
    setDefaultBarFgColor(Color.blue, 0);
    setPlotType(PLOTTYPE_LINE,0);
    setDefaultBarThickness(1,0);
    var x=0;
    fpArray[x] = new FunctionParameter("Length", FunctionParameter.NUMBER);
	with(fpArray[x++]){
        setLowerLimit(1);		
        setDefault(10);
    }
    fpArray[x] = new FunctionParameter("barsBack", FunctionParameter.NUMBER);
	with(fpArray[x++]){
        setLowerLimit(1);		
        setDefault(10);
    }
	fpArray[x] = new FunctionParameter("Source", FunctionParameter.STRING);
	with(fpArray[x++]){
        addOption("open"); 
        addOption("high");
        addOption("low");
        addOption("close");
        addOption("hl2");
        addOption("hlc3");
        addOption("ohlc4"); 
        setDefault("close"); 
    }
    fpArray[x] = new FunctionParameter("Symbol", FunctionParameter.STRING);
    with(fpArray[x++]){
        setDefault();
	}
	fpArray[x] = new FunctionParameter("Interval", FunctionParameter.STRING);
	with(fpArray[x++]){
        setDefault();
    }
	fpArray[x] = new FunctionParameter("Params", FunctionParameter.BOOLEAN);
	with(fpArray[x++]){
        setName("Show Parameters");
        setDefault(false);
    }
}

var amLib = addLibrary("amStudies.efsLib");
var bInit = false;
var xCT = null;

function main(Length,barsBack,Source,Symbol,Interval,Params){
    if(bInit == false){
        with( amLib ) {
            if(Symbol == null) Symbol = getSymbol();
            if(Interval == null) Interval = getInterval();
            var vSymbol = Symbol+","+Interval;
            xCT = getSeries(amCT(Length,barsBack,eval(Source)(sym(vSymbol))));
            addBand( 0, PS_SOLID, 1, Color.black,"0");
            setShowTitleParameters(eval(Params));
            bInit = true;
        }
    }
    return xCT;
}