|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;: m; o8 ]. X+ {) q) _2 \# h
户均持股:=(FINANCE2(37)/帐户总数)*10000;* r3 z3 c7 k5 A; f8 t
ZH3:=ref(帐户总数,3);
" q1 P! z1 S$ n! K4 j% d; T+ R# Z9 O5 xHJ3:=ref(户均持股,3);
, I u& f' I2 ~% M3 K/ K9 Y主动率:="卫东.主动率#day";8 q* `6 t! V0 p! C9 X
单数比:="卫东.单数比#day";" F! O# s' a1 s& B# n( l
通吃率:="卫东.通吃率#day";
1 u& r3 ]$ `5 E$ v9 @DRAWTEXTREL(5,13,''帐户总数(户):''+NUMTOSTRN(帐户总数,0)),Color0000FF;6 g) Q! l9 A5 Q. v2 |7 l
DRAWTEXTREL(139,13,''户均持股(股):''+NUMTOSTRN(户均持股,0)),Color0000FF;# G$ I+ h) y% ~% i, z
DRAWTEXTREL(290,13,''上涨家数:''+"卫东.上涨家数#day"+''家''),COLOR0000FF;. v1 h' M1 P# u) r
DRAWTEXTREL(390,13,''平盘家数:''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;' L7 `! q7 u% x$ _" {
DRAWTEXTREL(490,13,''下跌家数:''+"卫东.下跌家数#day"+''家''),COLOR00FF00;& x H2 Y. r% z. ]% z; ~3 y# _
DRAWTEXTREL(590,13,''主动率:''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
5 f3 `9 X8 N) E5 Z# wDRAWTEXTREL(690,13,''单数比:''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;9 H- k+ U5 p- P
DRAWTEXTREL(790,13,''通吃率:''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
0 o4 Y, A( N1 H连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
4 l* X) w: G% {( r- X连绿:LAST(CLOSE=REF(MA5,1);
5 G8 N5 y: s& H% ZH1:=MAX(MAX(MA5,MA10),MA30);! ~. G* g3 z' g' s& M
L1:=MIN(MIN(MA5,MA10),MA30);) F' k7 V1 Z6 @/ Q: e1 W J! o
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);; L) G' {" Z+ f; u1 o" G. N) J; o
A2:="MACD.MACD"(26,12,9);
: e- y' Y ^0 h, ?) ^, M( YA1:=C/REF(C,1)REF(A2,1) ;' c7 J7 W- }( c; B P" k t3 C
A3:=COUNT(DDX>0.045,10)>2;
; s; |- [0 E, l' f1 `6 j弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;. g. h' {8 U5 h" d9 n' W
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
# S, w9 z- p l! A G, gDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
! z5 ~8 K( H3 n7 O v{资金}: o6 Q; ^6 K) |7 [
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}. l6 X9 h4 ~. N v, k; C Y! Y" E
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
8 l( F! o# u9 J, L( d3 H1 q- nDdmr:=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 |" T8 D! y( x
Ddmrs:=sum(Ddmr,0);
0 W. C6 `- S. A. ]( ]% l, M% QChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;1 w; w7 d1 L9 T- `$ ?+ s+ E
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;) e8 r' y" G1 S% @0 E
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;& I8 d$ ^4 U8 a$ d+ i- Z
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;: T4 P& W5 R( `% {) _# P( Q
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
* o0 x1 H) Y3 L+ i& ADhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;4 O3 M; q% j1 r! _
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
4 s+ `( z$ G* VXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
" v& h7 N: D/ m; B* P散资:=(xhb-xhs)/10000;
+ K0 a5 r7 C$ k# A( r, @) h中资:=(zhb-zhs)/10000;
* D* U* R6 ]7 E b$ D6 Q/ J: S: \大资:=(dhb-dhs)/10000;
: T! @+ U. T! C4 h! y- h超资:=(chb-chs)/10000;+ k8 o" }; L& R ~; d0 x! ^
超资增仓:=超资;8 T6 Y2 ^, D# f+ i& ~
大资增仓:=大资;1 @3 Y* h% f) R
中资增仓:=中资;8 {; e" [& v$ i3 A$ z
散资增仓:=散资;, x \- K( C% m2 t
BBD净额:=(超资+大资);) ~4 N( ^4 V: \, s9 ]
DRAWTEXTREL(5,85,''BBD (万):''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
4 O3 m5 A8 O6 p* k' XDRAWTEXTREL(5,155,''超资(万):''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
% U" m3 r$ y3 u$ L6 g2 @) o9 rDRAWTEXTREL(5,225,''大资(万):''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
$ m5 c, g! `9 K4 u% ^8 h% gDRAWTEXTREL(5,295,''中资(万):''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;$ \$ Q. k4 i" q% S
DRAWTEXTREL(5,365,''散资(万):''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
8 m1 O) c% k; n& ODRAWRECTABS(0,118,270,0,1),COLOR00FF00;
) z% R( W4 Y* K2 p& g) t3 ?2 V6 nzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);4 f2 B: ]; f% K! f+ w
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
* v' D, v4 f S: R2 I* W/ y. Dtdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
' s: c% Y" j H5 j& ?# P! a; `: Ktdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
3 ]* L# F( T# ?- addn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);% W# ]$ }) q/ A7 O9 s! H: p) g
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
/ s- J* O1 I R- o2 E. Y+ Szdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
; u! W0 y2 t4 Rzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
7 @4 [/ P0 ]% F7 L: G, j1 H( tsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
) J& [& b6 I' u- ]sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
7 Y/ j- E* i: P# itdj:=tdn-tdm;( u1 @( ~+ ^& m* j
ddj:=ddn-ddm;( T8 Q- F( z/ q% z7 \" f1 M
zdj:=zdn-zdm;( d2 S* |9 o4 r, }8 E! [$ T6 N
sdj:=sdn-sdm;6 G1 u5 v! k! H- k; B. V
zlj:=zln-zlm;6 i7 g( K+ k G" r
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;! ~5 s( H" r( L$ _# y! S
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;/ d! T4 F4 J) Y5 D: e) }8 r( \
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
5 j: c% ~5 B0 E( R6 JDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
# @. J. B" Z" N5 s) ?; iDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
- B: _ F: l$ W2 DDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;& M* l+ Y3 B8 }% T2 @, e8 X
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
! ^; y. P! ]* a2 g3 P# |DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
) F" y) r& n3 r EDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
6 |' i6 X$ ]* F$ D5 H, ?1 TDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;5 ~, {3 k4 F8 ^, k8 E$ i+ ^2 [% ^
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
: W; z, X6 _! d; MDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
1 A) {3 G5 q! U$ |DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;3 y0 v+ y8 ?' @' C9 Q5 X
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |