TRADERS’ TIPS

September 2011

Here is this month’s selection of Traders’ Tips, contributed by various developers of technical analysis software to help readers more easily implement some of the strategies presented in this and other issues.

The code on this webpage represents the efforts of third party software developers to program the formulas described by Andrew Coles, Ph.D, in the article “TD Sequential And Ermanometry for Intraday Traders,” published in the September 2011 issue of Technical Analysis of Stocks & Commodities. The code that reflects Dr. Coles’s interpretation of the TD Sequential Indicator is referred to below as “September 2011 Traders’ Tips Article Code.”

Other code appearing in articles in this issue is posted in the Subscriber Area of our website at https://technical.traders.com/sub/sublogin.asp. Login requires your last name and subscription number (from mailing label). Once logged in, scroll down to beneath the “Optimized trading systems” area until you see “Code from articles.” From there, code can be copied and pasted into the appropriate technical analysis program so that no retyping of code is required for subscribers.

You can copy these formulas and programs for easy use in your spreadsheet or analysis software. Simply “select” the desired text by highlighting as you would in any word processing program, then use your standard key command for copy or choose “copy” from the browser menu. The copied text can then be “pasted” into any open spreadsheet or other software by selecting an insertion point and executing a paste command. By toggling back and forth between an application window and the open web page, data can be transferred with ease.

This month’s tips include formulas and programs for:

eSIGNAL
WEALTH-LAB
AMIBROKER
NEUROSHELL TRADER
AIQ
TRADERSSTUDIO
STRATASEARCH
TRADECISION
NINJATRADER
UPDATA
TRADESIGNAL
CHARTSY
TRADE NAVIGATOR
VT TRADER
MICROSOFT EXCEL
METASTOCK
BLOOMBERG

The computer code published on this webpage and in the September 2011 issue of this publication reflects the efforts of third parties to code the indicators discussed in the following article, published in the September 2011 issue of Technical Analysis of Stocks & Commodities: Andrew Coles, ‘TD Sequential and Ermanometry for Intraday Traders.’ The code published on this webpage or in the September 2011 issue of Stocks & Commodities is not sponsored or endorsed by, nor affiliated in any manner whatsoever with, Thomas DeMark or his company, Market Studies LLC, and it should not be confused with any indicator, software, product or service that he or his company may offer, or license others to offer, for purchase or licensing.

eSIGNAL: SEPTEMBER 2011

For this month’s Traders’ Tip, we’ve provided eSignal formulas based on Andrew Coles’ article in this issue.

The Ermanometry study (Figure 2) contains formula parameters to set the start date, start time, first wave period, and second wave period with options to show the Erman segments and Coles segments, which may be configured through the Edit Chart window. This September 2011 Traders’ Tips Article Code (Figure 3) also contains formula parameters to configure the price source, period, exhaustion period, buy setup, and sell setup colors.

Figure 2: eSIGNAL, September 2011 Traders’ Tips Article Code

Figure 3: eSIGNAL, Ermanometry STUDY

To discuss this study or download a complete copy of the formula code, visit the Efs Library Discussion Board forum under the Forums link from the support menu at www.esignal.com, or visit our Efs KnowledgeBase at www.esignal.com/support/kb/efs/. The eSignal formula scripts (Efs) are also shown here for copying and pasting, and can can be downloaded here: Ermanometry.efs and September 2011 Traders’ Tips Article Code.efs.

"Ermanometry.efs"

/*********************************
Provided By:  
    Interactive Data Corporation (Copyright ¬© 2010) 
    All rights reserved. This sample eSignal Formula Script (EFS)
    is for educational purposes only. Interactive Data Corporation
    reserves the right to modify and overwrite this EFS file with 
    each new release. 

Description:        
    Ermanometry For Intraday Traders
	
Version:            1.00  14/06/2010

Formula Parameters:                     Default:
Select Start Date                       First Bar On Chart
Start Date (mm/dd/yyyy)
Start Time                              00:00
The First Wave Period                   10
The Second Wave Period                  10
Show Erman Segments                     true
Erman Segments Color                    Color.yellow
Show Coles Segments                     true
Colse Segments Color                    Color.yellow

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

**********************************/

