TD Sequential Indicator

This function implements Thomas DeMark's TD Sequential Indicator. There are many different versions of this indicator with different rules and many nuances. Not all are implemented here. For more detail you should add to the code.

This function accepts two arguments, a number and a string.

TDSequential(0,"") - Returns the count of the Setup phase. Returns 1 to 9 for a BuyCount and -1 to -9 for a SellCount. Returns "99" (or "-99") for a "perfected" "9".

TDSequential(1,"Sequential") - Returns the Sequential countdown after the setup is complete. Positive number for a Buy count, negative for a sell count. At count 18 (or -18) it resets and stops counting until the next setup.

TDSequential(1,"Combo") - Returns the Combo version countdown.

After you download the TD Sequential function you use it in an indicator formula to visualize it.
Here's an example (copy and paste to an indicator formula):

//---------------------------------start
PlotCandleStick("Quotes", colorBrown|255|colorViolet|255|0, StyleSymbolVdash);

TDSetup=TDSequential(0,"");
TDSeq=TDSequential(1,"Sequential");

PlotSymbol(TDSetup>0 and TDSetup<10,TDSetup,2,1,Belowlow,colorBlue,colorBlue,PlotSymbolNone);
PlotSymbol(TDSetup<0 and TDSetup>-10,-TDSetup,2,1,AboveHigh,colorRed,colorRed,PlotSymbolNone);
PlotSymbol(TDSeq>0 and TDSeq!=ref(TDSeq,1),TDSeq,0,5,Belowlow,colorBlue,colorGreen,PlotSymbolNone);
PlotSymbol(TDSeq<0 and TDSeq!=ref(TDSeq,1),-TDSeq,1,5,AboveHigh,colorBlue,colorOrange,PlotSymbolNone);

PlotSymbol(TDSetup==99,"B9",4,2,Belowlow,colorblue,colorblue,PlotSymbolCircle);
PlotSymbol(TDSetup==-99,"S9",4,2,Abovehigh,colorred,colorred,PlotSymbolCircle);

PlotSymbol(TDSeq==13 and TDSeq!=ref(TDSeq,1),"13",4,2,Belowlow,colorGreen,colorGreen,PlotSymbolCircle);
PlotSymbol(TDSeq==-13 and TDSeq!=ref(TDSeq,1),"13",4,2,Abovehigh,colorred,colorred,PlotSymbolCircle);
//-------------end

If you are looking for just the Setup phase or the Demark's Support Resistance Lines,
HERE'S AN ALTERNATE CODING USING VECTOR LANGUAGE ONLY:
//--------------------start
PlotCandleStick("Quotes", colorBrown|255|colorViolet|255|0, StyleSymbolVdash);
dn=Iff( close < ref(close,4),1,0);
td9dn=BarsSince(barssince(dn));

up=Iff( close>ref(close,4),1,0);
td9up=BarsSince(barssince(up));

PlotSymbol(td9dn>0 and td9dn<10,td9dn,2,1,Belowlow,colorBlue,colorBlue,PlotSymbolNone);
PlotSymbol(td9up>0 and td9up<10,td9up,2,1,AboveHigh,colorRed,colorRed,PlotSymbolNone);

TD4dn= Ref(Close,9)>=Ref(Close,13);
TD4up= Ref(Close,9)<=Ref(Close,13);
Perfbuy9=td9dn==9 AND TD4dn and LLV(Low,2) < Ref(Low,2) AND LLV(Low,2)< Low < Ref(Low,3);
Perfsell9=td9up==9 and TD4up and HHV(High,2) > Ref(High,2) AND HHV(High,2)> High < Ref(High,3);

PlotSymbol(Perfbuy9,"B9",4,2,Belowlow,colorGreen,colorGreen,PlotSymbolCircle);
PlotSymbol(Perfsell9,"S9",4,2,Abovehigh,colorred,colorred,PlotSymbolCircle);

BLUE9BAR=BarsSince(td9dn==9 AND TD4dn);
TDSTRES= Ref(High,BLUE9BAR+8);
RED9BAR=BarsSince(td9up==9 and TD4up);
TDSTSUPP= Ref(Low,RED9BAR+8);

plot(TDSTRES,'TDRes',colorOrange,ChartLine,StyleDashed);
plot(TDSTSUPP,'TDSTSUPP',colorgreen,ChartLine,StyleDashed);

//----------------end

Technical Analysis

• Buy Low Sell High Screen
• Wilder's Smoothing - Moving Average
• Screen for finding potential high volume momentum growth for the next day
• Drawdown Since Trading Signal
• Number of Stocks Making a new 52-Week Low - Market Indicator
• Coefficient of Determination - R Squared - Time-Series Prediction
• NYSE Advances and Declines
• Number of Trading Bars to Fill a Gap Up
• The DeMark's DeMarker indicator
• Bleu Stochastic
• More trading objects...

Fundamental Analysis

• Implied Volatility of iPath ETNs - IV Historical Data
• Historical Economic Events
• Plot Economic Indicators on a Chart
• Stock Industry Position
• High Short Selling Activity
• Broker Ratings & Recommendations
• Currency Trading News from Yahoo - Forex Market
• Federal Reserve Flow of Funds - Balance Sheet Historical Data
• Industrial Production Index - IPI - Historical data
• Coverage and Liquidity ratios
• More trading objects...