|
小单买:=1-BIGORDER(1,1)*V/CAPITAL;
& c# J) v1 X4 R" K小单卖:=1-BIGORDER(2,1)*V/CAPITAL; 0 u! W, U5 h' [6 _- Y: w* p- P
散户净买:=(小单买-小单卖)*100; % d; l+ O7 r- U z: A# g
散户:sum(散户净买,1),linethick0,COLORGREEN;
m: E* W2 k3 s8 ~; }! u# P中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL;
6 K E; q ?: x! q! u1 h中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL; 6 s( ^) l6 P6 i1 w3 k% L( J0 U7 \
中户净买:=(中户买-中户卖)*100;
) h* w+ }( Q% J" l \( s中户:sum(中户净买,1),linethick0,colorf00ff0;
; ^7 h6 b) s) H大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
! I# l2 m- n! ]; T* m4 L大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL;
) ]5 c( p! W% ^9 M% M2 E' \! L) ^% M大户净买:=(大户买-大户卖)*100;
1 U/ E ^% p. A2 {大户:sum(大户净买,1),linethick0,colorf0f000;
4 H$ v7 D# X9 \, F& P. W机构买:=BIGORDER(1,3)*V/CAPITAL;
5 `' c) F8 c4 a机构卖:=BIGORDER(2,3)*V/CAPITAL; 7 E" O, l( t2 \! _6 ~
机构净买:=(机构买-机构卖)*100;
: B0 @3 L: @/ V$ A7 P超大:sum(机构净买,1),linethick0,color3399FF; 0 T [4 O+ u q6 O1 @" b
大单买:=BIGORDER(1,2)*V/CAPITAL;
: ~$ b" t: M- I B6 V大单卖:=BIGORDER(2,2)*V/CAPITAL;
* \2 S7 L A/ @* i主力 大单买-大单卖)*100,linethick0,COLORRED; 2 ]: v" D! H" u" g, Z' p
散户增减:=散户-ref(散户,3); $ A5 F# D8 L }- e# ^& d
中户增减:=中户-ref(中户,5); , c) u1 B5 R1 L' Y9 v5 g8 S
大户增减:=大户-ref(大户,3);
# P$ Z2 E' E; e6 u超大增减:=超大-ref(超大,10); 0 f0 F1 p' q, W- C1 L* J1 P4 F
主力增减:=主力-ref(主力,5);
n7 }0 N6 E& t( X% |+ X+ Z, B& O7 gS3:=ref(散户,3);
: K# q$ \! \+ x/ F" a k$ {Z3:=ref(中户,3);
, V* D( R7 @# G3 A( `D3:=ref(大户,3);
2 d7 U( u6 b9 k% Y. H$ zF3:=ref(超大,3); % K+ Y( h8 `. u* Y# p, T
J3:=ref(主力,3);
+ ^# |4 p, I0 t5 w$ k( a% p0 xS5:=ref(散户,5);
4 k) z6 z4 t. V( yZ5:=ref(中户,5);
# g% _4 ]- c7 r& GD5:=ref(大户,5); 1 p- `% n% I) s; A0 g. m2 ^" v9 L( Q
F5:=ref(超大,5);
* A( K$ K, z1 b4 |% jJ5:=ref(主力,5);
4 X+ d. v. p6 k% Y# Z/ U; dS10:=ref(散户,10);
8 T1 o, I3 [# X' _1 wZ10:=ref(中户,10);
; o! z2 n% s9 d- z% H$ S) ED10:=ref(大户,10); 7 g8 j/ g/ u9 C! @+ [/ F" E
F10:=ref(超大,10);
9 ^* y/ E7 Z; {# B1 U8 T1 ^J10:=ref(主力,10);
! i9 K, L' q4 a6 fS20:=ref(散户,20); . c% t$ u" N9 n$ r8 b
Z20:=ref(中户,20); 5 l: x0 _- ~8 g6 o# F) O
D20:=ref(大户,20); % v, M$ {- {* g: ]! K$ e4 ~8 s4 j
F20:=ref(超大,20);
# ^3 w5 d2 V, a/ u9 G' S9 X5 iJ20:=ref(主力,20);
3 t8 Y& m/ ?. p2 V+ }6 ]8 U/ IBL3:=400/MAX(S3,Z3,D3,F3,J3); + \, h3 y8 S. I7 e/ q& i! f
BL5:=400/MAX(S5,Z5,D5,F5,J5); . j8 `9 P& Z$ O+ S& {/ B( _
BL10:=400/MAX(S10,Z10,D10,F10,J10);
- l' ~9 Q5 e- q0 Q- u" W2 s$ e3 iBL20:=400/MAX(S20,Z20,D20,F20,J20);
2 R* V+ v+ `5 }7 lS3B:=999-S3*BL3; 3 }% G9 ?5 e( X8 y+ d, I, z
Z3B:=999-Z3*BL3;
1 T( a% z* G* G8 l2 e. H. |/ GD3B:=999-D3*BL3;
$ S0 b; n' q! s$ Y+ ~+ Y- `5 tF3B:=999-F3*BL3;
8 l6 y6 d% G6 x7 u& xJ3B:=999-J3*BL3;
+ w7 ^7 E( I9 J+ mS5B:=999-S5*BL5;
v$ _1 B: N9 E* n x3 F U" L1 Y8 p# JZ5B:=999-Z5*BL5; 7 ~( W0 A% t( X) n- Z% Z# |: W! P
D5B:=999-D5*BL5; 8 T/ I5 |5 |1 ?, D3 o/ P
F5B:=999-F5*BL5;
8 R1 v/ _6 J3 c/ h& r2 X! L1 uJ5B:=999-J5*BL5;
! Q# O j) e8 HS10B:=999-S10*BL10; : B5 e1 p- X8 B" Y6 r) F5 k
Z10B:=999-Z10*BL10; 2 q' K) Z: g9 p& c* q R& A. h. ^
D10B:=999-D10*BL10;
' g3 F$ p S6 ^ ]" iF10B:=999-F10*BL10; 0 X$ v C$ |4 N9 G8 b% z U9 ]! s
J10B:=999-J10*BL10;
3 t3 A* G" J5 v2 ~4 x( cS20B:=999-S20*BL20; # B. p7 S# k$ C% a/ x
Z20B:=999-Z20*BL20;
" d$ |1 Y% ?) P+ o% C- PD20B:=999-D20*BL20; $ s1 o6 Z/ R# H8 _& ]: L; q' e8 N
F20B:=999-F20*BL20; : y- E$ r" ]. t: {+ q
J20B:=999-J20*BL20; 4 ]( n! h8 D- m a9 e( O
{画直方图} 5 q- p: \' J/ u; [; p4 C8 g
DRAWRECTREL(10,S3B,40,999,RGB(0,255,0));
) O3 R2 l- g5 C, P) g3 R" PDRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
* V. f; q5 P1 H8 vDRAWRECTREL(50,D3B,80,999,RGB(0,0,255)); 1 U- o8 _( i* p0 w4 S6 n$ B2 k
DRAWRECTREL(70,F3B,100,999,RGB(180,100,0)); 6 L( t) ]' k6 O/ u9 n
DRAWRECTREL(90,J3B,120,999,RGB(255,0,0)); " _( w2 k. S+ ^, _3 ]
DRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
6 `) U' q) C% y% g$ f% c6 eDRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
7 r3 b: W5 v: g0 p: a, _: bDRAWRECTREL(175,D5B,210,999,RGB(0,0,255));
1 y- D' @0 f5 k! F" F' g; ~2 SDRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
) E* F" j1 V% @0 Q; ^5 uDRAWRECTREL(220,J5B,250,999,RGB(255,0,0)); ' d$ } ], Z" N. {. p
DRAWRECTREL(270,S10B,300,999,RGB(0,255,0));
% \; R& m5 u- r" B/ u2 j8 nDRAWRECTREL(290,Z10B,320,999,RGB(180,0,100)); 2 F( r: B8 @5 p
DRAWRECTREL(310,D10B,340,999,RGB(0,0,255));
, P* f0 @' ` Y% g7 ?/ vDRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); + r7 F4 G' I; X* p, ?
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
2 |1 {! ]. F: _- A ?DRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); , p8 _$ z3 j9 L4 l, i
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100)); 5 B; a! Y5 g" l9 h3 ]7 O
DRAWRECTREL(440,D20B,470,999,RGB(0,0,255));
; B6 s* e; S; b2 l8 g/ q% \' CDRAWRECTREL(460,F20B,490,999,RGB(180,100,0));
# w& X% k% U: T# s' xDRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
! b. M9 ]3 |1 n- sDRAWTEXTREL(80,5,''散户''),color00ff00;
5 K) j; s) H; g) b0 ~4 fDRAWTEXTREL(160,5,''中户''),colorf00ff0;
) `" i r3 q; h$ }' _! A0 VDRAWTEXTREL(240,5,''大户''),colorffaa66;
3 N w, Y0 {# b- \+ ] hDRAWTEXTREL(320,5,''超大''),color0099ff;
, k0 I8 N% R3 d5 h, mDRAWTEXTREL(400,5,''主力''),colorred; 9 t9 d" w" b( V7 A
DRAWTEXTREL(30,70,''本日''),colorddffff; + x$ ]7 v6 q. U$ l1 z
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00;
# ~* m" G0 B: R" K: c/ @4 `- H. UDRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; 3 c8 J" I/ |2 l; c
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; & M* j4 E# p0 ~ Q: i
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff; - r% i! q$ j; i" k& N3 l) p2 Z+ k
DRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; / V+ B6 {+ Q* Q" k5 ^! F' C! u# l
DRAWTEXTREL(30,140,''3日''), colorddffff;
) v2 F8 a% W9 X/ Y2 [5 eDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; 8 K% L8 Y4 ?* v! m
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0;
- @$ b& f2 h- u- Y) ~9 {. jDRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
4 W3 e' T" n; H* Z1 I" yDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; A/ q/ k3 l- x- _; \( I- h) e
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred;
! S$ U" K) W9 D( d% y3 w1 Q3 [DRAWTEXTREL(30,210,''5日''), colorddffff; , r: @4 w( B B! K
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
. \( p! }' i; q( q. HDRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
6 V5 ~9 J9 F* j* @2 i( YDRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66;
* c5 y. c0 F5 G# V2 sDRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; 5 b# v, y. B/ j3 y' w, t, u
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred; 5 U* v4 v8 q6 W: A- v
DRAWTEXTREL(30,280,''10日''), colorddffff; 4 D: F; r( b7 c! C0 w4 `2 V
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00; " b- v( p& m; [, f
DRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0;
" E6 O' {4 h( C/ x6 UDRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
' v' v! V4 D; ~9 T O% }+ gDRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff; - H. v( i ?4 ~# E( ]
DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred;
- ]4 W. [; A LDRAWTEXTREL(30,350,''20日''), colorddffff; $ i, M) a5 ^6 X- l! i( d1 _8 t
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
3 ?+ m: O: c3 s# lDRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
7 r9 N5 w+ H' Y P& B$ SDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
% a8 H- T8 d8 Y7 EDRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
% X. d' M" w8 g1 \, n5 sDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; # h0 v3 |7 y8 ?1 V5 V! j
DRAWTEXTREL(5,800,''3''),COLORRED; : o+ Q1 ]& ^5 R2 K
DRAWTEXTREL(3,900,''日''),COLORRED;
( E" J v' I. B' O8 sDRAWTEXTREL(135,800,''5''),COLORRED;
) c2 \; z! {, g; C1 HDRAWTEXTREL(130,900,''日''),COLORRED; 4 V( m1 W* M3 v/ @! Y) z$ e; P ` `
DRAWTEXTREL(260,800,''10''),COLORRED;
" r' @ u& m( wDRAWTEXTREL(260,900,''日''),COLORRED; & n/ f3 E8 P. R# h4 ~$ {8 V
DRAWTEXTREL(390,800,''20''),COLORRED; - [" p" l2 m# S- s. W- z
DRAWTEXTREL(390,900,''日''),COLORRED;
/ i/ U7 q& f. B3 ?. c一日资金流入:=amount*BIGORDER(1,2)/10000;
9 t. I# o5 n4 y O+ k一日资金流出:=amount*BIGORDER(2,2)/10000;
7 {! Z6 K: _/ ?9 F. I资金流:=一日资金流入-一日资金流出; . X2 g( r; h8 k. q
收支【万元】:资金流,color3d,coloryellow; / H" `4 M9 s7 c6 b. x7 S
IF 资金流流出,RGB(255,0,0)),COLOR000000;
& p7 A5 X2 A( U9 V# \ k/ dFILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54
