DRAWGBK(C>0,RGB(0,0,110),RGB(0,25,0),0,' ',0);

PJ:=(H+L+C)/3;

V1:=IF(H=L,1,H-MAX(O,C));

V2:=IF(H=L,1,MAX(C,O)-PJ);

V3:=IF(H=L,1,MIN(O,C)-L);

V4:=IF(H=L,1,PJ-MIN(C,O));

V5:=VOL/IF(H=L,4,H-L);

V6:=(V1*V5)+(V2*V5);

V7:=(V3*V5)+(V4*V5);

WP1:=DYNAINFO(23);

NP1:=DYNAINFO(22);

WP2:=IF(ISLASTBAR,V7*240/FROMOPEN,V7);

NP2:=IF(ISLASTBAR,V6*240/FROMOPEN,V6);

主買:IF(ISLASTBAR AND PERIOD=5,WP1,WP2),COLORRED,NODRAW;

主賣:IF(ISLASTBAR AND PERIOD=5,NP1,NP2),COLORGREEN,NODRAW;

凈量:=ABS(主買-主賣);

DRAWRECTREL(50,0,CONST(主買*500/(主買+主賣)+50),80,RGB(230,65,0));

DRAWRECTREL(50,110,CONST(主賣*500/(主買+主賣)+50),190,RGB(0,104,0));

主買1:=BUYVOL,COLORLIRED,NODRAW;

主賣1:=-SELLVOL,COLORLIBLUE,NODRAW;

{凈買:BUYVOL-SELLVOL,COLORMAGENTA,NODRAW;}

總量:=VOL,VOLSTICK;

ZZ:=IF(REF(C,1)>REF(O,1) AND O>REF(C,1)*1.014 AND C<O*1.02,1,3);

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));

飽和度:IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW;

AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

{主買:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL /2)),POINTDOT,COLORRED;

主賣:=IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,AA*(HIGH-LOW),VOL /2)),COLORCYAN,POINTDOT;}

V05:=MA(V,5);

V12:=MA(V,12);

V34:=MA(V,34);

C6:=MA(C,6);

STICKLINE(C,0,VOL,2,0),COLORGRAY;

STICKLINE(CROSS(C,C6) AND V>V05*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,0,VOL,2,0),COLORRED;

STICKLINE(CROSS(C6,C) AND V>V05*1.2 AND V>V12*1.2,0,VOL,2,0),COLORGREEN;

STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05,0,VOL,2,0),COLORYELLOW;

STICKLINE(VOL<MA(VOL,5)/2 AND V<V12/2,0,VOL,2,0),COLORBLUE;

STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05 AND CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,VOL*0.5,0,2,0),COLORRED;

STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05 AND CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,VOL*0.5,0,2,0),COLORWHITE;

N:=27;

N2:=9;

N4:=16;

VAR1:=IF(DATE>=1030131,1,1);

VAR2:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

VAR3:=SMA(VAR2,3,1)*VAR1;

VAR4:=SMA(VAR3,N2,1)*VAR1;

VAR5:=3*VAR3-2*VAR4*VAR1;

STICKLINE(VOL AND VAR5>VAR4,0,VOL,2,1),COLORRED;

STICKLINE(VOL AND VAR5<VAR4,0,VOL,2,1),COLORGREEN;

STICKLINE(VOL AND VAR4<N4,-10,VOL*0.5,2,0),COLORBLUE;

VARN2:=CLOSE-REF(CLOSE,1);

VARN3:=IF(CLOSE-REF(CLOSE,1)>=0,VARN2,0);

VARN4:=REF(CLOSE,1)-CLOSE;

VARN5:=IF(CLOSE-REF(CLOSE,1)<=0,VARN4,0);

VARN6:=SUM(VARN3,16)/SUM(VARN5,16);

VARN7:=100-100/(1+VARN6);

VARN8:=EMA(VARN7,16);

VARN9:=EMA(VARN8,8);

VARNA:=EMA(VARN8,45);

MO:=(VARN8-VARNA);

ML:=(VARN9-VARNA);

VARN1A:=EMA(CLOSE,32);

VARN2A:=MA(OPEN,32);

趨勢:=(VARN1A-VARN2A);

