两色K线主图通达信公式 主图 源码附图

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

TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));

 ATR:=EMA(TR1,10);

 VAR1:=REF(CLOSE,1)-REF(ATR,1);

 LSX:HHV(VAR1,13),LINETHICK1,COLORLIBLUE;

 LSX1:IF(C>=LSX,LSX,DRAWNULL),COLORMAGENTA,LINETHICK2;

 {划K线}

 STICKLINE(C>=LSX,O,C,2.5,1),COLORRED;

 STICKLINE(C>=LSX AND C>=O,C,H,0,1),COLORRED;

 STICKLINE(C>=LSX AND C>=O,O,L,0,1),COLORRED;

 STICKLINE(C>=LSX AND C<O,O,H,0,1),COLORRED;

 STICKLINE(C>=LSX AND C<O,C,L,0,1),COLORRED;

 STICKLINE(C<LSX,O,C,2.5,1),COLORGREEN;

 STICKLINE(C<LSX AND C>O,C,H,0,1),COLORGREEN;

 STICKLINE(C<LSX AND C>O,O,L,0,1),COLORGREEN;

 STICKLINE(C<LSX AND C<O,O,H,0,1),COLORGREEN;

 STICKLINE(C<LSX AND C<O,C,L,0,1),COLORGREEN;

 

原理解析：
TR1赋值:MAX(MAX((最高价-最低价),1日前的收盘价-最高价的绝对值),ABS(1日前的收盘价-最低价))
 ATR赋值:TR1的10日指数移动平均
 VAR1赋值:1日前的收盘价-1日前的ATR
 输出LSX:13日内VAR1最高值,LINETHICK1,COLORLIBLUE
如果C>=LSX返回LSX否则返回DRAWNULL
当满足条件C>=LSX时,在O和C之间画柱状线
当满足条件C>=LSX AND C>=O时,在C和H之间画柱状线
当满足条件C>=LSX AND C>=O时,在O和L之间画柱状线
当满足条件C>=LSX AND C当满足条件C>=LSX AND C当满足条件C当满足条件CO时,在C和H之间画柱状线
当满足条件CO时,在O和L之间画柱状线
当满足条件C当满足条件C