|
小单买:=1-BIGORDER(1,1)*V/CAPITAL;
S# S- e, v& H2 H: e$ J$ Y: N小单卖:=1-BIGORDER(2,1)*V/CAPITAL; " }1 n4 r& Q, J X
散户净买:=(小单买-小单卖)*100; 0 H, a) }& V/ U S
散户:sum(散户净买,1),linethick0,COLORGREEN; ! H: k2 |% x t2 R; }
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL;
! V# f# j! j8 s [; R( z中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
" [2 }3 ^/ b F& F( ^/ S6 v. s% D中户净买:=(中户买-中户卖)*100;
7 C6 n9 l2 H/ v, H& w中户:sum(中户净买,1),linethick0,colorf00ff0; & k0 v6 [/ f- M7 P/ g# q2 e
大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
7 W# t6 A0 c/ J* S. S大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL; + N+ |4 J; } W( |! @1 h8 k& Q
大户净买:=(大户买-大户卖)*100; : M n' P9 ^# O( _6 U- H& g( t
大户:sum(大户净买,1),linethick0,colorf0f000; ! L+ \' q* f9 w8 }
机构买:=BIGORDER(1,3)*V/CAPITAL; * b# Z: r* h5 E7 p; ~% D
机构卖:=BIGORDER(2,3)*V/CAPITAL; ) L7 G- z- ?0 p- o
机构净买:=(机构买-机构卖)*100;
' f, Y+ q' C9 D+ y; O! x5 E超大:sum(机构净买,1),linethick0,color3399FF; * W# d- C& a: g0 C* |) [9 v
大单买:=BIGORDER(1,2)*V/CAPITAL; ( c/ {: u* D( e8 i- G4 l
大单卖:=BIGORDER(2,2)*V/CAPITAL;
8 [2 K5 E j9 T! m2 Z0 I5 e) `; j2 t主力 大单买-大单卖)*100,linethick0,COLORRED; # q8 D1 F. L& l0 S+ Y* h
散户增减:=散户-ref(散户,3);
1 [3 i3 H1 Y7 l9 ?. e! @中户增减:=中户-ref(中户,5); : ~% \1 o: z5 m7 C2 n8 R+ [0 j7 Y! c
大户增减:=大户-ref(大户,3);
3 e" G D" k% W5 A. M. {7 L4 \超大增减:=超大-ref(超大,10);
9 W9 k, a I8 A主力增减:=主力-ref(主力,5); 1 }0 i# u8 {, G1 N/ ~7 x c
S3:=ref(散户,3);
5 {0 m ^2 o5 ZZ3:=ref(中户,3);
1 n' m4 l7 u( E; I3 _, iD3:=ref(大户,3); 6 F# Q& ]3 I& e2 t: i' i& D
F3:=ref(超大,3); 2 n, X5 j2 b9 A: N* G5 _
J3:=ref(主力,3);
W, q9 A/ y9 T% m8 e& z* U5 R BS5:=ref(散户,5); & Y! _# A4 A8 R: y4 e: W! v5 @, |
Z5:=ref(中户,5);
) N/ w5 y$ m4 y! sD5:=ref(大户,5); & c8 ?( W; a" m& l4 r8 H$ C
F5:=ref(超大,5); . \4 L3 T2 a7 l% q7 l! M
J5:=ref(主力,5); 5 H' R5 R3 ]2 }% t
S10:=ref(散户,10); 5 n) O) e, m0 Q
Z10:=ref(中户,10);
; R3 v! _5 a- H. `( o# x5 O6 ^D10:=ref(大户,10); 5 a; q6 C) [7 I7 C+ ]
F10:=ref(超大,10);
* f) L' |% \. v! ?( wJ10:=ref(主力,10);
W1 {1 o, P& K7 {* o* ]& FS20:=ref(散户,20); * U- T4 a1 ^. e
Z20:=ref(中户,20); . T6 X) d8 _" Q- j. `; n0 |
D20:=ref(大户,20);
+ t u% y+ Q& aF20:=ref(超大,20);
- \- R. i( V3 A4 b3 c# @J20:=ref(主力,20);
, n' n. v* ]7 ?7 B3 b( {: g2 LBL3:=400/MAX(S3,Z3,D3,F3,J3);
" Q; _1 ~& w. n1 O8 QBL5:=400/MAX(S5,Z5,D5,F5,J5); * c. k( Z1 v0 E/ ~" E) P: K9 Z" S- r
BL10:=400/MAX(S10,Z10,D10,F10,J10); ) N6 R4 Q" J: \% ^
BL20:=400/MAX(S20,Z20,D20,F20,J20); 8 e0 r9 |9 m' G
S3B:=999-S3*BL3; , N$ l: r) T: K
Z3B:=999-Z3*BL3;
# R7 p- n2 }: ?+ \4 a" ^! M% ID3B:=999-D3*BL3; ' z$ n" ?% ^* f: \. K d% J
F3B:=999-F3*BL3;
* |. n/ ~" K+ V9 e1 I. pJ3B:=999-J3*BL3;
- `* i# I- X, |6 q `S5B:=999-S5*BL5; ; d+ [1 E# U1 [/ D& [
Z5B:=999-Z5*BL5;
6 p/ ~$ b, |/ t' g. [. k+ p4 mD5B:=999-D5*BL5;
; O S3 U) y1 @5 q8 Q+ lF5B:=999-F5*BL5; {! O, z d+ P' ^# j, M9 f2 Q1 W
J5B:=999-J5*BL5; / u6 X& |( V6 X- c
S10B:=999-S10*BL10; 9 P: u& s8 K& r- [$ I2 L! O
Z10B:=999-Z10*BL10; 9 M) u# x; p0 Z- j- S, y
D10B:=999-D10*BL10;
8 }/ m( D9 x! bF10B:=999-F10*BL10;
1 s3 _ J4 A8 }' U; ~J10B:=999-J10*BL10; ' L0 x1 |0 l2 A, r$ G
S20B:=999-S20*BL20; 1 @0 o" |7 f- \% b
Z20B:=999-Z20*BL20; - N$ U* Q2 V( [
D20B:=999-D20*BL20;
/ |* n2 Y8 D7 _% l: |F20B:=999-F20*BL20; $ e: g! x+ Z$ F) c" ]( S f5 m
J20B:=999-J20*BL20; . `& I9 C6 f; Y# X7 j( Q+ u( r
{画直方图}
& d8 n- m- R4 ?; `1 _DRAWRECTREL(10,S3B,40,999,RGB(0,255,0));
- b" T8 o9 A5 @6 F, X: j1 MDRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
/ ?- [2 ?! j! j* R# A7 [ T% [( BDRAWRECTREL(50,D3B,80,999,RGB(0,0,255)); 8 }. e) g' ~5 F2 n$ x
DRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
9 E! ^2 o9 B, B8 y; Y8 l+ ODRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
& ^4 M& W6 B/ `3 L) R: GDRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
6 N4 o+ s- \; ]/ c$ [ ADRAWRECTREL(160,Z5B,190,999,RGB(180,0,100)); " i. \" f/ E( T/ h4 M
DRAWRECTREL(175,D5B,210,999,RGB(0,0,255));
3 E6 X; h$ d! _/ @, SDRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
( g% d3 l, a" g& Y) a( I9 _, }, @9 PDRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
- [# c# |4 O+ {% B/ N4 r7 ?1 fDRAWRECTREL(270,S10B,300,999,RGB(0,255,0));
% } _; M! M, m3 Z t. K9 IDRAWRECTREL(290,Z10B,320,999,RGB(180,0,100));
( Y" O, o! N3 t8 c" @DRAWRECTREL(310,D10B,340,999,RGB(0,0,255)); : X% F, ?8 l% A/ a. F- u) F
DRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); 3 C! Q' R }2 j% ?& o
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0)); " m0 }: h+ h* H( c
DRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); 8 Y* \; y7 C- R) E6 o3 D/ L
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100)); - P2 v! w* h$ Z5 n2 F6 H+ C
DRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); 5 o! C, M9 Y* x9 _3 W m3 y
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0)); & P: E1 a1 C# Z. ^7 }% ]7 ^
DRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
' t: a' `' g! [DRAWTEXTREL(80,5,''散户''),color00ff00; . D8 h2 {8 Z/ V! B" d2 k
DRAWTEXTREL(160,5,''中户''),colorf00ff0; " _% {; \9 H2 s- n( @/ j
DRAWTEXTREL(240,5,''大户''),colorffaa66; 6 ]9 i- ^& w1 @: W1 q# ~) Q
DRAWTEXTREL(320,5,''超大''),color0099ff;
3 W$ j; }# U8 h! A/ U$ E1 ADRAWTEXTREL(400,5,''主力''),colorred; ! z+ w1 e2 ?; @5 I
DRAWTEXTREL(30,70,''本日''),colorddffff; - [+ R! u% y* O5 | \# I$ n, L( E
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; 2 [; {4 H! A+ G0 G& k$ O3 M5 i
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; 4 v4 W0 u2 T7 L7 n1 ~- Z ~
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; & C) |" y: ^. A) K
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
6 w# f9 ?! H1 c; RDRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; $ j( ?) h: `, v: p% L; H; w
DRAWTEXTREL(30,140,''3日''), colorddffff;
2 h/ V A8 T' m& N0 G! }DRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; : b7 |) z3 p* ]& h) I/ o9 A" @. C6 @9 ]
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0;
3 f5 a- m+ h7 t# {! ?. m1 qDRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
$ W+ w' Q% O6 k4 q/ A F) c8 wDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; & u7 P" n9 k2 I2 Q
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; + e; H! g. R4 A5 |& l, O; r
DRAWTEXTREL(30,210,''5日''), colorddffff;
$ j% D$ `2 _5 ^4 R5 zDRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
\0 H3 [1 ^1 _! Y, ^$ Z7 F: u: ?DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
4 m: T J! A4 @DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; ! ]8 }0 T4 g, P/ @/ r* g& v$ U2 j' m
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff;
8 G7 o) R7 a# zDRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
! D5 O u9 [/ M0 k- ]DRAWTEXTREL(30,280,''10日''), colorddffff;
- f4 n0 v2 V; ^1 r5 w/ TDRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
- l7 s/ \6 h5 O! M' d5 \" TDRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; + x: p' }: n( p* ?) K ]
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66; " |* N' _! ?- j0 j: l1 ?
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff; & A3 V Q' M W, c9 [
DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred;
+ H8 H0 A; i7 g! v% ?) W" ODRAWTEXTREL(30,350,''20日''), colorddffff; . G0 C7 b6 L/ d! o
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
) y- r8 X7 E: P/ R0 s6 qDRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0; ! j+ d, _+ ?8 d* ~
DRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
0 J5 p6 b8 R0 J1 a5 Z' tDRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff; + t- d4 r9 d4 p% C4 L; L, e
DRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; / p# ]$ ]: K( Q7 P# o5 t& T/ X
DRAWTEXTREL(5,800,''3''),COLORRED;
- T9 e5 W. b6 WDRAWTEXTREL(3,900,''日''),COLORRED; $ A# L! X J6 J! l
DRAWTEXTREL(135,800,''5''),COLORRED; ! O. Z# G; y5 s' k
DRAWTEXTREL(130,900,''日''),COLORRED;
$ t5 G& ~! l* r/ I* L. i. DDRAWTEXTREL(260,800,''10''),COLORRED; 5 G: W9 ^# o0 O6 Y+ r
DRAWTEXTREL(260,900,''日''),COLORRED; $ r# T6 j* z2 ^! z: M6 s2 o: I
DRAWTEXTREL(390,800,''20''),COLORRED; / X! ?2 W+ D* p7 g3 ]
DRAWTEXTREL(390,900,''日''),COLORRED;
4 H1 P7 d+ S, g( S8 s& Q- F一日资金流入:=amount*BIGORDER(1,2)/10000;
1 k* a" g4 U2 F0 K" x' f% k' R- W一日资金流出:=amount*BIGORDER(2,2)/10000; " p/ w6 b3 O8 L* q% `- s* x, ?. [
资金流:=一日资金流入-一日资金流出; 1 |& ~, H, z3 w$ q: a [
收支【万元】:资金流,color3d,coloryellow;
* }* }9 j( l' A n# R( M: gIF 资金流流出,RGB(255,0,0)),COLOR000000; B' n* L. N1 D+ e
FILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54