This should do it for the chart study with alerts. If you want this in a watchlist you will need to post a request for that in the Watchlist topic:
input length = 21;
input averageType = AverageType.EXPONENTIAL;
input price = close;
def ma = MovingAverage(averageType, price, length);
plot crossAbove = close[1] < ma[1] and close > ma;
crossAbove.SetPaintingStrategy(PaintingStrategy.BOOLEAN_ARROW_UP);
crossAbove.SetDefaultColor(Color.CYAN);
crossAbove.SetLineWeight(3);
plot crossBelow = close[1] > ma[1] and close < ma;
crossBelow.SetPaintingStrategy(PaintingStrategy.BOOLEAN_ARROW_DOWN);
crossBelow.SetDefaultColor(Color.MAGENTA);
crossBelow.SetLineWeight(3);
Alert(crossAbove, "Cross Above", Alert.BAR, Sound.RING);
Alert(crossBelow, "Cross Below", Alert.BAR, Sound.RING);
If I can get it in a form of scanner watchlist that would be amazing as well.