|
现手买:=BUYVOL*DYNAINFO(7)*100/10000; L1 u2 t% [+ k& I0 ^* H
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;
! c7 @! M( R$ X+ E9 p5 w合:=ABS(现手买)+ABS(现手卖);
! }2 m/ ~- S; ^' B差:=ABS(现手买)-ABS(现手卖);6 p2 d6 t0 `( _* A. d" z
XM1:=ABS(现手买)/合*100;
5 A) i' f* B; j7 A, \XM2:=ABS(现手卖)/合*100; 7 i1 i" }" [$ x, p/ w1 C
; j8 x% n7 e$ j6 X8 B; Z8 D
DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}4 }7 U7 F! I2 P) w& a# p5 K* a* e
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}8 y( x: M4 }& \ H7 E! ?
DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}
, `; X ?) K ^0 R( N* O* \6 L+ {, h/ Y
3 C' I/ S; Z7 v7 K3 QDRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
6 n$ _. F7 f7 N/ r9 V' T7 J0 ODRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;
2 [; |( A% f. O$ }DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;0 r$ D& e+ c( h5 n5 [
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;/ ], }! d4 k3 E" Z$ n3 V
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
3 M5 s; i- t- t, ?5 R0 x' BDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;
4 V) C+ G( j c1 H# P2 J: YDRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;- h4 z0 R4 t) f ^6 c3 U
) d2 [+ m: U8 ^8 S6 m
流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;3 @6 j* E( Q: _$ }
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
% q. m5 A i' z* M4 fN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}$ {4 l3 U3 o) I9 V$ N# i) ~
充实换手【天】:=N,NODRAW,COLORCYAN;: Z8 I' k; c) E* j" b
成交额:=AMOUNT/10000,NODRAW;{万元}& o) s8 L. d) N5 d' q
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}
4 y% H2 @* i8 W" s! TA3:=SUM(IF(CLOSE即时:=550+换手*700/100;
- Y0 Q; i: t5 u$ j5 v2 YX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);
4 z0 [( ~* f B9 qDRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};$ }3 k9 z4 a, [: i! n
DRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));
/ |; p+ v4 n; S, C' Z
: O, E" R5 w; z; f4 P
: Q" v q. M: x3 `0 j$ ZDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
, ^3 U6 W8 ^5 Z8 E9 ^* {DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
4 \$ u" ^7 |. R1 c) FDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |