通达信天赋量柱副图指标

以下是通达信天赋量柱副图指标

N:=5;QJ0:=(HIGH+LOW+CLOSE)/3;
 QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
 QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0);
 QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
 QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN));
 QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));
 QJ6:="MACD.DIF">"MACD.DEA" AND "MACD.DEA"<0;
 QJ7:="KDJ.K">"KDJ.D" AND "KDJ.D"<30;
 QJ8:="MACD.DIF"<"MACD.DEA";
 QJ9:="KDJ.K"<"KDJ.D" AND "KDJ.K">80;
特大:QJ4*QJ5,NODRAW;大单:QJ3*QJ5,NODRAW;
中单:QJ1*QJ5,NODRAW;小单:QJ2*QJ5,NODRAW;
 W1:=SUM(大单,N)+SUM(特大,N);W2:=SUM(小单,N)+SUM(中单,N);
量振1:=特大>大单 AND 大单>小单;
量振2:=特大<小单 AND 大单<小单;
标振1:=QJ6 AND QJ7;
标振2:=QJ8 AND QJ9;
 A:=W1-W2;A0:=IF(A>0,A,0);B0:=IF(A<0,A,0);
 STICKLINE(A0,0,A0,3,0),COLOR000044;
 STICKLINE(A0,0,A0,2.5,0),COLOR000088;
 STICKLINE(A0,0,A0,1.5,0),COLOR0000AA;
 STICKLINE(A0,0,A0,1,0),COLOR0000CC;
 STICKLINE(B0,0,-B0,3,0),COLOR004400;
 STICKLINE(B0,0,-B0,2.5,0),COLOR008800;
 STICKLINE(B0,0,-B0,1.5,0),COLOR00AA00;
 STICKLINE(B0,0,-B0,1,0),COLOR00CC00;
周趋势:MA(A,5),COLORFFFFFF;
平滑值:EMA(周趋势,5),COLOR00FFFF;
 STICKLINE(标振1 AND 量振1 AND 周趋势>平滑值,0,A0,3,0),COLORYELLOW;
 DRAWTEXT(标振1 AND 量振1 AND 周趋势>平滑值,A0,'振'),COLORYELLOW;
 DRAWBAND(周趋势,RGB(200,50,50),平滑值,RGB(250,250,0));
 DRAWBAND(周趋势,RGB(255,250,250),平滑值,RGB(250,250,0));
 DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
 DEA:=EMA(DIF,9);
 HDIF:=EMA(HHV(DIF,20),1000);
 LDIF:=EMA(LLV(DIF,20),1000);
 MACD:=(DIF-DEA)*2;
 STICKLINE (CROSS(DIF,HDIF),0,5,2,0),COLORFF6A6A;
 STICKLINE (CROSS(DIF,HDIF),5,10,2,0),COLORRED;
 AA:=(MIN(CLOSE,OPEN)-LOW)/(HIGH-LOW)>0.66 ;
 XG:AA AND REF(AA,1) AND MAX(C,REF(C,1))/MIN(C,REF(C,1))<1.005;
 VAR1:=REF(LOW,1);
 VAR2:=(SMA(ABS(LOW-VAR1),13,1))/(SMA(MAX(LOW-VAR1,0),13,1))*4;
 VAR3:=EMA(VAR2,13);
 VAR4:=LLV(LOW,34);
 VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
 VAR6:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
 VAR7:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
 VAR8:=VAR6<REF(VAR7,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
 STICKLINE(VAR8 AND COUNT(VAR8,18)=1,0,18,8,0),COLORAA00BB;{粉色住}
STICKLINE(VAR8 AND COUNT(VAR8,18)=1,0,18,8,0),COLORBB11BB;
 STICKLINE(VAR8 AND COUNT(VAR8,18)=1,0,18,5,0),COLORCC22BB;
 STICKLINE(VAR8 AND COUNT(VAR8,18)=1,0,18,3,0),COLORDD33BB;
 STICKLINE(VAR8 AND COUNT(VAR8,18)=1,0,18,1,0),COLOREE44BB;
 DRAWTEXT(VAR8 AND COUNT(VAR8,18)=1,16,'●↙大资金进场'),COLOR0099FF;
 DRAWTEXT(VAR8 AND COUNT(VAR8,18)=1,12,'●↙择机买入'),COLOR0033FF;
 DRAWTEXT(VAR8 AND COUNT(VAR8,18)=1,8,'●↙多数会涨'),COLORFFFFAA;

G100:=FORCAST(CLOSE,3);
 G102:=EMA(EMA(G100,21),8),COLORYELLOW;
 G104:=EMA(EMA(G100,27),8),COLORYELLOW;
 G106:=EMA(EMA(G100,34),8),COLORYELLOW;
 T170:=HHV(CLOSE,176)*0.93,COLORRED,LINETHICK3;
 LS190:=IF(CLOSE>G106 AND CLOSE>HHV(CLOSE,10)*0.94,1,0);
 STICKLINE(LS190>0,CLOSE*2.618,CLOSE*1.08*2.618,2,0),COLORRED;
抄底1:=ABS((CROSS("MACD.DIF","MACD.DEA")
 &&"MACD.DEA"<=-0.07)*"MACD.DIF")*1.09,COLORLIMAGENTA,LINETHICK2;
 STICKLINE(抄底1,0,50,4,0),COLOR770077;
 STICKLINE(抄底1,0,50,3,0),COLOR990099;
 STICKLINE(抄底1,0,50,2,0),COLORBB00BB;
 STICKLINE(抄底1,0,50,1,0),COLORDD00DD;
 STICKLINE(抄底1,0,50,0.3,0),COLORFF00FF;
 DRAWTEXT(抄底1>0,38,'超级拐点'),COLOR00C5FF;
反向钟摆线:=MA((LLV(LOW,45)-CLOSE)/(HHV(HIGH,45)-LLV(LOW,45))*100,20);
 DK:=CROSS(-5,反向钟摆线);
STICKLINE(DK,0,50,4,0),COLOR770077;
 STICKLINE(DK,0,50,3,0),COLOR990099;
 STICKLINE(DK,0,50,2,0),COLORBB00BB;
 STICKLINE(DK,0,50,1,0),COLORDD00DD;
 STICKLINE(DK,0,50,0.3,0),COLORFF00FF;
 DRAWTEXT(DK>0,48,'终极低点'),COLOR00C5FF;

{庄家出现}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 J1:=REVERSE(J);

买点:CROSS(J,J1) AND AA;
 STICKLINE(买点,0,30,6,0),COLORBLUE;
 STICKLINE(买点,30,43,4,0),COLORWHITE;
 STICKLINE(买点,43,80,2,0),COLORYELLOW;
 DRAWTEXT(买点,70,'庄家出现'),COLORRED;

小V逆转:=REF(C,1)<REF(O,1) AND O>REF(C,1) AND C>=REF(C,1)*1.08;
 STICKLINE(小V逆转,20,0,4,0),COLOR000099;
 STICKLINE(小V逆转,30,0,2,0),COLOR0000BB;
 STICKLINE(小V逆转,40,0,1,0),COLOR0000DD;
 STICKLINE(小V逆转,60,0,0.9,0),COLOR0000FF;
 DRAWICON(小V逆转,60,34);
 DRAWTEXT(小V逆转>0,30,'小V逆转'),COLOR00C5FF;