|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
0 A# ~6 L2 s3 |, o户均持股:=(FINANCE2(37)/帐户总数)*10000;
$ k; B% ^, R" `* p) q* f: GZH3:=ref(帐户总数,3);5 F3 \' m* u& f$ D4 D, D) @
HJ3:=ref(户均持股,3);
+ y0 T1 M8 P$ L* c主动率:="卫东.主动率#day";
- e5 K! @+ B6 f9 U' G. ^: y1 X单数比:="卫东.单数比#day";+ Y6 k G, b& w( | _# X
通吃率:="卫东.通吃率#day";
0 V/ z) _- j7 }% ]$ B* |DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
! U( o* r3 J: D8 @# q( z: EDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;$ k& o" j" o. X+ E- g
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
9 Z0 t( f$ m4 z5 g) WDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
0 e* ~0 e% P, @) m- J. UDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
$ }( `" ]5 l6 i. FDRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;+ C) K5 L: u* G9 ~3 t
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
* f2 N4 \( b& Z: ^" d1 \2 BDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
" Q' `" r# g- [( y3 l连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
% M6 c8 S; L, H8 P4 i连绿:LAST(CLOSE=REF(MA5,1);
$ u8 a& ] A# M# ~6 a" a* F: S( TH1:=MAX(MAX(MA5,MA10),MA30);2 E$ J; u9 Y* d7 Y) C1 {
L1:=MIN(MIN(MA5,MA10),MA30);
2 r2 A$ a; i* D+ h) ?- c; KDRAWTEXT(H10 AND DDY>0) OR DDZ>400);. ]* c) c& q: U- Z2 m; t% h
A2:="MACD.MACD"(26,12,9);: y7 Q$ o' J) C8 h; R
A1:=C/REF(C,1)REF(A2,1) ;
% [1 n( U- `6 {1 z$ G2 }A3:=COUNT(DDX>0.045,10)>2;
, E' w/ ?" |. s7 M) w弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
- ^: D9 r7 @" X3 H0 l4 TDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
; R" d- J/ t0 F1 _" w9 ~/ ?DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
6 O( _# j6 ^- O. c9 R# ]{资金}
~4 J; z) E( R5 i1 \+ Z% C x* U$ ~TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
* k. H% F8 S0 d2 N4 _, I{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}$ \/ m5 `" ^0 N8 V
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;. v. x" k+ P+ Q
Ddmrs:=sum(Ddmr,0);
4 r) e( l+ g9 ]3 s/ u% l; l' sChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
% c7 m4 L! ~6 N, k6 s: RDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;7 N, Z2 A9 m7 |; z. R5 p
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;: D* Z2 |' v* h% G, F
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;7 J! O. |0 @9 H$ i( v! k) z
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;9 @$ i( I2 ^2 y4 o$ ?
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
2 ^, N0 j" C( [, hZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
% [2 ~3 m; @8 VXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;3 V& |; r! j7 d9 g% V/ i+ ]
散资:=(xhb-xhs)/10000;; t8 r5 K r1 _( `9 q
中资:=(zhb-zhs)/10000;
. z8 g- M8 g% n4 l6 K$ A# x6 U% X" X大资:=(dhb-dhs)/10000;( L! G! `7 K' }( u. K
超资:=(chb-chs)/10000;# d& a$ M6 a) t( K8 p
超资增仓:=超资;
a# R8 A/ \5 t9 j6 e大资增仓:=大资;
: P$ h% j7 e9 i中资增仓:=中资;
) {" `5 b: @: Y" d散资增仓:=散资;
0 [7 q0 r% z. }2 A8 g( M% ?BBD净额:=(超资+大资);+ W6 W, d8 a5 C9 D7 [# C# l' K
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
8 m+ t. z. c L% y5 C1 M' YDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;$ r/ G4 l: N; a5 P; D6 I+ {$ E0 Y. k/ y
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
) Y2 @% m, o/ dDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;" K& B' p* R' v9 |/ n; T2 \0 A
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;+ D6 i: {3 ]: F3 o# U" y, R
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
6 B: x. _* ?6 I3 F( Azln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
1 Q9 b0 z1 l" W: S0 N8 b5 Y1 w5 k' Lzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);; X! [9 j M L$ M6 [7 u7 s
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
E% \5 M/ N; ` ]( N! F3 Qtdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
, p8 N) X. J6 m1 hddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);$ T! H, ]! Q8 i* s, O% H3 Z
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
4 A( b0 ] D* X2 x; ?' u5 `# kzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
) ^' F! U# K- R9 q2 Zzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
2 D; d% n4 n2 J: _+ Esdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);. m; H$ m7 q# v1 f* z* R5 d v$ r
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);- n9 \* a! M" v
tdj:=tdn-tdm;* ?4 z# K8 }8 |* a
ddj:=ddn-ddm;7 s9 p# u+ S/ E( v
zdj:=zdn-zdm;: X7 `7 X0 h4 h, o
sdj:=sdn-sdm;4 x, j `5 Z% z! H& a3 X Z
zlj:=zln-zlm;
5 [$ G- q" F/ c0 K5 f0 gDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;' w" E/ e R% G
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;; \# ~. U# v1 V- I2 S( |3 s
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;& o7 F7 q; D P& z) w) b: ?
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;0 l. Q O" f- f) I
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;0 k$ d0 G) e |
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;( d, n2 E/ {0 f
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
, n3 H$ |6 w: `8 [" y& K9 fDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
6 B" a8 |6 S' _" {" l. QDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
3 ~8 Y3 c8 B$ Q7 F/ B- g; |DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;* C4 R+ C4 g' a" Q
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;* v h: h2 d' x$ r
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
- q+ I8 ^5 A7 \6 ^& ADRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;" W) S) C" c# }
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07