A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE< REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1< 100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1< 100 AND CLOSE< REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
A7:=IF((BARSTATUS=2),((100*A2)/A6),0);
A8:=((IF((BARSTATUS=2),((100*A3)/A6),0)));
A9:=((IF((BARSTATUS=2),((100*A4)/A6),0)));
A10:=((IF((BARSTATUS=2),((100*A5)/A6),0)));
机构买盘:=(A2),LINETHICK2;
机构卖盘:=(A3),LINETHICK2;
散户买盘:=(A4);
散户卖盘:=(A5);
机构买:=(A2),LINETHICK6,COLORRED;
机构卖:=(A3),LINETHICK6,COLORGREEN;
DD1:=1;
AAA1:=STRCAT(STRCAT('机构买',CON2STR((100*A2)/A6,0)),'%');
AAA2:=STRCAT(STRCAT('机构卖',CON2STR((100*A3)/A6,0)),'%');
AAA3:=STRCAT(STRCAT('净买入',CON2STR((100*(A2-A3))/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0,0.04,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0,0.12,0,AAA2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0,0.20,0,AAA3),COLOR00FFFF;
gspt0:HHV(H,480),DOTLINE,COLORCYAN;
gspt1:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;
gspt2:=BARSLAST((gspt1-REF(gspt1,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;
gspt3:=REF(C,gspt2);
gspt4:=REF(gspt3,gspt2);
gspt5:=REF(gspt4,gspt2);
gspt6:=REF(gspt5,gspt2);
gspt7:=REF(gspt6,gspt2);
gspt8:=REF(gspt7,gspt2);
gspt9:=REF(gspt8,gspt2);
gspt10:=REF(gspt9,gspt2);
gspt11:=REF(gspt10,gspt2);
gspt12:=MAX(DYNAINFO(3),DYNAINFO(5));
gspt13:=MIN(DYNAINFO(3),DYNAINFO(6));
gspt14:=gspt12-gspt13;
gspt15:gspt13+gspt14*8/9,COLORLIRED,DOTLINE;
gspt16:gspt13+gspt14*0.5/9,COLORGREEN,DOTLINE;
gspt17:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW,DOTLINE;
gspt18:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3);
gspt19:=EMA(gspt18,9);
gspt20:=10*(gspt18-gspt19);
gspt21:=EMA(gspt20,2);
STICKLINE(gspt20>=gspt21 AND gspt20>=0,DYNAINFO(3),gspt20+DYNAINFO(3),0,-1),COLORLIGRAY;
STICKLINE(gspt20< gspt21 AND gspt20>0,DYNAINFO(3),gspt20+DYNAINFO(3),0,-1),COLORLICYAN;
STICKLINE(gspt20>=gspt21 AND gspt20< 0,DYNAINFO(3),gspt20+DYNAINFO(3),0,-1),COLORLIGRAY;
STICKLINE(gspt20< gspt21 AND gspt20< 0,DYNAINFO(3),gspt20+DYNAINFO(3),0,-1),COLORLIGREEN;
gspt22:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));
gspt23:=EXPMA(CLOSE/gspt22,20);
gspt24:=EXPMA(CLOSE/gspt22,60);
gspt25:=EXPMA(CLOSE/gspt22,120);
gspt26:=1;
1.022,NODRAW;
gspt27:=1.033;
DRAWTEXT(CROSS(gspt23,1.02),C*0.999,' 拉'),COLORMAGENTA,LINETHICK9;
DRAWICON(CROSS(gspt23,1.04),C,45);
DRAWTEXT(CROSS(gspt23,1.04),C*0.999,' 冲'),COLORRED,LINETHICK9;
gspt28:=(VOL/CLOSE)/3;
gspt29:=SUM((IF(((gspt28>40) AND (CLOSE>(REF(CLOSE,1)))),gspt28,0)),0);
gspt30:=SUM((IF(((gspt28>40) AND (CLOSE< (REF(CLOSE,1)))),gspt28,0)),0);
gspt31:=SUM((IF(((gspt28< 40) AND (CLOSE>(REF(CLOSE,1)))),gspt28,0)),0);
gspt32:=SUM((IF(((gspt28< 40) AND (CLOSE< (REF(CLOSE,1)))),gspt28,0)),0);
gspt33:=((gspt29+gspt30)+gspt31)+gspt32;
gspt34:=IF((BARSTATUS=2),((100*gspt29)/gspt33),0);
gspt35:=((IF((BARSTATUS=2),((100*gspt30)/gspt33),0)));
gspt36:=((IF((BARSTATUS=2),((100*gspt31)/gspt33),0)));
gspt37:=((IF((BARSTATUS=2),((100*gspt32)/gspt33),0)));
DRAWTEXT(LONGCROSS(gspt16,C,2),C-0.01,'满仓买入'),COLORRED,LINETHICK9;
DRAWICON(LONGCROSS(gspt16,C,2),C-0.01,1);
STICKLINE(LONGCROSS(gspt16,C,2),C,gspt15,0,-1),COLORCYAN;
DRAWTEXT(LONGCROSS(C,gspt15,2),C+0.01,'卖出'),COLORGREEN,LINETHICK9;
DRAWICON(LONGCROSS(C,gspt15,2),C+0.01,45);