|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;7 ^& E- V: N' |& H, Q: x
户均持股:=(FINANCE2(37)/帐户总数)*10000;4 i/ m' T! Q5 b
ZH3:=ref(帐户总数,3);& b% f1 l S$ I" w E3 u
HJ3:=ref(户均持股,3);7 M% B8 l7 Z" F8 `
主动率:="卫东.主动率#day";# ~( m% \9 r. L& T v
单数比:="卫东.单数比#day";
8 Q9 X1 @ Z2 T2 v" I, f: X通吃率:="卫东.通吃率#day";
5 `3 `9 J9 f7 J6 L2 FDRAWTEXTREL(5,13,''帐户总数(户):''+NUMTOSTRN(帐户总数,0)),Color0000FF;
. @6 h+ |3 V3 D! mDRAWTEXTREL(139,13,''户均持股(股):''+NUMTOSTRN(户均持股,0)),Color0000FF;8 e1 l' `' P, X6 z# T* o. d- y. L
DRAWTEXTREL(290,13,''上涨家数:''+"卫东.上涨家数#day"+''家''),COLOR0000FF;' D5 e- l5 b9 \! R# I% }; s/ {
DRAWTEXTREL(390,13,''平盘家数:''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;6 S) K* g& J/ ^. h6 H
DRAWTEXTREL(490,13,''下跌家数:''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
8 I9 u( _1 A0 `, }( tDRAWTEXTREL(590,13,''主动率:''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;$ m4 w3 |7 ]' U6 U" b
DRAWTEXTREL(690,13,''单数比:''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;8 G9 q1 ~+ i! d' h* ~% H3 Z1 |
DRAWTEXTREL(790,13,''通吃率:''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
+ ]1 l0 |5 F7 f连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;" \" C E$ ~$ }/ w o! V
连绿:LAST(CLOSE=REF(MA5,1);
8 ^, x( b" _1 _; V" n& nH1:=MAX(MAX(MA5,MA10),MA30);. D* r7 J) ?) ?; B) \' p: x
L1:=MIN(MIN(MA5,MA10),MA30);
& ?' l# F3 N0 k- ~/ dDRAWTEXT(H10 AND DDY>0) OR DDZ>400);/ Z0 l5 t* ?7 A, B8 l9 b4 P. @
A2:="MACD.MACD"(26,12,9);+ y. x3 S+ h9 w
A1:=C/REF(C,1)REF(A2,1) ;: g4 r" A' Y C0 ?" o& h
A3:=COUNT(DDX>0.045,10)>2;0 V2 N2 Z1 Q. S% e; j+ C
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;% E! f P3 j6 Z8 R7 L. H( j+ o
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;7 g& U9 h. W; c1 z2 v8 ]
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;2 J3 D; d/ K0 U' x
{资金}
2 E8 |8 _0 a2 O/ d* D1 M' ?TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
( i* e% n- ~5 L/ C7 t. N! {" _3 \{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
- j: T$ `* x* vDdmr:=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;
& \, q+ q. y4 u+ G0 E4 k+ f& kDdmrs:=sum(Ddmr,0);
6 `/ h+ g4 y5 T: M: n x/ M" mChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
# p9 t9 N' u, ]% \7 C; o* {1 o; ZDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
0 o; x0 q) w2 t, S; P2 H3 f) Q2 jZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
) E6 O( \9 ~, D2 m) d2 ?% ^Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;* x1 s+ K- P! Z! w+ h+ X( V, o
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
3 e; r2 {% n; T4 Q# _5 B' a2 vDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;& C5 N- `) k1 h4 E8 m
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;; H& {1 p X$ `; f Q3 S
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;) @, v& C7 V! D( _+ a0 F \
散资:=(xhb-xhs)/10000;
1 s ]0 t4 `# } G+ |% S中资:=(zhb-zhs)/10000;* Q$ b; s0 S# L2 [9 w
大资:=(dhb-dhs)/10000;
/ B w6 J! J* q; ~$ q# Q超资:=(chb-chs)/10000;
$ v; i4 `3 P8 b. `/ _. g超资增仓:=超资;
2 v) E2 C/ r, n/ h8 t! b1 @' [大资增仓:=大资;+ d/ f3 b& |8 ~8 A8 a/ u' ~
中资增仓:=中资;. g1 x* m3 n" s W0 N. @
散资增仓:=散资;
9 X) g+ V( m q# q1 WBBD净额:=(超资+大资);
% i: Q6 x7 @: X/ S" GDRAWTEXTREL(5,85,''BBD (万):''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;9 o, p" f, E* \
DRAWTEXTREL(5,155,''超资(万):''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;2 @; {0 o* s8 b) U' v
DRAWTEXTREL(5,225,''大资(万):''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
' O: p4 n9 V5 U7 a" \. nDRAWTEXTREL(5,295,''中资(万):''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
4 q5 R9 I# {$ j+ S$ _% G B" FDRAWTEXTREL(5,365,''散资(万):''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
; v* { a" R% `DRAWRECTABS(0,118,270,0,1),COLOR00FF00;/ X9 e$ J" D) L% D
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
1 [& X4 D2 \; Q- azlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
$ E9 R! |" t( k r3 vtdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
" N4 G# Q0 j3 g$ i; x3 y1 F, n' R* Ptdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
& D& U# z8 {* C/ y, tddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
8 S$ {7 \0 w) w* b# F2 U& yddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);0 a6 J7 e P' s% A. G0 u0 Y. U
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
* D8 `$ V2 a$ l) y8 ?1 d6 P! [' x, N: Izdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
$ D5 U+ Q% n4 V) O1 usdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
3 M6 Q# d- u6 R& n8 vsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);, X2 r- a) h& T4 g y5 c4 r3 \/ Z0 ?( F
tdj:=tdn-tdm;9 e4 U; @" x) Z, Y8 u4 W: f$ O! q
ddj:=ddn-ddm;) z$ m, D' o( {1 C2 W5 Q0 R
zdj:=zdn-zdm;
5 Q3 U+ ^7 N( m Rsdj:=sdn-sdm;
( p/ w* }( ?) G( Z) s. c- z3 b+ Z izlj:=zln-zlm;
8 W1 y2 e+ [1 m' H- z W ODRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
8 _* u2 G7 Q9 k4 FDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;9 v: u7 k3 T, d
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
, C' h$ m. V( K& D( x( NDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
7 b) ?0 z6 [& N, KDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;1 p* c, | M5 U5 M, W! u( R, C
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
# N6 X' N4 C3 Z' m$ P V0 k( D* IDRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;- V& d( O1 r l# Y I% s- w
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
2 d) d: ^+ O) \( W) ^' k# {7 H2 g! zDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;! c3 o; `) |8 j# V
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;! F! M. W: F4 {! {. w9 z7 `( j& ]
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;& R: Y% G8 s3 Y& a1 d' j
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
8 k2 _! [& y; l; S; z% `1 {% l: tDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
2 g( {9 a4 [0 Z1 NDRAWTEXTREL(280,295,''仓 ''+NUMTOST |