var bVersion = null;
var fpArray = new Array();
function preMain()
{
    setPriceStudy(true);
    setPlotType(PLOTTYPE_FLATLINES);

    var x = 0;
    fpArray[x] = new FunctionParameter("gFirstBar", FunctionParameter.STRING);
    with(fpArray[x++]){
        setName("Select Start Date");
        addOption("First Bar On Chart");
        addOption("User Defined");
        setDefault("First Bar On Chart"); 
    }

    fpArray[x] = new FunctionParameter("gStartDate", FunctionParameter.STRING);
    with (fpArray[x++])
    {
        setName("Start Date (mm/dd/yyyy)" );
        setDefault("");
    } 

    fpArray[x] = new FunctionParameter("gStartTime", FunctionParameter.STRING);
    with (fpArray[x++])
    {
        setName("Start Time (hh:mm)" );
        setDefault("00:00");
    } 

    fpArray[x] = new FunctionParameter("gWave1", FunctionParameter.INTEGER);
    with (fpArray[x++])
    {
        setName("The First Wave Period" );
        setLowerLimit(1);
        setDefault(10);
    } 

    fpArray[x] = new FunctionParameter("gWave2", FunctionParameter.INTEGER);
    with (fpArray[x++])
    {
        setName("The Second Wave Period" );
        setLowerLimit(1);
        setDefault(10);
    } 

    fpArray[x] = new FunctionParameter("gErman", FunctionParameter.BOOLEAN);
    with (fpArray[x++])
    {
        setName("Show Erman Segments");
        setDefault(true);
    }

    fpArray[x] = new FunctionParameter("gErmanColor", FunctionParameter.COLOR);
    with (fpArray[x++])
    {
        setName("Erman Segments Color");
        setDefault(Color. yellow);
    }
    
    fpArray[x] = new FunctionParameter("gColes", FunctionParameter.BOOLEAN);
    with (fpArray[x++])
    {
        setName("Show Coles Segments");
        setDefault(true);
    }

    fpArray[x] = new FunctionParameter("gColesColor", FunctionParameter.COLOR);
    with (fpArray[x++])
    {
        setName("Coles Segments Color");
        setDefault(Color. yellow);
    }
}

