潜龙分时出击－精品通达信指标公式源码分享

VAR1D:=EMA(CLOSE,2)-EMA(CLOSE,89);    

VAR1E:=EMA(VAR1D,30);    

VAR1F:=2*(VAR1D-VAR1E)*10;    

VAR20:=POW(VAR1F,3)*0.1+POW(VAR1F,2);    

VAR25:=IF(YEAR<2058 AND VAR1F>0.015,VAR20,0)/45/4;    

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

SKK :=( EMA(JJ,13) - EMA(JJ,21))*180,COLORGRAY;   

SDD := EMA(SKK,2),COLORGRAY;   

多方:=(SKK-SDD)*0.000000001,COLORRED,LINETHICK0;   

空方:-1*(SKK-SDD)*0.000000001,COLORGREEN,LINETHICK0;   

RC:=DYNAINFO(3);   

RC,COLORWHITE;   

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

SK:=(SLOPE(EMA(MAV,2),7)*15+MAV)*10,COLORRED;   

SD:=EMA(SK,2),COLORGREEN;   

SJ:=2.8*SK-1.8*SD,COLORYELLOW;   

S2:=SMA(C,3,1);   

S6:=SMA(C,5,1);   

DK:=2*(S2-S6)*15*5*1.5, COLORSTICK;   

S121:STICKLINE(SK>SD AND DK<RC OR DK=RC,RC,RC+DK,1,0),COLORRED;   

S122:STICKLINE(DK>0 AND SK>SD ,RC,RC+DK,1,0),COLOR6633CC;   

S123:STICKLINE(DK>0 AND SK<SD ,RC,RC+DK,1,0),COLORFFAA66;    

S124:STICKLINE(DK>0 AND 多方<空方,RC,RC+DK,1,0),COLORGREEN;    

S12:STICKLINE(CROSS(多方,空方),RC,RC+DK,1,0),COLORYELLOW;   

S22:STICKLINE(CROSS(空方,多方),RC,RC+DK,1,0),COLORGREEN;   

S32:STICKLINE(DK<0 AND 多方<空方 AND SK<SD,RC,RC+DK,1,0),COLORGREEN;   

庄筹:=WINNER(CLOSE)*100,COLORRED, LINETHICK2;   

筹码集中度:EMA(庄筹,20),COLORRED, LINETHICK1;   

筹码集中警戒线:EMA(筹码集中度,5),COLORYELLOW, LINETHICK1;   

筹码集中生命线:EMA(筹码集中警戒线,5),COLORBLUE, LINETHICK1;   

STICKLINE(筹码集中度>筹码集中警戒线,筹码集中度,筹码集中警戒线,2,0),COLORRED;   

STICKLINE(筹码集中度<筹码集中警戒线,筹码集中度,筹码集中警戒线,2,0),COLORGREEN;   

STICKLINE(筹码集中警戒线>筹码集中生命线,筹码集中警戒线,筹码集中生命线,2,0),COLORFF00FF;   

STICKLINE(筹码集中警戒线<筹码集中生命线,筹码集中警戒线,筹码集中生命线,2,0),COLORFFFF00;   

A:=CROSS(筹码集中度,筹码集中警戒线);   

B:=CROSS(筹码集中警戒线,筹码集中度);   

DRAWICON(A,筹码集中度-0.1,10);    

DRAWICON(B,筹码集中度+0.1,12);   

警戒:=85,COLOR5AFF9E;   

警戒1:=15,COLOR5AFF9E;   

VAR1:=EMA(CLOSE,8);   

VAR2:=EMA(VAR1,20);   

VAR3:=CROSS(VAR1,VAR2);   

VAR4:=VAR1<EMA(CLOSE,120);   

VAR5:=EMA(SMA((CLOSE-LLV(LOW,19))/(HHV(HIGH,19)-LLV(LOW,19))*100,8,1),3);   

天河过江龙:IF(VAR5>=20 AND VAR5<80,VAR5,DRAWNULL),COLORLIBLUE;   

IF(VAR5>=80,VAR5,DRAWNULL),COLORBLUE;   

IF(VAR5>=90,VAR5,DRAWNULL),COLORGREEN;   

IF(VAR5<20,VAR5,DRAWNULL),COLORYELLOW;   

IF(VAR5<10,VAR5,DRAWNULL),COLORRED;   

风险线:80,POINTDOT,COLORGREEN;   

DRAWTEXT(ISLASTBAR,75,'风险线');   

牛熊线:50,POINTDOT,COLORWHITE;   

DRAWTEXT(ISLASTBAR,50,'牛熊线');   

安全线:20,POINTDOT,COLORYELLOW;   

DRAWTEXT(ISLASTBAR,25,'安全线');