将 起飞点 改成同花顺的

编写要求：

股票网解答：

网友求助：

请将原来dzh的 起飞点 改成同花顺的 谢谢！

原码：

VAR1P:=(CLOSE-LLV(LOW,55.144))/(HHV(HIGH,55.144)-LLV(LOW,55.))*80;
VAR2P:=SMA(VAR1P,7,1);
VAR3P:=SMA(VAR2P,5,1);
起飞点:IF(CROSS(VAR2P,VAR3P) AND VAR2P<20,85,0.),stick,COLOR00FF7F,linethick2;
DRAWTEXT(CROSS(VAR2P,VAR3P) AND VAR2P<20,75,'起飞点'),COLORFFFF00;
DRAWTEXT(CROSS(VAR2P,VAR3P) AND VAR2P<20,120,'★'),COLORRE

解答如下：

N:=14;
TYP := (IF(ISNULL(HIGH),CLOSE,HIGH) + IF(ISNULL(LOW),CLOSE,LOW) + CLOSE)/3;
CCI:(TYP-MA(TYP,N))/(0.015*AVEDEV(TYP,N)),LINESTICK,colorred,LINETHICK2;
STICKLINE(CROSS(200,CCI) AND CCI&lt;REF(CCI,1),0,CCI,8,0),colorgreen;
DRAWTEXT(CROSS(200,CCI) AND CCI&lt;REF(CCI,1),H*1.02,'跑'),colorgreen;

>