|
小单买:=1-BIGORDER(1,1)*V/CAPITAL;
' y# `4 o+ `4 o' R2 h小单卖:=1-BIGORDER(2,1)*V/CAPITAL; ) J" {8 c& l. s& H3 R. n
散户净买:=(小单买-小单卖)*100;
, {. k& x9 }4 M; i/ s: Q3 o1 t散户:sum(散户净买,1),linethick0,COLORGREEN; 8 I1 X* i8 m8 j* k* a# p: p0 @
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL; 8 _; U: W/ I, Y& p
中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
8 I1 [, Y: m* @$ H, r中户净买:=(中户买-中户卖)*100; 2 b7 k7 G+ n: E o0 P( G
中户:sum(中户净买,1),linethick0,colorf00ff0; . m4 K5 j. w5 F6 k
大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
- @8 W: V* @6 U9 u大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL; ; m( x) x- z+ i' i
大户净买:=(大户买-大户卖)*100;
/ g( ]% R$ v9 ~: }大户:sum(大户净买,1),linethick0,colorf0f000;
( l; B! y- u. O8 C0 \机构买:=BIGORDER(1,3)*V/CAPITAL; 2 i& y4 a: p2 ~4 ?* {4 x
机构卖:=BIGORDER(2,3)*V/CAPITAL;
3 m4 X( u- N2 o: f- c, E: O机构净买:=(机构买-机构卖)*100; 2 J M7 J3 H# {, V: H1 A, X
超大:sum(机构净买,1),linethick0,color3399FF;
! H; m) {, Y- g7 m1 ]5 e) B大单买:=BIGORDER(1,2)*V/CAPITAL; * G4 P% n- c& O) W, e! u0 R
大单卖:=BIGORDER(2,2)*V/CAPITAL;
2 S, D/ ]7 k+ V6 B2 _3 f/ M主力 大单买-大单卖)*100,linethick0,COLORRED;
$ m9 E( ?4 z2 Y散户增减:=散户-ref(散户,3); # i' B0 N4 z; R B$ g
中户增减:=中户-ref(中户,5); E* P( U: z% d
大户增减:=大户-ref(大户,3); 4 x' O1 g" X6 n
超大增减:=超大-ref(超大,10); * c9 {% Q( X( d( b
主力增减:=主力-ref(主力,5);
: q! v$ a5 L# E( A; d( s, U% SS3:=ref(散户,3);
4 S1 @, i5 T' j/ x b( @Z3:=ref(中户,3); ( ?: U4 W' H5 S0 S2 A7 A$ I$ M
D3:=ref(大户,3);
( S7 x: n: A; Z7 o" {1 GF3:=ref(超大,3);
8 R4 J A" H4 }5 x' ]" y& g" h' }+ a* DJ3:=ref(主力,3);
' t* ?- M$ z7 U4 d( nS5:=ref(散户,5); ; d' Z. l( _, J' w* o7 R( q
Z5:=ref(中户,5); * H, V) l4 w5 F: A/ F+ ?* C
D5:=ref(大户,5); % l. _% Y% p7 k! P' i2 n3 u
F5:=ref(超大,5);
* i4 x& j) M7 m$ u3 |: ?$ `J5:=ref(主力,5);
% W/ h; S, e" S9 N3 S) J" gS10:=ref(散户,10); $ b B- d7 H0 M; l( b1 v
Z10:=ref(中户,10); 0 Y5 m F( }3 e( X' V3 a
D10:=ref(大户,10);
! Y2 P: V* j% a8 F- j9 ~9 W) O1 tF10:=ref(超大,10);
4 B, r: f) v+ Y8 l* o hJ10:=ref(主力,10); 3 M; f% P; d- ~
S20:=ref(散户,20); & g0 ]5 |, y, t0 Z
Z20:=ref(中户,20);
4 M9 a% n- n$ H4 V. ?1 Z, c& eD20:=ref(大户,20);
! _! r N0 m. O1 tF20:=ref(超大,20);
/ j& e7 C. C* ~6 ^J20:=ref(主力,20);
1 t, Q0 ~' G) k: ~) [BL3:=400/MAX(S3,Z3,D3,F3,J3); & U: y1 i. l" \
BL5:=400/MAX(S5,Z5,D5,F5,J5); 9 `7 Y3 \# F' f
BL10:=400/MAX(S10,Z10,D10,F10,J10); , S( f0 Q I6 G6 O3 G
BL20:=400/MAX(S20,Z20,D20,F20,J20);
% q* J5 v/ o$ {+ Q, x' @S3B:=999-S3*BL3; & E* H$ [9 z2 P- V2 h. y9 }4 U* K
Z3B:=999-Z3*BL3; 1 u; z7 Q) h v$ c8 u8 h
D3B:=999-D3*BL3;
3 g7 ^( L2 _; XF3B:=999-F3*BL3;
7 T0 t" @* B2 v C% e& Y3 YJ3B:=999-J3*BL3; 5 J. t D& d- N$ X, ]0 j+ _
S5B:=999-S5*BL5; ' E+ V' ]: s. X% ~7 c4 h# P0 b
Z5B:=999-Z5*BL5;
6 A, B% T; x3 m) j+ P) T; ID5B:=999-D5*BL5;
% I& o' ]6 Y2 f& w; O3 N' hF5B:=999-F5*BL5;
4 h! ?: t9 B \' o# g, l3 v m5 J, eJ5B:=999-J5*BL5; ( G+ ^2 f) Y) q/ s
S10B:=999-S10*BL10; 5 t7 W# z8 D% K3 W
Z10B:=999-Z10*BL10; ' }' D0 U9 b- Q3 f
D10B:=999-D10*BL10;
/ P: T3 j7 b/ Z2 v3 {, N* ]2 U) {F10B:=999-F10*BL10;
& w8 `" d F0 D3 M3 ]J10B:=999-J10*BL10;
q @. q+ N. a! {/ | O3 FS20B:=999-S20*BL20;
& K( z) [& b) z7 T( T0 J$ x. O0 @+ dZ20B:=999-Z20*BL20;
' u, i0 K' _, ]* b7 ]/ T/ o' H& oD20B:=999-D20*BL20; 9 v/ _0 P8 r. V; H
F20B:=999-F20*BL20;
4 N7 H6 a6 K! i4 N7 P* E7 sJ20B:=999-J20*BL20; - t. e8 f) w2 l8 X( a7 Z/ C
{画直方图}
1 U' x5 ^1 u2 aDRAWRECTREL(10,S3B,40,999,RGB(0,255,0));
3 w' O3 i6 G& ~/ g/ t2 xDRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
z$ M' o2 C! y- w% @DRAWRECTREL(50,D3B,80,999,RGB(0,0,255)); $ e, `7 W' I: z. r: A: }& |6 ]# m
DRAWRECTREL(70,F3B,100,999,RGB(180,100,0)); 0 a7 n4 u. X- g* ^1 l
DRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
; g3 C3 S, C: [1 DDRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
7 ?3 M4 A6 y9 s( s6 }+ y5 j& wDRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
8 h; V& b! p& \* S- u9 lDRAWRECTREL(175,D5B,210,999,RGB(0,0,255));
" f0 c9 A6 D hDRAWRECTREL(200,F5B,230,999,RGB(180,100,0)); ' {( G j% S5 ~2 |4 A0 G
DRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
* S: ?1 b3 @$ R; V6 X5 ADRAWRECTREL(270,S10B,300,999,RGB(0,255,0)); 8 H0 ?4 i) I( A
DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100));
6 X# }1 C: d, n+ T6 b! ?* H( zDRAWRECTREL(310,D10B,340,999,RGB(0,0,255)); ) {/ O2 N! b, |& d
DRAWRECTREL(330,F10B,360,999,RGB(180,100,0));
. N2 c+ V6 T) \4 D6 {* ?2 x. RDRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
2 [' v+ b U# Y9 O0 DDRAWRECTREL(400,S20B,430,999,RGB(0,255,0));
4 d) E ]: i* [. oDRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
7 [" N( M* o( ]0 yDRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); + D! b! } r* q0 i4 \/ W, t
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0)); " K- [. ?% i& k
DRAWRECTREL(480,J20B,510,999,RGB(255,0,0)); & W0 j) R$ T) B" V0 k: _8 p M' m
DRAWTEXTREL(80,5,''散户''),color00ff00; , p. h8 G0 r( Z T4 D( V. R/ [
DRAWTEXTREL(160,5,''中户''),colorf00ff0;
2 Z; O3 x" X2 XDRAWTEXTREL(240,5,''大户''),colorffaa66;
5 U; \9 N. ~8 ~6 o. J) q! B% LDRAWTEXTREL(320,5,''超大''),color0099ff; , [* R1 k% w$ J5 d, `- B u0 R. I4 f
DRAWTEXTREL(400,5,''主力''),colorred; % s6 F3 f8 k1 P" h( A
DRAWTEXTREL(30,70,''本日''),colorddffff;
5 q' I# v) i$ n3 f1 bDRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; ) |' j+ f9 v! w$ h9 ^
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0;
8 P: T3 e% k7 S; }/ K! CDRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; 6 ~' ?. l) g* E- J& u1 z
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
. \+ S# A2 ^2 B5 jDRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred;
9 @9 e' s% z% N4 \/ YDRAWTEXTREL(30,140,''3日''), colorddffff;
- [+ d7 H2 W; h) H* j8 e: _7 [DRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; ; P, ]1 ]& C. N% r
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; 2 B2 Q4 U! z$ x3 q# `
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
' s& |* b. Y. W0 v, v& ]4 s: ?DRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; N' L3 c& j' ^; ]% ?% K
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; $ `9 g1 }; }7 Z
DRAWTEXTREL(30,210,''5日''), colorddffff;
1 D$ V. E7 i3 q _% t, ADRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
6 I @- l, R: h0 P3 r- ~6 X& Z/ RDRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0; ! _1 E1 I0 n9 Y" P9 f- Q; u
DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; 2 W& N, d) Q; [# ]
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff;
, L; E" c$ }- v4 E, y0 m: S jDRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred; + z# s4 f0 q! j# @- ^
DRAWTEXTREL(30,280,''10日''), colorddffff; & q9 a5 h- a0 Z {; ]( v
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
6 Q7 K+ S2 J1 J0 kDRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; & [6 g2 ^2 r1 U
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66; : w6 e' b+ G. O h, ~" j/ ?* A
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
# V0 K7 e% }8 g+ V7 [' uDRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred;
& m% Y1 B) F% Y; H' ~DRAWTEXTREL(30,350,''20日''), colorddffff;
! t, l8 G7 {7 }0 `DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00; ; _9 D" i, x2 V: s! c! }7 v3 [7 E
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
: V. N9 ~7 e) M8 [0 r6 L K3 f9 zDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66; & a# Y3 c( o+ k8 q8 D7 z
DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
* d; f- ] d& U9 DDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred;
2 | r1 ?8 D$ H2 N% \ U. |$ NDRAWTEXTREL(5,800,''3''),COLORRED; , P* e( F! x: l( t8 T# X
DRAWTEXTREL(3,900,''日''),COLORRED;
# i# O% I' ?: ]" O. vDRAWTEXTREL(135,800,''5''),COLORRED; 7 y3 Z* y" s: B- \/ N
DRAWTEXTREL(130,900,''日''),COLORRED;
+ K* U0 D; x* T0 I: k/ x$ [0 oDRAWTEXTREL(260,800,''10''),COLORRED;
8 w% \, A/ i& O1 D& ^4 i+ XDRAWTEXTREL(260,900,''日''),COLORRED;
3 G% E6 n1 s7 J2 `: s( RDRAWTEXTREL(390,800,''20''),COLORRED;
# N, @/ O1 X, ]$ E+ P* u2 M2 _2 cDRAWTEXTREL(390,900,''日''),COLORRED;
# l( g" U! [+ k. `* Q6 j一日资金流入:=amount*BIGORDER(1,2)/10000; c5 {6 a; q, Z$ c, d7 P
一日资金流出:=amount*BIGORDER(2,2)/10000; 6 ]- K4 w0 w0 O0 d( A
资金流:=一日资金流入-一日资金流出; . }; H1 `* b" Y0 v( C! ~# Y" |
收支【万元】:资金流,color3d,coloryellow;
( @2 X9 r# `+ {$ g+ m: ^( x" _IF 资金流流出,RGB(255,0,0)),COLOR000000; ; w9 T2 q0 Z1 g
FILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54