通达信四图共振AT主图 原理是信号共振源码

　　DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,HYBLOCK),COLOR0000FF;

　　DRAWTEXT_FIX(ISLASTBAR,0.01,0.07,0,DYBLOCK),COLORYELLOW;

　　DRAWTEXT_FIX(ISLASTBAR,0.01,0.13,0,GNBLOCK),COLORFF00FF;

　　DRAWTEXT_FIX(ISLASTBAR,0.01,0.2,0,FGBLOCK),COLOR0080FF;

　　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

　　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

　　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

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

　　DEA:=EMA(DIFF,N2);

　　A4:=DIFF>DEA;

　　Z4:=DIFF

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

　　A5:=C>BBI;

　　Z5:=C

　　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

　　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

　　量:=V;

　　换手:=V/CAPITAL*100;

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

　　买盘1:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE

　　卖盘1:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE

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

　　DLX1:=SUM(DLX,6);

　　DLX2:=MA(DLX1,5);

　　A8:=DLX1>DLX2;

　　Z8:=DLX1

　　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

　　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

　　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);

　　十大股东占比:(FINVALUE(244)/FINVALUE(239))*100,NODRAW,COLORYELLOW;

　　筹码衰减系数:100/(100-十大股东占比),NODRAW,COLORCYAN;

　　{十大股东占比小于65%时，无需修改衰减系数}