三角洲预测通达信指标、主图、贴图、和谐源码分享

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

X_1:=1;

X_2:=28.530588;

X_3:=DATETODAY(DATE)+1;

X_4:=((X_3+X_1)/X_2-INTPART((X_3+X_1)/X_2))*X_2;

X_5:=IF(X_4<1,ROUND(X_4+X_2),INTPART(X_4));

X_6:=IF(REF(X_5,1)>=X_5 OR X_5=1,1,0);

X_7:=COUNT(X_6,0);{股票指标网}

IF(X_6 AND MOD(X_7,4)=0,CONST(HHV(HIGH,0)),DRAWNULL),STICK,COLORGREEN;

IF(X_6 AND MOD(X_7,4)=1,CONST(HHV(HIGH,0)),DRAWNULL),STICK,COLORRED;

IF(X_6 AND MOD(X_7,4)=2,CONST(HHV(HIGH,0)),DRAWNULL),STICK,COLORYELLOW;

IF(X_6 AND MOD(X_7,4)=3,CONST(HHV(HIGH,0)),DRAWNULL),STICK,COLORBLUE;

IF(X_6 AND MOD(X_7,4)=0,CONST(HHV(LOW,0)),DRAWNULL),STICK,COLORGREEN;

IF(X_6 AND MOD(X_7,4)=1,CONST(HHV(LOW,0)),DRAWNULL),STICK,COLORRED;

IF(X_6 AND MOD(X_7,4)=2,CONST(HHV(LOW,0)),DRAWNULL),STICK,COLORYELLOW;

IF(X_6 AND MOD(X_7,4)=3,CONST(HHV(LOW,0)),DRAWNULL),STICK,COLORBLUE;

 

原理解析：
X_1赋值:1
X_2赋值:28.530588
X_3赋值:DATETODAY(DATE)+1
X_4赋值:((X_3+X_1)/X_2-INTPART((X_3+X_1)/X_2))*X_2
X_5赋值:IF(X_4<1,ROUND(X_4+X_2),INTPART(X_4))
X_6赋值:IF(1日前的X_5>=X_5 OR X_5=1,1,0)
X_7赋值:统计0日满足X_6的天数
{股票指标网}
IF(X_6 AND MOD(X_7,4)=0,CONST(0日内最高价最高值),DRAWNULL),STICK,画绿色
IF(X_6 AND MOD(X_7,4)=1,CONST(0日内最高价最高值),DRAWNULL),STICK,画红色
IF(X_6 AND MOD(X_7,4)=2,CONST(0日内最高价最高值),DRAWNULL),STICK,画黄色
IF(X_6 AND MOD(X_7,4)=3,CONST(0日内最高价最高值),DRAWNULL),STICK, 画蓝色
IF(X_6 AND MOD(X_7,4)=0,CONST(0日内最低价最高值),DRAWNULL),STICK,画绿色
IF(X_6 AND MOD(X_7,4)=1,CONST(0日内最低价最高值),DRAWNULL),STICK,画红色
IF(X_6 AND MOD(X_7,4)=2,CONST(0日内最低价最高值),DRAWNULL),STICK,画黄色
IF(X_6 AND MOD(X_7,4)=3,CONST(0日内最低价最高值),DRAWNULL),STICK, 画蓝色