|
现手买:=BUYVOL*DYNAINFO(7)*100/10000;' q2 i! e Y# c; b* g* `
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;
5 K& t# d7 V$ h; M/ Q9 j) @合:=ABS(现手买)+ABS(现手卖);
" Z% m) v1 `" C* Z% Z! b8 B差:=ABS(现手买)-ABS(现手卖);
* R" s. R# |( N" H uXM1:=ABS(现手买)/合*100;
( A7 j+ R- @! [XM2:=ABS(现手卖)/合*100; 8 |9 G S4 y, b! ~! M# f- X d7 U
# P. f$ |9 j* [. h
DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}* f' P5 s7 f* D# O
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
8 R4 @3 M5 u/ ~+ B+ `DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}8 f6 W9 @+ Y1 N& _) w- l
6 e, W6 H4 T2 L$ LDRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;# u" w' ~5 _1 E' Z: [& N2 f: r" m! t
DRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;
/ d! r% Q e( j( BDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;
3 P+ h+ c4 p0 ~) b& rDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;8 r& X! P& [. a; D9 L8 V" Y9 N/ N& }
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;9 X, q) G! {9 l1 G: ~; b3 t' @
DRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;6 h8 \) s! w; ~* O& t$ m$ E6 x
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;
) w- P+ p1 E6 {& z4 ]9 I
: J- f3 D$ z8 d# s, a流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000; B/ }7 F3 N, \7 K
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
6 ?' a/ V8 r0 f; J3 C& o! DN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}
9 {8 ^& E. q3 |5 f* Y3 p充实换手【天】:=N,NODRAW,COLORCYAN;
$ z3 ?0 l# j5 [+ q' z# h成交额:=AMOUNT/10000,NODRAW;{万元}0 a/ n4 G6 k. }
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}' G2 |( {! y* t: Q- l
A3:=SUM(IF(CLOSE即时:=550+换手*700/100;
9 b q' k f- I" F7 BX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);: Q( u) q" [1 [% \- c3 J
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};* e7 P0 B+ q+ ~$ F1 r) I
DRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));. d: p$ }8 g3 e# m( a
$ r% [! Y2 {1 g% d) Z/ t. _9 @$ F% L2 D F( _3 A* t
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;2 ^* _0 [. W+ b$ e
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
- m: S& H E9 l) LDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |