现手买:=BUYVOL*DYNAINFO(7)*100/10000;
; r7 H5 m( L; s$ }( o现手卖:=SELLVOL*DYNAINFO(7)*100/10000;" {5 @9 y% w/ |6 O% h% I& ~
合:=ABS(现手买)+ABS(现手卖);
; U! Y6 X# e' P+ P$ ~8 g差:=ABS(现手买)-ABS(现手卖);
8 a. } W: n% g- s O; IXM1:=ABS(现手买)/合*100; 7 U7 B" `! G* g' i! V+ ^
XM2:=ABS(现手卖)/合*100; # E) x$ p6 l$ B6 S# B! v/ b
* ^" p/ \ b {* |DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}8 ?$ J2 o% p- a
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
3 s" J6 e: j$ g ADRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}" z7 c, B$ C5 u- M' u
' F7 E2 F. N$ f ^+ |# M# V# d
DRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED; C* ?6 t% q/ W
DRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;' a' E8 j% Q! o
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;1 i2 I5 M/ ?% T# U* J+ o9 b
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;4 t4 r# X3 R( ^* b$ w
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
0 v, ^) J4 U$ y4 zDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;: m& M! K9 \- A# [3 a3 Y
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;1 k7 N. B9 ^& H
# o k% |; i9 N( e* Q& H
流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;: l; D0 T! r0 E
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
4 z x. M; D9 p. T; x) dN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}5 @( ^5 S; F5 g2 h8 P& ^7 k
充实换手【天】:=N,NODRAW,COLORCYAN;
' d: t a0 h2 W& |1 n9 X成交额:=AMOUNT/10000,NODRAW;{万元}
( L! ]1 v r% m I* L& u! \; rA2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}- A1 j* B& N9 H1 B4 f
A3:=SUM(IF(CLOSE即时:=550+换手*700/100;8 j. R2 e# W% {
X1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);
; i u4 A9 _' J$ S( l0 ]DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
: T% h* a* j+ p8 XDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));
4 v4 J, G2 H/ r1 R4 m
) z! p) q O- D" i% K4 f3 o& t9 N g1 ]8 A D
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;6 N2 I$ }, _ q
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;) { N2 Z$ T/ s9 O! Y0 I
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |