高点划线 通达信主图指标 源码 贴图

{参数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;{画低点线 };
{WWW.GPXIAZAI.COM}
DRAWNUMBER(GAO,ZG*1.03,ZG),COLORRED;{显示高点值};
DRAWNUMBER(DI,ZD*0.99,ZG),COLORGREEN;{显示低点值};