现手买:=BUYVOL*DYNAINFO(7)*100/10000;
5 E% U& [7 F5 t9 s# m. i现手卖:=SELLVOL*DYNAINFO(7)*100/10000;" ?6 C$ D! W* T7 p/ v
合:=ABS(现手买)+ABS(现手卖);, b! t# A+ ^: K2 N( ?- \! x
差:=ABS(现手买)-ABS(现手卖);4 O' G1 o0 Z; }; m7 s+ {; z
XM1:=ABS(现手买)/合*100;
k2 ~" N2 F" w0 D" q/ L) g- ^XM2:=ABS(现手卖)/合*100;
0 w5 p" v7 J9 d( ^0 \. D4 J% G0 Q$ \6 j! r; m
DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}
9 D/ R5 Q5 k' m0 U! I* u( kDRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
- F6 f4 C8 d ]% B( H+ YDRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}1 ]& ?/ [5 ]9 g
9 E) O" ?$ l3 h& l( ` q: g# vDRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
+ I0 o2 q! S5 \6 H9 t+ ?) G. mDRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;! r t, c- V- [6 Q$ p) \
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;% U5 K7 x/ b6 z3 ^! v
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;, ^6 A& I6 b' a7 C
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
1 p! o9 m2 k; C( b0 TDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;5 u, d- x9 I; D, R z' Q
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;- {/ b( L7 {5 _# d# y: [ \
/ l5 X4 ?' C* X+ e9 j; ~流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;4 S% ^8 J& K: Q D- p
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}( q Y: l( @0 }: @
N:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}
! P& K" }0 o9 D/ U) X: I. f& E充实换手【天】:=N,NODRAW,COLORCYAN;4 L, n8 v# t& Z9 r. {
成交额:=AMOUNT/10000,NODRAW;{万元}* o+ T& K" k" f8 L" }1 C
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}
+ i9 W) n( S+ g% NA3:=SUM(IF(CLOSE即时:=550+换手*700/100;
1 B8 F0 G) q" c }/ tX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);# P8 Q" W* k6 \
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};9 L- C( X ^7 O8 L& a7 a% U
DRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));
. n0 y' q( z3 o7 R
2 x$ b9 ~" u% t* i& v
, m/ s1 [& `4 v; F, Y( e6 b# ?DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
P0 x* ^% q0 I. B7 j8 v+ xDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;+ u, I9 ?! u/ h* c1 d+ r
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |