[通达信指标]通达信龙系指标共振提示公式

01

指标源码

D:=3;

S:=30;

M:=30;

SM:=(OPEN+HIGH+CLOSE+LOW)/4;

SMID:=MA(SM,D);

IM:=(INDEXO+INDEXH+INDEXL+INDEXC)/4;

IMID:=MA(IM,D);

SI1:=(SMID-REF(SMID,1))/SMID;

II:=(IMID-REF(IMID,1))/IMID;

RADER1:=SUM((SI1-II)*2,S)*1000;

RADERMA:=SMA(RADER1,M,1);

LC := REF(CLOSE,1);

VID := SUM(VOL,2)/(((HHV(HIGH,2)-LLV(LOW,2)))*100);

RC := (CLOSE-LC)*VID;

LONG := SUM(RC,0);

DIFF := SMA(LONG,10,1);

DEA := SMA(LONG,20,1);

LON :=DIFF-DEA;

LONMA :=MA(LON,10);

VAR1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);

VAR2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;

MY:=VAR2*(1+VAR1);

SHTMA:=MA(MY,5);

JAR1:=(CLOSE+LOW+HIGH)/3; 

JAR2:=SUM(((JAR1-REF(LOW,1))-(HIGH-JAR1))*VOL/100000/(HIGH-LOW),0); 

JAR3:=EMA(JAR2,1); 

JCS:=JAR3; 

JCM:=MA(JAR3,12); 

JCL:=MA(JAR3,26);

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

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

MMS:=MA(3*RSI2-2*SMA(MAX(CLOSE-LC,0),16,1)/SMA(ABS(CLOSE-LC),16,1)*100,3);

MMM:=EMA(MMS,8);

MML:=MA(3*RSI3-2*SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100,5);

A:=SUM(((CLOSE-LOW)-(HIGH-CLOSE))*VOL/10000/(HIGH-LOW),0);

ADVOL:=A;

MA1:=MA(A,30);

MA2:=MA(MA1,100);

Q1:=RADER1;

Q2:=RADERMA;

W1:=LON;

W2:=LONMA;

E1:=MY;

E2:=SHTMA;

R1:=JCM;

R2:=JCL;

T1:=MMM;

T2:=MML;

Y1:=MA1;

Y2:=MA2;

A1:=Q1>Q2;

B1:=Q1<Q2;

A2:=W1>W2;

B2:=W1<W2;

A3:=E1>E2;

B3:=E1<E2;

A4:=R1>R2;

B4:=R1<R2;

A5:=T1>T2;

B5:=T1<T2;

A6:=Y1>Y2;

B6:=Y1<Y2;

DRAWTEXT(ISLASTBAR=1,0.5,’    .RAD’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,1.5,’    .LON’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,2.5,’    .SHT’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,3.5,’    .ZLJC’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,4.5,’    .ZLMM’),COLORFFFFFF;

DRAWTEXT(ISLASTBAR=1,5.5,’    .ADVOL’),COLORFFFFFF;

7,COLOR000000;

0,COLOR000000;

DRAWICON(A6,6,1);

DRAWICON(B6,6,2);

DRAWICON(A5,5,1);

DRAWICON(B5,5,2);

DRAWICON(A4,4,1);

DRAWICON(B4,4,2);

DRAWICON(A3,3,1);

DRAWICON(B3,3,2);

DRAWICON(A2,2,1);

DRAWICON(B2,2,2);

DRAWICON(A1,1,1);

DRAWICON(B1,1,2);

STICKLINE(A6,5.5,6,2,0),COLORMAGENTA;

STICKLINE(B6,5.5,6,2,1),COLORLIGRAY;

STICKLINE(A5,4.5,5,2,0),COLORYELLOW;

STICKLINE(B5,4.5,5,2,1),COLORLIGRAY;

STICKLINE(A4,3.5,4,2,0),COLORRED;

STICKLINE(B4,3.5,4,2,1),COLORLIGRAY;

STICKLINE(A3,2.5,3,2,0),COLORGREEN;

STICKLINE(B3,2.5,3,2,1),COLORLIGRAY;

STICKLINE(A2,1.5,2,2,0),COLORBLUE;

STICKLINE(B2,1.5,2,2,1),COLORLIGRAY;

STICKLINE(A1,0.5,1,2,0),COLORCYAN;

STICKLINE(B1,0.5,1,2,1),COLORLIGRAY;

02

图片示例

图片

图片

发布者:股市刺客,转载请注明出处:https://www.95sca.cn/archives/111940
站内所有文章皆来自网络转载或读者投稿,请勿用于商业用途。如有侵权、不妥之处,请联系站长并出示版权证明以便删除。敬请谅解!

(0)
股市刺客的头像股市刺客
上一篇 37分钟前
下一篇 37分钟前

相关推荐

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注