Found this on trading view and can't get it to work in tradestation 10.

It will change the color of the moving average depending on direction - up or down.

Can anyone help?

Quoting 

//@version=4 //Color MA colors the moving average plot based on direction //MA types are: // 1 - simple // 2 - exponential // 3 - Hull // 4 - weighted // 5 - volume weighted study(title = "Color MA", shorttitle="CMA", overlay = true) length = input(9, minval=1, title="Length") src = input(close, title="Source") matype = input(1, minval=1, maxval=5, title="AvgType") simplema = sma(src,length) exponentialma = ema(src,length) hullma = wma(2*wma(src, length/2)-wma(src, length), round(sqrt(length))) weightedma = wma(src, length) volweightedma = vwma(src, length) avgval = matype==1 ? simplema : matype==2 ? exponentialma : matype==3 ? hullma : matype==4 ? weightedma : matype==5 ? volweightedma : na Pcolor = avgval > avgval[1] ? color.green : color.red plot(avgval,title='Color MA', color=Pcolor, linewidth=4)

cjshu99 

Found this on trading view and can't get it to work in tradestation. It will change the color of the moving average depending on direction - up or down. Can anyone help?

Here's some EL code that is similar. It changes color based on direction and calculates the angle. That can be commented out.
Perhaps you can take this and adapt your code to get it working. This one uses "Exponential" but that can be changed.

Hope it helps.
//////////////////////////////////////////////////////////
Input: Flat(LightGray), Up(Cyan), Down(Red),
Price(Close), Length(20), Displace(0);
Variables: myPlot(0), Color(green), myAngle(0);


myPlot = XAverage(Price,Length);

plot1[Displace](myPlot, "Xavg");

if C > myPlot then
SetPlotColor[1](1, Up);
if C < myPlot then
SetPlotColor[1](1, Down);
if C = myPlot then
SetPlotColor[1](1, Flat);

if C crosses above myPlot Then
Alert( " Crossing up") ;

if C crosses below myPlot Then
Alert( " crossing down ") ;


myangle = LinearRegAngle(XAverage(Price,Length), 2);


condition1 = DrawTextOnLastBar(-999999, 2, NumToStr(myangle,2) + "*", XAverage(Price,Length), white, 0);
/////////////////////////////////////////////////////////////////////////////////////////////////////

Thanks. That looks good. Will see about making it use a sma

Inputs: Price(Close), matype(1), malength(9);

// Simple MA
if matype = 1 then Value1 = Average(Price, malength);

// Exponential
if matype = 2 then Value1 = XAverage(Price, malength);

// Hull
if matype = 3 then Value1 = HMA(Price, malength);

// Weighted
if matype = 4 then Value1 = WAverage(Price, malength);

// Vol Weighted - you can find this formula in the
// Mov Avg Volume-weighted indicator in Easy Language

if Value1 > Value1[1] then plot1(Value1, "MA", green)
else plot1(Value1, "MA", red);

You can use the properties tab to customize