A0:=(L+H+C*2)/4;

A1:=EMA(A0,14)COLORBLUE,LINETHICK2;

A2:=EMA(A0,25)COLORLIBLUE,LINETHICK2;

A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;

A2X:=(A2-REF(A2,1))/REF(A2,1)*100,NODRAW;

看多:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL),COLORBLUE,LINETHICK9;

AAA:=O>IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0))),DRAWNULL),COLORYELLOW,LINETHICK9;

日:=120; 昨前:=3;

高1:=REF(HHV(H,日),昨前);

低1:=REF(LLV(L,日),昨前);

H1:=高1-(高1-低1)*0.191;

H2:=高1-(高1-低1)*0.382;

H3:=高1-(高1-低1)*0.5;

H4:=高1-(高1-低1)*0.618;

H5:=高1-(高1-低1)*0.809;

HIGH1:=REFDATE(高1,DATE),COLORRED,LINETHICK3;

HIGH2:=REFDATE(H1,DATE),COLORYELLOW,LINETHICK3;

LOW2:REFDATE(H5,DATE),COLORYELLOW,LINETHICK3;

LOW1:REFDATE(低1,DATE),COLORGREEN,LINETHICK3;

STICKLINE(C/REF(C,1)>=1.03 ,C,O,3,0),COLORYELLOW;

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.30,0.48,1,STRCAT(STRCAT('活跃：',CON2STR(活跃度比,2)),'％')),COLORCYAN;

JJCJL:=DYNAINFO(15)/DYNAINFO(4)/100;

JJJEDW:=IF(DYNAINFO(15)>10000,'','元');

JJJE:=IF(DYNAINFO(15)>10000,CON2STR(DYNAINFO(15)/10000,1),CON2STR(DYNAINFO(15),1));

JJJE1:=STRCAT(JJJE,JJJEDW)>=1.00;

JJ:=STRCAT('',STRCAT(CON2STR(JJCJL/10000,2)*1,''));

JJ1:=STRCAT(JJ,' ');

DRAWTEXT_FIX(1,0.35,0.48,0,STRCAT(JJ1,0)),COLORCYAN;

量价:=(VOL/CLOSE)/3;

B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);

B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);

B6:=B2+B3;DD1:=1;比:=B2/B3;

BBB1:=STRCAT(STRCAT('买= ',CON2STR((100*B2)/B6,0)),'%');

BBB2:=STRCAT(STRCAT('卖= ',CON2STR((100*B3)/B6,0)),'%');

BBB3:=STRCAT(STRCAT('差= ',CON2STR((100*(B2-B3))/B6,0)),'%');

{DRAWTEXT_FIX(DD1=1,0,0.50,0,BBB1),COLORRED;

DRAWTEXT_FIX(DD1=1,0,0.60,0,BBB2),COLORGREEN;}

{DRAWTEXT_FIX(DD1=1,0,0.05,0,BBB3),COLOR00FFFF;}

开盘第一笔主买:REF(V,BARSSINCE(TIME2>=093000)),NODRAW;

{第一次V不为0到现在的周期数}

A3:=CON2STR(开盘第一笔主买,0);

DRAWTEXT_FIX(1,0,0.250,0,''),COLORWHITE,LINETHICK2;

DRAWTEXT_FIX(1,0.20,0.60,1,A3),COLORWHITE,LINETHICK2;

开盘第一笔量:REF(V,BARSSINCE(TIME2>=093000)),NODRAW;