红进绿出持股不用愁主图通达信指标 副图 源码 测试图

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

QUSHI:=REF(EMA(C,10),1);

A1X:=(EMA(C,11)-QUSHI)/QUSHI*100;

CHIBI:=IF(A1X>=0,REF(EMA(C,10),BArslAST(crOSS(A1X,0))+1),DRAWNULL);

CHIGU:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL);

STICKLINE(A1X>=0,CHIBI,QUSHI,1,0),COLOR9966CC;

STICKLINE(A1X<0,CHIGU,QUSHI,1,0),COLOR993333;

A1:=EMA(CLOSE,13)-EMA(CLOSE,55);

A2:=EMA((0.618*REF(A1,1)+0.382*A1),3);

STICKLINE(A1>=A2,H,L,0,0),COLOR00FFFF;

STICKLINE(A1>=A2,O,C,-1,0),COLOR0099DD;

STICKLINE(A1>=A2,O,C,2,0),COLOR00ABEE;

STICKLINE(A1>=A2,O,C,1,0),COLOR00ddfF;

STICKLINE(A1>=A2,O,C,0.1,0),COLOR00FFFF;

STICKLINE(A1<A2,H,L,0,0),COLOR00FF00;

STICKLINE(A1<A2,O,C,-1,0),COLOR009900;

STICKLINE(A1<A2,O,C,2,0),COLOR00AB00;

STICKLINE(A1<A2,O,C,1,0),COLOR00DD00;

STICKLINE(A1<A2,O,C,0.1,0),COLOR00FF00;

P1:=EMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5);

P2:=(HHV(HIGH,55)-LLV(LOW,55))/EMA((CLOSE-LLV(LOW,55)),5);

P3:=CROSS(P2,P1);

P4:=REF(P2,2)<REF(P2,1) AND P2<REF(P2,1);

P5:=COUNT(P3,7)>0 AND P4;

P6:=3*SMA((CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100,5,1)-2*SMA((CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100,5,1);

P7:= (CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;

MW:= EMA(P6,5);

NU:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;

NU0:=SMA(NU,3,1);

NU00:=SMA(NU0,3,1);

NU10:=3*NU0-2*NU00;

NU1:=EMA(3*NU0-2*NU00,4);

NU2:=SMA(NU1,5,1);

NW:=MA(3*SMA(P7,6,1)-2*SMA(SMA(P7,5,1),5,1),2);

HW:=CROSS(NW,0) AND MW<56;

DP:=IF(P5 AND COUNT(P5,5)=1,1,0);

TP:=(HW AND DP) OR ((CROSS(IF(P6<3 AND NU2<5 AND NW<4,1,0),0.5))AND LLV(L,34)/HHV(H,144)<0.78),NODRAW;

STICKLINE(TP,H,L,0,0),COLOR0000FF;

STICKLINE(TP,O,C,-1,0),COLOR000099;

STICKLINE(TP,O,C,2,0),COLOR0000AB;

STICKLINE(TP,O,C,1,0),COLOR0000DD;

STICKLINE(TP,O,C,0.1,0),COLOR0000FF;

DRAWTEXT(TP,C*0.96,'TURNING POINT'),COLORRED;

A:=EMA((EMA(CLOSE,29)+EMA(CLOSE,31)+EMA(CLOSE,33))/3,3);

DD:REF(A,1),COLORBROWN;

 

原理解析：
QUSHI赋值:1日前的C的10日指数移动平均
A1X赋值:(C的11日指数移动平均-QUSHI)/QUSHI*100
CHIBI赋值:IF(A1X>=0,REF(C的10日指数移动平均,上次A1X上穿0距今天数+1),DRAWNULL)
CHIGU赋值:IF(A1X<0,REF(C的10日指数移动平均,上次0上穿A1X距今天数+1),DRAWNULL)
当满足条件A1X>=0时,在CHIBI和QUSHI之间画柱状线
当满足条件A1X<0时,在CHIGU和QUSHI之间画柱状线
A1赋值:收盘价的13日指数移动平均-收盘价的55日指数移动平均
A2赋值:EMA((0.618*1日前的A1+0.382*A1),3)
当满足条件A1>=A2时,在H和L之间画柱状线
当满足条件A1>=A2时,在O和C之间画柱状线
当满足条件A1>=A2时,在O和C之间画柱状线
当满足条件A1>=A2时,在O和C之间画柱状线
当满足条件A1>=A2时,在O和C之间画柱状线
当满足条件A1当满足条件A1当满足条件A1当满足条件A1当满足条件A1 P1赋值:EMA((收盘价-55日内最低价最低值)/(55日内最高价最高值-55日内最低价最低值)*100,5)
P2赋值:(55日内最高价最高值-55日内最低价最低值)/EMA((收盘价-55日内最低价最低值),5)
P3赋值:P2上穿P1
P4赋值:2日前的P2<1日前的P2 AND P2<1日前的P2
P5赋值:统计7日满足P3的天数>0 AND P4
P6赋值:3*SMA((收盘价-89日内最低价最低值)/(89日内最高价最高值-89日内最低价最低值)*100,5,1)-2*SMA((收盘价-89日内最低价最低值)/(89日内最高价最高值-89日内最低价最低值)*100,5,1)
P7赋值: (收盘价-34日内最低价最低值)/(34日内最高价最高值-34日内最低价最低值)*100
MW赋值: P6的5日指数移动平均
NU赋值:(收盘价-34日内最低价最低值)/(34日内最高价最高值-34日内最低价最低值)*100
NU的3日[1日权重]移动平均
NU0的3日[1日权重]移动平均
NU10:=3*NU0-2*NU00
NU1:=3*NU0-2*NU00的4日指数移动平均
NU1的5日[1日权重]移动平均
P7的6日[1日权重]移动平均
HW赋值:NW上穿0 AND MW<56
DP赋值:IF(P5 AND 统计5日满足P5的天数=1,1,0)
如果P6<3 AND NU2<5 AND NW<4返回1否则返回0
当满足条件TP时,在H和L之间画柱状线
当满足条件TP时,在O和C之间画柱状线
当满足条件TP时,在O和C之间画柱状线
当满足条件TP时,在O和C之间画柱状线
当满足条件TP时,在O和C之间画柱状线
当满足条件TP时,在C*0.96和'TURNING POINT'位置书写文字
A赋值:EMA((EMA(收盘价,29)+EMA(收盘价,31)+EMA(收盘价,33))/3,3)
输出DD:1日前的A,COLORBROWN