|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;6 O3 o9 d2 \( D0 |: e: E
户均持股:=(FINANCE2(37)/帐户总数)*10000;. x f" {3 N- A1 ~( N
ZH3:=ref(帐户总数,3);0 B' u* S! ~3 r2 _4 F" R
HJ3:=ref(户均持股,3);
/ u$ _3 R. w/ `8 X' O9 h v/ E" L主动率:="卫东.主动率#day";+ h4 C: f" x+ c) O; S
单数比:="卫东.单数比#day";2 Z0 M* r, ?: o
通吃率:="卫东.通吃率#day";9 V2 n- S9 P* a/ P/ D5 k
DRAWTEXTREL(5,13,''帐户总数(户):''+NUMTOSTRN(帐户总数,0)),Color0000FF;
+ n; [2 G1 I1 w4 LDRAWTEXTREL(139,13,''户均持股(股):''+NUMTOSTRN(户均持股,0)),Color0000FF;% H! q3 q' z B% i3 q8 R, H, J/ x
DRAWTEXTREL(290,13,''上涨家数:''+"卫东.上涨家数#day"+''家''),COLOR0000FF;; q5 X8 W" y; b" h: y8 m
DRAWTEXTREL(390,13,''平盘家数:''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
& ?& q2 V/ w5 m% w D% P5 J lDRAWTEXTREL(490,13,''下跌家数:''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
! O( o! c( _7 B% h( ^! s1 \, v7 ]DRAWTEXTREL(590,13,''主动率:''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;% H4 D2 E6 x; W2 k5 r& C
DRAWTEXTREL(690,13,''单数比:''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;" a9 W" l2 z3 c; `- V0 f
DRAWTEXTREL(790,13,''通吃率:''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
9 l; [; u& q2 R) H5 S连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;6 C& m' V* [( S, P
连绿:LAST(CLOSE=REF(MA5,1);
4 ]6 o# y' V- S) a8 |9 I2 sH1:=MAX(MAX(MA5,MA10),MA30);
& h! x) X* N2 R# Z9 Y7 _. V0 mL1:=MIN(MIN(MA5,MA10),MA30);2 K J* M3 Y4 _- a" p* D% d# y
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);
: z2 z! | X. mA2:="MACD.MACD"(26,12,9);7 B8 _2 o: a4 L
A1:=C/REF(C,1)REF(A2,1) ;
9 Q- u. L: L4 H& @9 C0 a( G5 zA3:=COUNT(DDX>0.045,10)>2;% q1 O2 F- S5 p- o. X* B6 U6 I
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3; G; K* V. O `, M
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
7 h+ z, ]$ T+ s& @5 QDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
8 V- f9 F# _: [4 @0 s{资金}
+ h) l7 @' P' iTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}! T7 k6 U. e+ }/ Q
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}' A; W: e" v/ E2 r4 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;
# C9 Q' o. }" _; K' \' UDdmrs:=sum(Ddmr,0);4 v4 h/ r( X4 ]; x+ U- o( P
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;+ X d) j% Z5 ^
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;- U* f+ g1 g8 S* O% |" I
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
$ Z" Y$ a3 P/ b" P I% fXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;! z( _7 {8 _( s. i+ m
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
0 O) L) p6 B, A8 g) z/ r1 V0 O% { ^Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
$ a( E5 n" Y S& | eZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;) [, \9 J: g9 p3 O) L7 x/ g
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
, X0 q4 ]* W; } V3 b+ [" M散资:=(xhb-xhs)/10000;5 C) a8 S# }" e7 B# U3 k4 u
中资:=(zhb-zhs)/10000;: D" |$ S6 ]! C- d* |, `
大资:=(dhb-dhs)/10000;
9 L6 t# x+ G# C0 b( s' I: o超资:=(chb-chs)/10000;
1 _% ?9 n3 A; i6 V: x% X超资增仓:=超资;
% A6 L! r1 M+ x. {1 b* @大资增仓:=大资;
. s: I% K' L, ^# S% J: K中资增仓:=中资;
% s' A; t1 ~' s3 j" K/ X$ n9 H散资增仓:=散资;
4 ~( K9 U0 U" c, c% `: xBBD净额:=(超资+大资);
3 J7 z7 s. o. Y) D' f- ADRAWTEXTREL(5,85,''BBD (万):''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;; o& U3 c1 m( E9 m8 o% B; @
DRAWTEXTREL(5,155,''超资(万):''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;! P" B. c, g7 J2 ~7 Z8 }
DRAWTEXTREL(5,225,''大资(万):''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
& {% V3 X) E& N0 Y& e" aDRAWTEXTREL(5,295,''中资(万):''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;& T+ d. G& a5 _$ R7 S/ G( S
DRAWTEXTREL(5,365,''散资(万):''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
" G u$ H1 j3 UDRAWRECTABS(0,118,270,0,1),COLOR00FF00;6 F5 R) R* o8 i9 H; G
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);4 e: w+ C5 g& v+ p/ s+ ]! F
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
/ s2 d% \0 q- }) Ftdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);4 x' I& e g2 W1 i. {. T
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
9 z3 @! G9 z8 g7 z3 r6 S# D Xddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0); {; `* {9 d6 Q
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
8 v* L% \- k6 x7 Zzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
7 C7 E$ v5 |6 X" [/ Vzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);, V3 P6 |* x; B, D" B0 L5 d& c) j
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
4 A! ^) Q4 O$ `/ F% isdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
" A& z+ g3 ]7 Z9 Ztdj:=tdn-tdm;
, ?# ~" U( t* v* r8 I3 dddj:=ddn-ddm;
}# }8 I% G8 n2 M' ~3 m. ^zdj:=zdn-zdm;
% i9 |; l. I7 u, ksdj:=sdn-sdm;
. E% O( A1 U! O2 o g4 F" ~zlj:=zln-zlm;) e% v2 S2 S; `/ ~ F0 m+ {
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;' @" R# C: y0 f
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
) |9 }- A R; C [DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
7 E- W: A# k$ W4 pDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
" d5 ], |5 I! ?1 O; D3 s8 QDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;6 o7 ^0 q Y3 h) u
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;& ~- y; @2 E' a- N g# y, V1 n' D
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
, o) D, ]8 l+ N1 {$ q1 F \! _DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
4 d& L1 k5 v( _1 z/ q1 u7 \0 bDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;& c G: h" t2 e) Q }7 I5 A
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
: P5 O/ i+ M" E1 `/ _7 @1 NDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;. @1 r' I9 q$ X9 S
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;, e* d0 g p6 N/ x4 N0 e3 o
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
* r$ ^1 J7 S: U' Y& ~" F; Q, [0 ~DRAWTEXTREL(280,295,''仓 ''+NUMTOST |