帐户总数:extradata(''散户线''),linethick0,PRECIS0;
8 I2 K; H! F- {* W户均持股:=(FINANCE2(37)/帐户总数)*10000;
& z% S1 D0 _" G$ i8 OZH3:=ref(帐户总数,3);
, o; M0 \. G% PHJ3:=ref(户均持股,3);
$ R8 t1 A4 ?* U$ x* s1 n( {主动率:="卫东.主动率#day";
. \( i6 j8 Y$ y- }* P7 b6 c* S单数比:="卫东.单数比#day";, _! g# G2 W" p
通吃率:="卫东.通吃率#day";% d& ?5 E* d7 H* w4 k1 \
DRAWTEXTREL(5,13,''帐户总数(户):''+NUMTOSTRN(帐户总数,0)),Color0000FF;4 a2 x% s& I0 t7 I g: Z7 E6 [* K
DRAWTEXTREL(139,13,''户均持股(股):''+NUMTOSTRN(户均持股,0)),Color0000FF;
7 \8 C) J k4 G n1 N6 a1 iDRAWTEXTREL(290,13,''上涨家数:''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
7 G$ ~9 v* Q( f1 TDRAWTEXTREL(390,13,''平盘家数:''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;& m, h. `9 b! L" c: `; @0 O
DRAWTEXTREL(490,13,''下跌家数:''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
6 p0 {# p2 X2 p0 a. \) w8 n KDRAWTEXTREL(590,13,''主动率:''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
. v9 Q1 t! z- A" q }3 qDRAWTEXTREL(690,13,''单数比:''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
% j; I5 `; a* d5 T3 p# s8 s! v3 ~DRAWTEXTREL(790,13,''通吃率:''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;. y9 }% t- { y/ ^: ?
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
) q% |7 d! y8 B/ @# ^连绿:LAST(CLOSE=REF(MA5,1);
9 x1 [( _, }9 G; O, jH1:=MAX(MAX(MA5,MA10),MA30);8 A) C- P+ l* q! W; S4 y
L1:=MIN(MIN(MA5,MA10),MA30);8 ~: R' S, s- r# v" v+ F8 k" g
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);/ u# [. N; S* B/ {' l" _% `
A2:="MACD.MACD"(26,12,9);
7 a1 e4 `" p3 j9 u. g3 LA1:=C/REF(C,1)REF(A2,1) ;
( }% g D4 z/ zA3:=COUNT(DDX>0.045,10)>2;
+ C3 S0 x& v5 b, p弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;& k' I6 l- k2 F( g n5 ^
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;0 X H$ G6 s) m7 k+ o
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;# g& o; I g9 l
{资金}5 C: @! Q) @( }8 |
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}
, u3 z/ S8 g W6 H$ F: e{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}1 ]/ T7 z c5 A" k2 u% ~6 v0 u
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;
* D# _1 B9 b! v' |6 J+ J& o1 Q" Q9 E8 qDdmrs:=sum(Ddmr,0);
7 q+ w- n# v @6 WChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;1 H6 y7 }6 i; v6 l; J* ]; D0 a
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;9 J# L0 S9 D1 ^
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;: e6 c( d+ N9 b. [) L/ k$ Z/ g
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
4 w; C- J' Z. }- zChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;9 `8 ~( j0 G$ j" n7 Y+ i
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
3 k3 ^5 c, ^& g3 E: m# F8 oZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
5 z, B1 s# S) z% x6 F, x* T9 j6 DXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;4 j4 T- L/ S! [" j
散资:=(xhb-xhs)/10000;6 Z, q7 _* {/ h
中资:=(zhb-zhs)/10000;
5 ^1 y. m% y& D/ C( _9 {大资:=(dhb-dhs)/10000;( L& ?, R9 J, `. p2 t
超资:=(chb-chs)/10000;
+ U6 G! V+ j8 D0 `" m% O K3 g超资增仓:=超资;5 M8 U! \ t5 l" L2 T! X
大资增仓:=大资;
6 B& {* c D% g9 o中资增仓:=中资;
) x$ z+ }2 q3 x" J散资增仓:=散资;% n) q, h! q2 L6 p: r8 L+ C
BBD净额:=(超资+大资);
4 L6 t3 D ^# j0 {! [1 RDRAWTEXTREL(5,85,''BBD (万):''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
5 n& e t7 R. [+ ]0 C1 F: vDRAWTEXTREL(5,155,''超资(万):''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
5 s8 A0 n0 Z X8 m) HDRAWTEXTREL(5,225,''大资(万):''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;' x( f* U% E$ ]& E! {
DRAWTEXTREL(5,295,''中资(万):''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;5 g! W- r+ l2 X. g! x7 t
DRAWTEXTREL(5,365,''散资(万):''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
; l0 M0 [" ?4 @. }/ }1 c' RDRAWRECTABS(0,118,270,0,1),COLOR00FF00;) }+ d& E D' `% d; \! ~3 `
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);" R! k0 J. f9 W' x3 o+ N0 [ p
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);5 X# o' d7 I5 r2 f& N
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);/ A1 y% [# W1 |& l
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
. y( ^, |( A3 W8 L3 \) eddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
% _: W$ s- n [# ?, ?# Y; \: e$ {ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);& W- X4 Z% B/ o/ K. n6 d
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
2 C: K: @4 z! \, J- ozdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
( f' h5 }" t, e4 U ~6 }/ B( c3 ~ `sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);% R- K0 o6 x# |
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
6 x/ `+ w: W9 m: W# B& p6 \: ftdj:=tdn-tdm;
7 K% I2 K1 `+ Nddj:=ddn-ddm;
8 t7 a# k+ X+ U# J6 c. Szdj:=zdn-zdm;/ P% H; w2 h; c1 B7 g
sdj:=sdn-sdm;$ a$ _5 |3 V6 z/ T1 [. J7 z& x% k( S
zlj:=zln-zlm;
2 ~6 T7 ?/ b) jDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;2 h) z! @% L u* ^1 h; {! T$ S3 d
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;' ^4 ]' q- i) H: B# e
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
% l4 g) J( y0 h- y- G' oDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
. H6 V3 W# e! V8 a% pDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;+ N2 ]6 g9 J0 u5 t" ^! {
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;" }0 i' E. X$ ~2 f9 K
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;! w3 L1 _" K2 d( A# H3 u1 g( `
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
- J! T. o3 d1 m! T; p' kDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
0 ~ b5 d4 }& N% ~! s7 _' IDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
8 y5 k) H3 D! @5 W/ QDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
' _# m y5 j. ?. A3 V5 S0 d" uDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;2 g) l2 P `. V) f1 Z4 _
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;% {& n" x1 V! P- G, ~8 X; \
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |