|
小单买:=1-BIGORDER(1,1)*V/CAPITAL; 5 S% c2 p6 ^5 L9 u6 l9 Y( s$ E$ G
小单卖:=1-BIGORDER(2,1)*V/CAPITAL;
3 D' ]. ^, d: J/ r3 Q/ Y. M散户净买:=(小单买-小单卖)*100; 0 a3 O1 [, j7 U* l1 }+ I
散户:sum(散户净买,1),linethick0,COLORGREEN; 0 v( f' c/ e- X- R, C& W0 h3 e
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL;
2 a1 s& V) r. L* |0 g6 \中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
* M7 _% ?- m) u; {中户净买:=(中户买-中户卖)*100;
1 W9 c$ K& q7 u* A中户:sum(中户净买,1),linethick0,colorf00ff0;
8 a/ o ~0 G1 {大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL; % G; F' W& p, }, [$ A) Y
大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL; ' f L* K' `6 C7 R4 ^+ Z! q' r
大户净买:=(大户买-大户卖)*100;
) U- i- i5 j$ u$ k- M大户:sum(大户净买,1),linethick0,colorf0f000;
+ z5 k6 B2 Z9 v7 M K9 S机构买:=BIGORDER(1,3)*V/CAPITAL; 8 D; S/ h2 s% |
机构卖:=BIGORDER(2,3)*V/CAPITAL;
5 `6 U- s! _) r3 \; `; d& l机构净买:=(机构买-机构卖)*100; " m) }) K6 r; g2 o) Q( c* X: R8 q
超大:sum(机构净买,1),linethick0,color3399FF; ' s- k2 r4 ?0 O) u
大单买:=BIGORDER(1,2)*V/CAPITAL;
$ E+ D. I' Q9 L5 P7 ?大单卖:=BIGORDER(2,2)*V/CAPITAL; 1 c9 k8 t% y" `+ r7 V% y7 \0 x
主力 大单买-大单卖)*100,linethick0,COLORRED;
# g, o0 `& m, O; o散户增减:=散户-ref(散户,3);
, ^8 f6 L' V$ l# M0 ?, O中户增减:=中户-ref(中户,5); ; D7 p( U9 y& ~% q) D
大户增减:=大户-ref(大户,3); ( M1 G) X4 h$ N$ c$ Z
超大增减:=超大-ref(超大,10); . v# b- U* F2 \0 y: i
主力增减:=主力-ref(主力,5);
2 k! m+ o8 I8 V1 fS3:=ref(散户,3);
* q3 u7 W+ e) H' C- Q. u4 fZ3:=ref(中户,3);
9 N4 ]2 f3 h* o+ oD3:=ref(大户,3); - V: W6 x0 \) W' ?/ T
F3:=ref(超大,3);
) Y. e( S; } F* JJ3:=ref(主力,3); 9 d4 k* |3 S' F1 y! D+ F& S
S5:=ref(散户,5); 8 H3 m+ y ?$ Y
Z5:=ref(中户,5);
% F* F* n% p$ ^! R/ H$ P% U; b8 z* |D5:=ref(大户,5);
+ o4 A x5 o" L2 s5 [7 UF5:=ref(超大,5); ( B! m `% K }% F9 W3 T8 D, m; C
J5:=ref(主力,5);
9 \ k8 ^5 J: @* B/ Z% RS10:=ref(散户,10); + |$ q/ H' o3 @' G- {
Z10:=ref(中户,10); 1 |$ W0 j- d6 s7 _1 J1 u3 j
D10:=ref(大户,10); - Y r; c; ]. Y% K: D; V1 `' ^9 J
F10:=ref(超大,10); ' o4 {- S J' C7 z: T
J10:=ref(主力,10); : H7 R; A/ d4 ]4 I
S20:=ref(散户,20); - Q: a, R2 ]2 \5 ?) [* A- m
Z20:=ref(中户,20); ' F3 s2 \ i& _7 k
D20:=ref(大户,20);
5 `0 l5 ?7 _& IF20:=ref(超大,20); 5 K! _8 F, H; m' s v4 @! ]4 P
J20:=ref(主力,20); 3 l! V. j v: H7 c. @4 A5 ?/ d' i' ?
BL3:=400/MAX(S3,Z3,D3,F3,J3); * T* l1 |* E: g6 _, x9 w7 t
BL5:=400/MAX(S5,Z5,D5,F5,J5); ; z0 Y7 i7 }- M3 K
BL10:=400/MAX(S10,Z10,D10,F10,J10); 6 H# S1 m$ W! f: Y
BL20:=400/MAX(S20,Z20,D20,F20,J20); , i$ b6 y8 z# L, ~* n
S3B:=999-S3*BL3; 8 s% g' B8 I, J1 S$ I9 f
Z3B:=999-Z3*BL3;
3 G% u$ y' ]* rD3B:=999-D3*BL3;
/ C+ _8 }, S- @$ G! ?7 r4 fF3B:=999-F3*BL3; ' P1 T, b5 S% b4 D. Q# y O
J3B:=999-J3*BL3; 2 {; |& ~6 X8 @+ o, A
S5B:=999-S5*BL5; 8 L$ i; h, D% Y/ I
Z5B:=999-Z5*BL5; 1 M$ H: r% z+ E& R
D5B:=999-D5*BL5; # P% W- g$ r6 l2 E5 q7 E
F5B:=999-F5*BL5; 3 g5 S6 m# ^2 R S
J5B:=999-J5*BL5; 7 l) z# L: |1 m, }6 f1 K0 q3 V7 k
S10B:=999-S10*BL10; ( F$ F1 O( W/ C
Z10B:=999-Z10*BL10; + P R: {; d9 d; s
D10B:=999-D10*BL10;
5 X6 |' M7 D8 j% v- P! A# H5 GF10B:=999-F10*BL10;
! N: n( ]8 |1 \3 EJ10B:=999-J10*BL10;
% J2 \, G) L% O2 S* x) h, V, iS20B:=999-S20*BL20; # x: {. y9 a% }1 g
Z20B:=999-Z20*BL20; / O1 H% p2 J: s) ?' S. p$ _. O
D20B:=999-D20*BL20;
$ m, f9 e4 G; bF20B:=999-F20*BL20;
, ]1 F A' c! hJ20B:=999-J20*BL20;
# x, G: _$ s2 i: @{画直方图}
A4 i5 u1 Q' E4 Y( o. g3 V6 i0 yDRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); + [4 c0 m# T* F+ A9 V: M7 J9 P
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
8 R+ q. M5 J2 o" t4 PDRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
3 B0 N' |4 ? P3 BDRAWRECTREL(70,F3B,100,999,RGB(180,100,0)); - v. @6 T4 x3 C3 j- M% J2 v
DRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
* M( d5 I' {' U. f1 ^, f# fDRAWRECTREL(140,S5B,170,999,RGB(0,255,0)); 3 {( A. S8 j# Y! e- x+ H Y
DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
/ N" M# N4 P$ z V+ J( CDRAWRECTREL(175,D5B,210,999,RGB(0,0,255)); ) x: e* @. I0 n* i6 ~) ~! V
DRAWRECTREL(200,F5B,230,999,RGB(180,100,0)); $ N% ?; b N- m
DRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
* S2 J) S' c8 L) UDRAWRECTREL(270,S10B,300,999,RGB(0,255,0));
' i3 `2 Q5 |. ^) ~DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100)); _0 W# N: M2 e% ^# r
DRAWRECTREL(310,D10B,340,999,RGB(0,0,255));
, `+ i, i4 X: j6 T i& gDRAWRECTREL(330,F10B,360,999,RGB(180,100,0));
1 [6 X2 x8 P( `, y3 T, z# jDRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
* p* @/ {. Y( d+ g7 `' ODRAWRECTREL(400,S20B,430,999,RGB(0,255,0));
6 J2 \, Q0 {, {' q2 D3 X% rDRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
& x: F$ Q+ d7 b! j; V* bDRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); - X/ e9 Z: x! M4 F# ^2 }
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0)); ) E3 _* i) ~) c
DRAWRECTREL(480,J20B,510,999,RGB(255,0,0)); 7 b, m& @; j8 t& S
DRAWTEXTREL(80,5,''散户''),color00ff00; 6 G0 ?; j' ^: w; X
DRAWTEXTREL(160,5,''中户''),colorf00ff0; 4 a# Y- r9 V( w3 V1 Y) I; o
DRAWTEXTREL(240,5,''大户''),colorffaa66; 7 s" q0 y, ]0 J
DRAWTEXTREL(320,5,''超大''),color0099ff; ( s% H! R4 H; A5 j7 J
DRAWTEXTREL(400,5,''主力''),colorred; & D% t, [# i. a; V, h
DRAWTEXTREL(30,70,''本日''),colorddffff;
0 ^/ E p4 R* z$ T" `4 JDRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00;
" L4 v4 H5 j6 F% mDRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; # @- J: F. g% C t5 |7 V
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66;
2 U! q2 _5 G3 [, G) }& XDRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
* ~# m; X+ C( q+ ADRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; / C: r+ [' t/ I7 Z. i1 ^4 v: Y
DRAWTEXTREL(30,140,''3日''), colorddffff;
* E/ Q! c {% ^# A7 ^) Z$ q0 O- mDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; R; W' _! N7 p( b
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0;
0 H$ k2 W2 ^* W3 @. MDRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66; / T/ D) z/ a a# ^, [
DRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; I- C" n' K7 R- _8 Y
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; : L2 I) ^' d: t. e# ~- v, i
DRAWTEXTREL(30,210,''5日''), colorddffff; 3 s: Q' a1 T# v* h
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
6 r7 p0 `( ^( R3 N' IDRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
! k# o/ F4 Q- @, [DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; % w/ n, {7 R/ [" }3 Z
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff;
9 i' \$ d6 E( |% \* b) w) cDRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
* L S9 D! k0 N' X* U* G$ ^% ?% yDRAWTEXTREL(30,280,''10日''), colorddffff; ' _% t5 h6 n( h
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00; T a8 m% p9 P+ o5 ]' {' `" `$ [
DRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0;
4 m4 j& M( e1 g0 g& d2 h; J- p* o! \DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
) l3 O# Z: w9 b' s$ ]- Q! p% y6 BDRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
% }4 x1 N! g4 K0 SDRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; ; l) r2 }1 k* d8 d% P: Y- |. R
DRAWTEXTREL(30,350,''20日''), colorddffff;
) E/ E9 n% j. n9 C( v+ h( l5 ?( V6 XDRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00; * W: G/ _6 h/ |6 x
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
+ S/ Q8 }( x; dDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66; ( p1 h2 u; h3 ]+ {5 C
DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
# w7 F0 W3 J% U) _; g; I( R* MDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; , E3 @# n0 V( t
DRAWTEXTREL(5,800,''3''),COLORRED;
, v3 m0 o8 E) bDRAWTEXTREL(3,900,''日''),COLORRED; $ ?3 h0 b9 E$ G" c; _! m A* X
DRAWTEXTREL(135,800,''5''),COLORRED;
/ L1 v r6 h# W/ m! lDRAWTEXTREL(130,900,''日''),COLORRED; ' L" ?( X0 ]# e0 r6 @* k
DRAWTEXTREL(260,800,''10''),COLORRED; ' H" @; h c- Q" r5 Q3 S& J( |
DRAWTEXTREL(260,900,''日''),COLORRED;
$ r, z7 V2 P B; r% |4 vDRAWTEXTREL(390,800,''20''),COLORRED; ' t0 X( O$ M+ H1 e9 J- k4 l! E
DRAWTEXTREL(390,900,''日''),COLORRED; 6 k1 J3 j% G! S( e
一日资金流入:=amount*BIGORDER(1,2)/10000; , ^' b$ h, r5 ^( i0 @* e$ O
一日资金流出:=amount*BIGORDER(2,2)/10000;
% v$ R5 F) ]0 P; [' c$ ]资金流:=一日资金流入-一日资金流出; * C1 x2 k: t! X# ^3 r
收支【万元】:资金流,color3d,coloryellow;
9 k& J6 u& F9 |; W' w6 RIF 资金流流出,RGB(255,0,0)),COLOR000000; 7 X% y3 S7 L- _' M) n3 \; H, d
FILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54