|
小单买:=1-BIGORDER(1,1)*V/CAPITAL; 1 \% K0 t* I5 X. V; f" i
小单卖:=1-BIGORDER(2,1)*V/CAPITAL; 1 o0 d; Y; M& o5 b6 d* h0 n
散户净买:=(小单买-小单卖)*100;
; u" e9 L, Q; @6 O8 _散户:sum(散户净买,1),linethick0,COLORGREEN; # r1 t* C! Z4 A
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL; 4 U) t- e J1 {0 r
中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
& Z: M& J7 h7 I- K- E中户净买:=(中户买-中户卖)*100; # m3 l4 @" d& i. W2 r6 x3 g; l7 Y
中户:sum(中户净买,1),linethick0,colorf00ff0;
( m) Q% Y6 {2 v! U! ?7 G大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
3 g/ m) I* u# O, U& G5 B! _大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL;
, h8 h& Z2 O" v) S; D- o大户净买:=(大户买-大户卖)*100;
7 ?# P9 R5 ~) T5 @) U* ~5 ^$ V大户:sum(大户净买,1),linethick0,colorf0f000; 8 T6 @" E3 ~8 n5 {! k
机构买:=BIGORDER(1,3)*V/CAPITAL;
6 K- q3 F: r' n2 M机构卖:=BIGORDER(2,3)*V/CAPITAL; ) {" K" ?- }8 E0 ~5 b: L
机构净买:=(机构买-机构卖)*100;
8 k. B0 z& n" o4 z超大:sum(机构净买,1),linethick0,color3399FF;
' H, }/ I9 H# P" b) W大单买:=BIGORDER(1,2)*V/CAPITAL; , l& V. h2 b, f/ k/ r% B# }* I/ T/ ^" b
大单卖:=BIGORDER(2,2)*V/CAPITAL; - H* x6 q' q" |6 f( V1 r2 f
主力 大单买-大单卖)*100,linethick0,COLORRED; ' V }$ I W- i0 P0 ?( n. X, q
散户增减:=散户-ref(散户,3);
& x+ {' }8 f$ U/ s: e中户增减:=中户-ref(中户,5);
$ ^$ E& w7 C/ f4 R3 M5 {大户增减:=大户-ref(大户,3);
; B' f* a6 D' j7 S超大增减:=超大-ref(超大,10);
8 Z7 H% S2 J0 w1 Q3 j6 W/ y, a主力增减:=主力-ref(主力,5); ' _7 c+ a0 B# K
S3:=ref(散户,3);
1 b; T2 P: [8 x) Q0 VZ3:=ref(中户,3);
2 F! J' l/ v3 K2 ]: C4 y! O0 sD3:=ref(大户,3);
+ i0 f4 b* J7 M: J. pF3:=ref(超大,3);
6 o/ K6 U+ r: b; cJ3:=ref(主力,3);
' A; r, F# i" t' S4 a pS5:=ref(散户,5); 3 J* ], V3 h, A9 E, |- k
Z5:=ref(中户,5);
+ \6 ]' {2 C# L' l5 qD5:=ref(大户,5);
% U0 n |+ J" p4 fF5:=ref(超大,5);
" }! s1 I2 h1 y* V, dJ5:=ref(主力,5);
5 F$ {4 O) {% z2 I$ J( iS10:=ref(散户,10);
# `+ f, W/ z4 K, r! Q- o; tZ10:=ref(中户,10);
: I8 _$ u) i+ {$ L7 ^- S, BD10:=ref(大户,10); 1 ?% i2 t4 _. b$ P0 M
F10:=ref(超大,10);
3 w" j# k% h* l( J* v+ JJ10:=ref(主力,10);
2 X; w) l. \. |S20:=ref(散户,20); 0 ?6 J, w: B2 @+ o1 V: @1 E6 [) A. U
Z20:=ref(中户,20); / x8 R# ?, t$ V; Z* m
D20:=ref(大户,20); 8 {4 s# z1 W; t& C& Z
F20:=ref(超大,20); # H" D* p" ^+ S; @% X
J20:=ref(主力,20);
, B0 |) z% ^, \/ v- vBL3:=400/MAX(S3,Z3,D3,F3,J3); 3 c9 g# Q+ I- ]. Q
BL5:=400/MAX(S5,Z5,D5,F5,J5); 8 n# q( F) {; Y, a! K3 b% U+ y8 {
BL10:=400/MAX(S10,Z10,D10,F10,J10); ' J7 K& F) K- V
BL20:=400/MAX(S20,Z20,D20,F20,J20);
# c) y6 g( U V; l' T b) _S3B:=999-S3*BL3; V) a8 t- K. x7 o2 G9 E+ d- k& b9 f; R
Z3B:=999-Z3*BL3; % f# N! g! Z" e. X6 m
D3B:=999-D3*BL3;
- q/ }/ i! q- b. UF3B:=999-F3*BL3; ; \% F9 o+ u& h: @" o1 b: p
J3B:=999-J3*BL3; * e" s# J+ A1 q2 d$ Z; i
S5B:=999-S5*BL5;
7 m' D3 r7 S' o: m( S# ~$ SZ5B:=999-Z5*BL5;
4 _+ V% [+ q$ M! mD5B:=999-D5*BL5;
2 Z, k8 w3 G. g$ W& W i4 AF5B:=999-F5*BL5; O! P; x% [5 o
J5B:=999-J5*BL5; 9 Z( F' D" _3 \
S10B:=999-S10*BL10;
3 I7 x. b4 i) j! s1 J5 S& NZ10B:=999-Z10*BL10; " R! `, \7 ]' q- r
D10B:=999-D10*BL10; - G" u- K0 r [8 a# A, P/ W. C" y* A
F10B:=999-F10*BL10;
3 }. o" c. K4 }9 ]$ U( H1 M4 KJ10B:=999-J10*BL10;
$ u r9 }' `9 V3 b5 G* M, LS20B:=999-S20*BL20;
6 M8 _ k. o8 \Z20B:=999-Z20*BL20; , h& B) h+ f1 F+ ]! S
D20B:=999-D20*BL20; 8 A: e3 P p: M, h# [% x8 r% ?
F20B:=999-F20*BL20;
9 @9 y- w7 |0 E2 S9 o+ P& hJ20B:=999-J20*BL20;
" ?- ?1 q2 s$ g2 A. n{画直方图} 4 a2 H) M [0 H8 s: \
DRAWRECTREL(10,S3B,40,999,RGB(0,255,0));
4 ^& l K! ^# ZDRAWRECTREL(30,Z3B,60,999,RGB(180,0,100)); * V$ y2 r0 Y$ I6 h+ ?$ h& _- `$ J
DRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
8 A6 `$ U, P3 x7 _DRAWRECTREL(70,F3B,100,999,RGB(180,100,0)); 2 B" p8 v: S( h4 G0 \' h" _+ s
DRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
6 Q1 ^/ o( t' Q/ O: _DRAWRECTREL(140,S5B,170,999,RGB(0,255,0));
7 ~. u- m$ e) _DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
* r% Z3 J* p- p$ ^DRAWRECTREL(175,D5B,210,999,RGB(0,0,255));
/ M Q) O- _9 D8 _5 [+ dDRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
1 E3 R8 a6 B. t' o% {* u0 ZDRAWRECTREL(220,J5B,250,999,RGB(255,0,0));
/ H U' v! L0 h+ z! y/ q! X0 pDRAWRECTREL(270,S10B,300,999,RGB(0,255,0)); : n0 a) i# l! O' ]1 z5 P
DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100)); - z1 {' H: N) H3 z' e# Y+ _
DRAWRECTREL(310,D10B,340,999,RGB(0,0,255));
9 o W* C' W/ I- QDRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); # W( p8 d9 m4 L2 t7 ?, D! O
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0)); x& a$ Z8 w5 B& e: C3 R
DRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); 4 ^, [6 `% d0 q% s3 |# P, I$ W
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
5 k; h' w8 U/ f8 {3 d( fDRAWRECTREL(440,D20B,470,999,RGB(0,0,255));
! h7 ^# i# ?' n9 U6 ~ F+ EDRAWRECTREL(460,F20B,490,999,RGB(180,100,0));
2 J y, K9 V a) P GDRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
9 ?3 J2 c1 T* m1 o4 w; @3 RDRAWTEXTREL(80,5,''散户''),color00ff00; 8 k( f+ B1 Z2 N1 V
DRAWTEXTREL(160,5,''中户''),colorf00ff0;
' } g4 O* u$ wDRAWTEXTREL(240,5,''大户''),colorffaa66; 9 Z, A' b2 {2 O, z' c2 U# L
DRAWTEXTREL(320,5,''超大''),color0099ff;
6 c4 T# N! ]' R* I& s# lDRAWTEXTREL(400,5,''主力''),colorred; & F& A8 D& Q4 n n) f% C
DRAWTEXTREL(30,70,''本日''),colorddffff; , n8 ]) I& {' G- b
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; ; h% K% H5 ?; }4 e9 C
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0;
a" [4 D+ O6 K4 R$ v \' |9 T+ {DRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66;
+ Y0 Q* z0 D; H* g* g" \9 lDRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
8 _' n# e) v: ?1 D* kDRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred;
9 r9 a' B1 c7 J) T! y' [DRAWTEXTREL(30,140,''3日''), colorddffff; $ \: K# }5 _ q: J& t2 ^- V
DRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; . P' i7 p% J5 \
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; 7 p, z& c# S& X% i/ F
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66; 2 Y6 D$ F9 R( x8 _- f
DRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff; 2 U4 u, m3 _" z2 o6 M
DRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred;
/ U) N& U4 s- g1 P& U' `8 X E' ~DRAWTEXTREL(30,210,''5日''), colorddffff;
4 L. ?# _/ |) VDRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
) \3 y9 e* E! V9 D. f8 k8 TDRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
2 P" j4 W8 L% cDRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66;
8 x; j7 q. f6 [+ n6 Y# WDRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff; & u$ o8 G6 c, e* {% E
DRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
* X4 i0 ]# _% Z+ l" Z j, f2 EDRAWTEXTREL(30,280,''10日''), colorddffff; 0 h8 |3 {1 R' n4 k& d# D9 ?
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00;
( e) ?; g/ R2 ^& hDRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0;
' d- |- k. R) m" [( UDRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
) E L$ F/ L Y* cDRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
, d8 `( w' L" W% @DRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; * o5 ?, ^1 S) n0 p3 K
DRAWTEXTREL(30,350,''20日''), colorddffff; / X n9 u1 e" h, ?3 u) |
DRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00; 0 d# h* @7 B% n' }- x- M
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
8 ^3 N2 o4 j* H6 `# IDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
( O H5 z) R- t9 V) O6 _DRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff;
$ h; T" ?0 r3 b7 H3 U) wDRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred;
" T- z# R' \4 ?' A4 |DRAWTEXTREL(5,800,''3''),COLORRED;
4 ^# l. G+ b: @$ u2 UDRAWTEXTREL(3,900,''日''),COLORRED; 5 Z. k1 D2 c% O7 n5 {
DRAWTEXTREL(135,800,''5''),COLORRED; 9 z$ b5 v; K! b# B) L4 X# W
DRAWTEXTREL(130,900,''日''),COLORRED; # ~6 q" `& r. R6 H, n
DRAWTEXTREL(260,800,''10''),COLORRED; ! ^3 h/ q* o, m/ E
DRAWTEXTREL(260,900,''日''),COLORRED;
" W1 T6 Y) C2 @8 MDRAWTEXTREL(390,800,''20''),COLORRED; z1 g; q: n- ]& x/ K" I' `- i
DRAWTEXTREL(390,900,''日''),COLORRED;
% \3 T" f* n% ^( E- L+ p- K4 }一日资金流入:=amount*BIGORDER(1,2)/10000;
. J' z! D0 I# F9 u% U一日资金流出:=amount*BIGORDER(2,2)/10000;
6 g7 }7 J7 W$ x4 {" V. j资金流:=一日资金流入-一日资金流出;
9 I2 ~: q8 o. m- h& W1 M* J收支【万元】:资金流,color3d,coloryellow; ! O" |8 q/ ^8 @
IF 资金流流出,RGB(255,0,0)),COLOR000000;
, T8 q: q6 d; I8 H: D3 qFILLRGN(流出, |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:08:54