|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
1 q' v4 A3 f+ B6 x# q K* Q户均持股:=(FINANCE2(37)/帐户总数)*10000;5 j1 z8 g2 V( y, \ b- o
ZH3:=ref(帐户总数,3);% L$ O# F( X; a* h; C% l
HJ3:=ref(户均持股,3);- G V% Z# s C9 |2 ]" [" E
主动率:="卫东.主动率#day";1 @0 a5 I3 r8 F% N/ R0 d4 O1 B8 h
单数比:="卫东.单数比#day";
/ [8 N: Y4 A/ e7 b( B. S" J9 @通吃率:="卫东.通吃率#day";
% q2 z6 }! L, T! p3 fDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
* P1 [2 Y) Q6 t0 H5 G& DDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;7 Y- q: C' u+ E- H# S/ W
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
7 g, s7 y0 v/ }: {DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
U6 W2 c% m- L3 [! O1 nDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;
c+ X# E; ]* P6 q2 B8 J5 ]DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
+ I0 q8 |( ^3 p4 C+ K. o! _DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
- f: E$ b% Q4 u$ l1 GDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;0 ]; _( W+ j& X5 G7 Q. V; v, s" q
连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;8 s1 h9 p9 A7 J6 q' F4 Q
连绿:LAST(CLOSE=REF(MA5,1);
& c5 W2 ~) N9 [: ~7 UH1:=MAX(MAX(MA5,MA10),MA30);
9 j7 r2 o# D! T dL1:=MIN(MIN(MA5,MA10),MA30);& Y6 }# P* ?8 j( |/ V3 s; A# S
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);) y7 c3 n* ~* R, j- B
A2:="MACD.MACD"(26,12,9);
; V0 }5 ~0 m8 y: h/ Z( D) KA1:=C/REF(C,1)REF(A2,1) ;
5 m- E7 g8 J0 B6 ]+ E U2 XA3:=COUNT(DDX>0.045,10)>2;' w2 D( H4 f" M# r0 _
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
! B2 [1 N7 `- K( Y+ VDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;
, y8 E, L9 c3 A1 R0 I& e7 b+ c; p+ U+ CDRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;; b0 S5 o$ b9 g" F
{资金}
' a$ k7 y$ M; H' Y8 c+ ATODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}! p* b% L3 w, R0 A+ O9 O
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
( _& R! n% b. P' A: F4 v5 w6 b% LDdmr:=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;8 p5 }$ Y7 M/ m8 o' b
Ddmrs:=sum(Ddmr,0);- r2 Q* d, o( f/ J
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;$ M7 X5 w% r8 z& {3 G" z3 C$ s5 ], t
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
- _3 \" C9 T3 H4 T! M' RZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;' f7 w( t% b2 G I# @
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
/ H2 ~* |0 b: N$ i/ HChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;- x. m* q. U2 W7 P6 z9 l4 n8 O) I
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;4 T" ]) @# n: q7 s
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
1 C& h3 X- |( U8 j, B/ IXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;8 G+ f# B2 y' W: ^+ f1 H/ I
散资:=(xhb-xhs)/10000;9 [: j5 Z9 ~5 n- m
中资:=(zhb-zhs)/10000;; G! p& q/ T" A! o" N# Z# j
大资:=(dhb-dhs)/10000;
7 j. N. s0 k$ q( q5 W* J超资:=(chb-chs)/10000;" l- {# \5 I$ q
超资增仓:=超资;
1 A- L# V0 t( V1 y+ u大资增仓:=大资;9 Z. ~8 `/ x5 ?# u% [* f0 V! g
中资增仓:=中资;* ^$ Q: W: D4 k7 ~4 h- B* B
散资增仓:=散资;
7 ~7 E( @( z8 Z5 O; L' L- hBBD净额:=(超资+大资);
R+ p, H9 t, w/ UDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
9 c) i% W- m& t% uDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
" T3 ?, K; q& ?8 g9 h1 hDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
$ y/ y4 o* x0 {/ Y/ NDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;) u4 ?6 C8 ~1 D; B
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;$ o, G7 a) z, ~
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
q. I) J% s9 q8 }3 gzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
% p0 k* a3 S$ Dzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
, F! W' j; \" E+ J* Z6 Itdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
0 M: p5 G) @+ r0 U# ^, jtdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);7 S1 I/ B0 C- S- }0 t' C! @: w# z
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
2 m: Q4 ? M4 v; t- S* _ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);$ u/ S9 j7 e& L7 ~
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
$ q3 O6 K2 J, K" j% dzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
5 l8 l" A- g3 w5 J4 Qsdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
/ G% F) i% f/ W$ r; xsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
" I+ b7 j, x( S% Q3 i/ M# j2 l3 stdj:=tdn-tdm;
& ~0 ] x) y6 p* Dddj:=ddn-ddm;+ u! x6 P w W& J9 }7 _
zdj:=zdn-zdm;8 ^. p$ }, G. u; D5 _1 D
sdj:=sdn-sdm;
' m& A; H8 n& E8 ]zlj:=zln-zlm;
}- N8 q& T# ?- ~2 [2 k1 wDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;2 m2 ~% Z+ G( r7 W1 e) p
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;7 X d* D/ b+ H. y X8 X2 l
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
5 `1 i) w Z# [ t7 `DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;" u* D* S1 X( P$ A$ D$ ?* Y( n
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
* q: ~& @5 n: X3 iDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;% V2 \( u2 ~7 j9 h8 m% m) y
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;: ~! u/ P0 b+ o7 t1 ^5 n* {
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;: e6 P6 s4 z6 {8 }* z+ M* O& k
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;3 t* x' d: k/ z2 O+ d: k% ^7 Y
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
5 Y. G9 ?5 @# D8 B/ B4 MDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;" F3 M8 V+ H7 m& q+ o
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
, ^; e$ |2 |: t7 [7 m" b B# l+ wDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;% ~% q0 w2 e5 `3 W& e5 I) z
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07