|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;/ D8 W. c) b7 }& |7 a# V
户均持股:=(FINANCE2(37)/帐户总数)*10000;
% h( u0 Q, I7 U0 BZH3:=ref(帐户总数,3);# }8 j' h; \# H; B0 R' L3 M9 w
HJ3:=ref(户均持股,3);
; _/ O9 G" F% F* [0 L m- f$ A( E主动率:="卫东.主动率#day";$ N. I. p* T8 V
单数比:="卫东.单数比#day";
^: v/ m6 C* R. G, ?通吃率:="卫东.通吃率#day";
3 \2 R6 L% b! M8 O) a; r! C) ~DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
! r# ?( U) W0 F: j. QDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
' n' } c0 g5 u2 n: T. o- Z; {! cDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;" P, \! e5 a4 Y; f# T$ \2 G. C
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;; {) k u! \2 n* }* R W$ O
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;# P; }- h/ k& j
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;" K9 ?0 E- v' [- j, L- O
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
8 ]. u2 R$ r* G8 bDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
3 d) r! G, T( R5 r5 e9 ~: j8 l' P连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
$ D; W8 W+ n( {+ J7 E连绿:LAST(CLOSE=REF(MA5,1);
4 [" a# D K2 M8 xH1:=MAX(MAX(MA5,MA10),MA30);
* |3 E. a( @6 N8 nL1:=MIN(MIN(MA5,MA10),MA30);
7 P! H" ^* x4 c3 U9 \DRAWTEXT(H10 AND DDY>0) OR DDZ>400);5 B* A* `- k9 \6 W- T
A2:="MACD.MACD"(26,12,9);
& O1 c. O; X! ]$ a/ ?A1:=C/REF(C,1)REF(A2,1) ;6 W& N1 `( t' u, ?& |5 E% s5 \0 [2 x
A3:=COUNT(DDX>0.045,10)>2;4 Q. ^8 Y6 c- j
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
/ Q1 d; c! U# ~% \! nDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;7 m* [0 Q! m$ j! e5 b! |. Q. N I
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
! G3 M4 b3 [3 ?: U0 s{资金}
1 h; M3 I- G* K: LTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}* g3 E; C8 U3 P) [, n, i1 f
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}6 T, D# x+ T, }& n6 J
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;
$ C$ u" {1 p0 d! wDdmrs:=sum(Ddmr,0);4 c1 I: D" `0 W0 j0 T
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
* ~% W, p* C& W4 DDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
z# H' |) ?2 @- J. dZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
1 x2 k( ^2 K2 ]8 U& W% t% C5 TXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;" Q3 w9 W" Y4 D' R% g% z+ ]
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;% a, Q3 b4 q) M! ` J* W
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
" f# T" ^6 M* X5 x! V1 R3 aZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;2 N/ o6 f& {7 Z- F& R
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
, Y/ x/ l b- k* g$ r' M散资:=(xhb-xhs)/10000;
. z# n# Y0 G: a; f& G% E1 ~, Q2 v中资:=(zhb-zhs)/10000;9 A6 E- h2 c2 U" M' G
大资:=(dhb-dhs)/10000;# b% Q: G a, G
超资:=(chb-chs)/10000;
$ F. C5 v5 p& W超资增仓:=超资;
) w/ t, A& Z) p5 O7 S! o大资增仓:=大资;$ `7 ]6 K0 W( c$ l
中资增仓:=中资;1 z2 I. }4 Y9 r2 O/ o' Q
散资增仓:=散资;
( C0 C$ ~9 G7 Z3 ]$ n, {" wBBD净额:=(超资+大资);7 ~# d. J& ~* ^$ `; l1 U
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;% R- L: C( Q$ h0 W/ @7 r- q; E h
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
! @: [/ o5 c, r+ x& |DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;7 W$ }- {: {! w( w) [: J
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
- a9 c: K( |5 Q) |) n S8 |DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
& O! P3 _, ^$ e# \, wDRAWRECTABS(0,118,270,0,1),COLOR00FF00;1 u4 }* M, Q' N" Z0 o
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
: K0 f7 p) L; ^, uzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);8 }4 l2 M" G$ s+ _- v; Q* m
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
8 {1 H e5 }+ {. F) @; mtdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
/ F, y2 D! U& w) Hddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
6 j" O+ L5 _8 Z. D( \' P: v, Uddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);: x3 A# l$ @ [; F: j* r: M* T& L5 V
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
% F7 ~3 H& v4 g5 H2 W! Szdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);# p2 k# j. N! a) p3 p2 [) E
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);& J* `0 M7 U5 U+ v- {
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);" H7 l: a$ p, N5 ~; L1 D
tdj:=tdn-tdm;
. @/ w7 n8 P6 @# nddj:=ddn-ddm;& z3 w+ } m3 v6 {
zdj:=zdn-zdm;
# Y7 I! l! @& i" h4 Tsdj:=sdn-sdm;: @, G8 S, v! Q' [2 W
zlj:=zln-zlm;
) s, T/ p8 n# W: o+ ADRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
0 F/ \( ]8 q3 ~/ W/ Y# \% _/ A. EDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
2 p P) e, m3 X9 \* t2 A4 WDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
+ w [. a7 ]! M; {5 z% bDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
W5 Q* t) T: e4 }9 k. eDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
2 v+ Y1 S! N# E ]+ `DRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;- g* L0 @( x3 `7 W) O; e9 r6 G3 c
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;1 D5 P ]$ g) d3 o
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;5 f$ C( |" d' d7 v
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
2 d6 n. E ~0 q! o1 n% eDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;+ U$ N" E) Z% z. S4 C: m
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;8 k8 p) O( A8 ~& p3 k, A) b
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
& u: r, U3 p6 t; n6 sDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;) L0 j% T6 ]1 B. G5 C0 G s# P( Y
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07