|
现手买:=BUYVOL*DYNAINFO(7)*100/10000;) m/ g% m7 J4 P9 e0 @4 |# e
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;
) ~7 }' b) x9 F% A合:=ABS(现手买)+ABS(现手卖);4 P% z& a, a/ |/ n
差:=ABS(现手买)-ABS(现手卖);
* V% V2 y! d. K9 b6 VXM1:=ABS(现手买)/合*100; 2 @+ V" G7 B3 B' x% f
XM2:=ABS(现手卖)/合*100;
: P* g0 l1 i% Q9 e9 d4 d
9 }: W m: p: m: q0 t yDRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}
/ c2 [8 k1 Q( @0 IDRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
, U1 s% D9 A- _& f( U4 UDRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}8 C( h$ i; o! Y/ r9 T+ x( n
+ B% v8 }3 S6 SDRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
( r$ P+ M% M( G- b! _3 B& iDRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;; f, |; c$ v; P, R4 k3 b$ z5 P
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;
' @6 |6 t0 x) Z+ c6 d- o0 S4 RDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;
1 G8 S& ~! \- G, mDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
: j0 C! }" ? h, eDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;
O" d4 k- y5 IDRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;& F4 J1 j" d+ _ z- @0 T4 Z
: r% q# C0 R( W3 f* U流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;3 r2 O0 \6 Z' V* y- g
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
3 b: ?8 v7 I- t# F1 ]1 KN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}
1 A! A% M1 `4 c4 y充实换手【天】:=N,NODRAW,COLORCYAN;- _" P" t. n y9 [4 V# `" N
成交额:=AMOUNT/10000,NODRAW;{万元}# v9 W# k3 p6 L
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}
4 ]: y" M5 ]$ h' LA3:=SUM(IF(CLOSE即时:=550+换手*700/100;' B; R) q( X: f+ Y8 C5 I+ J- c
X1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);- @0 [' R" F, _' q
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
. z+ H! r% b) WDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));3 t: q+ e8 ~( C( @8 t
( w& L. b0 ^5 V) H9 j: R ^& ^/ r$ p$ y3 }4 k+ ?4 \+ P
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
/ D; t5 V( \& J0 pDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;, ~9 f+ a5 ^4 |4 o# h5 Y
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |