|
现手买:=BUYVOL*DYNAINFO(7)*100/10000;
7 g- X5 R0 H7 F/ {% c) L& I3 {现手卖:=SELLVOL*DYNAINFO(7)*100/10000; n( v3 F) ^8 C# F" @
合:=ABS(现手买)+ABS(现手卖);
- K5 c7 F! T& g6 ^3 O0 Q差:=ABS(现手买)-ABS(现手卖);' \& u% ]2 C8 ]% g1 J
XM1:=ABS(现手买)/合*100; 6 q T& L Q! a* D! O; o" c5 T$ {
XM2:=ABS(现手卖)/合*100; ( _) J9 j( g7 D, M3 P7 S
3 I" k5 g: T8 I1 }7 F S' ]DRAWRECTREL(520,900,970,550,RGB(255,255,255)); {图表底色-白}2 D4 B* k* J. w1 X# Z
DRAWRECTREL(570,900,570+350*XM2/100,550,RGB(0,255,65)); {图表分隔-绿}
8 Y3 [7 A6 l, Z, SDRAWRECTREL(570+350*XM2/100,900,920,550,RGB(255,0,0)); {图表分隔-红}
* W) O7 {0 ~3 [5 h4 V
& f' K* R7 k n8 q, T2 mDRAWTEXT_FIX(DYNAINFO(4)>1,0.85,0.11,0,STRCAT(STRCAT('买 ',CON2STR(现手买,1)),'万手')),COLORRED;
& J" S" P. P: n8 A) n. rDRAWTEXT_FIX(DYNAINFO(4)>1,0.57,0.11,0,STRCAT(STRCAT('卖 ',CON2STR(现手卖,1)),'万手')),COLORGREEN;' Y+ L) Q, h+ K; N! O
DRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)>0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORRED;
/ O8 m3 ] ^7 H' R% \3 {) q# JDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)<0,0.70,0.11,0,STRCAT(' 流向 ',STRCAT(CON2STR(差,1),'万手'))), COLORGREEN;
. d, S. h2 l" P: n/ h9 S, wDRAWTEXT_FIX(DYNAINFO(4)>1 AND(差)=0,0.70,0.11,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万手'))), COLORYELLOW;
/ P `% s' A0 P' W6 ]5 c3 T! LDRAWTEXT_FIX(DYNAINFO(4)>1,0.58,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM2,1)),'%')),COLORGREEN;# w8 w" p) l, r! M
DRAWTEXT_FIX(DYNAINFO(4)>1,0.86,0.3,0,STRCAT(STRCAT('占 ',CON2STR(XM1,1)),'%')),COLORRED;
( g, C7 J1 `' ~6 f
+ A0 u1 h5 |' Y" M# g- `流畅盘【亿】:CAPITAL/1000000,NODRAW,COLORMAGENTA;换手:=100*VOL/流畅盘【亿】/1000000;' K1 G2 j5 h J) o8 O
N0:=IF(换手>2.5,换手,0); {换手2.5以下作为散户行情忽略主力到场}
# ~# P* a9 u5 E7 Q' C5 g1 VN:=SUMBARS(N0,100),NODRAW; {充实换手机构运作周期}2 I3 {9 w$ X5 l5 K" b/ j
充实换手【天】:=N,NODRAW,COLORCYAN;
' h2 z6 V+ S2 {3 e9 X" S& f成交额:=AMOUNT/10000,NODRAW;{万元}- B4 v5 l4 [9 Q+ C9 `
A2:=SUM(IF(CLOSE>REF(CLOSE,1),成交额*0.25,0),N); {25%为根本控盘,下同}8 }0 {% r1 }( \- q; z* K
A3:=SUM(IF(CLOSE即时:=550+换手*700/100;
: t& N6 J0 `3 c7 n7 JX1:=IF(差>0,255,0);Y1:=IF(差>0,0,255);Z1:=IF(差>0,0,65);( a3 c* A7 _) A2 h f6 P/ W# m$ W
DRAWRECTREL(290,900,320,200,RGB(255,255,255)); {图表底色-白};
' B) y; E: O' A V: W2 Q& R8 SDRAWRECTREL(290,900,320,即时,RGB(X1,Y1,Z1));
* @5 ~8 k# g" q9 {2 P- `% t" {! A, m) X; Y; J
& R$ W) a& {1 n2 J# q2 z: oDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.11,0,STRCAT(STRCAT('成交量 ',CON2STR(VOL,1)),'手')),COLORRED;4 z8 B$ W. e# v0 Z: G1 Z% U9 h
DRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.5,0,STRCAT(STRCAT('五天均量 ',CON2STR(V5,1)),'手')),COLORMAGENTA;
& T( l7 j, s4 f' R5 L8 W5 h3 w9 lDRAWTEXT_FIX(DYNAINFO(4)>1,0.33,0.8,0,STRCAT(STRCAT('十天均量 ',CON2STR(V10,1)),'手')),COLORYELLOW; |