看到有人写了缠论的顶底分型指标，见猎心喜，尝试着写了一个，只适用于通达信。
自己测试好像没问题，供大家玩玩
{缠论顶底分型指标}
N:=5; {分型确认周期}
{计算K线高低点}
HIGH_N:=REF(HHV(HIGH,N),1);
LOW_N:=REF(LLV(LOW,N),1);
{顶分型判断条件}
TOP_SIGNAL:=HIGH>HIGH_N AND REF(HIGH,1)<REF(HIGH_N,1) AND REF(HIGH,2)<REF(HIGH_N,2);
{底分型判断条件}
BOTTOM_SIGNAL:=LOW<LOW_N AND REF(LOW,1)>REF(LOW_N,1) AND REF(LOW,2)>REF(LOW_N,2);
{绘制顶分型}
DRAWICON(TOP_SIGNAL,HIGH*1.01,5);
{绘制底分型}
DRAWICON(BOTTOM_SIGNAL,LOW*0.99,6);
{可选：标记分型位置}
DRAWTEXT(TOP_SIGNAL,HIGH*1.02,'顶'),COLORRED;
DRAWTEXT(BOTTOM_SIGNAL,LOW*0.98,'底'),COLORGREEN;
