小单买:=1-BIGORDER(1,1)*V/CAPITAL; 7 A, J- n9 X1 b4 w
小单卖:=1-BIGORDER(2,1)*V/CAPITAL; # r, r( _# E Y( V/ g
散户净买:=(小单买-小单卖)*100;
/ V& N5 ~* _& B7 U散户:sum(散户净买,1),linethick0,COLORGREEN; # y2 }) q6 b3 F6 a7 v E" T
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL;
% w4 k# X8 e4 a3 A. Y中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
; X3 ~/ F% r" J! |! d! u- t中户净买:=(中户买-中户卖)*100;
1 X* ^- h: p& ~1 F- W, ?中户:sum(中户净买,1),linethick0,colorf00ff0;
6 _$ T. |' u7 w' @) S大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
2 ]. F: o2 X' x1 e( H2 n& B5 W大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL; 3 Y9 Z* H( K% s9 B
大户净买:=(大户买-大户卖)*100;
/ J7 X3 N8 j; s5 f大户:sum(大户净买,1),linethick0,colorf0f000; ' p0 W0 w$ g1 F
机构买:=BIGORDER(1,3)*V/CAPITAL; , F% g; Z% k5 K. E+ [6 T
机构卖:=BIGORDER(2,3)*V/CAPITAL; ?2 Y1 E0 }( G/ a5 ]2 ~
机构净买:=(机构买-机构卖)*100;
# B& ^% a0 R( \; g+ L! d超大:sum(机构净买,1),linethick0,color3399FF; " V- V( \: q* u B1 n5 @3 R
大单买:=BIGORDER(1,2)*V/CAPITAL;
" u4 q* \0 a6 {8 S4 O大单卖:=BIGORDER(2,2)*V/CAPITAL; 1 C; G+ _1 [+ ]: C& H
主力大单买-大单卖)*100,linethick0,COLORRED;
* ?/ |! G: S# M散户增减:=散户-ref(散户,3); + f* k4 K+ w$ d& e/ c7 {7 [& a
中户增减:=中户-ref(中户,5);
d* Z3 Q* i2 `. a5 @3 \2 s; Z大户增减:=大户-ref(大户,3); / w, u# S/ {* G% w
超大增减:=超大-ref(超大,10); 9 @9 a. k1 _ A
主力增减:=主力-ref(主力,5); ( M/ w$ ` v% f+ h+ x9 T8 d
S3:=ref(散户,3);
* G; d! C v, q0 fZ3:=ref(中户,3); 1 ]$ ^8 \9 P; v0 }- C
D3:=ref(大户,3); ! |+ Q2 h* z: C: i: O* v
F3:=ref(超大,3);
, y/ y3 J3 U5 X. h8 o+ ?" x- _' ?J3:=ref(主力,3);
: F4 N. O9 T0 C$ K7 L, nS5:=ref(散户,5); * A7 W j& G3 p1 E& j
Z5:=ref(中户,5);
( E) o" t5 D$ W. X( j7 T& JD5:=ref(大户,5); . Z4 |/ n* @5 f% |8 m" ?4 @5 A. d
F5:=ref(超大,5);
$ Q$ u$ V7 v! p& b5 zJ5:=ref(主力,5); : ~6 ^! d* x: O: o3 T9 S
S10:=ref(散户,10);
8 v4 k3 B1 y/ s3 S, u& hZ10:=ref(中户,10); . A) D# U" z! _0 V9 y: N
D10:=ref(大户,10);
. \6 B' O5 h! \# u0 UF10:=ref(超大,10); . q- I% A* w* f; \8 f5 n& t- N+ L+ M
J10:=ref(主力,10); + K5 o1 \; r$ ]6 H0 `
S20:=ref(散户,20);
3 Z1 `$ Z y* X& l* U3 a! i5 xZ20:=ref(中户,20);
* O# {0 H0 B5 t/ t: P2 o* VD20:=ref(大户,20);
, M$ j7 X) x2 B D8 D3 _F20:=ref(超大,20);
2 @/ u h0 B2 f" J; uJ20:=ref(主力,20);
" M9 j$ ~- T* `; @9 r: }2 vBL3:=400/MAX(S3,Z3,D3,F3,J3); 4 X9 k5 h/ a) `- ]1 T9 @, Z
BL5:=400/MAX(S5,Z5,D5,F5,J5);
9 D, k+ b1 C1 r0 B+ }2 JBL10:=400/MAX(S10,Z10,D10,F10,J10); 4 Y* N3 P5 n b, }1 y3 K
BL20:=400/MAX(S20,Z20,D20,F20,J20);
- D9 \% u p4 Z* t7 J8 u: n0 q$ @S3B:=999-S3*BL3;
0 K9 Z; L( ?+ Y1 ~# w2 o- FZ3B:=999-Z3*BL3;
. g' V3 C# Q$ yD3B:=999-D3*BL3; . C' w K" U$ [- b
F3B:=999-F3*BL3;
: \8 U7 a+ k/ ?' ?" PJ3B:=999-J3*BL3;
& b& a5 @3 N! w( R9 r+ \2 XS5B:=999-S5*BL5; ; y1 e" D) K4 w
Z5B:=999-Z5*BL5;
( Q' _- V- e6 q& T6 s( B$ @' W. B. i" a% sD5B:=999-D5*BL5; + G \7 e& v: V9 ]& W
F5B:=999-F5*BL5; 0 b! P) [* l6 L3 M$ z5 Z$ e
J5B:=999-J5*BL5;
7 W+ p, Z1 O6 |5 K' j: \/ d9 u+ QS10B:=999-S10*BL10;
6 i" b5 ~$ i) I2 f; n1 R( Z: d, ~ eZ10B:=999-Z10*BL10;
6 d1 C7 v; q% {2 ND10B:=999-D10*BL10; ' P0 \- C0 z. V! _8 O, Z
F10B:=999-F10*BL10; 9 F" A0 ?) S! [0 ^0 }% B5 w; I
J10B:=999-J10*BL10;
4 K: ^* i7 C2 Z$ V3 g$ OS20B:=999-S20*BL20;
e _9 v2 S- R* v9 O- d: M9 EZ20B:=999-Z20*BL20; . y1 _% I( O! V% ^0 u2 Y5 N6 z
D20B:=999-D20*BL20;
* o3 G6 {1 _$ N7 ]1 C5 ZF20B:=999-F20*BL20;
: `7 m2 c. |4 B' o( g4 DJ20B:=999-J20*BL20;
7 N5 [* P$ p1 I6 S4 \! M! ?{画直方图} - v$ F. }- y/ D& i
DRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); 8 p& D" Q. K/ ?7 B, {$ k3 C
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100)); " s/ n& E0 g5 g/ N$ q, ?8 I
DRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
$ i# ]! i* O8 s$ Z' @DRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
7 Z J' W) j7 g7 c* ]DRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
3 b: A. m6 w) e) X% K+ V8 ~/ R! lDRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
$ N& A# |" @" m' e# g" d, I- KDRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
5 p+ x1 O6 @1 b$ QDRAWRECTREL(175,D5B,210,999,RGB(0,0,255)); + Q1 t1 [* i: x% l" ?: f( Y
DRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
: ~$ A# v/ |. e* A7 ^7 V0 J- kDRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
& B* r, q$ {: { l! p, I: yDRAWRECTREL(270,S10B,300,999,RGB(0,255,0)); - {- ~# |' f# U7 E
DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100)); E: f( o* f$ K0 R) @
DRAWRECTREL(310,D10B,340,999,RGB(0,0,255)); # z! B! U K( G0 T' ^" p e; j7 I1 m
DRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); % T: [# i. l/ E: s! \( B; |3 ]9 i
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
7 Z/ ^" [# N- E. _5 qDRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); * B2 i4 n T$ D$ Q: D/ J. L
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100)); * i9 q, W+ p8 u) N* M6 |8 `+ ]
DRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); " `/ f# U) G f' j2 H/ h6 L* ^
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0)); * w* I' d- p, p3 Q5 U
DRAWRECTREL(480,J20B,510,999,RGB(255,0,0)); 1 ^0 o% T9 T R$ p0 R
DRAWTEXTREL(80,5,''散户''),color00ff00; ( [. v( }6 n0 W$ w3 _9 ?+ u
DRAWTEXTREL(160,5,''中户''),colorf00ff0; ! a8 [5 l; U, q v' H# G4 u0 d' U
DRAWTEXTREL(240,5,''大户''),colorffaa66;
2 |4 c% o) c4 t( R& l' w) P; QDRAWTEXTREL(320,5,''超大''),color0099ff; ! d7 Z! c# s5 a% O. z/ n
DRAWTEXTREL(400,5,''主力''),colorred;
5 p& ]" F8 N! } b; O- bDRAWTEXTREL(30,70,''本日''),colorddffff; $ W6 F& W+ O7 m2 {0 k0 g8 k, t
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; 2 i: w- g7 d# W8 h3 u5 x
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; }. b- m n7 d! G- n2 N# Y% J2 i
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66;
; m9 J \) r& e' @* oDRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff; 3 A. W$ ~: V( a6 j
DRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; 9 h7 q6 s1 w2 H' d/ d& U
DRAWTEXTREL(30,140,''3日''), colorddffff; 2 y) n9 B6 d7 S
DRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; 5 V3 u+ t: z8 A% J
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; 0 p, V/ o4 d$ X; u/ z G1 r
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
( w: J, b2 @6 b8 iDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; 2 L8 k* i2 u3 {, U9 {# m) A; t
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; ' t' Q t! Q1 {* K+ D
DRAWTEXTREL(30,210,''5日''), colorddffff; & w# m9 |8 s" }7 }0 e2 s4 a
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
7 T4 J2 @! S3 o0 \, ~DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0; # o2 x. x+ w6 S% W* l' X
DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66;
. v" s7 K- q* G- v, n4 f& l5 qDRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; ' a3 R* s2 K! G0 B$ d3 t D
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred; - b7 l' m$ S/ M1 V/ }9 u% E
DRAWTEXTREL(30,280,''10日''), colorddffff;
8 y* i- ?' F& Y6 xDRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
1 c7 e& \4 V2 ]3 N0 v! FDRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; 4 l8 M. g1 L( Z
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
9 q7 {+ E% p0 s9 h+ Y' YDRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
. |1 L/ M% E8 d* qDRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; j/ X5 w9 ~6 o0 Q! ]$ i9 k9 E
DRAWTEXTREL(30,350,''20日''), colorddffff;
$ j1 P( ^& H- o5 u7 bDRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
( o2 |: R; T; @2 I. Z0 \DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0; * j! F. ]) c+ V
DRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66; & G% v! e) ~9 n0 b$ L
DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
- ?) Q* m1 J0 S ^% tDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; : \6 F/ c9 _- W4 t2 t
DRAWTEXTREL(5,800,''3''),COLORRED;
4 n9 `+ c# E4 Z; pDRAWTEXTREL(3,900,''日''),COLORRED;
/ M7 h& M6 l# g: M. LDRAWTEXTREL(135,800,''5''),COLORRED; 3 q* o' ]" z; E/ w
DRAWTEXTREL(130,900,''日''),COLORRED;
: @5 N! ~8 m! ?/ x7 tDRAWTEXTREL(260,800,''10''),COLORRED;
3 r. u" B( Y0 W# e* z$ PDRAWTEXTREL(260,900,''日''),COLORRED; * V, @5 y& ^& K
DRAWTEXTREL(390,800,''20''),COLORRED;
9 W! _' M, X% @ U6 bDRAWTEXTREL(390,900,''日''),COLORRED; % {+ ~$ l: f! k! _
一日资金流入:=amount*BIGORDER(1,2)/10000; 0 _. x$ C7 b7 R: l
一日资金流出:=amount*BIGORDER(2,2)/10000; & V( O8 a7 |$ t u+ ?# q/ ~6 g, `- }
资金流:=一日资金流入-一日资金流出;
( R8 R" C9 m6 T! t收支【万元】:资金流,color3d,coloryellow;
7 j& x) E% g# J0 LIF 资金流流出,RGB(255,0,0)),COLOR000000;
9 }+ A3 R8 f# o l, t1 @9 nFILLRGN(流出, |