现手买:=BUYVOL*DYNAINFO(7)*100/10000;
- S: l% m: ^) w3 L G现手卖:=SELLVOL*DYNAINFO(7)*100/10000;5 T) a* _8 h6 L: K
合:=ABS(现手买)+ABS(现手卖);
$ O4 s7 Z4 @5 o! k/ V7 `' w m差:=ABS(现手买)-ABS(现手卖);
& d! W/ g+ }9 t0 hXM1:=ABS(现手买)/合*100;
+ X+ E, q4 J4 { ^6 QXM2:=ABS(现手卖)/合*100; ( E9 n9 r1 X/ X
% Y. W8 {2 G0 e I) W# d
DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}
& N/ w0 g, r6 V4 p4 g- i( QDRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}! S% y9 w% f9 R8 L# B1 H$ c: w
DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}
; s% h4 D2 f# ?- A- N) e6 j. |* @1 L
DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
- J9 z4 y" I1 C# L' CDRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;! P2 |: H) n( J3 h W
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;
+ j# V3 G! r+ c( SDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;
9 n5 m" j. e, T' n# n8 r9 H* H9 cDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;( ~8 V/ h, X$ i/ w8 a
DRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;: D# o1 `& k( c; M3 ]$ \8 p
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;
" U3 K+ Q& I {) F0 L- \
. U/ D6 e" M& K) p4 k+ L流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;
8 g: n8 w# l/ vN0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}$ c4 M) \) E- K" L- `: _
N:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}
% c0 V* D! {: [4 J e8 _充实换手【天】:=N,NODRAW,COLORCYAN;
$ B) w# D% s" J. K! w. u4 k成交额:=AMOUNT/10000,NODRAW;{万元}
8 @5 r+ V$ e, m' q. y3 R6 z, xA2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}
$ Y4 @; ?7 X7 a2 F% ~5 UA3:=SUM(IF(CLOSE即时:=550+换手*700/100;
" V/ ]) w7 O4 v$ j/ `9 g; NX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);8 d- d% L) I3 T9 Z6 N
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
: V& ?: M! r1 }& T$ M3 Q) S# G3 IDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));
# h" ]& b7 ~" k" U3 e, Y+ v* s' d" Y: P9 W
1 x# t) d6 [1 U6 o5 M" o- D, ]5 LDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;4 W$ z' `+ o1 Z2 J0 U* M
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
2 p1 Q7 `* z# u/ cDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |