Schaff Trend Cycle Indicator

The following script can be used, with a Show View to display a Schaff Trend Cycle Indicator along the bottom of your chart:

fastMA = MA(BARS=23, STYLE=Exponential, CALC=Close);
slowMA = MA(BARS=50, STYLE=Exponential, CALC=Close);
m = fastMA - slowMA;
mK = STOCH(m, BAR2=10);
mD=STOCH(mK, DEFAULT=%D, BAR2=10);
STOCH(mD, BAR2=10, TYPE=Double, DEFAULT=%D);