通达信【超能共振】主图指标源码分享

{超能共振主图}

N1:=3;N2:=5;N3:=8;N4:=13;

RSV:=-(HHV(HIGH,N4)-CLOSE)/(HHV(HIGH,N4)-LLV(LOW,N4))*100;

LWR1:=SMA(RSV,N1,1);

LWR2:=SMA(LWR1,N1,1);

A1:=LWR1>LWR2;

Z1:=LWR1<LWR2;

RSV1:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100;

K:=SMA(RSV1,N1,1);

DDU:=SMA(K,N1,1);

A2:=K>DDU;

Z2:=K<DDU;

LC:=REF(CLOSE,1);

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

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

A3:=RSI1>RSI2;

Z3:=RSI1<RSI2;

DIFF:=EMA(CLOSE,N3)-EMA(CLOSE,N4);

DEA:=EMA(DIFF,N2);

A4:=DIFF>DEA;

Z4:=DIFF<DEA;

BBI:=(MA(CLOSE,N1)+MA(CLOSE,N2)+MA(CLOSE,N3)+MA(CLOSE,N4))/4;

A5:=C>BBI;

Z5:=C<BBI;

MTM:=CLOSE-REF(CLOSE,1);

MMS:=100*EMA(EMA(MTM,N2),N1)/EMA(EMA(ABS(MTM),N2),N1);

MMM:=100*EMA(EMA(MTM,N4),N3)/EMA(EMA(ABS(MTM),N4),N3);

A6:=MMS>MMM;

Z6:=MMS<MMM;

WJ:=(H+L+C)/3;

V1:=IF(H=L,1,H-MAX(O,C));

V2:=IF(H=L,1,MAX(C,O)-WJ);

V3:=IF(H=L,1,MIN(O,C)-L);

V4:=IF(H=L,1,WJ-MIN(C,O));

V5:=VOL/IF(H=L,4,H-L);

V6:=(V1*V5);

V7:=(V2*V5);

V8:=(V3*V5);

V9:=(V4*V5);

买盘:=(V9+V8);

卖盘:=(V6+V7);

买卖差:=买盘-卖盘;

DDX:=买卖差;

DX:=MA(买卖差,5)*20;

DDX1:=SMA(DX,3,1);

DDX2:=SMA(DDX1,3,1);

DDX3:=(5*DDX2+4*REF(DDX2,1)+3*REF(DDX2,2)+2*REF(DDX2,3)+REF(DDX2,4))/15;

A7:=DDX1>DDX2;

Z7:=DDX1<DDX2;

量:=V;

换手:=V/CAPITAL*100;

VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

买盘1:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));

卖盘1:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));

DLX:=(买盘1-(-卖盘1))/量*换手;

DLX1:=SUM(DLX,6);

DLX2:=MA(DLX1,5);

A8:=DLX1>DLX2;DRAWTEXT_FIX(1,0.0,5,0,'★散人指标圈'),COLORYELLOW;

Z8:=DLX1<DLX2;

VARR1:=(2*CLOSE+HIGH+LOW)/4;

VARR2:=EMA(EMA(EMA(VARR1,4),4),4);

JE:=(VARR2-REF(VARR2,1))/REF(VARR2,1)*100;

DD:=MA(JE,3);

KK:=MA(JE,1);

A9:=KK>DD;

Z9:=KK<DD;

MTR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);

HD :=HIGH-REF(HIGH,1);

LDK :=REF(LOW,1)-LOW;

DMP:=SUM(IF(HD>0&&HD>LDK,HD,0),14);

DMM:=SUM(IF(LDK>0&&LDK>HD,LDK,0),14);

PDI:=DMP*100/MTR;

MDI:=DMM*100/MTR;

A10:=PDI>MDI;

Z10:=PDI<MDI;

T:=(A1 AND A2 AND A3 AND A4 AND A5 AND A6 AND A7 AND A8 AND A9 AND A10);

T1:=T AND REF(T,1)=0;

