|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;6 }9 g$ X" ~; {
户均持股:=(FINANCE2(37)/帐户总数)*10000;
" T" ^# G( o, U# ~0 ?7 JZH3:=ref(帐户总数,3); M* h7 b3 w/ Q" p' F
HJ3:=ref(户均持股,3);: v2 j+ C' a, u) t) [) E: E3 z
主动率:="卫东.主动率#day";
/ v! v0 _) h1 P$ i" r单数比:="卫东.单数比#day";% ^8 G ]% W: |
通吃率:="卫东.通吃率#day";( N2 `$ l: T8 m7 l
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;; |1 \6 }. g J9 D7 x+ d- ~* N' M
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;$ t3 g% z7 o; W6 E. h$ e* D
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
0 Q8 _: K& S/ L8 u( L; RDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;. D6 R& h+ o# S" b3 e( ?% H
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
" E' E& d* m$ ], K, n# [8 \DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;& b; [( Q2 u, q
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
1 f [* E+ Q! \; T, A6 Z* G0 H/ HDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;$ Z3 ~# l1 ~! }6 U# r. J! F6 x' ~
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
# n0 p6 K8 g! c' A, d) O连绿:LAST(CLOSE=REF(MA5,1);# d3 \' b' O1 i. ?
H1:=MAX(MAX(MA5,MA10),MA30);
! ?" K5 B/ A" L0 H& Q0 g1 rL1:=MIN(MIN(MA5,MA10),MA30);
3 {+ `. N" B, U% C. \DRAWTEXT(H10 AND DDY>0) OR DDZ>400);
1 H' r f" g& }3 kA2:="MACD.MACD"(26,12,9);
7 J& [7 ?; V9 HA1:=C/REF(C,1)REF(A2,1) ;$ w D# o9 A" W, d: ]0 g0 U4 B" J
A3:=COUNT(DDX>0.045,10)>2;
9 u3 K7 e, Q% I, X) u7 d弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
' L+ {4 D4 h% q4 w0 v6 B4 ODRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
) Q% V6 V4 J/ Z/ z. m; QDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;$ R, S1 x- m6 l$ H) |
{资金}
) z$ _ T: V' j- D8 t; L. BTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}( H n4 `1 `/ H0 n
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
$ F; L! u5 N1 Z* j8 ~Ddmr:=IF(TODAY,("DEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100''>DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(2,2)),(bigorder(1,2)-bigorder(2,2)))*vol/capital*100;
( h& L' f, a- I* o7 nDdmrs:=sum(Ddmr,0);' D$ H t0 N! L( V
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
6 u+ {% Q3 O# l. R; I' mDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
" D) u: x2 b- F* TZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;3 P L, r; { I
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;) p* | N0 v) Y" x: u F" B8 s" H
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;8 M. v# Y5 v4 B( h: F8 x
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
) H' x S4 Q3 t/ Y9 V' ]9 AZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;) M( C3 }9 h$ K8 Y4 K; b. _" C8 z$ }
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
2 z( n) `8 [$ G& s7 V$ A- P散资:=(xhb-xhs)/10000;
; \8 N2 L: V/ l0 R中资:=(zhb-zhs)/10000;# K$ i: }2 {5 P7 f) C/ u/ g
大资:=(dhb-dhs)/10000;# u* O6 K! [. I! Y) r7 Y
超资:=(chb-chs)/10000;
) r, l; E7 \$ T3 @9 z1 P超资增仓:=超资;
$ t+ ^, ~6 |3 W5 j- G大资增仓:=大资;
6 x' m7 Y8 E1 y- [- \5 G/ Q) L中资增仓:=中资;" { W: L( { y* g, f$ o3 _
散资增仓:=散资;; p( D: r/ S9 b: m$ |, ~
BBD净额:=(超资+大资);- H* e& f3 S% E
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;9 J+ j! g* b7 v) r: o3 }% c" L
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
* C& X/ S9 K. [0 O/ oDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
; h1 U7 M$ o0 z# ` HDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
1 g5 `: I+ P" {8 M. ~; hDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
& g7 l2 ?/ i% M O9 u7 C. ?6 TDRAWRECTABS(0,118,270,0,1),COLOR00FF00;
' ]3 Q# l+ }6 A; X2 E7 Vzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
% g' ~( U/ O( b1 Z3 Yzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);8 L* s$ N1 \/ r
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
& ~" {( H; b/ ?- P) Q5 |2 M Ntdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);' T+ G# t* R4 o. z# U. u. r) o% g/ a
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);3 O; P( p% R8 T1 d
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
6 h) h1 s8 u/ T) }& wzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
# S" Z$ L6 q4 d; q& n6 |zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);5 V6 x1 l$ P5 q
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);) g5 z+ ?% k/ M0 J
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);2 F0 R5 p8 Q* @( I& |
tdj:=tdn-tdm;( j* `, \ f0 {1 R A7 v9 _8 J
ddj:=ddn-ddm;! c$ n' `! t+ k* \9 m
zdj:=zdn-zdm;
" L; W9 c, V; [" }9 qsdj:=sdn-sdm;- T& Z/ y+ q4 P7 N
zlj:=zln-zlm; q* Y% }- c3 L+ t, ~; V0 _0 \
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;5 _" a8 w( U L6 U6 _; Z
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;0 O) h( d4 x) m3 g1 I( y
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
, O' Q7 \/ m# Y2 o$ E, a- b7 rDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;3 S/ A, l+ z' ~6 \ F3 g, m
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
. w7 I5 ?: c. ?; `" ZDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;1 Y+ c7 f& \2 F9 _0 p
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
, D+ |1 a: R9 L6 ^( O6 iDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
( k3 c6 l) K! x$ Y3 E, J* n% _DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
% z! s4 q' V! [( z+ jDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
3 W" [( e4 |' X. _( k: RDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
1 {8 R% h4 |; @DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;2 \$ V+ x8 E2 E i* [! E* N
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
* E9 T, G( P- b0 v. S! pDRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07