小单买:=1-BIGORDER(1,1)*V/CAPITAL; / O# ?+ S9 r0 _; m
小单卖:=1-BIGORDER(2,1)*V/CAPITAL;
4 b7 S6 ^! p O! h/ T& T散户净买:=(小单买-小单卖)*100; " z: F, c/ H; j) S$ I5 j. B
散户:sum(散户净买,1),linethick0,COLORGREEN; : L$ d& t' q# K$ g) b
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL; ! A; D2 t, n: T6 q
中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL; , p% E _$ M9 \/ G) x
中户净买:=(中户买-中户卖)*100;
( ]' Z9 l$ z, K8 u3 M中户:sum(中户净买,1),linethick0,colorf00ff0; : I9 q* A7 W. _ @* i0 f
大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL; , R! o! j2 ^" g4 v2 K3 @7 r7 m
大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL; 8 y; X% g( U0 D1 }' p- e
大户净买:=(大户买-大户卖)*100; ' z# H) Q9 n9 N7 b* O
大户:sum(大户净买,1),linethick0,colorf0f000; ( X2 K& @! p8 `
机构买:=BIGORDER(1,3)*V/CAPITAL;
, _" S9 K& ?+ s/ o. m7 Q1 F机构卖:=BIGORDER(2,3)*V/CAPITAL; $ h' P' T3 P7 V! L
机构净买:=(机构买-机构卖)*100; / r3 I4 A1 e* x; |# H# I2 p
超大:sum(机构净买,1),linethick0,color3399FF; , \- b; G+ L4 m& s) W- U( T
大单买:=BIGORDER(1,2)*V/CAPITAL; 8 _" o) M( v5 U9 ~
大单卖:=BIGORDER(2,2)*V/CAPITAL; * j$ s/ g$ [ D
主力 大单买-大单卖)*100,linethick0,COLORRED; 0 X$ a: e. w0 y% E' Y! S
散户增减:=散户-ref(散户,3); 2 `1 C5 p% V7 W( L/ Z) F
中户增减:=中户-ref(中户,5);
; |1 b5 Z; S) l k* p大户增减:=大户-ref(大户,3); . D6 L+ U4 }0 s' h3 s9 `$ m
超大增减:=超大-ref(超大,10); 3 C1 D" ^9 o( q5 B6 v" Y1 n
主力增减:=主力-ref(主力,5); ! Y1 y& E- d# k. Z* ~" P$ k4 T$ T; o
S3:=ref(散户,3);
2 j! I" R" o, T0 F2 _' eZ3:=ref(中户,3); 5 v; m' X5 |, E: L6 G6 x! O
D3:=ref(大户,3);
) L( ]3 N! t' r' e& A3 R) MF3:=ref(超大,3); 7 x' u8 [: u9 h) b* |# Y
J3:=ref(主力,3); / n5 M" W) s* W5 U5 _+ m
S5:=ref(散户,5); - P9 x7 t9 e/ Q2 _. j" _6 a
Z5:=ref(中户,5);
8 Z* y! o7 d' q2 V: f3 bD5:=ref(大户,5); 0 l F' Y: ~7 P6 S6 c
F5:=ref(超大,5);
* L1 v) J0 Y, D- n# [J5:=ref(主力,5); ) o; [, R' _+ H& Q# o7 [. W
S10:=ref(散户,10); - [& I: `, Y+ L& J$ B( K" M3 E
Z10:=ref(中户,10);
: l& u* L( a, u; e& K1 K tD10:=ref(大户,10);
+ Q3 v M9 U. f. Z: _; }$ l3 b! A2 GF10:=ref(超大,10);
( _, @1 s. @* Z) b/ |J10:=ref(主力,10); 8 n1 r" {& s. ?+ v( T
S20:=ref(散户,20); ! K) I* _. \' @" ]" x
Z20:=ref(中户,20);
- t% ]" V- h9 q! a5 L* {* W2 AD20:=ref(大户,20);
! q3 G1 s0 u4 ]. T; [F20:=ref(超大,20); 8 [9 d U6 J' F) S
J20:=ref(主力,20); 8 Z; i. J. x2 \; b0 ?# u$ H) e
BL3:=400/MAX(S3,Z3,D3,F3,J3);
" b3 M; i. p+ O1 z8 {+ eBL5:=400/MAX(S5,Z5,D5,F5,J5); 1 w6 _2 {4 f# g8 v1 I
BL10:=400/MAX(S10,Z10,D10,F10,J10);
7 b5 ]5 T; D! W4 G3 S# VBL20:=400/MAX(S20,Z20,D20,F20,J20); * K/ p0 }, `. O9 ?0 Y
S3B:=999-S3*BL3; 8 \. V2 k3 E( c" h" G
Z3B:=999-Z3*BL3; ! P& }5 c2 k" W$ q1 _
D3B:=999-D3*BL3; - Q- U1 |' k1 d0 `' j
F3B:=999-F3*BL3; ) ~0 i6 q+ m5 y |9 W
J3B:=999-J3*BL3; " u0 N' K9 e) F' m9 I. v* A
S5B:=999-S5*BL5;
, G3 r# P- @! g5 xZ5B:=999-Z5*BL5; 6 |( y& j0 r, P# J+ Y& _
D5B:=999-D5*BL5; 3 v, |2 X. B, F7 @' a a" C+ J( p
F5B:=999-F5*BL5;
" _$ r2 C, p8 V9 O, A6 b. ~1 sJ5B:=999-J5*BL5; 1 }( G' ~; o c9 k! Y& f
S10B:=999-S10*BL10; , P! u/ @, ?: w% c
Z10B:=999-Z10*BL10;
/ y5 {9 A; H, Z6 }1 \D10B:=999-D10*BL10; * O/ s9 G+ a9 C' ]1 ~# k
F10B:=999-F10*BL10; : l% t( b3 D; b2 A
J10B:=999-J10*BL10; 7 o! Q4 {, ]3 n
S20B:=999-S20*BL20;
V' S4 _! ^0 n- `Z20B:=999-Z20*BL20;
( A" d% j/ k$ m1 f' ^6 jD20B:=999-D20*BL20;
$ N& b3 M! r+ w3 NF20B:=999-F20*BL20; . k. y& l& s8 w6 |5 q+ B) V
J20B:=999-J20*BL20;
) P5 @9 J. U1 Z1 C) c{画直方图}
" T$ S I v4 Q, y5 ~DRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); ( ]0 P$ Z& A# b4 C1 @4 ?4 {
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
% L6 E2 e8 M( X: ?DRAWRECTREL(50,D3B,80,999,RGB(0,0,255)); ( r. N, k4 u# a: q0 O# {
DRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
, J+ `" J! O! rDRAWRECTREL(90,J3B,120,999,RGB(255,0,0)); , s3 H. N+ w& Q1 G0 J
DRAWRECTREL(140,S5B,170,999,RGB(0,255,0)); # q: }% Q( ?/ n# C! N% g% Q+ M g
DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100)); . U1 Q8 ~1 p# l4 U
DRAWRECTREL(175,D5B,210,999,RGB(0,0,255)); + h; T2 p8 ^% C6 A
DRAWRECTREL(200,F5B,230,999,RGB(180,100,0)); % Q: s6 L/ d( t. n
DRAWRECTREL(220,J5B,250,999,RGB(255,0,0)); 6 R' x6 k/ V$ n* x
DRAWRECTREL(270,S10B,300,999,RGB(0,255,0));
4 v y3 p1 Q( } j7 MDRAWRECTREL(290,Z10B,320,999,RGB(180,0,100));
- l. e& F9 f* e+ x; i2 w: q% F4 MDRAWRECTREL(310,D10B,340,999,RGB(0,0,255)); ! f0 e8 r( [! D* s9 h$ G7 v
DRAWRECTREL(330,F10B,360,999,RGB(180,100,0));
2 E- _5 l4 b1 F+ Z' h0 k% D! gDRAWRECTREL(350,J10B,380,999,RGB(255,0,0)); 0 s- t3 t" |; H9 p) Q, C. p
DRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); ! O' {. H! N6 e, @' ^+ x
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100)); # D) K' P) Q4 ?0 q$ _* [
DRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); H: ^: A1 l5 \+ K% B5 k% b
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0));
& H2 b: I, ~5 ZDRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
7 Q6 n9 W5 @4 y# n' H0 U- e& KDRAWTEXTREL(80,5,''散户''),color00ff00;
( I% F: z5 C: ]6 j0 ?DRAWTEXTREL(160,5,''中户''),colorf00ff0; 3 h+ N3 x+ K' Q6 ~
DRAWTEXTREL(240,5,''大户''),colorffaa66;
( p1 p+ p, U8 @, M7 u3 J4 ^- WDRAWTEXTREL(320,5,''超大''),color0099ff; / K; [6 O0 d2 d! p3 F5 J
DRAWTEXTREL(400,5,''主力''),colorred; & V5 I5 s! T. \& b/ L- m
DRAWTEXTREL(30,70,''本日''),colorddffff;
+ _* s& k$ W2 E! x4 i' ]1 D4 kDRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; $ i9 ?& P+ p! N" @- ~: y6 e
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; * Q- E6 E. Z& T! P( n' ~6 S0 K
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; - X z; w5 i" F' x' ~1 F
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
9 s. ]& M- K, jDRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; / i* @. C. i8 X5 `/ [: H
DRAWTEXTREL(30,140,''3日''), colorddffff;
/ |& F. I$ h- L! O GDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00;
4 f" E6 f$ M5 _: S* r) v/ n+ e' z" _DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; $ u- D4 P% F8 n( o% f
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
; g% M. n5 n4 H" p/ _8 Z: LDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; : L4 Y- t! p4 ? m0 ~
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred;
3 R1 ]- ?- P- L7 {3 |1 TDRAWTEXTREL(30,210,''5日''), colorddffff;
2 f7 d4 V6 o8 g9 u7 n7 lDRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
, ]3 ?4 k# ^3 }) @DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0; & r$ W- Z! @' Z
DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66;
5 v% o3 q* L/ t! a" `# ?7 f( aDRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; 2 a- \1 w3 R' B$ Z. T2 I+ K
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred; ( h" W5 ]0 r2 @. O4 b! a" M' w
DRAWTEXTREL(30,280,''10日''), colorddffff;
( ~& w: `9 @; _/ hDRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
/ i N/ n( Y) q( E5 X1 ADRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; * H0 x# A7 ~. d C& F
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66; ' |3 d; | F: S4 ?5 R
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
6 z o! \2 [/ {: ?' ^DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; 7 I5 H& E% u& |5 G ~. l! z
DRAWTEXTREL(30,350,''20日''), colorddffff; ; p, F& N, q/ M
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
! Y# x) L& d# t$ lDRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0; + ]) R( G1 t, }+ y
DRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
; a6 V) _+ v$ f% W# \DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
" ]1 g$ C0 Y. iDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred;
0 M) y7 |; N, A6 j1 T. h( q1 UDRAWTEXTREL(5,800,''3''),COLORRED; 8 {% k9 K w% ~' q
DRAWTEXTREL(3,900,''日''),COLORRED; : M) n) I$ D, w+ l) o3 R
DRAWTEXTREL(135,800,''5''),COLORRED; - t3 d7 ^/ q9 ?: I1 v% u
DRAWTEXTREL(130,900,''日''),COLORRED;
e; q% L* B- ?7 i4 u& w3 @8 i) {DRAWTEXTREL(260,800,''10''),COLORRED; $ {: g: z8 {+ _; {
DRAWTEXTREL(260,900,''日''),COLORRED; 2 O* Q" J6 U5 D" t8 d
DRAWTEXTREL(390,800,''20''),COLORRED; ) o/ A; }9 A) k3 d. p+ Z
DRAWTEXTREL(390,900,''日''),COLORRED; ' ~' H p5 S; \; j+ C$ i
一日资金流入:=amount*BIGORDER(1,2)/10000;
# {4 _4 M. h/ v一日资金流出:=amount*BIGORDER(2,2)/10000;
9 F7 M; D6 G' N资金流:=一日资金流入-一日资金流出;
# c x! E4 z/ j0 M' a+ u2 U! ?; Y收支【万元】:资金流,color3d,coloryellow;
8 n, `; @* k9 j9 t O2 \7 r, iIF 资金流流出,RGB(255,0,0)),COLOR000000; " L: Y/ g/ h+ K* q' G/ \! {* ~, h
FILLRGN(流出, |