请教股价创新高的公式

编写条件：

1，股价创120天新高， 2，在第一次创新高的地方写上‘新高’文字，后面20天如果再有新高，后面的不再提示新高文字

编写方法：

a:cross(c,hhv(c,120));
DRAWTEXT(a,1.0,'新高'),COLOrred;