TT:=Z1 AND Z2 AND Z3 AND Z4 AND Z5 AND Z6 AND Z7 AND Z8 AND Z9 AND Z10;

TT1:=TT AND REF(TT,1)=0;

十指红柱:=IF(T1,10.4,DRAWNULL);

K1K:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW);

K2K:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE);

DT:=VOL*K1K/(K1K+K2K);

KT:=VOL-DT;

买量:=SUM(DT,1);

卖量:=SUM(KT,1);

DDXX:=EMA(买量-卖量,5)*VOL/CAPITAL*100;

DDXX1:=SMA(DDXX,3,1);

DDXX2:=SMA(DDXX1,3,1);

DDXX3:=EMA(DDXX2,5);

大单净量:=DDXX>0 AND MA(V,5)>MA(MA(V,5),5) AND CROSS(DDXX1,DDXX2);

DIFFX:=( EMA(CLOSE,12) - EMA(CLOSE,26))*100;

DEAX:=EMA(DIFFX,9);

MACD:=2*(DIFFX-DEAX);

绿柱消失买入:=STICKLINE(DIFFX<0,0,DIFFX,2,0);

红柱消失卖出:=STICKLINE(DIFFX>=0,0,DIFFX,2,0);

顺势红柱:=IF(DIFFX>DEAX,DIFFX,DRAWNULL);

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

MAOBV:=MA(OBV,30);

KM:=OBV>MAOBV;

TTA1:=顺势红柱 AND 十指红柱 AND KM;

TTA2:=顺势红柱 AND 大单净量 AND 十指红柱 AND KM;

{STICKLINE(TTA1,H,L,0.1,0),COLORYELLOW;

STICKLINE(TTA1,O,C,3,1),LINETHICK2,COLORYELLOW;

DRAWTEXT(TTA1 OR TTA2,L*0.97,' 共振'),COLORRED;

DRAWICON(TTA1 OR TTA2,L*0.99,11);

STICKLINE(TTA2,O,C,1,0),COLORYELLOW;

STICKLINE(TTA2,O,C,1.2,0),COLORYELLOW;}

X_1S:=POW(10,6)+241230-DATE;

X_2S:=IF(X_1S>0,1,0);

X_3S:=IF(X_1S>0,1,0);

X_4S:=HHV(CLOSE,10);

起爆线:EMA(X_4S,30),COLORMAGENTA,LINETHICK2;

IF(起爆线<=REF(起爆线,1),起爆线,DRAWNULL),COLORCYAN,LINETHICK2;

X_5S:=EMA(X_4S,120);

X_6S:=MA(CLOSE*VOL,20);

X_7S:=MA(CLOSE*VOL,60);

X_8S:=1000*(X_6S-REF(X_6S,1))/REF(X_6S,1)*2;

X_9S:=1000*(X_7S-REF(X_7S,1))/REF(X_7S,1)*2;

X_10S:=(X_8S-X_9S)*VOL*CLOSE/MA(REF(VOL*CLOSE,1),5);

X_11S:=LLV(LOW,200);

X_12S:=EMA((CLOSE-X_11S)/X_11S,30)*100+200;

X_13S:=FILTER(CLOSE>=REF(CLOSE,1)*1.05 AND X_10S>=X_12S/2 AND CLOSE>=OPEN AND (CROSS(CLOSE,起爆线) OR (CLOSE>起爆线 AND REF(LOW,1)<起爆线)),20);

X_14S:=SUMBARS(X_13S,1)*X_2S;

STICKLINE(X_13S,CLOSE,OPEN,2,0),COLORYELLOW;

STICKLINE(X_14S,REF(CLOSE,X_14S-1),REF(CLOSE,X_14S-1),2,0),COLORYELLOW;

STICKLINE(X_14S,REF(CLOSE,X_14S+1),REF(CLOSE,X_14S+1),2,0),COLORCYAN;

STICKLINE(X_13S,LOW-0.46,LOW-0.65,3.8,0),COLORCYAN;

STICKLINE(X_13S,LOW-0.44,LOW-0.65,3.6,0),COLORCYAN;

STICKLINE(X_13S,LOW-0.42,LOW-0.65,3.4,0),COLORCYAN;

STICKLINE(X_13S,LOW-0.4,LOW-0.65,3.2,0),COLOR444444;

STICKLINE(X_13S,LOW-0.38,LOW-0.65,3,0),COLOR555555;

STICKLINE(X_13S,LOW-0.36,LOW-0.65,2.8,0),COLOR666666;

STICKLINE(X_13S,LOW-0.34,LOW-0.65,2.6,0),COLOR777777;

STICKLINE(X_13S,LOW-0.32,LOW-0.65,2.4,0),COLOR888888;

STICKLINE(X_13S,LOW-0.3,LOW-0.65,2.2,0),COLOR999999;

STICKLINE(X_13S,LOW-0.28,LOW-0.55,2,0),COLOR003300;

STICKLINE(X_13S,LOW-0.26,LOW-0.55,1.8,0),COLOR004400;

STICKLINE(X_13S,LOW-0.24,LOW-0.55,1.6,0),COLOR005500;

STICKLINE(X_13S,LOW-0.22,LOW-0.55,1.4,0),COLOR006600;

STICKLINE(X_13S,LOW-0.2,LOW-0.55,1.2,0),COLOR007700;

STICKLINE(X_13S,LOW-0.18,LOW-0.55,1,0),COLOR008800;

STICKLINE(X_13S,LOW-0.16,LOW-0.55,0.8,0),COLOR009900;

STICKLINE(X_13S,LOW-0.14,LOW-0.55,0.6,0),COLOR00BB00;

STICKLINE(X_13S,LOW-0.12,LOW-0.55,0.4,0),COLOR00DD00;

STICKLINE(X_13S,LOW-0.1,LOW-0.55,0.2,0),COLORRED;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,2,0),COLORCYAN;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.8,0),COLORCYAN;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.6,0),COLOR000055;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.4,0),COLOR000066;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,1.2,0),COLOR000077;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,1,0),COLOR000088;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.8,0),COLOR000099;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.6,0),COLOR0000AA;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.4,0),COLOR0000CC;

STICKLINE(X_13S,LOW-0.48,LOW-0.3,0.2,0),COLOR0000EE;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,2,0),COLOR005566;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.8,0),COLOR006677;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.6,0),COLOR007788;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.4,0),COLOR008899;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,1.2,0),COLOR0099AA;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,1,0),COLOR00AABB;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.8,0),COLOR00BBCC;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.6,0),COLOR00CCDD;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.4,0),COLOR00DDEE;

STICKLINE(X_13S,LOW-0.38,LOW-0.3,0.2,0),COLOR00EEFF;

STICKLINE(X_13S,LOW-0.68,LOW-0.75,4,0),COLOR111188;

STICKLINE(X_13S,LOW-0.66,LOW-0.74,3.6,0),COLOR332299;

STICKLINE(X_13S,LOW-0.64,LOW-0.73,3.2,0),COLOR5533AA;

STICKLINE(X_13S,LOW-0.62,LOW-0.72,2.8,0),COLOR8844BB;

STICKLINE(X_13S,LOW-0.6,LOW-0.71,2.4,0),COLORAA55CC;

STICKLINE(X_13S,LOW-0.58,LOW-0.7,2,0),COLORCC66DD;

STICKLINE(X_13S,LOW-0.56,LOW-0.69,1.6,0),COLORYELLOW;

STICKLINE(X_13S,LOW-0.54,LOW-0.68,1.2,0),COLORYELLOW;

MM1:=TTA1 OR TTA2;

STICKLINE(TTA1 AND X_13S,H,L,0.1,0),COLORYELLOW;

STICKLINE(TTA1 AND X_13S,O,C,3,1),LINETHICK2,COLORYELLOW;

DRAWTEXT(MM1 AND X_13S,L*0.97,' 共振'),COLORRED;

DRAWICON(MM1 AND X_13S,L*0.99,11);