{流入比换手} DRAWGBKlast(DATE>900101,strip(RGB(10,10,10),RGB(0,0,140),0));
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)){,LINETHICK0,COLORRED};
卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)){,LINETHICK0,COLORCYAN};
进出量:=买量+卖量{,COLOR00FFFF,LINETHICK0};
0,COLOR0000FF;
五日内净流入:=SUM(进出量,5);
十三日净流入:=SUM(进出量,13);
A1:=SUMBARS(VOL,CAPITAL);
CMA:=IF(CAPITAL>0,SUM(AMOUNT,A1)/SUM(VOL,A1)/100,EMA(CLOSE,120));
百分之百换手价:CMA,LINETHICK0,ColorFFC0FF;{99.99%换手平均成本价};
DRAWTEXTABS(720,5,'百分之百换手价! :'+NUMTOSTRN(百分之百换手价,2)+'元'),Color00C1FF,LINETHICK5;
今日流入换手:=(进出量/CAPITAL*100);
DRAWTEXTABS(5,5,'今日流入换手:'+NUMTOSTRN(今日流入换手,2)+'%'),Color00ff00,LINETHICK5;
今日换手:=VOL/CAPITAL*100;
DRAWTEXTABS(240,5,'今日换手:'+NUMTOSTRN(今日换手,2)+'%'),Color0000ff,LINETHICK5;
今日流入比换手:((进出量/VOL)*100),Color00ECEE,DOTLINE;
DRAWTEXTABS(450,5,'今日流入比换手:'+NUMTOSTRN(今日流入比换手,0)+'%'),Color00ECEE,LINETHICK5;
五日流入换手:=五日内净流入/CAPITAL*100;
DRAWTEXTABS(5,35,'五日流入换手:'+NUMTOSTRN(五日流入换手,2)+'%'),ColorFFFF43,LINETHICK5;
五日换手:=SUM(VOL,5)/CAPITAL*100;
DRAWTEXTABS(240,35,'五日换手:'+NUMTOSTRN(五日换手,2)+'%'),Color0000FF,LINETHICK5;
五日流入比换手:(五日流入换手/五日换手*100),Color00FF00,LINETHICK2;
DRAWTEXTABS(450,35,'五日流入比换手:'+NUMTOSTRN(五日流入比换手,0)+'%'),Color00FF00,LINETHICK5;
十三日流入换手:=十三日净流入/CAPITAL*100;
DRAWTEXTABS(5,65,'十三日流入换手:'+NUMTOSTRN(十三日流入换手,2)+'%'),ColorFFFF43,LINETHICK5;
十三日换手:=SUM(VOL,13)/CAPITAL*100;
DRAWTEXTABS(240,65,'十三日换手:'+NUMTOSTRN(十三日换手,2)+'%'),Color0000FF,LINETHICK5;
十三日流入比换:(十三日净流入/SUM(VOL,13)*100),Color0047FF,LINETHICK2;
DRAWTEXTABS(450,65,'十三日流入比换手:'+NUMTOSTRN(十三日流入比换,0)+'%'),Color0047FF,LINETHICK5;
SAT:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
量能饱和度:SAT,DOTLINE,ColorC044B5;
DRAWTEXTABS(720,35,'今日量能饱和度：'+NUMTOSTRN(SAT,1)+'%'),LINETHICK6,COLORccffcc; |
