|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
7 E: _8 q$ W1 F( K+ u1 | L8 D户均持股:=(FINANCE2(37)/帐户总数)*10000;9 c6 W+ K9 Y2 o1 }" d3 ^" ?
ZH3:=ref(帐户总数,3);
& f# U9 D; `+ p9 |HJ3:=ref(户均持股,3);7 ~! H. D5 z" f/ y0 b; `2 X) p0 ~: G( t
主动率:="卫东.主动率#day";
& q! R _# R5 f- H" G- E单数比:="卫东.单数比#day";
$ i" z( X) q5 ~' S2 s {通吃率:="卫东.通吃率#day";5 J w' `+ H1 |) ~+ a1 M9 ]
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;1 b; p- `7 B. V+ D1 p* T
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
0 l) i/ J2 w8 D8 B+ @DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;0 [# D9 _ K5 S' @" E/ b
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
" l+ E8 l: y$ c4 W9 F0 t& U3 gDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
8 {6 P. p t& \9 ]) z1 y x' O7 ^DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
$ ^8 Z, _; w- n7 _& x6 fDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
8 ^8 I" G; c/ x5 y9 }1 wDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;$ ~9 a! J6 }$ D! B
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
7 r3 p: C+ [7 n; g连绿:LAST(CLOSE=REF(MA5,1);
$ G [- C1 C# d' a$ Y. _H1:=MAX(MAX(MA5,MA10),MA30);
( @1 X; W( N5 ^% xL1:=MIN(MIN(MA5,MA10),MA30);
: M6 f$ c% c1 _' ZDRAWTEXT(H10 AND DDY>0) OR DDZ>400);
9 j+ Q" ]8 S) zA2:="MACD.MACD"(26,12,9);
) n0 i9 r* F% `; T# J8 Y; G2 a; mA1:=C/REF(C,1)REF(A2,1) ;2 h: ^# k& O# p6 Z- L
A3:=COUNT(DDX>0.045,10)>2;& a4 C$ x, N& T" k4 G+ s
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;2 e! U( k8 P% s2 [
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
4 |5 n& x2 F/ K3 m" mDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;6 e: |& l7 k. K8 h4 W3 `' w
{资金}1 I/ u% z* Q! z. q( J
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
8 C# u2 o9 P( ]' Z{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}6 b2 q }/ H, [0 K, o" q. ?
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;6 v- Y" @$ C, F. U5 m- x, C
Ddmrs:=sum(Ddmr,0);2 i: R0 V+ K. I: w. F1 O6 H& O5 Y4 ~
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
( |! h8 X% C9 g3 N8 W. C3 O, a" U& cDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
7 g/ k* X6 L/ `0 U+ ^# x7 DZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
/ i/ V. o+ D: |" M- w# }+ V$ zXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
; U( r3 S g |: N3 KChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;# G/ ]6 P4 f: D' s
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;8 R& V) W1 }! X
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
9 [( s2 p4 T, SXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
J1 }: p# ?2 P; h( n, K* ~* B散资:=(xhb-xhs)/10000;
( Y6 ^- Z: ^+ o) P- f( {中资:=(zhb-zhs)/10000;( S% n; L& b/ C5 F- R8 ~
大资:=(dhb-dhs)/10000;% a; c+ H% \6 X( W5 Q, `& F
超资:=(chb-chs)/10000; ]! X k1 ]5 l' x6 F1 X4 s
超资增仓:=超资;
! A( i- M/ N* ?9 J大资增仓:=大资;6 s7 C: X' ^$ z; P+ s
中资增仓:=中资;
- ~( F/ {2 k6 U' I' K e3 _散资增仓:=散资;1 x, p3 y4 j9 q8 J& A. l$ |
BBD净额:=(超资+大资);
+ m3 _2 f' ]" m. `2 v0 s( zDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;5 N: h, }6 u3 G: |
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
' e4 E# O& v4 U) j1 v( z, s: TDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;. E' I: L, P; R$ s8 `6 K3 P
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
y) c% s I* H) H. F, EDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
6 ]9 I. g4 Y5 G4 [DRAWRECTABS(0,118,270,0,1),COLOR00FF00; I+ D4 x" C R- S5 y0 T2 `0 @* l
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);7 D# i* D0 n/ O- _2 }
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
' k& x; ~8 F' |# ?tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);" \$ { p( U2 [9 I% D
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);3 W7 ~. E& o: Z$ L4 i+ x, p1 O2 p
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
Q+ E3 ^5 t1 N2 J/ w$ F+ ~# Addm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);# \) O8 B1 `7 o5 s0 f
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
% T; p; i" c( A: ?zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);' X6 N. o+ n# B8 D
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
# r. h5 k! R$ @" Wsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
: x$ L6 b. [- I; S$ T6 Wtdj:=tdn-tdm;
3 W. s( S$ U( l$ A# w$ D) A4 gddj:=ddn-ddm;! L0 G" L$ q j) R( O" w, Y& _9 v
zdj:=zdn-zdm;
5 R1 u6 s1 J- k/ w# j$ {sdj:=sdn-sdm;/ ~8 w* F+ r! G& q
zlj:=zln-zlm;. {( ?9 V% w, m1 V3 @& X5 s* w
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
. I6 W4 A+ B2 n0 v3 L) eDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
/ u2 u4 u0 ?& T+ K0 ~( ^) A. ADRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;- s0 `/ R1 U8 ` d# ]( f+ m
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
9 b! W. R5 ^( M6 V3 \DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
% r0 t( l- S5 c0 gDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;1 t( x$ M* ^; m
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
* J+ R J% X s/ g8 SDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
( ~' M1 {9 \$ y- B' RDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;0 r1 K9 u4 u5 ?1 r* ]( F9 W& Q3 {
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;. u! ~- ]7 B! e% o: H( s, [+ [) M6 Q
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;* N+ `3 O" a3 J' }
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
2 i' N7 W0 z% W3 r8 ^( b* g! tDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;: J5 N7 U K9 s% k
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07