|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;. c8 j `1 }% _$ M7 G: J
户均持股:=(FINANCE2(37)/帐户总数)*10000;
3 z, S9 B5 N! P- qZH3:=ref(帐户总数,3);- x L: m6 A4 F
HJ3:=ref(户均持股,3);0 U; Q- v2 h& P& e" Y
主动率:="卫东.主动率#day";. k6 J; o% A5 A+ q
单数比:="卫东.单数比#day";
8 D9 k8 r0 g- o7 J: `1 l通吃率:="卫东.通吃率#day";
) _! T. O/ l/ Y# lDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;. ?$ x V1 S. a
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;7 E1 U0 X4 u4 p3 P6 E5 ~+ X
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
4 q$ t+ s4 q% _4 n6 DDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
) W& S) V/ D/ H; G+ DDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;5 a) Y. y- n+ w) s7 R
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;; Z. H2 ^: V* M3 ?2 U9 N2 F6 J
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
* x6 Y [5 T7 t) _2 J( g/ }DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;" }0 M, }. {; f% b/ u) N
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
8 K9 k. p9 [ T$ ^连绿:LAST(CLOSE=REF(MA5,1);/ P( i3 J& c+ _5 h
H1:=MAX(MAX(MA5,MA10),MA30);
& ~6 z7 b0 X5 U, a& t+ yL1:=MIN(MIN(MA5,MA10),MA30);
3 x$ V/ H+ ?( N" `7 p; L& G, wDRAWTEXT(H10 AND DDY>0) OR DDZ>400);
$ ^ b( p9 D2 H9 \5 lA2:="MACD.MACD"(26,12,9);
+ |/ W4 r. A b) D FA1:=C/REF(C,1)REF(A2,1) ;
6 z, O$ H+ ~# b, \' MA3:=COUNT(DDX>0.045,10)>2;
2 w' z _- H# W& C* g8 n( C* `2 \弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;2 {& F. G9 G5 M
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;% a. t. ?3 L& m! n2 ` h, q
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
& j2 y3 F7 X; _8 B2 O- n: ]5 g{资金}& `% \; g$ Z! }7 J8 ^8 `
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}( }# R% U T, \4 h: P) o5 C! x
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}4 Y! R, ]. \3 y; B# t' R
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- E4 g4 V' {) \" d$ K
Ddmrs:=sum(Ddmr,0);4 P' Q. H8 m# s% `* N& v; {
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;) Y& A/ a9 m4 p
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;4 F! d/ T- |+ r
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
1 ~8 t4 H! G( @- |Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;) @8 V1 q. I/ j- Q" U' _: ?! X# `
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
' J& d; Z. Y4 n; [4 |Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;' ^2 {5 @- _4 F" M
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;% j4 L; D, F [
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;: t+ k7 @3 t) f# J2 e5 `# Y
散资:=(xhb-xhs)/10000; s i' k/ C9 [
中资:=(zhb-zhs)/10000;/ r8 {/ Y, k4 N3 G% s( _, n
大资:=(dhb-dhs)/10000;: z$ }9 b6 z% k- T# B
超资:=(chb-chs)/10000;
) y& n: j: D4 y9 E超资增仓:=超资;
0 Q% c" a& u3 L n( {7 r大资增仓:=大资;8 }4 ?9 a/ |* j ~2 }
中资增仓:=中资;
. n4 S1 e+ f. p" a散资增仓:=散资;
; _6 m5 O$ o5 k9 U& b9 G8 jBBD净额:=(超资+大资);% \, Z/ q" X* }8 U ? O; z- S+ w
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
) H/ {) i/ B3 A. _" uDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
5 s* r! i6 t. E! E6 H( A0 `1 y3 }& g8 w% aDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
+ D; b+ K7 \$ `% O' c4 SDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
2 K' J. X* N( F1 r0 K K. ODRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF; _3 |! M! Z& N2 @: V5 e) U7 l
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;4 [6 A; g. t4 G _
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);. k8 d- M' [+ m/ C5 k4 |" |
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);% }$ \. ^( R9 t" |) P' f; L
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);9 w7 J6 h n- m; }
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);% p5 H0 }& n9 n+ T- R! n* }
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
7 _2 J- p/ E! Z& A% P3 }ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);- Q, v; ^( j. Q0 M
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
?5 S; \, ?' @zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);+ B$ K- W7 N" R3 g
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
4 ]; G6 t6 b* j5 g3 u Y9 Nsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);" f3 k! d4 R# ^4 I q( t, T. a
tdj:=tdn-tdm;
% S) b8 T* W9 M4 ]ddj:=ddn-ddm;, H2 i. C; Q8 y
zdj:=zdn-zdm;3 \3 |) @& c* _
sdj:=sdn-sdm;, y- O$ P2 j. ~4 R; \4 W
zlj:=zln-zlm;3 S8 w8 y) v9 e" J8 v* g/ B
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;2 e1 W: l( f4 M
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;- ]' d* B3 ] E/ C3 D2 ?+ M
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;5 y: f# z2 b% m4 T
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
* |' z8 D5 E G4 ?6 bDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;; P* c8 ^- G5 Y' [
DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;
, T0 b' f# S3 }0 s4 j2 ^DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
# G: J6 w& @) j D9 {( P* VDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
1 O4 J |( e- i# w* |9 K6 xDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
4 l7 I4 E9 A/ F9 tDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;1 [' \, U( d0 q" O9 P8 o& m
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
. |6 ~* o9 p# F* U+ j2 l9 s jDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;" h3 P0 |& B; S, w
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;
0 a* J! b& q* y5 n5 \DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07