M1:=5;M2:=10;M3:=20;M4:=60;K1:=103;
MA1:MA(CLOSE,M1);
MA2:MA(CLOSE,M2);
MA3:MA(CLOSE,M3);
MA4:MA(CLOSE,M4);
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.98,1) ;
DRAWICON((ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*1.01,2);
VAR3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR6:=(VAR3+VAR4+VAR5)/3;
VAR7:=EMA(VAR6,5);
ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;
VAR8:=IF(VAR6<=-20,10,0);
VAR9:=HHV(VAR8,10);
VARA:=IF(VAR9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
K:=EMA(VAR7,5)*2, , COLORFF00FF;
D:=EMA(K,5), , COLORWHITE;
J:=K*3-D*2, ,COLORYELLOW;
VARB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10;
HS:=VOL/CAPITAL*100, , COLORGREEN;
DRAWTEXT(VAR8=10 AND FILTER(VAR8=10,5),LOW*0.93,'接近底部') COLORMAGENTA;
DRAWTEXT(VARA=20,LOW*0.95,'底部') COLORYELLOW;
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=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);
VAR10:=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);
VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,'大资金活动'),LINETHICK1,COLORFF00FF;
VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);
VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*0.95,'大笔成交') COLORWHITE;
DRAWICON(CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)),L*0.91,5);
DRAWICON(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),H*1.04,6);
A1:=COST(95);
A2:=COST(5);
集中度:=(A1-A2)*100/(A1+A2),COLORRED,LINETHICK2;
DRAWTEXT(CLOSE<REF(CLOSE,1) AND 集中度>REF(集中度,1),LOW*0.92,'#'),COLORLIMAGENTA;
VARAA:=CLOSE/MA(CLOSE,48)*100;
VARBB:=CLOSE/MA(CLOSE,50)*100;
VARC:=HIGH/LOW>1.078/K1*100;
VARD:=VARC AND COUNT(VARC,4)>2;
VAR1:=CLOSE;
VAR2:=MA(VAR1,6);
VAR33:=MA(VAR1,24);
VAR44:=MA(VAR1,32);
VAR55:=MA(VAR1,62);
VAR66:=MA(VAR1,105);
百:=VAR55/VAR66*100;发:=VAR44/VAR2*100;中:=VAR33/VAR2*100;
财:=VAR2/VAR1*100;入:=CLOSE/COST(8)*100;

DRAWTEXT(VARAA<70*K1/100 AND VARBB<71*K1/100 AND VARD AND
(VARAA OR VARBB),LOW*0.89,'百中'),COLORGREEN;
B1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE < REF(CLOSE,1),0-VOL,0)),0);
B2:=SUMBARS(VOL,CAPITAL);
B3:=IF(CLOSE>LLV(CLOSE,B2),1,-1)*IF(B1>LLV(B1,B2),1,-1);
B4:=IF(B3=-1,1,0);
B5:=COUNT(B4=1,8)>3;
B6:=SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100;
B7:=DMA((HIGH+LOW+CLOSE)/3,VOL/B6);
B8:=(CLOSE-B7)/B7*100<-17;
B9:=(CLOSE-MIN(REF(CLOSE,5)*0.830,REF(CLOSE,21)*0.720))/CLOSE<0.05;
DRAWTEXT( B8 AND B9 AND B5,LOW*0.87,'运钞车'),COLORMAGENTA;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(FF1,LOW*0.87,'鼠'),COLORMAGENTA;

查看更多通达信公式,请你访问http://gupiao.onjobs.com.cn/category/2/