STICKLINE(MO>ML AND 趨勢<0 AND MO>REF(MO,3) AND 趨勢>REF(趨勢,3),VOL,0,1,0) COLORYELLOW;

AAA:DRAWLINE(VOL>=HHV(VOL,35),VOL,VOL<=LLV(VOL,8),HHV(VOL,3),1),COLORWHITE;

BBB:DRAWLINE(VOL<=LLV(VOL,8),VOL,VOL>=HHV(VOL,35),HHV(VOL,3),0),COLORYELLOW;

量比:VOL/REF(MA(VOL,5),1),NODRAW,COLORAAAAAA;

X_10:=VOL=HHV(VOL,30);

X_11:=BARSLAST(FILTER(CROSS(0.9,X_10),2))+1;

X_12:=REF(VOL,X_11);

STICKLINE(X_11<=30,X_12,X_12,1,0),COLORBROWN;

VVOL:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW; STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,(-1),(-1)),COLOR00C0C0;

XA_1:=AMOUNT;

XA_2:=MA(AMOUNT,5); XA_3:=MA(AMOUNT,10);

XA_4:=HHV(XA_1,30)=XA_1;

XA_5:=HHV(XA_1,60)=XA_1;

XA_6:=HHV(XA_1,100)=XA_1;

XA_7:=HHV(XA_1,250)=XA_1;

STICKLINE(XA_4 AND C>REF(C,1),VOL,VOL*0.2,3,0),COLORMAGENTA;

STICKLINE(XA_5 AND C<REF(C,1),VOL,VOL*0.2,3,0),COLORBLUE;

STICKLINE(XA_6,VOL,VOL*0.2,3,0),COLOR0099FF;

STICKLINE(XA_7 AND C>REF(C,1),VOL,VOL*0.2,3,0),COLOR0033FF;

STICKLINE(XA_6 AND C<REF(C,1),VOL,VOL*0.2,3,0),COLORFF3399;

VARB1:=ZIG(3,96/12);

DRAWICON(REF(VARB1,2)<REF(VARB1,1) AND VARB1<REF(VARB1,1),VOL*1.2,15);

DRAWICON(REF(VARB1,2)>REF(VARB1,1) AND VARB1>REF(VARB1,1),VOL*1.3,9);

總額:=AMOUNT;

買0:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));

買%:=買0/AMOUNT*100;

流入:=AMOUNT*買%/10000000000;

流出:=AMOUNT/100000000-流入;

凈流:=(流入-流出);

總額3:=SUM(AMOUNT,3);

流入3:=SUM(流入,3);

流出3:=SUM(流出,3);

凈流3:=SUM(流入-流出,3);

總額5:=SUM(AMOUNT,5);

流入5:=SUM(流入,5);

流出5:=SUM(流出,5);

凈流5:=SUM(流入-流出,5);

DRAWTEXT_FIX(1,0.4,0,0,'凈流入(億):'),COLOR8080FF,COLORYELLOW;

DRAWTEXT_FIX(1,0.5,0,0,'1日'),COLOR8080FF,COLORWHITE;

DRAWNUMBER_FIX(1,0.6,0,0,CONST((凈流))),COLORYELLOW;

DRAWTEXT_FIX(1,0.7,0,0,'3日'),COLOR8080FF,COLORWHITE;

DRAWNUMBER_FIX(1,0.78,0,0,CONST((凈流3))),COLORYELLOW;

DRAWTEXT_FIX(1,0.87,0,0,'5日'),COLOR8080FF,COLORWHITE;

DRAWNUMBER_FIX(1,1,0,0,CONST((凈流5))),COLORYELLOW;

X01:=IF(MA(C,5)>MA(C,10),20,0);

X02:=IF(MA(C,20)>MA(C,60),10,0);

X3:=IF(KDJ.J>KDJ.K,10,0);

X4:=IF(MACD.DIF>MACD.DEA,10,0);

X5:=IF(MACD.MACD>0,10,0);

X6:=IF(V>MA(V,60),10,0);

X7:=IF(WINNER(C)>0.5,10,0);

X8:=IF(C/REF(C,1)>1.03,10,0);

XG:=X01+X02+X3+X4+X5+X6+X7+X8;

DRAWTEXT_FIX(V>O,0.15,0,0,STRCAT('趨勢評分:',STRCAT(CON2STR(XG,0),' '))),COLORLIBLUE;