|
小单买:=1-BIGORDER(1,1)*V/CAPITAL;
- B2 L1 `0 }4 C: I% Q小单卖:=1-BIGORDER(2,1)*V/CAPITAL;
- M5 ~6 M9 S8 B4 w, n, S1 | ~" b散户净买:=(小单买-小单卖)*100;
- j* H8 S: o) x4 C# p: f散户:sum(散户净买,1),linethick0,COLORGREEN; 7 |3 D# {3 b% E# e/ T* y" ~/ i
中户买:=BIGORDER(1,1)*V/CAPITAL-BIGORDER(1,2)*V/CAPITAL; 8 `0 f" [6 [; H
中户卖:=BIGORDER(2,1)*V/CAPITAL-BIGORDER(2,2)*V/CAPITAL;
; y, K) n. z/ G$ Q4 M f( G/ @+ L中户净买:=(中户买-中户卖)*100; / }1 J! M2 H2 W9 V: m5 \
中户:sum(中户净买,1),linethick0,colorf00ff0; 3 u+ m0 n4 [3 I7 }9 V% p/ v
大户买:=BIGORDER(1,2)*V/CAPITAL-BIGORDER(1,3)*V/CAPITAL;
! }7 t" A9 ^4 w3 o4 B; W* }大户卖:=BIGORDER(2,2)*V/CAPITAL-BIGORDER(2,3)*V/CAPITAL;
# w0 W8 k" G: ?: M/ M4 t大户净买:=(大户买-大户卖)*100;
[4 E4 m$ V# P1 a) g% w8 G7 \大户:sum(大户净买,1),linethick0,colorf0f000;
) b# I: M/ W% }9 f机构买:=BIGORDER(1,3)*V/CAPITAL;
1 A/ I3 d6 p; }$ B4 X机构卖:=BIGORDER(2,3)*V/CAPITAL;
/ q w3 ?6 L; \' v# P机构净买:=(机构买-机构卖)*100;
+ d' S& [# k- [6 ^+ I0 |9 G超大:sum(机构净买,1),linethick0,color3399FF;
1 Y" |- X- k: [* y大单买:=BIGORDER(1,2)*V/CAPITAL; " x0 J8 ~! G' |
大单卖:=BIGORDER(2,2)*V/CAPITAL;
5 g- A6 B5 U* m) x, E主力 大单买-大单卖)*100,linethick0,COLORRED; , `$ H/ j( N; }' _: l. r
散户增减:=散户-ref(散户,3);
+ `8 a7 j" d+ N, P7 }9 _4 l0 Q9 X中户增减:=中户-ref(中户,5); + I# Z* M2 g4 Q- Y s' b1 R4 ^: r
大户增减:=大户-ref(大户,3);
) H4 @: A& U2 V! X$ k k8 `. R- V2 ?超大增减:=超大-ref(超大,10); " M, ~ b# k; H6 U2 d$ i
主力增减:=主力-ref(主力,5);
, X" N1 D: F J3 W# w" w) x6 fS3:=ref(散户,3); " T4 E" r1 G: h' Z" a
Z3:=ref(中户,3);
" t) a$ s1 b: Z( V: x+ BD3:=ref(大户,3);
2 | _ y: i6 `, v2 l5 UF3:=ref(超大,3);
1 E) i: S7 h8 W+ p3 MJ3:=ref(主力,3);
# e! y' C2 ?7 z$ C4 ]+ OS5:=ref(散户,5);
0 t8 r7 j& s4 a5 Q: J( o) ?) EZ5:=ref(中户,5); , F! D( \+ [% G
D5:=ref(大户,5); p& I* n1 [$ p. A5 A
F5:=ref(超大,5);
2 r! X( p6 z7 R0 i7 B$ pJ5:=ref(主力,5);
7 \# W' n3 S- Y" }- |' QS10:=ref(散户,10);
: q+ j+ @3 W" ]7 I1 M, }1 x& e/ qZ10:=ref(中户,10); - b/ P: S5 e+ }4 v/ X% M+ x" s
D10:=ref(大户,10);
! }* [8 S: R! w/ WF10:=ref(超大,10);
' z3 W* ?& @1 c" c, |J10:=ref(主力,10); h1 ]& y# C. F3 j
S20:=ref(散户,20); 0 O3 e" I: ^9 r$ Y' w+ W) X7 j. c' a
Z20:=ref(中户,20); ; }2 n8 b! e) F& l/ h9 Z c7 y
D20:=ref(大户,20); * m- m. g( q9 \6 C- T+ U: b3 l, `+ f
F20:=ref(超大,20);
8 {7 L( J" w* R5 qJ20:=ref(主力,20); 5 j' _4 Q2 k- X1 }
BL3:=400/MAX(S3,Z3,D3,F3,J3);
( `3 S- f" R, W7 y# XBL5:=400/MAX(S5,Z5,D5,F5,J5); ( O! f" S- U( O! h
BL10:=400/MAX(S10,Z10,D10,F10,J10); / d# ?7 E) r$ e
BL20:=400/MAX(S20,Z20,D20,F20,J20);
$ o+ E& S6 c8 _0 c: v+ ?S3B:=999-S3*BL3;
0 T9 r( G. @7 E6 N) U! BZ3B:=999-Z3*BL3;
% T9 @! t# U2 p' w; o1 sD3B:=999-D3*BL3;
3 h8 ^+ Q6 w2 U' V# `F3B:=999-F3*BL3;
, `. O+ J4 Q, J+ jJ3B:=999-J3*BL3;
3 l8 v) Y2 Q7 E, LS5B:=999-S5*BL5; + `+ \ n, m3 Z& \( F5 q
Z5B:=999-Z5*BL5; 6 ^; D c4 W+ T* K4 K! e
D5B:=999-D5*BL5;
" {. ]) `/ L3 f8 P. E( V1 j% `F5B:=999-F5*BL5; 2 {3 Q0 p) |# J# y) g
J5B:=999-J5*BL5;
% K: T: z# H; pS10B:=999-S10*BL10;
7 v$ s1 P+ x7 PZ10B:=999-Z10*BL10; 7 \" A: M$ A) D$ ~
D10B:=999-D10*BL10;
& X6 b6 n: [ n3 w, ]+ j+ oF10B:=999-F10*BL10; ; \6 `+ b6 J$ S2 L* D: E! _
J10B:=999-J10*BL10; f' s7 {) x1 ]) L, v) U
S20B:=999-S20*BL20;
% o/ r0 v7 E) F8 ~4 P. @. V$ u6 kZ20B:=999-Z20*BL20; " e8 | t' M G: S% I3 T
D20B:=999-D20*BL20;
' f, \, h) D9 a$ V+ j5 l; bF20B:=999-F20*BL20;
/ m: b' j" b( Y$ _3 kJ20B:=999-J20*BL20; ; b7 y, W/ L1 Y3 I7 O0 G9 f8 B
{画直方图}
" ^ L/ J- o$ a6 Z1 ]( K' wDRAWRECTREL(10,S3B,40,999,RGB(0,255,0));
9 y) S2 Q6 q. V" A- e0 wDRAWRECTREL(30,Z3B,60,999,RGB(180,0,100)); 7 H/ x& A2 t) h! B7 w9 ]/ J
DRAWRECTREL(50,D3B,80,999,RGB(0,0,255));
9 Q9 n" `. ~7 d; W7 ?( QDRAWRECTREL(70,F3B,100,999,RGB(180,100,0));
% R. A( m& B. v) r! T zDRAWRECTREL(90,J3B,120,999,RGB(255,0,0));
% P- Z2 u1 t; ]6 qDRAWRECTREL(140,S5B,170,999,RGB(0,255,0)); 2 [* \9 G& r6 T {
DRAWRECTREL(160,Z5B,190,999,RGB(180,0,100));
6 ?% x# Z" R. ~- G" h1 _DRAWRECTREL(175,D5B,210,999,RGB(0,0,255)); ! e* `; K' P- V) k7 V
DRAWRECTREL(200,F5B,230,999,RGB(180,100,0));
9 W% O6 H2 h/ A! G8 mDRAWRECTREL(220,J5B,250,999,RGB(255,0,0)); 1 M3 j) U- K/ X& \5 \$ N( {
DRAWRECTREL(270,S10B,300,999,RGB(0,255,0)); " G+ D; X7 c6 H
DRAWRECTREL(290,Z10B,320,999,RGB(180,0,100));
5 I+ m+ F A; c0 ]DRAWRECTREL(310,D10B,340,999,RGB(0,0,255));
4 w9 T* q: j+ f( mDRAWRECTREL(330,F10B,360,999,RGB(180,100,0)); 0 W/ _4 c' u$ Y/ D7 t6 j" V1 r
DRAWRECTREL(350,J10B,380,999,RGB(255,0,0)); ; X0 I' n5 {6 w& n0 ]& X& E+ b
DRAWRECTREL(400,S20B,430,999,RGB(0,255,0)); 7 T- c- S7 n3 e; U6 K; h
DRAWRECTREL(420,Z20B,450,999,RGB(180,0,100));
$ Q( J* K5 M+ R3 e6 }) rDRAWRECTREL(440,D20B,470,999,RGB(0,0,255));
! V; {1 A* k8 y0 e2 vDRAWRECTREL(460,F20B,490,999,RGB(180,100,0));
+ Z/ `1 @$ p! r- w; mDRAWRECTREL(480,J20B,510,999,RGB(255,0,0));
# N8 h8 s N8 KDRAWTEXTREL(80,5,''散户''),color00ff00; * }/ b4 ~" p" `7 ~
DRAWTEXTREL(160,5,''中户''),colorf00ff0;
3 O0 X% J9 b8 _8 P! _: g" BDRAWTEXTREL(240,5,''大户''),colorffaa66;
; t5 _1 Z, N1 s. D! f7 GDRAWTEXTREL(320,5,''超大''),color0099ff;
5 |. C8 Q1 L! wDRAWTEXTREL(400,5,''主力''),colorred; ( W {4 u8 a- m
DRAWTEXTREL(30,70,''本日''),colorddffff; ' x; m1 e0 }% j; d
DRAWTEXTREL(80,70,NUMTOSTRN(散户,2)), color00ff00; 4 b3 m& [( M0 l. e0 a8 |+ v2 n: F
DRAWTEXTREL(160,70,NUMTOSTRN(中户,2)),colorf00ff0;
# L, j( {6 b( m* \ S9 F3 D; RDRAWTEXTREL(240,70,NUMTOSTRN(大户,2)), colorffaa66;
5 O0 f* f- A7 b% `/ zDRAWTEXTREL(320,70,NUMTOSTRN(超大,2)), color0099ff;
8 P- p% h3 B& V9 s. V3 N' mDRAWTEXTREL(400,70,NUMTOSTRN(主力,2)), colorred; J; D( j2 w: A, A0 a
DRAWTEXTREL(30,140,''3日''), colorddffff;
w0 t% c8 z [$ {, BDRAWTEXTREL(80,140,NUMTOSTRN(S3,2)), color00ff00; $ B8 r: l% u; [+ n
DRAWTEXTREL(160,140,NUMTOSTRN(Z3,2)),colorf00ff0; 4 d6 ~8 N% \) S- c. P) J% u3 g
DRAWTEXTREL(240,140,NUMTOSTRN(D3,2)), colorffaa66;
- H& `' @7 | u$ n) ?( ?3 H% ZDRAWTEXTREL(320,140,NUMTOSTRN(F3,2)), color0099ff;
$ Y4 `, K! G/ p* |7 VDRAWTEXTREL(400,140,NUMTOSTRN(J3,2)), colorred; . S& P6 v, k$ v
DRAWTEXTREL(30,210,''5日''), colorddffff;
$ Y7 F* q: c+ r' P2 _DRAWTEXTREL(80,210,NUMTOSTRN(S5,2)), color00ff00;
7 M8 j9 z1 G& \DRAWTEXTREL(160,210,NUMTOSTRN(Z5,2)),colorf00ff0;
2 |' Q, g/ e, l4 P1 b3 @/ UDRAWTEXTREL(240,210,NUMTOSTRN(D5,2)), colorffaa66;
3 K% {+ w0 c4 T" v' ~DRAWTEXTREL(320,210,NUMTOSTRN(F5,2)), color0099ff;
+ Y l2 l0 n, c& b9 pDRAWTEXTREL(400,210,NUMTOSTRN(J5,2)), colorred;
% f3 T) D1 Q2 I% hDRAWTEXTREL(30,280,''10日''), colorddffff; : Y3 w9 `- q, r( s6 P% {8 k( g
DRAWTEXTREL(80,280,NUMTOSTRN(S10,2)), color00ff00; & r+ {, C5 f- ]
DRAWTEXTREL(160,280,NUMTOSTRN(Z10,2)),colorf00ff0; 0 _, W; _4 ]$ k: q
DRAWTEXTREL(240,280,NUMTOSTRN(D10,2)), colorffaa66;
' m/ j4 X. s7 P. QDRAWTEXTREL(320,280,NUMTOSTRN(F10,2)), color0099ff;
" W% `9 Z' O pDRAWTEXTREL(400,280,NUMTOSTRN(J10,2)), colorred; 5 k2 e* k$ Y+ o+ m
DRAWTEXTREL(30,350,''20日''), colorddffff;
( h" X- ]4 a$ V, j6 gDRAWTEXTREL(80,350,NUMTOSTRN(S20,2)), color00ff00; # p* W) _ P( a4 B: _. {
DRAWTEXTREL(160,350,NUMTOSTRN(Z20,2)),colorf00ff0;
' G3 l1 `! R% m: R9 m) nDRAWTEXTREL(240,350,NUMTOSTRN(D20,2)), colorffaa66;
! O! ?9 b" E- J1 hDRAWTEXTREL(320,350,NUMTOSTRN(F20,2)), color0099ff; % {$ _- v& ]4 \; Q, ^
DRAWTEXTREL(400,350,NUMTOSTRN(J20,2)), colorred; $ L5 R' m7 L5 l% q
DRAWTEXTREL(5,800,''3''),COLORRED;
: g2 w( N6 l( TDRAWTEXTREL(3,900,''日''),COLORRED;
; [3 O! Z- U4 E0 l1 V# LDRAWTEXTREL(135,800,''5''),COLORRED;
: J) F, O( y J% fDRAWTEXTREL(130,900,''日''),COLORRED; : P. i& w2 Z* R# _& F
DRAWTEXTREL(260,800,''10''),COLORRED; C% A4 X( H$ J0 J2 E
DRAWTEXTREL(260,900,''日''),COLORRED;
1 p5 b" t. h* @2 b7 iDRAWTEXTREL(390,800,''20''),COLORRED; + Q! n3 u. k# J
DRAWTEXTREL(390,900,''日''),COLORRED;
( P& c1 l# o# x8 o3 W% p一日资金流入:=amount*BIGORDER(1,2)/10000; 1 V+ u) b* R8 N1 `; H
一日资金流出:=amount*BIGORDER(2,2)/10000; , c3 A" c" Y5 b* K/ @- V* U
资金流:=一日资金流入-一日资金流出;
- [* _6 y/ {8 _. `; D; V收支【万元】:资金流,color3d,coloryellow;
) f# ?) ?+ v' x' vIF 资金流流出,RGB(255,0,0)),COLOR000000; " ]' I" X6 m+ T5 p Q: l
FILLRGN(流出, |