现手买:=BUYVOL*DYNAINFO(7)*100/10000;
; }4 x& Y3 w* k现手卖:=SELLVOL*DYNAINFO(7)*100/10000;3 Q* p1 v' g+ Q
合:=ABS(现手买)+ABS(现手卖);* q5 I/ _/ e& O* p! D* B8 W2 u
差:=ABS(现手买)-ABS(现手卖);: L: J0 g( l/ }* W4 l. `; J1 b
XM1:=ABS(现手买)/合*100;
% R8 i0 ~/ }0 u% e) O! M( J- rXM2:=ABS(现手卖)/合*100;
; }. b! L* [1 R9 I2 c" V$ D
5 `" c# k- I$ e1 n# WDRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}
& l! o3 C) h- _, k1 O. I1 M7 KDRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}. ]5 r9 ?. q* y; U' u* ^: b8 k
DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}
; O1 Y& z) p+ h/ \- l! o9 R1 M0 J8 y& H0 [% }6 q9 w
DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;+ H5 T3 y. I3 E2 Z! H
DRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;1 |1 X( @1 I8 F! W
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;0 C. f- W0 s# e( S! T) q
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;& R- D: R1 |* q$ a' J7 H
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;1 x1 D7 E9 }! I7 h# N. z6 T& \' T
DRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;0 K F( {# O# J
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;" y5 w" I5 u, N+ ~
. C7 @" }3 Q7 G; Y. L# r
流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;8 @8 X% V- @8 ~( F8 Z
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
' z+ T; ~1 N: \/ K5 T' nN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}
2 X- x+ k. R8 S* S充实换手【天】:=N,NODRAW,COLORCYAN;
$ X# r8 N# I4 j- `成交额:=AMOUNT/10000,NODRAW;{万元}& M. n8 X7 r8 R
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}: v y, U0 p1 |, f
A3:=SUM(IF(CLOSE即时:=550+换手*700/100;
1 h9 J1 `1 i+ z9 ~' p) s3 B* fX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);+ r3 m" O0 `5 ~; P; r& I
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
[: ^' t) [7 x5 ~. `- e, @% V, R% uDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));$ P5 }: C1 B4 }8 |# N, p8 s
$ w3 h' r1 G" ^ ?8 r# A; `, P0 ~
% t, l2 a- H, p0 \: R! ~DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
9 G+ M5 `2 l5 `DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
& [& v% C' [; p$ _; ~# \DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |