AF1:=1;
TT:=BARSLAST(HOUR=9 AND MINUTE=(30+AF1))+1;
均价:AMOUNT/VOL/100,COLORYELLOW;
价位:C,COLORWHITE,LINETHICK4;
盘整:IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2;

V1:=V;
HH:=C>REF(C,1)   AND C/均价>(1+0.03);
LL:=C<REF(C,1)   AND C/均价<(1-0.03);
HH1:=CROSS(SUM(HH,0),0.5);
LL1:=CROSS(SUM(LL,0),0.5);
SS1:=SUM(HH1,0)*CROSS(COUNT(C<REF(C,1),BARSLAST(HH1)),0.5);
BB1:=SUM(LL1,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(LL1)),0.5);
CS1:CONST(SUM(IF(SS1,REF(C,1),DRAWNULL),0)),COLORGREEN,LINETHICK2;
CB1:CONST(SUM(IF(BB1,REF(C,1),DRAWNULL),0)),COLORRED,LINETHICK2;

HH2:=CROSS(SUM(HH AND C>CS1*1.03,0),0.5);
LL2:=CROSS(SUM(LL AND C<CB1*0.97,0),0.5);
SS2:=SUM(HH2,0)*CROSS(COUNT(C<REF(C,1),BARSLAST(HH2)),0.5);
BB2:=SUM(LL2,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(LL2)),0.5);
CS2:CONST(SUM(IF(SS2,REF(C,1),DRAWNULL),0)),COLORGREEN,LINETHICK1;
CB2:CONST(SUM(IF(BB2,REF(C,1),DRAWNULL),0)),COLORRED,LINETHICK1;

DRAWICON(HH1 OR HH2,C*1.01,39);
DRAWICON(LL1 OR LL2,C*0.99,38);
DRAWICON(BB1 OR BB2,REF(C,1)*0.99,7);
DRAWICON(SS1 OR SS2,REF(C,1)*1.01,8);

成交额:=V*C/100,NODRAW;{万元}

A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A6:=(A2+A3);

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

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.02,0,AAA1),COLORRED;

DRAWTEXT_FIX(DD1=1,0,0.13,0,AAA2),COLOR00FF00;

DRAWTEXT_FIX(DD1=1,0,0.24,0,AAA3),COLOR00FFFF;
 
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

H1:EMA(C,8);

H2:EMA(H1,20);

VAR1:=(HHV(H,36)-C)/(HHV(H,36)-LLV(L,36))*100;

VAR2:=SMA(VAR1,5,1);

VAR3:=SMA(VAR2,8,1);

VAR4:=CROSS(VAR2,VAR3) AND VAR3< 20;

VAR5:=C>LLV(C,60)*1.13 AND VAR4;

VAR6:=IF(C>200,VAR4,VAR5);

STICKLINE(H1>H2,H1,H2,0,1),COLORRED;

STICKLINE(H1< H2,H1,H2,0,1),COLORGREEN;

现价:C,COLORWHITE,LINETHICK2;
盘整1:IF(HOUR>8.75 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK6;
H11:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H11-L1;
阻力:L1+P1*7.7/8,NODRAW;
支撑:L1+P1*0.3/8,NODRAW;
STICKLINE(CROSS(支撑,现价),支撑,阻力,1,0),NODRAW;
DRAWTEXT(LONGCROSS(支撑,现价,8),支撑,'----★B吸'),COLORRED;{吸}
DRAWTEXT(LONGCROSS(现价,阻力,8),现价,'----★S抛'),COLORGREEN;{抛};
A:C,COLORWHITE,LINETHICK3;