自动K线处理通达信公式 主图 源码附图

MA1K高:=IF(H>REF(H,1),1,IF(H=REF(H,1),0,IF(H<REF(H,1),-1,0)));
MA1K低:=IF(L>REF(L,1),1,IF(L=REF(L,1),0,IF(L<REF(L,1),-1,0)));
MA1K:=MA1K高+MA1K低;{双向上行=2,双下行=-2,双齐平=0; 单向上=1, 单向下=-1, 前包后或后包前=0}
MA1K昨:=REF(MA1K,1);
上:STICKLINE(MA1K=2,H,L,1.8,0)COLOR0000BD;
下:STICKLINE(MA1K=-2,H,L,1.8,0)COLOR008000;
包:STICKLINE(RANGE(MA1K,-2,2),H,L,2.5,1)COLORFF8000;
平上:STICKLINE(MA1K=1,H,L,2.5,1)COLORFF0000;
平下:STICKLINE(MA1K=-1,H,L,2.5,1)COLORFF0000;
平包:STICKLINE(MA1K=0 AND H=REF(H,1) AND L=REF(L,1),H,L,2.5,1)COLOR979700;
{STICKLINE(O<=C,H,L,0,0)COLOR0000FF;STICKLINE(O>C,H,L,0,0)COLORCYAN;
STICKLINE(O<=C,O,C,1,0)COLOR0000CB;STICKLINE(O>C,O,C,1,0)COLORBABA00;}
昨上H:=IF(MA1K昨=2 AND REF(H,1),REF(H,1),DRAWNULL);昨上L:=IF(MA1K昨=2 AND REF(L,1),REF(L,1),DRAWNULL);
昨下H:=IF(MA1K昨=-2 AND REF(H,1),REF(H,1),DRAWNULL);昨下L:=IF(MA1K昨=-2 AND REF(L,1),REF(L,1),DRAWNULL);
{STICKLINE(昨H=REF(H,1) AND 昨L=REF(L,1),昨H,昨L,2,1)COLORBLUE;}
 
包K:=RANGE(MA1K,-2,2);
包K上:STICKLINE(包K AND 昨上H=REF(H,1) AND 昨上L=REF(L,1) AND 昨上H>=REF(H,2),HHV(H,2),HHV(L,2),1,0)COLORMAGENTA;
包K下:STICKLINE(包K AND 昨下H=REF(H,1) AND 昨下L=REF(L,1) AND 昨下L<=REF(L,2),LLV(L,2),LLV(H,2),1,0)COLORGREEN;
 
上包K1H:=IF(包K AND MA1K昨=2 AND 昨上H=REF(H,1) AND 昨上L=REF(L,1) AND 昨上H>=REF(H,2),HHV(H,2),DRAWNULL);
上包K1L:=IF(包K AND MA1K昨=2 AND 昨上H=REF(H,1) AND 昨上L=REF(L,1) AND 昨上H>=REF(H,2),HHV(L,2),DRAWNULL);
包K1上:STICKLINE(MA1K昨=2 AND 上包K1H AND 上包K1L, 上包K1H,上包K1L,1,0)COLORFF24FF;
 
下包K1H:=IF(包K AND MA1K昨=-2 AND 昨下H=REF(H,1) AND 昨下L=REF(L,1) AND 昨下L<=REF(L,2),LLV(H,2),DRAWNULL);
下包K1L:=IF(包K AND MA1K昨=-2 AND 昨下H=REF(H,1) AND 昨下L=REF(L,1) AND 昨下L<=REF(L,2),LLV(L,2),DRAWNULL);
包K1下:STICKLINE(MA1K昨=-2 AND 下包K1H AND 下包K1L, 下包K1H,下包K1L,1,0)COLOR00FF00;
 
MA1K昨3:=REF(MA1K,3); 昨3非包含:=MA1K昨3=-2 OR MA1K昨3=2;
MA1K昨2:=REF(MA1K,2); 昨2包含:=RANGE(MA1K昨2,-2,2);
 
有包含关系下0:=RANGE(MA1K昨,-2,2) AND 包K AND H>=REF(下包K1H,1) AND L<=REF(下包K1L,1);
有包含关系下00:=RANGE(MA1K昨,-2,2) AND 包K AND H<=REF(下包K1H,1) AND L>=REF(下包K1L,1);
有包含关系下:=有包含关系下0 OR 有包含关系下00;
双下包外:STICKLINE(有包含关系下0 AND 昨3非包含 AND REF(下包K1H,1)<=REF(H,3),REF(下包K1H,1),L,1,0)COLOR408000;
双下包内:STICKLINE(有包含关系下00 AND 昨3非包含 AND REF(下包K1H,1)<=REF(H,3),H,REF(下包K1L,1),1,0)COLOR408000;
三下包外:STICKLINE(有包含关系下0 AND 昨2包含  AND REF(下包K1H,1)<=REF(下包K1H,2),REF(下包K1H,1),L,1,0)COLORBLUE;
三下包内:STICKLINE(有包含关系下00 AND 昨2包含  AND REF(下包K1H,1)<=REF(下包K1H,2),H,REF(下包K1L,1),1,0)COLORBLUE;
 
有包含关系上0:=RANGE(MA1K昨,-2,2) AND 包K AND H>=REF(上包K1H,1) AND L<=REF(上包K1L,1);
有包含关系上00:=RANGE(MA1K昨,-2,2) AND 包K AND H<=REF(上包K1H,1) AND L>=REF(上包K1L,1);
有包含关系上:=有包含关系上0 OR 有包含关系上00;
双上包外K2:STICKLINE(有包含关系上0 AND 昨3非包含 AND REF(上包K1H,1)>=REF(H,3),H,REF(上包K1L,1),1,0)COLORFF33FF;
双上包内K02:STICKLINE(有包含关系上00 AND 昨3非包含 AND REF(上包K1H,1)>=REF(上包K1H,2),REF(上包K1H,1),L,1,0)COLORFF33FF;
三上包外K2:STICKLINE(有包含关系上0 AND 昨2包含 AND REF(上包K1H,1)>=REF(上包K1H,2),H,REF(上包K1L,1),1,0)COLORFF00FF;
三上包内K02:STICKLINE(有包含关系上00 AND 昨2包含  AND REF(上包K1H,1)>=REF(上包K1H,2),REF(上包K1H,1),L,1,0)COLORFF00FF;
 


来函数检测结果如下:
该公式没有未来函数

解密、编写股票、期货策略请联系QQ或微信同号:88652583
相关股票指标公式

联系我们  |  股票指标网  |  指标网   |  指标公式  |   加入收藏   |  设为主页

@2005-2023 粤ICP备2023063687号-2 股票指标网别名指标网仅为互联网文章,所有股票指标公式及文章仅供学习研究,并不构成投资建议,请勿以此为依据进行股票交易,由此引起的投资亏损与本站无关。股票指标网均来源互联网收集整理,如不慎侵犯了你的权益,请联系我们告知,我们将做删除处理
QQ:88652583 微信 88652583
sitemap站点地图