现手买:=BUYVOL*DYNAINFO(7)*100/10000;: n4 ^% V: z) d
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;- J$ w% y8 f. D% i( @' R, }) ~
合:=ABS(现手买)+ABS(现手卖);
; @6 D8 p0 Z3 t- M' P差:=ABS(现手买)-ABS(现手卖);
) c& \2 p, \7 I! dXM1:=ABS(现手买)/合*100; ' }. V4 Y2 g' f+ P* T" c
XM2:=ABS(现手卖)/合*100; , |7 ^ c/ F& R5 l/ T; }/ N* M4 P
7 g$ V2 @) i6 g- y3 kDRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}* B5 b* {; ]) R
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
" s* W4 y" z; P1 aDRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}- n8 `* x3 w! j8 V9 `
: b: W! J. i- Z+ W- L( a
DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;2 u2 K7 S- |1 k" U, v
DRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;4 ^/ ^; c8 R& u) F; g/ V& Z0 F
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;4 Q' Z( A5 G4 L
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;& \, @3 {$ y/ h# t4 _8 s
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
0 e$ B( i- h( u4 L! rDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;) v5 E2 Z7 N9 i+ \1 I
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;* D* ]+ z- K3 J! w* I7 u0 t
! l* p. y* F( X( R0 h
流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;# m4 n: S% D a, @0 D. h% S% s
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
2 i) G( R0 V* B" y8 @# nN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}: u8 R" k* @3 \5 k; n5 q
充实换手【天】:=N,NODRAW,COLORCYAN;. A4 v+ e$ g+ ]! ^
成交额:=AMOUNT/10000,NODRAW;{万元}$ Z( _6 y1 V4 Q4 g: {1 P& L. K
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同} I2 m% F% m1 \" ~( @ w
A3:=SUM(IF(CLOSE即时:=550+换手*700/100;
3 I4 G i5 t8 e+ b8 \( v8 vX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);3 [) x J4 K# D9 ~7 I4 Y4 @& w! P
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
$ e+ s( D2 r9 ^* J; @; z! eDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));
7 F+ H0 Q$ k G- A& Y& o
2 c' O+ R/ g$ c& T( f- M, j/ E Q9 q2 B: f5 h# {
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
- m8 q; X( `" u9 O/ }7 f. D U& q3 dDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
1 I% y: w" L, e ^" rDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |