闪客一点发 发表于 2016-4-23 14:02

原创通达信版－缠论K线包含公式

走势K线的包含关系显示，可以从公式中看到，出现包含关系出现时，公式会把相互包含的第二根K线处理成包含处理后的K线区间；向上包含处理时，会把包含形成后的新K线显示为粉红色，向下包含处理时，会把包含形成后的新K线显示为绿色。
图1为指标原图，图2为配合分笔指标使用。


KL:=H<=REF(H,1) AND L>=REF(L,1);{K线左包含}
KR:=H>=REF(H,1) AND L<=REF(L,1);{K线右包含}
{定义K线方向}
MA1:MA(CLOSE,3);
XS:=MA1>REF(MA1,1);{K线向上}
XX:=MA1<REF(MA1,1);{K线向下}
{K线向上左包含}
KL1:=IF(KL AND XS,1,0);
B1:='┄';
DRAWTEXT(KL1,REF(H,1),B1),COLORMAGENTA;
DRAWTEXT(KL1,L,B1),COLORMAGENTA;
{K线向上右包含}
KR1:=IF(KR AND XS,1,0);
DRAWTEXT(KR1,H,B1),COLORMAGENTA;
DRAWTEXT(KR1,REF(L,1),B1),COLORMAGENTA;

{K线向下左包含}
KL2:=IF(KL AND XX,1,0);
DRAWTEXT(KL2,H,B1),COLORGREEN;
DRAWTEXT(KL2,REF(L,1),B1),COLORGREEN;
{K线向下右包含}
KR2:=IF(KR AND XX,1,0);
DRAWTEXT(KR2,REF(H,1),B1),COLORGREEN;
DRAWTEXT(KR2,L,B1),COLORGREEN;

小白龙123 发表于 2016-4-23 18:56

:victory::hug:

没想 发表于 2016-4-23 19:41

收下了，谢谢公式分享

lin_weihong 发表于 2016-4-28 17:46

谢谢分享！

lin_weihong 发表于 2016-4-28 17:56

谢谢分享！

传奇小掌柜 发表于 2024-5-15 15:52

没有我的好，你的有漏洞。看我的。
页: [1]
查看完整版本: 原创通达信版－缠论K线包含公式