万事万物副图－精品通达信指标公式源码分享

A0:=(L+H+C*2)/4;   

工作:=EMA(A0,14)COLORYELLOW,LINETHICK1;   

度假:=EMA(A0,25)COLORYELLOW,LINETHICK2;   

A1X:=(工作-REF(工作,1))/REF(工作,1)*100;   

A2X:=(度假-REF(度假,1))/REF(度假,1)*100;   

G:=BARSLAST(CROSS(A1X,0));   

买入止损:REF(A0,G),COLORBLUE,LINETHICK1;   

IF(A1X>=0,买入止损,DRAWNULL),LINETHICK1,COLORYELLOW;   

A2:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);   

A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;   

A5:=EMA(CLOSE,12)-EMA(CLOSE,26);   

A6:=EMA(A5,9);   

A7:=(A5<-0.1 AND A5>A6);   

财神:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;   

DRAWICON(CROSS(A2,EMA(A2,5)) AND (A4-EMA(A2,5))>40 AND A7,LLV(L,21)*1.02,1);   

STICKLINE(C>REF(C,1)*1.09,C,O,2,0)COLORRED,LINETHICK2;   

STICKLINE(C<REF(C,1)*0.901,C,O,2,0)COLORGREEN,LINETHICK1;   

减:IF(A2X>=0,度假,DRAWNULL),COLORMAGENTA,LINETHICK1;   

少:IF(A1X>=0,工作,DRAWNULL),COLORRED,LINETHICK1;   

操:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.05,REF(A0,BARSLAST(CROSS(A1X,0)))*1.05,DRAWNULL),LINETHICK1,COLORWHITE;   

作:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.1,REF(A0,BARSLAST(CROSS(A1X,0)))*1.1,DRAWNULL),COLORGREEN,;   

顺:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.2,REF(A0,BARSLAST(CROSS(A1X,0)))*1.2,DRAWNULL),,COLORC9BE3F,;   

应:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.3,REF(A0,BARSLAST(CROSS(A1X,0)))*1.3,DRAWNULL),,COLORFFFF00,;   

趋:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.4,REF(A0,BARSLAST(CROSS(A1X,0)))*1.4,DRAWNULL),,COLORFFFFB9,;   

势:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.5,REF(A0,BARSLAST(CROSS(A1X,0)))*1.5,DRAWNULL),,COLORC4E1F4,;   

破:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.6,REF(A0,BARSLAST(CROSS(A1X,0)))*1.6,DRAWNULL),,,COLORC5C9F3,LINETHICK2;   

位:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.7,REF(A0,BARSLAST(CROSS(A1X,0)))*1.7,DRAWNULL),,,COLOR00FFFF,LINETHICK2;   

出:IF(H>=REF(A0,BARSLAST(CROSS(A1X,0)))*1.8,REF(A0,BARSLAST(CROSS(A1X,0)))*1.8,DRAWNULL),,COLORFF00FF,CROSSDOT,LINETHICK2;   

MA20:=MA(C,20);{20均线}    

MA30:=MA(C,30);{30均线，不作图}    

MA40:=MA(C,40);{40均线}    

MA60:=MA(C,60);{60均线}    

AA:=CROSS(MA30,MA60);{30线金叉60线，代替20、40金叉60，为了好看}    

BB:=BARSLAST(AA);{金叉到现在的天数}    

托辐射:REF(MA40,BB)COLORBLUE, CROSSDOT;{画托辐射(小叉叉线)};   

LC:=REF(CLOSE,1);    

RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;   

跑了不悔:IF(CROSS(84,RSI),HIGH*1.02,HIGH+1),POINTDOT,LINETHICK7,COLORYELLOW;   

HIGH+1,POINTDOT,LINETHICK7,COLOR000000;