ARTICLE · 1048603

通达信指标公式源码分享:缠论(主副图均可)复盘专用,勿用于实盘交易

发布时间：2026-09-21 08:20:08 最近访问：2026-09-21 08:20:08

{通达信缠论笔主图指标 - 不含未来函数}

N1:=5; {分型包含处理的相邻比较周期}
N2:=3; {分型成型确认的K线数}

{1. 包含关系处理（简化向前看）}
H1:=IF(H>REF(H,1) AND H>REF(H,2),H,
IF(REF(H,1)>H AND REF(H,1)>REF(H,2),REF(H,1),0));
L1:=IF(L<REF(L,1) AND L<REF(L,2),L,
IF(REF(L,1)<L AND REF(L,1)<REF(L,2),REF(L,1),0));

{2. 标准顶底分型（无未来）}
TOP:=H=HHV(H,3) AND H>=REF(H,1) AND H>=REF(H,2)
AND H>=REFX(H,1) AND H>=REFX(H,2);
BOTTOM:=L=LLV(L,3) AND L<=REF(L,1) AND L<=REF(L,2)
AND L<=REFX(L,1) AND L<=REFX(L,2);

{3. 笔的定义（简单版本：相邻顶底交替）}
笔顶:=TOP AND (BARSLAST(BOTTOM)<BARSLAST(TOP) OR BARSLAST(BOTTOM)>BARSLAST(TOP));
笔底:=BOTTOM AND (BARSLAST(TOP)<BARSLAST(BOTTOM) OR BARSLAST(TOP)>BARSLAST(BOTTOM));

{4. 过滤相邻的同向分型（取最高顶/最低底）}
有效顶:=笔顶 AND H=HHV(H,BARSLAST(笔底)+1);
有效底:=笔底 AND L=LLV(L,BARSLAST(笔顶)+1);

{5. 连接成笔}
笔连线:DRAWLINE(有效底,L,有效顶,H,0),COLORWHITE,LINETHICK2;
DRAWLINE(有效顶,H,有效底,L,0),COLORWHITE,LINETHICK2;

{画标记}
DRAWICON(有效顶,H*1.01,2);
DRAWICON(有效底,L*0.99,1);

DRAWTEXT(有效顶,H,'顶'),COLORGREEN;
DRAWTEXT(有效底,L,'底'),COLORRED;

DRAWTEXT_FIX(1,0.01,0.98,0,'更多指标关注公众号：观鼎识砥'),COLORRED;{可选：显示笔的方向}
方向:=IF(有效顶,1,IF(有效底,-1,0));
DRAWTEXT(方向=1,H*1.02,'▼'),COLORWHITE;
DRAWTEXT(方向=-1,L*0.98,'▲'),COLORWHITE;

相关学习资料