CJL1:=IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2)<10,'亿'),STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万'));

CJL:=IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2),'亿'),STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万'));

{DRAWTEXT_FIX(01,0.01,0.01.0,0,CJL),COLOR0099FF; }

DRAWTEXT_FIX(01,0.75,0.01.0,0,CJL1),COLOR0099FF;

{STICKLINE((CJL),L,L*333333333,100,0),COLOR0099FF,LINETHICK9;}

STICKLINE((CJL1),L,L*1,100,0),COLOR0099FF,LINETHICK9;

DRAWTEXT(CURRBARSCOUNT=40,0.5,'绝对地量'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=40,1.5,'成交低靡'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=40,2.5,'成交温和'),COLOR5C3317;

DRAWTEXT(CURRBARSCOUNT=40,4,'成交活跃'),COLOR5C3317;

DRAWTEXT(CURRBARSCOUNT=40,6.5,'成交带量'),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=40,11.5,'成交放量'),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=40,20,'成交巨量'),COLORRED;

DRAWTEXT(CURRBARSCOUNT=40,26,'成交怪异'),COLORYELLOW;

多:=EMA(C,3);

空:=EMA(C,5);

均衡:=EMA(空,5);

VARF1:=COUNT(CROSS(多,均衡),2)=1;

VARF2:=COUNT(CROSS(空,均衡),2)=1;

ZAI:=FILTER(VARF1 AND VARF2,2) AND TIME<=0933 ;

{DRAWTEXT(ZAI,均衡,'追涨'),COLORCYAN;}

追涨:ZAI AND TIME<=0935;

STICKLINE((追涨),L,L*9,2000,0),COLORCYAN;

****************************************************

LC:=REF(CLOSE,1);

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

WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;

活跃:=(WRSI-WR10);

活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));

{DRAWTEXT_FIX(1,0.50,0.35,1,STRCAT(STRCAT('活跃:',CON2STR(活跃度比,2)),'%')),COLORCYAN;}

CJL1:=IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2)<10,'亿'),STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万'));

CJL:=IF(DYNAINFO(10)>99999999,STRCAT(CON2STR(DYNAINFO(10)/100000000,2),'亿'),STRCAT(CON2STR(DYNAINFO(10)/10000,0),'万'));

{DRAWTEXT_FIX(01,0.01,0.01.0,0,CJL),COLOR0099FF; }

DRAWTEXT_FIX(01,0.01,0.01.0,0,CJL1),COLOR0099FF;

{STICKLINE((CJL),L,L*333333333,100,0),COLOR0099FF,LINETHICK9;}

STICKLINE((CJL1),L,L*1,100,0),COLOR0099FF,LINETHICK9;

金牛:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),LINETHICK2,COLORCYAN;

金钻趋势:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,COLORCYAN;

金牛2:=EMA(金钻趋势,25)COLORCYAN;

STICKLINE(金钻趋势>HIGH AND TIME>=1415,HIGH,LOW*999,2,0),COLORYELLOW;

VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);

回调买:=LLV(VAR23,2)=LLV(VAR23,7) AND COUNT(VAR23<0,2) AND CROSS(VAR23,MA(VAR23,2));

XGX:=金钻趋势>HIGH AND 回调买 AND L<=金钻趋势;

{DRAWTEXT(XGX,L*999,'▲买入'),COLORMAGENTA;}

VARA1:=(DVOL/C)/2,NODRAW;

VARA2:=SUM(IF(VARA1>100 AND CLOSE>REF(CLOSE,1),VARA1,0),0);

VARA3:=SUM(IF(VARA1>100 AND CLOSE<REF(CLOSE,1),VARA1,0),0);

VARA4:=SUM(IF(VARA1<100 AND CLOSE>REF(CLOSE,1),VARA1,0),0);

VARA5:=SUM(IF(VARA1<100 AND CLOSE<REF(CLOSE,1),VARA1,0),0);

VARA6:=VARA2+VARA3+VARA4+VARA5;

机买:=(VARA2/VARA6)*100,LINETHICK2,COLORRED;

机卖:=(VARA3/VARA6)*100,LINETHICK2,COLORGREEN;

主力差:=机买-机卖,LINETHICK2,NODRAW;

强度:=主力差-REF(主力差,1),NODRAW,COLORYELLOW;

{STICKLINE(强度>1.5,-3.01,-3.3,2,0),COLORYELLOW;}

L2:=MA(AMOUNT/(100*V),13);

CYS13:= (C-L2)/L2*100 ;

强庄:STICKLINE(CYS13>5 AND TIME<=0935,-99999,1,2000,0 ),COLORWHITE;