|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;7 a) w! C- e% x$ D1 q% I
户均持股:=(FINANCE2(37)/帐户总数)*10000;
& F4 d' G- g* E# X* B% QZH3:=ref(帐户总数,3);3 f; ]: @* o O' O& S( r" M/ M% w
HJ3:=ref(户均持股,3);* u* b+ M6 d& ~9 Y; [7 r0 R
主动率:="卫东.主动率#day";
0 m9 n7 P/ ^& R; h& n4 U单数比:="卫东.单数比#day";
9 B1 C7 p+ U |# V通吃率:="卫东.通吃率#day";2 j) |, n9 V6 |0 s; Q
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
' x6 C7 l8 B, g* hDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;- S$ X3 t9 e1 P" U7 w
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;9 Q. C+ J; N. j0 n: ~+ m
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
- \2 @2 O. P4 g* y# A& t! fDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;9 J6 A0 t8 v) k% m5 T
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;$ Q @3 B5 D( L$ _6 U5 [
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
, _2 P+ m4 W# H8 w; n0 W6 v6 YDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
: I K4 y3 z7 }7 O8 [连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
/ Y) z* X3 r# d, U连绿:LAST(CLOSE=REF(MA5,1);6 E& c; h4 z8 s9 ?* r3 v1 g
H1:=MAX(MAX(MA5,MA10),MA30);$ f9 q: k* {3 J( b. w1 E
L1:=MIN(MIN(MA5,MA10),MA30);* Z: I4 m6 `% K' v
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);1 U; j/ V1 X1 f+ P% j! F
A2:="MACD.MACD"(26,12,9);
, K8 U- ^; F* {A1:=C/REF(C,1)REF(A2,1) ;
! @; M. a9 [8 |A3:=COUNT(DDX>0.045,10)>2;
1 d# N- L) U$ m& X! }$ h弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
' |7 F! B# J% |- n$ LDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;9 V- ?% e6 ^4 |8 b0 R) E6 d
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;/ K w ]5 h3 f9 E9 ^# U
{资金}
4 w4 w1 M" |7 D- b5 y* `* vTODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}* f5 D- e1 F! t J3 T8 h3 g, |% @1 m
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
1 B8 J0 Q3 L. o; C; `1 K" \1 w( YDdmr:=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;5 L- F- b) H$ G5 m% x3 ` {7 o$ Z
Ddmrs:=sum(Ddmr,0);8 ~1 \( K: o, k- U# R# K3 f
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
, }% }! B" ]$ Z$ `2 IDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
5 ~! G; n4 L& M# ^: r+ m! B5 ~* I( AZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;) I. h$ `' Y" A' f% ~1 g2 f
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;% R) u" F/ [& C! b
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
: Z ?$ w# M5 D. c' ^8 U8 K0 qDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;' t: d/ q) R* r5 c- @( o
Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;/ t! p& m+ v( g7 h* f
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;. {: E. L& ^' i5 K! G) l
散资:=(xhb-xhs)/10000;
! V& H) R0 a$ A: I1 z- M中资:=(zhb-zhs)/10000;. P" o, {; Z% }. C; r" H# W8 T: z R
大资:=(dhb-dhs)/10000;
. L8 d7 a. q- B# j. ~6 ?$ b超资:=(chb-chs)/10000;
4 B' B6 W6 j0 V超资增仓:=超资;
( s! [. l- f6 U1 v. W, T6 t$ I大资增仓:=大资;
) k% o; T& _1 V1 r# V4 ?, j6 d中资增仓:=中资;( n% k1 t2 N( x% b
散资增仓:=散资;
~/ b2 C( j1 u* l- {BBD净额:=(超资+大资);
: J* r6 q# U4 d a9 ]6 ZDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
! K2 {9 [& h/ `! s; I) SDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;
; p4 |& w# o+ f: SDRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
4 C8 N. E i; w5 [( N9 WDRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
: w- f I+ J$ h' l7 hDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;: E5 p8 y' j( Q8 j6 K
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
. [& F* g; T e5 V# |zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);# i# |& Z% R! E' ^7 W
zlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
$ N/ l: |5 p) t3 J: v4 Ytdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
, u# |8 q. }+ x- A% }tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);; v$ t4 V2 ^7 }: G/ P& c
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);3 d( y4 T: E1 d9 [
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
* [9 M1 Q) a/ J9 Q5 \/ [! X6 t$ kzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
) r K% P& @) Jzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
: i" l5 I# I2 C1 Msdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);6 ]5 h9 D7 V' g7 _/ m1 {
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
0 \& A: \+ U& c6 A) Qtdj:=tdn-tdm;
& f7 N0 @; n" R. O$ A3 w% Qddj:=ddn-ddm;
0 m3 I9 c4 K8 n* Wzdj:=zdn-zdm;2 @* @% d1 i! z/ {: K
sdj:=sdn-sdm;
; {' G1 k1 G- W( h) ~3 G1 c* [zlj:=zln-zlm;" v( h) T* Y$ c& M+ W! P* [
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;- E3 h) z5 |! K; V( A- ~7 w
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;. q2 E$ O# e4 P: l/ {' m
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
) A( J z9 P* a/ h$ ^DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;/ f' w: t! m9 q* `# h
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
$ K9 K( o5 y, `" u8 u9 _$ xDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;+ ~( J3 A9 [* b3 v1 B
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
2 W1 H: z" C: ~9 D5 ~/ CDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;! y2 H x' X0 T
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;7 I/ z7 S( \! Y2 s3 `# c
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
; T# G+ m" U+ }- |; L6 dDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
% I8 g' N% i" f" ZDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;) j$ u0 y8 j8 @! {* i7 @) v
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;) Y' [: s6 E" t+ Z1 g* S
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07