小单买:=1-BIGORDER(1,1)*V/CAPITAL;
9 @0 w% y6 h& q0 @小单卖:=1-BIGORDER(2,1)*V/CAPITAL;
. F* g4 F2 X9 q; {散户净买:=(小单买-小单卖)*100; . G% S- ~8 e" Q/ s" D
散户:sum(散户净买,1),linethick0,COLORGREEN; , U8 e4 v) Y* g& N% v( w+ O( \
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL;
# n( `& B4 z/ o中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL; # z( u1 L( i8 ^9 P" b( b* N
中户净买:=(中户买-中户卖)*100;
& p# D* |/ K0 `) J中户:sum(中户净买,1),linethick0,colorf00ff0;
6 C7 m6 N- R" X' O! `6 c" b, Z大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
& k' i% Z+ s7 }大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL; & E w. s2 L2 R8 z& [- [% V
大户净买:=(大户买-大户卖)*100;
8 E# n9 ~$ v f A3 j$ _; A# L9 C( U大户:sum(大户净买,1),linethick0,colorf0f000;
# ^, ]8 \2 K$ y机构买:=BIGORDER(1,3)*V/CAPITAL; 5 Q( q& q q% i5 g+ r
机构卖:=BIGORDER(2,3)*V/CAPITAL; 2 [3 k8 ^* `( f! h) v# r4 n3 W
机构净买:=(机构买-机构卖)*100; ! ` \2 C/ g& s0 g1 s# R& b
超大:sum(机构净买,1),linethick0,color3399FF;
! A& u5 w" h: m( ~) Y* ]大单买:=BIGORDER(1,2)*V/CAPITAL;
( S9 n9 S( |6 G5 j2 f& ?" y7 k大单卖:=BIGORDER(2,2)*V/CAPITAL; 6 j7 q7 w; \4 N6 w8 r+ v& g
主力 大单买-大单卖)*100,linethick0,COLORRED; ; Z- n; x6 c+ K; O# z. E7 s
散户增减:=散户-ref(散户,3);
. D7 y2 }, N! x( A8 w1 K: p) Z中户增减:=中户-ref(中户,5); * \: a8 W+ c }9 L. P) D8 _
大户增减:=大户-ref(大户,3); 4 P6 i' e3 k( Y& B8 s/ {" c
超大增减:=超大-ref(超大,10);
) H& y$ q) l* p! b7 n主力增减:=主力-ref(主力,5);
" I1 M$ L8 W. P) @5 P7 O1 BS3:=ref(散户,3); ; n5 d% {1 T, u- f; O) E
Z3:=ref(中户,3);
0 z6 y6 A/ d' v+ JD3:=ref(大户,3); $ x0 @& g, P+ w L7 c- C! \
F3:=ref(超大,3);
6 w6 P) T% g1 Y0 M4 B3 Y+ h/ }J3:=ref(主力,3); 0 o$ c6 ^* }. a. k( R
S5:=ref(散户,5);
, p# u8 }' V. N8 t5 {4 QZ5:=ref(中户,5);
$ R& P( O$ |# }6 G5 P; KD5:=ref(大户,5); - d$ ~+ V# r V. s- b! i% W
F5:=ref(超大,5); 2 |/ H X& k5 W) b+ x& A/ y+ S" E
J5:=ref(主力,5);
; l; d+ a* X- g9 bS10:=ref(散户,10); 0 v [$ s- M5 G4 j& P" O7 p2 u4 o, n
Z10:=ref(中户,10); " p" B3 [4 u- [7 Q/ {* | J
D10:=ref(大户,10); 5 Z1 l& O- p, x
F10:=ref(超大,10);
( q7 q4 W0 B! O/ o) SJ10:=ref(主力,10);
, [/ w) u7 F: q2 a' TS20:=ref(散户,20);
8 ]& ~; y' r% Q& R7 u# qZ20:=ref(中户,20); ' ]; U% P# b! o- `
D20:=ref(大户,20);
r/ D7 N" r; X2 D6 P9 xF20:=ref(超大,20);
! I% U% L7 i+ E9 m& m8 {J20:=ref(主力,20);
/ r7 s! _8 K+ F( R, l3 k% g) RBL3:=400/MAX(S3,Z3,D3,F3,J3); * l. M5 k; m T p8 M1 l$ B7 @
BL5:=400/MAX(S5,Z5,D5,F5,J5);
* ]; B1 u1 d5 v2 V" UBL10:=400/MAX(S10,Z10,D10,F10,J10); 7 n9 D4 F3 ~4 w/ f0 p
BL20:=400/MAX(S20,Z20,D20,F20,J20);
2 R9 O* T8 X5 m$ w- Y8 M8 IS3B:=999-S3*BL3; + L( D& I0 ^% Y/ C$ b
Z3B:=999-Z3*BL3;
, M: j( h* L% T8 f& u( p% k) yD3B:=999-D3*BL3;
( G7 p5 H; T: s n, }; _ P8 A% LF3B:=999-F3*BL3; / n! @ M: p( |' H9 \
J3B:=999-J3*BL3;
7 C y: ]2 S/ s7 ^) V/ [S5B:=999-S5*BL5;
' _$ U: }, I/ S& i* z3 NZ5B:=999-Z5*BL5; 1 U* _$ V7 z* h$ W2 u
D5B:=999-D5*BL5;
9 k7 }* H, a. _" o' P- oF5B:=999-F5*BL5;
0 X6 [5 Z9 ]+ h& wJ5B:=999-J5*BL5; 1 z9 H9 h3 K: z9 V1 |
S10B:=999-S10*BL10;
! H, y6 S) y5 t: [/ e2 ?, c, \. VZ10B:=999-Z10*BL10;
9 d( L8 k$ f) e$ |0 i2 l8 g) W0 AD10B:=999-D10*BL10; " t8 Z7 i+ }- y7 K$ ~6 W4 h
F10B:=999-F10*BL10; 2 X; \) L1 `! c4 l: G/ G
J10B:=999-J10*BL10;
; Q5 b, @& D8 } A4 q& T6 xS20B:=999-S20*BL20;
, B, `4 d, B( V# v/ f0 B6 BZ20B:=999-Z20*BL20;
: l9 m# [% b- L R' m% yD20B:=999-D20*BL20; * L8 Z7 y- \/ X o& ~% G4 {- L& d
F20B:=999-F20*BL20; 2 w0 z; O* ~* s8 _1 V! ]
J20B:=999-J20*BL20; , Q. F* c6 u& S$ n+ C
{画直方图} ! x6 x J1 S% Z, u3 \/ w
DRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); 1 j! G6 U" O" O) C
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
$ E/ a" z7 }4 J/ bDRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
8 h$ p0 O* ?& iDRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
( s. C( P& `* N) p4 L& X9 [3 |4 WDRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
' s! t7 Z7 E0 {4 G3 q, vDRAWRECTREL(140,S5B,170,999,RGB(0,255,0)); 6 U: K7 \' L8 r9 Z' `6 N! x5 _6 x
DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100)); . T# Q, }, n! r: h4 `
DRAWRECTREL(175,D5B,210,999,RGB(0,0,255));
5 \$ a U& F/ `# i* G1 ODRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
3 {2 J# n8 n+ G& ?5 y8 Z- pDRAWRECTREL(220,J5B,250,999,RGB(255,0,0)); 5 z0 l8 z1 d3 i- F7 A- A3 d
DRAWRECTREL(270,S10B,300,999,RGB(0,255,0)); 7 D7 r0 I: o. H# Z0 V1 S5 E& R! r
DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100)); ( F2 C" K5 i- W; f* F- w5 @. ^
DRAWRECTREL(310,D10B,340,999,RGB(0,0,255));
$ U. l2 W. T* j2 n! D8 j3 CDRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); ( k) L/ @' |0 j6 w" @, i
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0)); 8 r+ }# s& C( G6 f' b+ I% ?
DRAWRECTREL(400,S20B,430,999,RGB(0,255,0));
% W8 l. k- n ?/ |DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
: K! L* F7 o1 Q$ b& VDRAWRECTREL(440,D20B,470,999,RGB(0,0,255));
6 \0 q3 E" Z1 i J9 F% QDRAWRECTREL(460,F20B,490,999,RGB(180,100,0));
( _7 P3 r* u6 ?" w, d1 _DRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
7 g' I3 c: E! r2 C- NDRAWTEXTREL(80,5,''散户''),color00ff00;
* Q( X P3 l2 JDRAWTEXTREL(160,5,''中户''),colorf00ff0; . f- D3 x( i5 g! z& Q
DRAWTEXTREL(240,5,''大户''),colorffaa66; 7 |0 b ^, Z4 E& r+ p
DRAWTEXTREL(320,5,''超大''),color0099ff;
# k1 T2 e( d% k4 p* }" MDRAWTEXTREL(400,5,''主力''),colorred; * _! l- k+ |2 I
DRAWTEXTREL(30,70,''本日''),colorddffff; . b. O7 O1 z' ` y
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; $ L0 F7 N5 \. y1 V; s
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; & C' i' ]; i4 \1 V
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66;
. C4 l2 H0 l! ~DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
* t7 `3 N: Q0 \. g% L/ |DRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; % X/ l5 D. w1 d" w1 O! J
DRAWTEXTREL(30,140,''3日''), colorddffff;
) h. g& H, Y$ s- I, K# w" TDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; : b: T/ O8 S: e) l" Z* _
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; * A6 U* h+ Y+ B* W1 Y
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
0 c! V" G$ ^5 v6 N" Y, LDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; & g8 N+ t4 `6 o4 ?& L4 D' ?
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; % M A0 R: G# T
DRAWTEXTREL(30,210,''5日''), colorddffff; : V& P0 b' m: o0 w2 g: a d! Z
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
' y5 X; z& Q6 R4 i3 ~% yDRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
. T2 b+ U, T: W, I8 R0 c( X/ F& \$ VDRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; 2 `0 P& g0 A! u
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; 5 t+ Z' o7 B- j
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred; 4 H$ {# \( J2 A/ @* i" z0 \7 k
DRAWTEXTREL(30,280,''10日''), colorddffff;
& s$ u8 J2 `% J( |+ fDRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
5 P% x5 ` Q1 `DRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0;
, G, l' P. Z& @% H( w/ l; L0 CDRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66; ) K/ x/ ^4 }( R/ o( e7 B5 P
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
& g% c }& H9 V9 wDRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred;
! p4 j6 n" Y( GDRAWTEXTREL(30,350,''20日''), colorddffff;
2 u) z$ Y' N/ r/ u) PDRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00; ' Y t0 ^; x! k' y. T. X' w9 u8 b
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0; 4 K4 |2 M5 Z2 q1 `: d8 u
DRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
4 v- J9 A7 _, v; d" iDRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff; / N4 a6 b' r; N1 a1 E9 Q6 z6 w, ^
DRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; ; b9 b# U* X# u c% b, U6 e2 t
DRAWTEXTREL(5,800,''3''),COLORRED; 9 f# G2 W4 r$ b6 A5 E' w. D9 @
DRAWTEXTREL(3,900,''日''),COLORRED;
' Z- e/ ~7 C" v1 o }; T, Q# DDRAWTEXTREL(135,800,''5''),COLORRED; 8 h/ K3 d' ]$ G4 f; s8 m
DRAWTEXTREL(130,900,''日''),COLORRED; 0 B; J% x; X: O4 B
DRAWTEXTREL(260,800,''10''),COLORRED; , Y* z8 m0 U: _! v
DRAWTEXTREL(260,900,''日''),COLORRED; ! q+ M' |6 W$ k: U7 p
DRAWTEXTREL(390,800,''20''),COLORRED;
$ U% R7 x) a7 F5 TDRAWTEXTREL(390,900,''日''),COLORRED;
0 r" e% ]2 s% D$ \一日资金流入:=amount*BIGORDER(1,2)/10000;
# u* q+ |- U, F% b3 g# c3 s, O% Q一日资金流出:=amount*BIGORDER(2,2)/10000;
9 L! w4 w$ U) K资金流:=一日资金流入-一日资金流出; # V' k% P" @' j) h5 h5 E+ r) _
收支【万元】:资金流,color3d,coloryellow; $ f6 j) G% l ~5 q) u, p
IF 资金流流出,RGB(255,0,0)),COLOR000000; - i7 F. P- n- J0 H
FILLRGN(流出, |