var bInit = false; 
var nRatio = 0;
var arrLogSpiral = new Array();
var arrErmanVal = null;
var arrColesVal = null;
var arrColesSign = new Array();
var cFixColor = null;
var startPos = 0;
var i = 0;
var offsetBar = null;
function main(gFirstBar, gStartDate, gStartTime, gWave1, gWave2, gErman, gErmanColor, gColes, gColesColor)
{
    if (bVersion == null) bVersion = verify();
    if (bVersion == false) return;     

    var retVal = null;

    if (getCurrentBarIndex() == 0 && getBarState() == BARSTATE_CURRENTBAR && cFixColor!=null) setBarBgColor(cFixColor);
    
  
    if (!bInit)
    {
        nRatio = gWave2 / gWave1;
        
        for (i = 0; i<=8; i++) arrLogSpiral[i] = Math.round( gWave1*Math.pow(nRatio, i-3) );
        arrLogSpiral[9] = Math.round( Math.sqrt(Math.pow(arrLogSpiral[7],2)+Math.pow(arrLogSpiral[8],2)) );
        arrLogSpiral[10] = Math.round( Math.sqrt(Math.pow(arrLogSpiral[2],2)+Math.pow(arrLogSpiral[3],2)) );
        arrLogSpiral[11] = Math.round( Math.sqrt(Math.pow(arrLogSpiral[4],2)+Math.pow(arrLogSpiral[5],2)) );
        
        arrErmanVal = new Array(
                                    arrLogSpiral[9], //FH
                                    arrLogSpiral[6], //GH
                                    arrLogSpiral[7], //HI
                                    arrLogSpiral[8], //IJ
                                    arrLogSpiral[3]+arrLogSpiral[4]+arrLogSpiral[2], //DE+EF+CD
                                    arrLogSpiral[6]+arrLogSpiral[7]+arrLogSpiral[8], //GH+HI+IJ
                                    arrLogSpiral[2]+arrLogSpiral[3]+arrLogSpiral[4]+arrLogSpiral[5]+arrLogSpiral[6]+arrLogSpiral[7], //CD+DE+EF+FG+GH+HI
                                    arrLogSpiral[4]+arrLogSpiral[5]+arrLogSpiral[6], //EF+FG+GH
                                    arrLogSpiral[2]+arrLogSpiral[3]+arrLogSpiral[4]+arrLogSpiral[5]+arrLogSpiral[6], //CD+DE+EF+FG+GH
                                    arrLogSpiral[6]+arrLogSpiral[8]+arrLogSpiral[2]+arrLogSpiral[0]+arrLogSpiral[4] //GH+IJ+CD+AB+EF
        );
        arrColesVal = new Array(
                                    arrLogSpiral[9]+arrLogSpiral[5]+arrLogSpiral[6], //FH+FG+GH
                                    arrLogSpiral[0]+arrLogSpiral[1]+arrLogSpiral[2]+arrLogSpiral[3], //AB+BC+CD+DE
                                    arrLogSpiral[0]+arrLogSpiral[1]+arrLogSpiral[2]+arrLogSpiral[3]+arrLogSpiral[6], //AB+BC+CD+DE+GH
                                    arrLogSpiral[5]+arrLogSpiral[6], //FG+GH
                                    arrLogSpiral[6]+arrLogSpiral[7], //GH+HI
                                    arrLogSpiral[5]+arrLogSpiral[1]+arrLogSpiral[2], //FG+BC+CD
                                    arrLogSpiral[5]+arrLogSpiral[1]+arrLogSpiral[2]+arrLogSpiral[3], //FG+BC+CD+DE
                                    arrLogSpiral[2]+arrLogSpiral[1], //CD+BC
                                    arrLogSpiral[3]+arrLogSpiral[1], //DE+BC
                                    arrLogSpiral[10]+arrLogSpiral[2]+arrLogSpiral[3], //CE+CD+DE
                                    arrLogSpiral[11]+arrLogSpiral[4]+arrLogSpiral[5] //EG+EF+FG
        );
        

        bInit = true;
    }

    if ( getBarState() == BARSTATE_ALLBARS )
    {
        offsetBar = null;
        if ( gFirstBar !=  "User Defined" )  offsetBar = 0;
        else
        {
            var xDate = gStartDate.split("/");
            var xTime = (!isDWM()) ? gStartTime.split(":") : new Array("0","0");
            var startDate = new Date(xDate[2], xDate[0], xDate[1], xTime[0], xTime[1]);
            startPos = startDate.getTime();
        }        
        
        if (offsetBar == 0)
        {
                setBarBgColor(Color.grey);
                drawTextRelative(0, BottomRow2, "Start" , Color.grey, null, Text.FRAME | Text.PRESET | Text.CENTER , "Arial", 11, "Start" );
                retVal = "START";
        }
    }

    if ( getBarState() == BARSTATE_NEWBAR )
    {
        if ( isNull(offsetBar) )
        {    
            var currentDate = new Date(year(0), month(0), day(0), hour(0), minute(0));
            var currentPos = currentDate.getTime();
            if ( currentPos == startPos ) 
            {
                offsetBar = Math.abs(getOldestBarIndex() - getCurrentBarIndex()); 
                setBarBgColor(Color.grey);
                drawTextRelative(0, BottomRow2, "Start" , Color.grey, null, Text.FRAME | Text.PRESET | Text.CENTER , "Arial", 11, "Start" );
                retVal = "START";
            }
            if  ( currentPos > startPos  )
            {
                drawTextRelative(1, 20, " Date not availible ", Color.grey, null, Text.RELATIVETOLEFT|Text.RELATIVETOBOTTOM|Text.BOLD|Text.LEFT|Text.FRAME, null, 12, "dna");
                retVal = "Date Not Availible";
            }
        } 

        else
        {

            var segE = 0;
            var segC = 0;
            for (i=0; i<=9; i++) if ( -getOldestBarIndex()-offsetBar-arrErmanVal[i]  == -getCurrentBarIndex() && gErman ) segE = arrErmanVal[i];
            for (i=0; i<=10; i++) if ( -getOldestBarIndex()-offsetBar-arrColesVal[i]  == -getCurrentBarIndex() && gColes ) segC = arrColesVal[i];
                
            if ( segE !=0 )
            {
                cFixColor = gErmanColor;
                setBarBgColor(gErmanColor);
                drawTextRelative(0, BottomRow2, segE+ " bars" , gErmanColor, null, Text.FRAME | Text.PRESET | Text.CENTER , "Arial", 11, segE );
                retVal = ""+segE;
            }
            else if (segC !=0 )
            {
                cFixColor = gColesColor;
                setBarBgColor(gColesColor);
                drawTextRelative(0, BottomRow2, segC+ " bars" , gColesColor, null, Text.FRAME | Text.PRESET | Text.CENTER , "Arial", 11, segC );
                retVal = ""+segC;
            }
            else 
            {    
                cFixColor = null;
                var fromStart = -getOldestBarIndex()-offsetBar + getCurrentBarIndex(); 
                retVal = ""+fromStart;
            }    
        }        
    }        
    
    return retVal;
}

function verify() {
    var b = false;
    if (getBuildNumber() < 779) {
        drawTextAbsolute(5, 35, "This study requires version 8.0 or later.", 
            Color.white, Color.blue, Text.RELATIVETOBOTTOM|Text.RELATIVETOLEFT|Text.BOLD|Text.LEFT,
            null, 13, "error");
        drawTextAbsolute(5, 20, "Click HERE to upgrade.@URL=https://www.esignal.com/download/default.asp", 
            Color.white, Color.blue, Text.RELATIVETOBOTTOM|Text.RELATIVETOLEFT|Text.BOLD|Text.LEFT,
            null, 13, "upgrade");
        return b;
    } else {
        b = true;
    }
    return b;
}


"September 2011 Traders' Tips Article Code.efs"

/*********************************
Provided By:  
    Interactive Data Corporation (Copyright ¬© 2010) 
    All rights reserved. This sample eSignal Formula Script (EFS)
    is for educational purposes only. Interactive Data Corporation
    reserves the right to modify and overwrite this EFS file with 
    each new release. 

Description:        
    TradersSeptember 2011 Traders' Tips Article Code (Andrew Coles article, September 2011 issue,
Technical Analysis of Stocks and Commodities)
	
Version:            1.00  14/06/2010

Formula Parameters:                     Default:
Price Source                            close
Period                                  5
Exhaustion Period                       9
Buy Setup Color                         Color.blue
Sell Setup Color                        Color.red

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

**********************************/
var bVersion = null;
var fpArray = new Array();
function preMain()
{
    setPriceStudy(true);
    setPlotType(PLOTTYPE_FLATLINES);
    
    var x = 0;
    fpArray[x] = new FunctionParameter("gPS", FunctionParameter.STRING);
    with (fpArray[x++])
    {
        setName("Price Source");
        addOption("open");
        addOption("close");
        addOption("high");
        addOption("low");
        addOption("hl2");
        addOption("hlc3");
        addOption("ohlc4");
        setDefault("close");
    } 

    fpArray[x] = new FunctionParameter("gPeriod", FunctionParameter.INTEGER);
    with (fpArray[x++])
    {
        setName("Period");
        setDefault(5);
    } 

    fpArray[x] = new FunctionParameter("gExhaustion", FunctionParameter.INTEGER);
    with (fpArray[x++])
    {
        setName("Exhaustion Period");
        setDefault(9);
    } 

    fpArray[x] = new FunctionParameter("gBuyColor", FunctionParameter.COLOR);
    with (fpArray[x++])
    {
        setName("Buy Setup Color");
        setDefault(Color.blue);
    } 
    
    fpArray[x] = new FunctionParameter("gSellColor", FunctionParameter.COLOR);
    with (fpArray[x++])
    {
        setName("Sell Setup Color");
        setDefault(Color.red);
    } 

    
}

var bInit = false;
var xSrc = null;
var xMom = null;
var xHH = null;
var xLL = null;
var counter = 0;
function main(gPS, gPeriod, gExhaustion, gBuyColor, gSellColor)
{
    if (bVersion == null) bVersion = verify();
    if (bVersion == false) return; 
        
    if ( !bInit )
    {
        switch (gPS) 
        {
            case "Open"||"O": xSrc = open(); break;
            case "High"||"H": xSrc = high(); break;    
            case "Low"||"L" : xSrc = low();  break; 
            case "hl2"||"hl/2" : xSrc = hl2(); break;  
            case "hlc3"||"hlc/3" : xSrc = hlc3(); break; 
            case "ohlc4"||"ohlc/4" : xSrc = ohlc4(); break; 
            default : xSrc = close();  
        }
        xMom = mom(gPeriod, xSrc);
        xHH = hhv(gExhaustion, xMom);    
        xLL = llv(gExhaustion, xMom);    
        bInit = true;
    }
    var vHH = xHH.getValue(0);
    var vLL = xLL.getValue(0);
    var vFlip = xMom.getValue(-gExhaustion);
    if ( xHH.getValue(0) == null ) return null;


    var retValue = "NEUTRAL";
    if ( vHH <= 0 && vFlip >= 0 )
    {
        setBarBgColor(gBuyColor);
        retValue = "BUY SETUP";
    }
    if ( vLL > 0 && vFlip <= 0 )  
    {
        setBarBgColor(gSellColor);
        retValue = "SELL SETUP";
    }
    
    
    return  retValue;    
}


function verify() {
    var b = false;
    if (getBuildNumber() < 779) {
        drawTextAbsolute(5, 35, "This study requires version 8.0 or later.", 
            Color.white, Color.blue, Text.RELATIVETOBOTTOM|Text.RELATIVETOLEFT|Text.BOLD|Text.LEFT,
            null, 13, "error");
        drawTextAbsolute(5, 20, "Click HERE to upgrade.@URL=https://www.esignal.com/download/default.asp", 
            Color.white, Color.blue, Text.RELATIVETOBOTTOM|Text.RELATIVETOLEFT|Text.BOLD|Text.LEFT,
            null, 13, "upgrade");
        return b;
    } else {
        b = true;
    }
    return b;
}

—Jason Keck
Interactive Data Desktop Solutions
800 815-8256, www.eSignal.com/support/