|
小单买:=1-BIGORDER(1,1)*V/CAPITAL; 7 R5 A1 L/ t" W
小单卖:=1-BIGORDER(2,1)*V/CAPITAL; * G8 A, a6 [& |4 K! D
散户净买:=(小单买-小单卖)*100; ; e8 L% s. r7 T
散户:sum(散户净买,1),linethick0,COLORGREEN;
! A! e8 }* J B( y! A% S1 [! i2 m中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL; 9 y: `7 B9 j, w, k# u$ a; E
中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL; ! O0 H# V# G4 A2 S0 H7 a& N
中户净买:=(中户买-中户卖)*100; $ I' `( L2 W* @+ B* a8 b% z: v% z
中户:sum(中户净买,1),linethick0,colorf00ff0; : \& Y! ]2 k( I" c0 R& }* ~0 |
大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
% i3 F7 \0 R7 C! L! l( G4 U大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL;
- s1 j; B; d1 a+ D大户净买:=(大户买-大户卖)*100;
( R0 a1 E; n9 B+ L3 X) |; B; y大户:sum(大户净买,1),linethick0,colorf0f000;
* z, F- Z8 } d2 @1 e机构买:=BIGORDER(1,3)*V/CAPITAL;
7 x& K8 y" j9 x1 {* Y% V; A; f, b机构卖:=BIGORDER(2,3)*V/CAPITAL;
) O+ C4 W' @1 h. S6 G6 _. v* w9 e" u$ h机构净买:=(机构买-机构卖)*100;
3 u/ s; D: ~5 T5 P( z' s超大:sum(机构净买,1),linethick0,color3399FF; % p& [- Y/ R" O) z# r
大单买:=BIGORDER(1,2)*V/CAPITAL;
% Z: K1 q0 @" d" d8 Z9 Q7 f7 g大单卖:=BIGORDER(2,2)*V/CAPITAL; ( t' {5 ~. Q `9 c: R9 Z5 ]
主力 大单买-大单卖)*100,linethick0,COLORRED;
, |, v9 r: Y1 s% G7 f1 {散户增减:=散户-ref(散户,3); % g# q6 |' }% w! F/ K- N1 z6 k+ J. @
中户增减:=中户-ref(中户,5);
( R& w- t: x0 ?) U# Q! A/ R D4 _+ O6 U9 j大户增减:=大户-ref(大户,3); / w/ |1 H) N- r% u( a
超大增减:=超大-ref(超大,10); 2 `# R8 w- J6 e! b" [9 J) E
主力增减:=主力-ref(主力,5); # g8 [3 o4 P$ C, S$ s. S5 Z4 E
S3:=ref(散户,3);
& N1 S, a& w- K+ B: oZ3:=ref(中户,3); ) R c7 U: Q/ G
D3:=ref(大户,3); ( s7 ~- i# V2 C# c' F" F# x) i
F3:=ref(超大,3);
7 r, s4 C* t& ?; @, i2 YJ3:=ref(主力,3);
3 a" o% t; e* x+ LS5:=ref(散户,5); 4 d) Y4 n- z7 l! ]1 A, e! A
Z5:=ref(中户,5); ; s. u6 U( G% A+ Q
D5:=ref(大户,5); ' j' X0 F3 }% x8 a. E6 u
F5:=ref(超大,5);
5 ?- d2 G k0 c! F8 x$ V3 SJ5:=ref(主力,5); 5 w# m" w2 D& g# B" c3 C+ U
S10:=ref(散户,10);
6 N, d% D8 V8 N; zZ10:=ref(中户,10); 8 @: ~% c$ I1 j
D10:=ref(大户,10);
. c1 ~7 L6 S ]; eF10:=ref(超大,10);
% o# _7 @. C+ l0 BJ10:=ref(主力,10); ) U$ h1 H/ r: C
S20:=ref(散户,20);
4 \5 Y$ @ B O! S. KZ20:=ref(中户,20); 4 N* B5 Z: u- Y; N' i
D20:=ref(大户,20); & s: Y# I$ k6 @7 N; I
F20:=ref(超大,20);
; t" y, _, A. n- k2 Q% [( _1 S4 GJ20:=ref(主力,20);
! Y& ]6 [2 P' M% DBL3:=400/MAX(S3,Z3,D3,F3,J3);
: U1 i, M5 D* Y% y# d" \BL5:=400/MAX(S5,Z5,D5,F5,J5);
" x2 W; \# ^0 t3 \BL10:=400/MAX(S10,Z10,D10,F10,J10); p8 A+ J4 Q. k& _+ m
BL20:=400/MAX(S20,Z20,D20,F20,J20);
- }! }4 V8 C. H) P' Y ]1 kS3B:=999-S3*BL3;
7 z0 n- {8 I% ~2 d1 P( A( QZ3B:=999-Z3*BL3;
/ |* U- @* e: W, ^2 nD3B:=999-D3*BL3; # k8 g& V! D- r. F
F3B:=999-F3*BL3; & n6 ~6 \$ `6 V
J3B:=999-J3*BL3; ! c, W4 {' P9 i3 ~1 i
S5B:=999-S5*BL5;
. O4 O) Z, Z& zZ5B:=999-Z5*BL5; ' z/ x7 [8 h! `
D5B:=999-D5*BL5; " x" }7 t& w1 M5 H9 e6 Z% {
F5B:=999-F5*BL5;
$ c3 q4 [# G% Y' T$ c; _0 w+ v" NJ5B:=999-J5*BL5; 8 E" X5 U L+ y6 |9 W( |
S10B:=999-S10*BL10; 6 c% |# r. [* \
Z10B:=999-Z10*BL10; o1 [ ]7 ?% B! h& A. n. n8 O
D10B:=999-D10*BL10;
, {( b/ T# B" `& [6 m' q. z. vF10B:=999-F10*BL10; # d* n$ H# ^5 k0 k' G8 Y# q
J10B:=999-J10*BL10;
' H* Z. s& d# wS20B:=999-S20*BL20;
) I7 c [0 d- I4 n* J% I+ f. TZ20B:=999-Z20*BL20; 4 J- n) a& f6 y) ~, Z- Q) N( Q
D20B:=999-D20*BL20;
; {8 }8 E. [0 s8 V5 eF20B:=999-F20*BL20;
) a+ @0 F7 }5 i" DJ20B:=999-J20*BL20; * j) ^ U. d0 S$ T5 k! k
{画直方图}
: i( R0 ^% ]5 X" tDRAWRECTREL(10,S3B,40,999,RGB(0,255,0)); " t+ i+ |% Q3 q" S. u
DRAWRECTREL(30,Z3B,60,999,RGB(180,0,100)); % P6 M5 ^/ h- @1 }: X2 @) J
DRAWRECTREL(50,D3B,80,999,RGB(0,0,255)); 5 N3 }* Q8 s+ z8 @% s% c# k `
DRAWRECTREL(70,F3B,100,999,RGB(180,100,0)); 5 s7 H+ j& ?: A/ m- Q* E$ \
DRAWRECTREL(90,J3B,120,999,RGB(255,0,0)); - K8 f, F, {8 y6 V/ d+ T) t6 R% @
DRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
* Z/ m# ~- L( I gDRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
$ g3 F$ {6 t( z% T4 q3 iDRAWRECTREL(175,D5B,210,999,RGB(0,0,255)); 0 i# l# P/ z* p6 f: g
DRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
' ~! a. a1 o2 q# b, xDRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
: Z: m; I- k( d- d1 |/ c: M5 e' PDRAWRECTREL(270,S10B,300,999,RGB(0,255,0));
6 e0 n! A5 k1 F. |3 K. [# XDRAWRECTREL(290,Z10B,320,999,RGB(180,0,100));
! d. O# S6 G, ~: Q$ k6 C5 G2 t; FDRAWRECTREL(310,D10B,340,999,RGB(0,0,255)); / ?- ]3 d) L* ~
DRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); 6 m. g' q, s @3 Q1 D4 `- {7 D
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0));
# h+ A$ x( j- F- SDRAWRECTREL(400,S20B,430,999,RGB(0,255,0));
8 `) e4 w: c* H' H* X" u0 \DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
" l6 t( b# Q9 L# iDRAWRECTREL(440,D20B,470,999,RGB(0,0,255)); h1 \; S0 U5 Z9 j7 j
DRAWRECTREL(460,F20B,490,999,RGB(180,100,0)); / e+ ]; ~& p# R8 o- X8 z, ]; A! s
DRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
$ A/ ?$ x* A- Q, o) tDRAWTEXTREL(80,5,''散户''),color00ff00; 8 w6 f3 \. E, z& L0 r
DRAWTEXTREL(160,5,''中户''),colorf00ff0; 4 m S, Y2 } g3 x7 j2 l
DRAWTEXTREL(240,5,''大户''),colorffaa66; ( Z& b8 W7 `6 X* s/ h2 ~( b4 b( T
DRAWTEXTREL(320,5,''超大''),color0099ff;
8 P- r+ U+ R' l& k( MDRAWTEXTREL(400,5,''主力''),colorred; 1 D+ F0 J0 q7 X$ f, y( ?
DRAWTEXTREL(30,70,''本日''),colorddffff;
! F- { v2 N/ N" x$ g& K$ U# q# B" VDRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00;
, I6 B3 i5 g) [6 NDRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0; + m" G# a& G( s7 Z0 l
DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66; * O, u( ^- T4 g: `
DRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff; 4 M3 @. d( O& x* S
DRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred;
& `1 h9 Q9 @$ N, CDRAWTEXTREL(30,140,''3日''), colorddffff;
0 P$ p+ w4 | u; O% ^+ b: GDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00;
4 w% ?9 U0 A P2 ]) R/ Q( s }DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; 6 ?5 R" N: L+ A; v- {
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66; & G; w d4 G0 E" u
DRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff;
9 y, A* a ?# x* GDRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred;
2 h6 H/ ?' p% y- N3 o8 U9 j/ rDRAWTEXTREL(30,210,''5日''), colorddffff; 0 a; m" ]- K/ a2 t# ?$ Z# B0 u
DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
" H7 R9 b' P6 v VDRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0; + M7 o* i+ Z# T# e+ M3 F
DRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66; 4 R. E5 r1 G9 M1 ?* y
DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; " b- _ e3 [9 |* ~8 S* X7 I2 E! F4 p
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
1 V3 y4 w1 `5 {* Z$ P. g0 P" g) lDRAWTEXTREL(30,280,''10日''), colorddffff; 1 D, O6 \3 [* h
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
* E- }, ?* j- v& ODRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; 9 @; L8 o' y7 V1 D, r0 Q3 a
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66; 6 k: e+ h0 J1 H: @! O7 |
DRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff; 9 S) U2 ?4 A1 J9 ?( P! X3 X2 p8 r; g
DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; 5 A/ z! Z. i2 y; r; H, D1 M) a
DRAWTEXTREL(30,350,''20日''), colorddffff; + X) Y' H0 l4 r8 M: Y
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00; ) S _( ^/ X' `* K0 ]: h, z
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
6 ?6 K& w6 g* WDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
. _' Q: k% L$ k9 n( ZDRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff; - _/ y$ d! W$ @8 T- a! D
DRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; 3 b' q/ z" ^) Y/ \8 F
DRAWTEXTREL(5,800,''3''),COLORRED; 1 G4 B* z5 T' |% t
DRAWTEXTREL(3,900,''日''),COLORRED; . g4 G5 y: f {- `
DRAWTEXTREL(135,800,''5''),COLORRED;
/ c, U* F- f1 i4 x* }DRAWTEXTREL(130,900,''日''),COLORRED;
: q+ V( y1 U2 x' Q: \$ u" NDRAWTEXTREL(260,800,''10''),COLORRED; + ?! h9 T3 C* \" c- p6 R% K
DRAWTEXTREL(260,900,''日''),COLORRED; ( F5 ?2 m$ I) ^& W7 i3 C
DRAWTEXTREL(390,800,''20''),COLORRED; 5 V! z) ?; j+ ~; `
DRAWTEXTREL(390,900,''日''),COLORRED; . S( O4 V! H6 |9 b! b9 T9 F0 z5 { `
一日资金流入:=amount*BIGORDER(1,2)/10000;
0 D5 l5 O0 l/ E" s一日资金流出:=amount*BIGORDER(2,2)/10000;
5 K$ X' e) `% [1 w9 i' L资金流:=一日资金流入-一日资金流出; 8 i0 f$ l0 q& A4 H5 F1 `1 I4 |, L
收支【万元】:资金流,color3d,coloryellow; 9 P9 k! ]1 W( a, i: F& E
IF 资金流流出,RGB(255,0,0)),COLOR000000; ) k& b6 W* \# N4 r, I6 T
FILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54