|
小单买:=1-BIGORDER(1,1)*V/CAPITAL; * i1 @% o8 k, T1 s
小单卖:=1-BIGORDER(2,1)*V/CAPITAL;
4 y* k, n; v, W. I$ x. i* T散户净买:=(小单买-小单卖)*100; ( z; i0 f5 T) p
散户:sum(散户净买,1),linethick0,COLORGREEN;
1 w3 B2 m# k2 b$ D: K6 c中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL; ( c6 V0 U; C4 M7 M8 u# `
中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
" [; o- [' q+ ~/ f, q {/ {+ i3 B( [$ g中户净买:=(中户买-中户卖)*100;
% B0 z" [$ i2 Z9 g+ M- W中户:sum(中户净买,1),linethick0,colorf00ff0;
- G s( U1 V( E/ j7 `* T1 i- e2 d大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
7 Y) y2 n4 F V0 C% a大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL;
- h/ i: F0 B0 [: B& |% @大户净买:=(大户买-大户卖)*100;
, w# U8 O4 r5 D0 O( E0 e大户:sum(大户净买,1),linethick0,colorf0f000;
2 ~4 y1 W ~" l3 J: Z1 u机构买:=BIGORDER(1,3)*V/CAPITAL; $ x9 U& X; m7 O
机构卖:=BIGORDER(2,3)*V/CAPITAL;
, t( v# B8 \8 q& y* [机构净买:=(机构买-机构卖)*100;
2 A* w) I. V2 ~- s超大:sum(机构净买,1),linethick0,color3399FF;
4 ~ j% [ O' {& F% m* b0 A3 y大单买:=BIGORDER(1,2)*V/CAPITAL; 3 Y7 i, R& @: z
大单卖:=BIGORDER(2,2)*V/CAPITAL;
1 d7 P, [2 P1 u9 {$ @& Z主力 大单买-大单卖)*100,linethick0,COLORRED; 6 ^' ^) V- x& x
散户增减:=散户-ref(散户,3); ! A- s; ^1 l: m; F
中户增减:=中户-ref(中户,5);
) K6 Y7 ]( I& g& A& D/ R大户增减:=大户-ref(大户,3);
: y/ n- c. L- d" l$ \" _ m超大增减:=超大-ref(超大,10); # }! S6 y% ]& @) h/ g
主力增减:=主力-ref(主力,5);
+ A$ k4 l* M, Z/ ^9 u, h- PS3:=ref(散户,3);
8 q k# g( Z- ^( g- n: cZ3:=ref(中户,3); ' R6 C5 ?* M9 o& Y8 Q& }
D3:=ref(大户,3);
) U. ?* p' l( B1 B! T' v( k! WF3:=ref(超大,3);
7 w% p4 u0 v9 u) R) t, g6 gJ3:=ref(主力,3);
! Y1 z( k) h! A2 wS5:=ref(散户,5);
4 ?3 _4 ?$ T+ H% x' U5 KZ5:=ref(中户,5); ) W+ `4 ~9 I; k- F$ |
D5:=ref(大户,5);
; O \4 i W! A" h! H/ xF5:=ref(超大,5);
% s* G$ e ^3 _- K2 a$ bJ5:=ref(主力,5); 9 p7 \% F0 ]5 }6 U/ n. L
S10:=ref(散户,10); / [. m3 r) B4 U2 r$ b4 z" |# w
Z10:=ref(中户,10); + R G% b4 \8 F" K
D10:=ref(大户,10);
) B. ]. U3 k; @( Z: ]1 ^F10:=ref(超大,10); 8 y/ j' G/ ^4 B2 U( A4 c, R- }
J10:=ref(主力,10);
' R% T8 N' ]9 K7 ~S20:=ref(散户,20);
% e" Z9 x5 v% n+ E9 fZ20:=ref(中户,20);
6 ]/ P# ]) t# d+ eD20:=ref(大户,20);
1 O$ W0 h# `2 |& P$ X1 U2 ]F20:=ref(超大,20); ) U) P$ w9 h% `) y
J20:=ref(主力,20);
+ A! X, R6 _0 gBL3:=400/MAX(S3,Z3,D3,F3,J3);
* s: h' }5 |) `! n. n# EBL5:=400/MAX(S5,Z5,D5,F5,J5); 5 |9 `! f- w0 ^! t" i
BL10:=400/MAX(S10,Z10,D10,F10,J10); 3 i R% j8 o; h
BL20:=400/MAX(S20,Z20,D20,F20,J20); , _" z- q/ l2 V1 A
S3B:=999-S3*BL3;
& g/ ~- }2 I0 r3 iZ3B:=999-Z3*BL3;
. M9 M8 j2 g- {/ SD3B:=999-D3*BL3;
3 Y0 X+ a& m% IF3B:=999-F3*BL3; - c6 F3 ]! q% c4 M
J3B:=999-J3*BL3;
" M& Y) c. W( b1 rS5B:=999-S5*BL5;
2 i7 v8 E5 C/ {5 T7 XZ5B:=999-Z5*BL5;
0 h9 B( S7 h- ]' F# S7 MD5B:=999-D5*BL5;
[9 z8 g b# x. n# j B- ?5 T: aF5B:=999-F5*BL5; * A/ e6 P( i, y9 M9 V, j
J5B:=999-J5*BL5;
5 B/ n- g$ ]( V4 ZS10B:=999-S10*BL10; 1 x$ U! Y# w# l. g9 c' r
Z10B:=999-Z10*BL10; 4 g0 p3 [; _$ Z" Y
D10B:=999-D10*BL10; 4 ]- D6 k3 q: u+ q. I6 Y) A2 q
F10B:=999-F10*BL10;
8 A7 `( w8 `$ G7 OJ10B:=999-J10*BL10;
5 I4 c& Q( F! b. pS20B:=999-S20*BL20;
c& b) G+ ^% OZ20B:=999-Z20*BL20; + E1 C* M+ B; P
D20B:=999-D20*BL20;
# q& ]% O3 Z" t! ~6 T7 Y' k* ^F20B:=999-F20*BL20;
( F/ n. g# s: K3 R4 ]J20B:=999-J20*BL20;
" |2 J2 O1 j1 R0 q- x- d{画直方图} 0 `$ S" G- A; h6 C8 m) m/ o( ^5 |
DRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); ) q# _) a1 U, O+ k$ ~" M
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100));
- }. K; Y0 t# T' Z2 P) R% [6 ?DRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
% d+ u n, B0 v' F$ J" Z9 zDRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
& z3 \7 L+ _. K! Y3 h9 DDRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
6 }: S- |' X, N, [DRAWRECTREL(140,S5B,170,999,RGB(0,255,0)); ( e/ P! Y2 T5 ?5 ?
DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
+ Q$ a' N, x& j) L5 `# r- _ J, [DRAWRECTREL(175,D5B,210,999,RGB(0,0,255)); 3 C+ g) G% G: g, Q1 R: P0 ^
DRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
" f+ X% Q9 U! M, U6 ?# a+ u* M: [DRAWRECTREL(220,J5B,250,999,RGB(255,0,0)); 0 f$ E9 C) i6 w* S& l: Q7 ^
DRAWRECTREL(270,S10B,300,999,RGB(0,255,0));
- n0 X8 h7 e' Q, N# i" P0 K# [& Z5 X/ {DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100));
9 S* S+ z* t$ v2 J6 S' {& jDRAWRECTREL(310,D10B,340,999,RGB(0,0,255)); , M2 S8 E& [+ P9 ]
DRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); / q* _8 X) X6 V8 g$ E& Y8 I
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
! i" e" y4 D( [& x, UDRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); . W1 c Q, X" _2 |
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
]3 f5 B; F, M3 ]DRAWRECTREL(440,D20B,470,999,RGB(0,0,255));
$ W! l/ j+ j- S! L# ~! A. {DRAWRECTREL(460,F20B,490,999,RGB(180,100,0));
8 o; z( M+ `% D% H+ c+ |DRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
. [- ?# E# X' RDRAWTEXTREL(80,5,''散户''),color00ff00; $ R, o- y9 i+ T3 ]1 M. b; x" \
DRAWTEXTREL(160,5,''中户''),colorf00ff0; - ~0 d5 g: I+ D ]
DRAWTEXTREL(240,5,''大户''),colorffaa66; 8 o+ q2 O+ X1 q o0 x2 ?6 O
DRAWTEXTREL(320,5,''超大''),color0099ff;
1 N: Q: U+ T3 lDRAWTEXTREL(400,5,''主力''),colorred; ! j6 v9 e6 l' s: g
DRAWTEXTREL(30,70,''本日''),colorddffff;
/ V, c$ m3 f! b h0 o8 sDRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00;
O3 Q( \" @, @9 p+ ]1 s DDRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; : s5 s" k( h+ w( Y* R3 o( O
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; + y8 w( W7 j p# c
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff; 9 u( S/ P/ n! H; _7 S0 u9 d+ [
DRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; 7 @, K) ~0 I! ^# S/ X
DRAWTEXTREL(30,140,''3日''), colorddffff;
8 h( D0 C4 P/ n% }DRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; - G9 I# K% g9 p- Z6 W; ^" X4 W
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0;
/ \0 [& {3 S' B6 s. h/ |( \( HDRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66; # O; t2 v$ P. }$ k+ G! E
DRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; " { Z$ ]0 g* F: Y6 f
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred;
?8 ?' N5 J' l7 }1 F- [DRAWTEXTREL(30,210,''5日''), colorddffff; 8 ]1 n6 ?& ^& J7 X4 R* f
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00; ) _6 U) o; B9 i- k
DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
. w# R- ^8 M6 _; U0 j7 n4 b, _0 z8 bDRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; 6 J9 m: T9 x* y# |) ]
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; 1 p+ z8 o- M" k5 A* B! _
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
/ X# d, t2 G3 ?. f6 cDRAWTEXTREL(30,280,''10日''), colorddffff; % b8 l( g5 R) I7 C- G2 {
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
6 b* f) i2 X/ S0 WDRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; , S# {1 D( e" E& q5 s" u
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66; ' w, K/ H" H1 R8 a+ d% A- }
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff; ) Q- T( V0 S) a
DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; . X) S9 x+ J) L1 ^0 C
DRAWTEXTREL(30,350,''20日''), colorddffff;
. E- S+ d, x/ p0 ^/ l+ T9 h$ q7 G, mDRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00;
0 h, }/ d6 j' Y! d0 Q, c* k8 zDRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
\. @8 p5 k: c# C4 l! ^* j9 QDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
) O9 m8 G `! ~9 A$ Z; V0 @6 n8 A2 pDRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff; ' Z& y. Q% j, ~7 l# y) s* y. {3 k
DRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred;
9 R- H/ M; D6 J8 Y' {# w7 WDRAWTEXTREL(5,800,''3''),COLORRED;
4 g! \+ m; t) [' u, E5 T% O3 IDRAWTEXTREL(3,900,''日''),COLORRED; ) w% T5 z$ y3 V+ P' _
DRAWTEXTREL(135,800,''5''),COLORRED;
( ?2 V7 v# b. @2 iDRAWTEXTREL(130,900,''日''),COLORRED;
3 j* U, [; h9 T9 E4 o6 BDRAWTEXTREL(260,800,''10''),COLORRED; ! y% E0 b8 ~. r
DRAWTEXTREL(260,900,''日''),COLORRED;
! c$ J& I, A; q7 l& y- ?DRAWTEXTREL(390,800,''20''),COLORRED;
9 E( R$ u5 b8 O" v% JDRAWTEXTREL(390,900,''日''),COLORRED; 9 q: C, s" L4 E8 f* V- z
一日资金流入:=amount*BIGORDER(1,2)/10000;
* a% t% f+ v8 s一日资金流出:=amount*BIGORDER(2,2)/10000;
8 e9 l% I5 ~# }, ^5 d: D3 ` [资金流:=一日资金流入-一日资金流出; ) e7 q( ~9 T; `& ^; z' d. S
收支【万元】:资金流,color3d,coloryellow;
; Z3 r" V% S/ a) }! R2 v8 I4 Z6 BIF 资金流流出,RGB(255,0,0)),COLOR000000;
: X! M% @; [0 z6 Q. t) s( hFILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54