现手买:=BUYVOL*DYNAINFO(7)*100/10000;" T' I( y' r* n/ A* J2 t
现手卖:=SELLVOL*DYNAINFO(7)*100/10000;) {( t: m) L! a: }5 ~
合:=ABS(现手买)+ABS(现手卖);
; c6 f0 X0 J7 p/ U差:=ABS(现手买)-ABS(现手卖);
0 A E& q# R+ kXM1:=ABS(现手买)/合*100; 0 D4 X2 M$ k0 R9 ~8 Z
XM2:=ABS(现手卖)/合*100; G# {3 s, ?, Y5 J
( }7 w0 q) U% F6 d/ n
DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}7 C+ y& C0 u/ T" h. D2 Z' s8 D0 v
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}3 x9 G3 i: K" Q4 K% L/ e9 j
DRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}. z5 m: L' n! u$ b4 `- O
5 {" W' G! W; Z2 f. T
DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;$ S& p* J+ U3 `7 `. k1 {2 c5 {
DRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;
. C: L- X8 c1 l5 M( @DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;
9 O2 F" i, a+ KDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;. k Y9 C; ?" l! Z' X
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;/ e+ S9 O2 o2 c7 C3 N% A, @
DRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;
0 b# z$ t+ Y& z! ODRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;
5 L7 F' U# @) p) s5 |( d# G3 P. Y9 M8 e
流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;
+ g. p6 _' J D- O7 UN0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}! \9 M; w7 x7 J5 x" w3 v# m( e5 r
N:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}6 _; t2 `$ [( @: ^" b5 O
充实换手【天】:=N,NODRAW,COLORCYAN;9 U* |- F; l4 C0 r/ k
成交额:=AMOUNT/10000,NODRAW;{万元}9 z$ L' K! @# ?" Y
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}1 \' T1 @! c$ f* E* ?
A3:=SUM(IF(CLOSE即时:=550+换手*700/100;; o% {) b. A# B
X1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);9 m2 G' m2 ]/ q% I3 P. M4 K
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
# R, \+ f7 \1 b4 i# N+ TDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));& M6 j* i) U+ ]; n# }) z: h. I; k1 f
8 c3 e+ L6 d; u3 v2 |8 [
3 e% n. n* t' Q5 S# v' mDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;
- Z9 S! U( N u4 V" y& r7 jDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;: g: h B) ^. d- d3 p' k
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |