TTM trend esignal code

[philloo 10]

I would like to know if someone can convert in TS8 code. Your reward will be good for you and the group. I check and it's maching perfectly the indicator of ttm trend. By the way it's the real code from tradethemarkets.

 

thx philloo

 

 

 

 

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

Title: Trend Indicator for eSignal 7.x

By: Chris D. Kryza (Divergence Software, Inc.)

Email: c.kryza@gte.net, ckryza@sr-analyst.com

Web: http://www.sr-analyst.com

Incept: 11/04/2004

Version: 1.0.0

 

 

=====================================================================

Fix History:

 

11/04/2004 - Initial Release

1.0.0

 

=====================================================================

Project Description:

 

Tradestation conversion.

 

Dislaimer: For educational purposes only! Obviously, no guarantees

whatsoever and use at your own risk.

 

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

 

 

//External Variables

var grID = 0;

var nBarCounter = 0;

var aOpen = null;

var aClose = null;

var aColor = null;

var nColor = null;

var nColor_1 = null;

var nPeriod = null;

var aFPArray = new Array();

var bInitialized = false;

 

 

//== PreMain function required by eSignal to set things up

function preMain() {

var x;

 

setPriceStudy(true);

setStudyTitle("TTM-Trend");

setShowTitleParameters( false );

setColorPriceBars( true );

setDefaultPriceBarColor( Color.black );

 

//unrem this if you don't want the labels in cursor window

setShowCursorLabel(false);

 

 

 

grID = 0;

 

//initialize formula parameters

x=0;

aFPArray[x] = new FunctionParameter( "fPeriod", FunctionParameter.NUMBER);

with( aFPArray[x] ) {

setName( "Comp Bars" );

setLowerLimit( 1 );

setUpperLimit( 125 );

setDefault( 6 );

}

x++;

aFPArray[x] = new FunctionParameter( "fUpColor", FunctionParameter.COLOR);

with( aFPArray[x] ) {

setName( "Up Color" );

setDefault( Color.blue );

}

x++;

aFPArray[x] = new FunctionParameter( "fDnColor", FunctionParameter.COLOR);

with( aFPArray[x] ) {

setName( "Dn Color" );

setDefault( Color.red );

}

 

}

 

//== Main processing function

function main( fPeriod, fUpColor, fDnColor ) {

var x;

var nOpen, nClose, nHigh, nLow;

 

//script is initializing

if ( getBarState() == BARSTATE_ALLBARS ) {

return null;

}

 

if ( bInitialized == false ) {

 

nPeriod = Math.round( fPeriod );

 

aColor = new Array( nPeriod+1 );

aClose = new Array( nPeriod+1 );

aOpen = new Array( nPeriod+1 );

aClose[0] = ( open(0)+high(0)+close(0)+low(0) ) / 4;

aOpen[0] = open(0);

 

nBarCounter = 0;

 

bInitialized = true;

}

 

//called on each new bar

if ( getBarState() == BARSTATE_NEWBAR ) {

 

aOpen.pop();

aOpen.unshift(0);

aClose.pop();

aClose.unshift(0);

aColor.pop();

aColor.unshift(0);

 

nColor_1 = nColor;

 

nBarCounter++;

 

}

 

nOpen = (aOpen[1]+aClose[1])/2;

aOpen[0] = nOpen;

nClose = ( open(0)+high(0)+low(0)+close(0) ) / 4;

aClose[0] = nClose;

nHigh = Math.max( high(0), nOpen, nClose );

nLow = Math.min( low(0), nOpen, nClose );

 

if ( nClose > nOpen ) {

nColor = fUpColor;

}

else {

nColor = fDnColor;

}

 

 

 

if ( nBarCounter<=nPeriod+2 ) return;

 

x=1;

 

while ( x<=nPeriod ) {

if ( nOpen <= Math.max( aOpen[x], aClose[x] ) && nOpen >= Math.min( aOpen[x], aClose[x] ) &&

nClose <= Math.max( aOpen[x], aClose[x] ) && nClose >= Math.min( aOpen[x], aClose[x] ) ) {

nColor = aColor[x];

}

x++;

}

 

aColor[0] = nColor;

 

setPriceBarColor( nColor );

 

return( null );

 

 

}

[olie1018 10]

i tried this code in esignal and all i got was a syntexerror on line 98?

 

jim

[thehaul 10]

I'm not exactly sure what you're looking for but I have the TTM Scalper code.

 

{Scalper Buys and Sells 7/18/2007

Written by Luis Gomez

inspired by John Carters "Mastering the Trade"

}

 

 

inputs:

buyColor(cyan),

sellColor(magenta),

width(3);

variables:

highBarsAgo(1),

possibleHighBarsAgo(1),

possibleHigh(-2),

hightoBeat(-1),

barsSincePaint(1),

lowBarsAgo(1),

possibleLowBarsAgo(1),

possibleLow(10000001),

lowtoBeat(10000000),

triggerPriceSell(-1),

triggerPriceBuy(1000000),

trend(1),

_UP(1),

_DOWN(-1),

_ON(1),

_OFF(-1);

 

 

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

//****** Find and plot the highest swing high *******

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

 

if trend = _UP then begin

if swingHighBar(1,H,2,barsSincePaint+2) > -1 then begin

possibleHighBarsAgo = swingHighBar(1,H,2,barsSincePaint+2);

possibleHigh = H[possibleHighBarsAgo];

end;

 

if possibleHigh >= hightoBeat then begin

highBarsAgo = possibleHighBarsAgo;

hightoBeat = possibleHigh;

triggerPriceSell = L[HighBarsAgo - 1];

end;

 

if C < triggerPriceSell and

highest(high,highBarsAgo) < hightoBeat then begin

plotpb[highBarsAgo](H[highBarsAgo],L[highBarsAgo],"",sellColor);

alert("Scalper Sell");

trend = _DOWN;

barsSincePaint = highBarsAgo-1;

hightoBeat = -1;

lowtoBeat = 10000000;

triggerPriceBuy = 10000000;

triggerPriceSell = -1;

highBarsAgo = 1;

possibleHigh = -2;

end;

 

end;

 

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

//****** Find and plot the lowest swing low *********

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

 

if trend = _DOWN then begin

if swingLowBar(1,L,2,barsSincePaint+2) > -1 then begin

possibleLowBarsAgo = swingLowBar(1,L,2,barsSincePaint+2);

possibleLow = L[possibleLowBarsAgo];

end;

 

if possibleLow <= lowtoBeat then begin

lowBarsAgo = possibleLowBarsAgo;

lowtoBeat = possibleLow;

triggerPriceBuy = H[LowBarsAgo - 1];

end;

 

if C > triggerPriceBuy and

lowest(L,lowBarsAgo) > lowtoBeat then begin

plotpb[lowBarsAgo](H[lowBarsAgo],L[lowBarsAgo],"",buyColor);

alert("Scalper Buy");

trend = _UP;

barsSincePaint = lowBarsAgo-1;

possibleLow = 10000001;

lowtoBeat = 10000000;

hightoBeat = -1;

triggerPriceBuy = 10000000;

triggerPriceSell = -1;

lowBarsAgo = 1;

end;

 

end;

 

barsSincePaint = barsSincePaint+1;

if trend = _UP then highBarsAgo = highBarsAgo + 1;

if trend = _DOWN then lowBarsAgo = lowBarsAgo + 1;

setPlotWidth(1,width);

 

 

 

Haul it!

[philloo 10]

Foe me it's working

 

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

Title: Trend Indicator for eSignal 7.x

By: Chris D. Kryza (Divergence Software, Inc.)

Email: c.kryza@gte.net, ckryza@sr-analyst.com

Web: http://www.sr-analyst.com

Incept: 11/04/2004

Version: 1.0.0

 

 

=====================================================================

Fix History:

 

11/04/2004 - Initial Release

1.0.0

 

=====================================================================

Project Description:

 

Tradestation conversion.

 

Dislaimer: For educational purposes only! Obviously, no guarantees

whatsoever and use at your own risk.

 

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

 

 

//External Variables

var grID = 0;

var nBarCounter = 0;

var aOpen = null;

var aClose = null;

var aColor = null;

var nColor = null;

var nColor_1 = null;

var nPeriod = null;

var aFPArray = new Array();

var bInitialized = false;

 

 

//== PreMain function required by eSignal to set things up

function preMain() {

var x;

 

setPriceStudy(true);

setStudyTitle("TTM-Trend");

setShowTitleParameters( false );

setColorPriceBars( true );

setDefaultPriceBarColor( Color.black );

 

//unrem this if you don't want the labels in cursor window

setShowCursorLabel(false);

 

setProperty( "HideEncryptedLock", "yes" );

 

 

grID = 0;

 

//initialize formula parameters

x=0;

aFPArray[x] = new FunctionParameter( "fPeriod", FunctionParameter.NUMBER);

with( aFPArray[x] ) {

setName( "Comp Bars" );

setLowerLimit( 1 );

setUpperLimit( 125 );

setDefault( 5 );

}

x++;

aFPArray[x] = new FunctionParameter( "fUpColor", FunctionParameter.COLOR);

with( aFPArray[x] ) {

setName( "Up Color" );

setDefault( Color.blue );

}

x++;

aFPArray[x] = new FunctionParameter( "fDnColor", FunctionParameter.COLOR);

with( aFPArray[x] ) {

setName( "Dn Color" );

setDefault( Color.red );

}

 

}

 

//== Main processing function

function main( fPeriod, fUpColor, fDnColor ) {

var x;

var nOpen, nClose, nHigh, nLow;

 

//script is initializing

if ( getBarState() == BARSTATE_ALLBARS ) {

return null;

}

 

if ( bInitialized == false ) {

 

nPeriod = Math.round( fPeriod );

 

aColor = new Array( nPeriod+1 );

aClose = new Array( nPeriod+1 );

aOpen = new Array( nPeriod+1 );

aClose[0] = ( open(0)+high(0)+close(0)+low(0) ) / 4;

aOpen[0] = open(0);

 

nBarCounter = 0;

 

bInitialized = true;

}

 

//called on each new bar

if ( getBarState() == BARSTATE_NEWBAR ) {

 

aOpen.pop();

aOpen.unshift(0);

aClose.pop();

aClose.unshift(0);

aColor.pop();

aColor.unshift(0);

 

nColor_1 = nColor;

 

nBarCounter++;

 

}

 

nOpen = (aOpen[1]+aClose[1])/2;

aOpen[0] = nOpen;

nClose = ( open(0)+high(0)+low(0)+close(0) ) / 4;

aClose[0] = nClose;

nHigh = Math.max( high(0), nOpen, nClose );

nLow = Math.min( low(0), nOpen, nClose );

 

if ( nClose > nOpen ) {

nColor = fUpColor;

}

else {

nColor = fDnColor;

}

 

 

 

if ( nBarCounter<=nPeriod+2 ) return;

 

x=1;

 

while ( x<=nPeriod ) {

if ( nOpen <= Math.max( aOpen[x], aClose[x] ) && nOpen >= Math.min( aOpen[x], aClose[x] ) &&

nClose <= Math.max( aOpen[x], aClose[x] ) && nClose >= Math.min( aOpen[x], aClose[x] ) ) {

nColor = aColor[x];

}

x++;

}

 

aColor[0] = nColor;

 

setPriceBarColor( nColor );

 

return( null );

 

 

}

[olie1018 10]

thank you i appreciate it...

[olie1018 10]

thank you i appreciate it...

 

jim

[BennyHey 10]

I keep getting a syntax error

[philloo 10]

Here the file maby you have not correctly paste the code. With the file it should work. I use the esignal 10.3 version

 

phil

TTM-Trend.rar

[BennyHey 10]

Thanks for the post philloo,

 

You are correct I must have been making an error copy & pasting it. Yours worked fine and it was nice that I could just plug it into my formula library.

 

BennyHey

[tradestef 10]

I am trying to find the TTM Trend code for Tradestation. Does anyone have it or know where I can get it?

Thanks