|
小单买:=1-BIGORDER(1,1)*V/CAPITAL;
/ F6 k% d K: U: o! y小单卖:=1-BIGORDER(2,1)*V/CAPITAL;
2 J9 T' ^% X7 M% E& c散户净买:=(小单买-小单卖)*100; ! r2 \; z0 K- F4 s9 o8 \$ g! O$ w
散户:sum(散户净买,1),linethick0,COLORGREEN;
7 T- F% }; l9 D$ ?- E中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL;
2 Y% m3 t, o. P$ l( j) g中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
8 }% t6 d8 @5 m5 w* h$ [' K中户净买:=(中户买-中户卖)*100;
p5 ?* ~' {, A; r- h: r) ~6 }中户:sum(中户净买,1),linethick0,colorf00ff0; H+ B0 P" N a6 t
大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
8 D1 I, B" c; m) H9 y6 s( Q z大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL;
+ l8 m4 H5 a( p5 Y8 z- N大户净买:=(大户买-大户卖)*100; - T$ V5 I; t+ `2 @, \! j) k
大户:sum(大户净买,1),linethick0,colorf0f000; . ]6 W. e& U6 Z& A9 Y7 U! [
机构买:=BIGORDER(1,3)*V/CAPITAL;
Z) t. b3 |& m& c) b* [, k机构卖:=BIGORDER(2,3)*V/CAPITAL; 9 U) c3 x* m4 b: G9 v
机构净买:=(机构买-机构卖)*100; " r. Q) d2 s2 m+ H5 n
超大:sum(机构净买,1),linethick0,color3399FF; + B! X8 j( q4 C8 ^
大单买:=BIGORDER(1,2)*V/CAPITAL;
( W5 V, H; z( G6 A$ ~; ?大单卖:=BIGORDER(2,2)*V/CAPITAL;
2 B6 J; n+ z Z0 G( z主力 大单买-大单卖)*100,linethick0,COLORRED; , [* B, H3 Y$ `; e+ X$ O
散户增减:=散户-ref(散户,3);
% l+ w& ~ O* y中户增减:=中户-ref(中户,5); 6 ?& o; |* m- [( K9 N5 E0 A. h
大户增减:=大户-ref(大户,3); 4 b$ c4 S4 n! w z/ O7 U' O4 D
超大增减:=超大-ref(超大,10);
! f4 p q: f9 N- q6 I主力增减:=主力-ref(主力,5);
. m; H5 q0 Z Z2 A) KS3:=ref(散户,3);
5 ~9 f, b; I: @, c% s: l' BZ3:=ref(中户,3); + x: U$ k6 }: s1 r/ F
D3:=ref(大户,3);
9 f- w# s/ L# J% u& e! b" SF3:=ref(超大,3);
7 V$ x; l w; A7 xJ3:=ref(主力,3);
' K: e K! n2 t7 |& DS5:=ref(散户,5); 5 L& N# @7 `; s# ~8 b8 `
Z5:=ref(中户,5); % C* U& P6 d. @) z2 n2 b
D5:=ref(大户,5); ! g& {! s6 {2 O/ ~1 D/ h+ s- O( W6 V6 e
F5:=ref(超大,5); ( [1 j/ y" x! I _9 A
J5:=ref(主力,5); ! \; ~" n# M( k1 W! q: m0 w
S10:=ref(散户,10); : O1 E* u9 h. K0 n |' X1 H
Z10:=ref(中户,10);
; ~! l! y' b7 K/ E0 BD10:=ref(大户,10);
, {/ A8 d H- @, a$ Z+ @7 \5 RF10:=ref(超大,10);
0 I1 Q# ?1 [4 D3 Y* W6 [J10:=ref(主力,10);
9 _. D* u% P9 `8 C8 SS20:=ref(散户,20); ) f) S: Q' F$ v7 U
Z20:=ref(中户,20);
8 \. \) m- G9 w: I0 ^1 M4 FD20:=ref(大户,20); 3 f6 |" G1 y+ k/ }$ R- f
F20:=ref(超大,20); 6 v3 t5 p" o5 ^0 z5 o7 z
J20:=ref(主力,20); 1 N. P( s% P( C7 \
BL3:=400/MAX(S3,Z3,D3,F3,J3);
$ n0 v$ o& ]3 c5 J* S) I: O. d6 }7 @BL5:=400/MAX(S5,Z5,D5,F5,J5);
. U. `/ w* q. t1 \0 I+ h4 p( pBL10:=400/MAX(S10,Z10,D10,F10,J10); 8 r1 T' n8 K) K* T
BL20:=400/MAX(S20,Z20,D20,F20,J20); 9 I9 {7 e0 }& X5 k" Z
S3B:=999-S3*BL3; ; @0 b1 J* p- v$ C: s4 {
Z3B:=999-Z3*BL3;
" }/ w% D4 `5 g* O, HD3B:=999-D3*BL3; + o* E$ R) Y* x- }% l
F3B:=999-F3*BL3; ; N% ?, l7 F* D6 a4 v
J3B:=999-J3*BL3;
" }) `6 Q# A6 M3 BS5B:=999-S5*BL5;
* `1 {4 ~' S6 A6 X# |Z5B:=999-Z5*BL5;
8 ~; g) `, G) d$ ^- o5 GD5B:=999-D5*BL5; 1 e: G. A' D6 r
F5B:=999-F5*BL5;
5 ~, r% F! T+ Y4 M7 c; o1 x! s2 yJ5B:=999-J5*BL5;
2 I8 ]" R" F/ h* W8 t3 gS10B:=999-S10*BL10;
- s/ q; b# ]6 r4 n8 K6 ]Z10B:=999-Z10*BL10; ! ]) [- i$ w5 h! c
D10B:=999-D10*BL10; - P* T- `2 \5 R8 S% I
F10B:=999-F10*BL10;
6 b: R) }) |1 T& ]. _J10B:=999-J10*BL10;
9 n6 W1 I. e3 I4 i4 p$ I _7 rS20B:=999-S20*BL20;
& ?$ _5 x- h$ i, ^( ]Z20B:=999-Z20*BL20;
! t0 g6 ~" u# r O- D2 T! AD20B:=999-D20*BL20; # y) u0 R. j8 @5 ~4 C
F20B:=999-F20*BL20; . u) P2 c" B2 Q7 A" P5 i6 Z/ p
J20B:=999-J20*BL20; , n8 W2 d/ E$ Y" X5 ?0 P2 J9 A' ~6 d5 P
{画直方图}
( Z X) U# y3 ]& P& D1 uDRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); 2 u: f, O' z6 o8 t( {' W5 Y
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100)); . }5 h; x% e; R8 f
DRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
+ W% {- `9 q4 ~0 o _! r4 E1 LDRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
3 y' X, Z9 i+ E' @DRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
1 {# U0 L" `0 | F- iDRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
+ ^% \, O7 [! F+ @DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
8 G! |& Q0 H7 ^- SDRAWRECTREL(175,D5B,210,999,RGB(0,0,255));
W8 v/ d5 g: A/ R) v2 aDRAWRECTREL(200,F5B,230,999,RGB(180,100,0)); 5 g" l" H0 |, v/ A
DRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
9 T6 \2 T! w( |- t# `DRAWRECTREL(270,S10B,300,999,RGB(0,255,0)); ! f# w& ~+ K3 x6 r t; u9 m
DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100)); " j M+ J' ~2 q5 i
DRAWRECTREL(310,D10B,340,999,RGB(0,0,255));
5 h3 f) p) ?4 @6 ^2 YDRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); % Y2 O9 w7 t4 Q5 j0 ~
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
4 E: S7 D3 O* {DRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); + x; l: S; ?" f) s, O5 K6 V- L
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
/ B. z% B J0 n- g. kDRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); & G; u Z ~" f0 E6 A( L* d
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0)); ! d' x. t% o- w' D, W: Z) |
DRAWRECTREL(480,J20B,510,999,RGB(255,0,0)); $ Q7 f, w8 Y4 J
DRAWTEXTREL(80,5,''散户''),color00ff00;
7 C1 y! ]. t) s* @, Q, fDRAWTEXTREL(160,5,''中户''),colorf00ff0; 1 u1 w: e8 L$ U7 |) n s
DRAWTEXTREL(240,5,''大户''),colorffaa66;
) h; ^2 B0 ]: y! |- GDRAWTEXTREL(320,5,''超大''),color0099ff;
% r# m( K; ]0 w2 `: x2 HDRAWTEXTREL(400,5,''主力''),colorred; 3 X& }3 R9 [6 J) q2 i$ s+ y/ u
DRAWTEXTREL(30,70,''本日''),colorddffff;
b) z/ z# }7 C# m* WDRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00;
- T" d! y6 \1 G3 r0 n; E G4 }' vDRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0;
4 L2 M; T- T7 V6 iDRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; : E1 s- A( A0 K1 }! T1 @, [; @
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff; 0 \6 G- h; j$ J& v6 y9 Z- g& x
DRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred;
$ A* L3 m( H2 KDRAWTEXTREL(30,140,''3日''), colorddffff;
~; o0 T/ a7 ^7 c/ E8 IDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00;
$ E3 T4 Q7 F7 o# w. _$ ]DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; + I6 K9 Z8 N$ D8 {: w; S
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
+ \, q" N( k; aDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff;
0 x2 q$ G0 d8 q& CDRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; 2 h2 J. M8 a: q& L6 X
DRAWTEXTREL(30,210,''5日''), colorddffff; , Z8 _+ ~; w! _# s! k+ s
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00; 8 U, b9 r7 u# l: l0 ~
DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
% w3 F% U! V$ |! ]& [/ ]4 uDRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; 5 w4 i# Q, g/ _
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; , e G- w0 q9 e& }3 {+ y3 t4 p
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred; " M! X! d1 v& w6 g! ?
DRAWTEXTREL(30,280,''10日''), colorddffff; * ^' P. T+ U% f% S
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00; z3 O" t5 S. }( ~3 e( s ]- U
DRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0;
" H" o6 H* w) {) r+ FDRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
x0 ~ n" I e5 N$ oDRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
" A5 l+ e0 P n# n bDRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred;
[2 m8 c$ M7 C# o2 W* y3 [8 ]# sDRAWTEXTREL(30,350,''20日''), colorddffff; 9 J, [, {7 i+ ~* \8 {
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
2 T6 N; T9 e2 r2 oDRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0; 0 t9 {8 ^! w" Z. P
DRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66; + H! U4 O. J9 p9 U
DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
* u' `7 v9 S6 E2 T# NDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred;
* x; c3 W7 e ~9 Q: K6 b7 ?DRAWTEXTREL(5,800,''3''),COLORRED;
4 h5 u y1 ^6 b6 d2 ]% HDRAWTEXTREL(3,900,''日''),COLORRED; 7 P3 M1 f% ], k2 `: x# @
DRAWTEXTREL(135,800,''5''),COLORRED; : p- M, }2 S% V+ s$ y0 P
DRAWTEXTREL(130,900,''日''),COLORRED; ! J" R( l o9 Z' q/ _
DRAWTEXTREL(260,800,''10''),COLORRED; : u! D4 N E, j' J
DRAWTEXTREL(260,900,''日''),COLORRED; / u5 r9 q. b, O7 k% m: c
DRAWTEXTREL(390,800,''20''),COLORRED; + b% D: d- }: b# k, W; S
DRAWTEXTREL(390,900,''日''),COLORRED; 1 \* l3 W @8 c5 t# ^+ q; h
一日资金流入:=amount*BIGORDER(1,2)/10000;
( E' D) d0 y# |$ @, o一日资金流出:=amount*BIGORDER(2,2)/10000;
* u5 j8 A- j* |# m5 {% Q资金流:=一日资金流入-一日资金流出; & M& }; g7 V" w+ H, o* Q0 n% l
收支【万元】:资金流,color3d,coloryellow; 0 v- S* k$ K1 y5 d& i
IF 资金流流出,RGB(255,0,0)),COLOR000000; + @; a. \! r$ j0 t2 w1 n
FILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54