高点划线（通达信公式 主图 源码 测试图）

beyond202104

{参数KN 3 30 4 请自行输入}ZG:=ZIG(1,KN);  {高点转向 };ZD:=ZIG(2,KN);  {低点转向 };GAO:=H=PEAK(1,KN,1);  {判断高点 };DI:=L=TROUGH(2,KN,1); {判断低点 };HH:=BARSLAST(GAO);  {高点距离 };LL:=BARSLAST(DI); {低点距离 };RH:=REF(ZG,HH); {高点值 };RL:=REF(ZD,LL); {低点值 };DRAWLINE(GAO,ZG,DI,ZD,0);{画下降线 };DRAWLINE(DI,ZD,GAO,ZG,0);{画上涨线 };DRAWLINE(GAO,ZG,DI,RH,1),COLORRED;{画高点线 };DRAWLINE(DI,ZD,GAO,RL,1),COLORGREEN;{画低点线 };DRAWNUMBER(GAO,ZG*1.03,ZG),COLORRED;{显示高点值};

DRAWNUMBER(DI,ZD*0.99,ZG),COLORGREEN;{显示低点值};

谢鹏_22333

感谢感谢

昆云山房

thanks for the sharing!

StannyLin

尝试一下