|
现手买:=BUYVOL*DYNAINFO(7)*100/10000;5 w5 a/ F& s+ A( q: v7 F
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;7 C( b) r$ h& _1 |
合:=ABS(现手买)+ABS(现手卖);( V: t1 S0 l8 b
差:=ABS(现手买)-ABS(现手卖); ?7 E# R+ r; N9 Y' ^
XM1:=ABS(现手买)/合*100;
4 q4 [6 c. J, y9 |$ YXM2:=ABS(现手卖)/合*100;
3 n/ f/ w: K7 e3 W( ?- C k. H+ m, i5 P* s/ |
DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}
$ t$ N! o. ?/ A8 [% ]: |DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}$ z- E" }) `/ a. n
DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}
9 Z. w9 f% \' q7 k2 L( ~, i- _' x3 R4 n4 u' H
DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
; E9 M% f/ i8 t. ADRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;$ |( i/ {. N7 Z7 d2 e* @
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;/ [ J5 v2 P; E4 E& ]" ^6 ]; y& [
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;! x$ m) F; t9 K: Z2 w
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
! l3 ]) m4 L7 n( DDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;$ d6 x. U) y5 ?2 s. [+ P
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;
. f! ^1 F; \! l& r
# i% }" @7 G1 l0 Q* Y v流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;2 r/ S7 f( p" K0 Z! L4 g8 e
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}# Y. W) T6 V- z0 }9 e: X
N:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}% B/ M1 x. E7 o1 x# U# I" q3 ^
充实换手【天】:=N,NODRAW,COLORCYAN;
) D& K _8 @5 K3 H) q; E成交额:=AMOUNT/10000,NODRAW;{万元}
# X) a& f6 [7 N- KA2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}
9 V6 D$ u, O% K UA3:=SUM(IF(CLOSE即时:=550+换手*700/100;
2 S* ^& B1 V& r6 v0 |, DX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);
% \. \) X, K1 i4 y1 s/ E# lDRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};$ r1 v. B% z5 q7 j
DRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));' b0 j; I# F5 e, o/ Z9 W1 M- B0 q
- E: n1 e" D9 j" G' l9 ]
* L6 j4 q/ h( K$ c0 Q. [DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;" l% C8 f: `5 |( n) Z, Q
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;8 m/ D% @/ u2 m: |
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |