|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
, G) M/ n; _8 y户均持股:=(FINANCE2(37)/帐户总数)*10000; @, L, X. f$ x6 z7 e
ZH3:=ref(帐户总数,3);7 W4 } w6 [/ Z; A0 V
HJ3:=ref(户均持股,3);/ i2 u- l& ?8 Q/ S
主动率:="卫东.主动率#day";
+ r; d# t' d! b9 L. G单数比:="卫东.单数比#day";
- m3 Q+ I B; g5 J通吃率:="卫东.通吃率#day";4 v# U* ]: z0 j( Z3 b9 X8 K
DRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;/ k# f) l C2 E& a7 b
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;( B8 ^; k0 N; i. p& X7 I& w
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;
. Z! Y2 M: Y. L f) ~5 QDRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;" g- F$ Y5 d/ s6 O. H8 Z
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;1 m3 t( f: b$ ]
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;& j# q( o& I; r3 H$ o9 @ e
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
2 B" N# o9 N" z3 V9 W) WDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
2 ?3 h( \( M/ X2 W5 d, J连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;, U }( }; x- S
连绿:LAST(CLOSE=REF(MA5,1);
& w% p A, F7 J1 ]0 M: }H1:=MAX(MAX(MA5,MA10),MA30);
) t- `1 I: T( F' Q" L) D5 \L1:=MIN(MIN(MA5,MA10),MA30);8 }, p% [4 B7 I) s
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);1 ?9 _4 z, }7 v0 j: \2 t) R
A2:="MACD.MACD"(26,12,9);
; J. B" @. f) {8 @. t5 dA1:=C/REF(C,1)REF(A2,1) ;
; R, v( n5 c; h7 T- w; w/ QA3:=COUNT(DDX>0.045,10)>2;
; T& Z! p" X5 w% q2 I. l; S弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;
7 A M1 b& f/ v+ z+ qDRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;, t) c. K! g, B+ K
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
- `' m9 q2 a; `/ c4 _{资金}$ ^% H' C2 r. ?. W' @, F: N
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}) D& L$ {- H$ e9 O# M6 X$ V% ?
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}* `. w! T1 Z1 F
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;3 i* y+ Z. l8 b0 d& u
Ddmrs:=sum(Ddmr,0);& f0 u) Z E9 }$ q
Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;4 Q/ _6 }4 n& e* F0 }4 S
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;9 b2 E% ]% Z Y" m% _0 @/ z
Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;. [% B _8 U5 F) H& c8 o9 q
Xhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;8 b& C; b3 M8 r6 |# x
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;
1 R6 b6 J+ i) j( j# jDhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
+ r7 p+ i- x B) ?2 `7 H$ DZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
2 A+ k: u7 D) E0 G2 G \Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;
! K9 R' b! A- h2 [" `6 j6 s1 `散资:=(xhb-xhs)/10000;
! ?% b4 @# h& u7 c b+ e8 V中资:=(zhb-zhs)/10000;
1 D* N! _4 `* G8 o* h大资:=(dhb-dhs)/10000;4 i- I( A" O3 G% f5 I8 D, {
超资:=(chb-chs)/10000;
7 c! H3 ?- E3 v超资增仓:=超资;
; P) o1 I7 }0 s+ A大资增仓:=大资;) e# G4 Z7 v7 _3 r: o4 s7 Q; s1 E
中资增仓:=中资;; g0 ^( e9 L9 O# x p! P C: J
散资增仓:=散资;
0 ^( [' I6 ^2 c6 X; TBBD净额:=(超资+大资);
Z6 k+ h. K" S1 X+ O, L/ r- c/ HDRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;
5 C* B+ c6 X9 CDRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;0 K2 ~/ Z4 q0 s& f( o( W1 w4 `* E
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;
1 `; N" C; E4 ]DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
( q7 c! _( w) V& c9 U) U2 fDRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;5 z0 _' h( g' A% r/ K
DRAWRECTABS(0,118,270,0,1),COLOR00FF00;
2 i/ l. c1 _! `" L/ W" Dzln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
) X( \; D* O8 ]( z9 G' vzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);- m+ Q' g0 r7 F0 y3 V; i
tdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);: H: h, X% M3 J& C* Y
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
2 A" t: m' W, M6 Bddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);
|/ c9 J, W+ nddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);
( v: U0 Y$ Z: B+ d) B( f" x4 Bzdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);3 i0 E% p& e2 f* R. n
zdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);2 U6 A: O% c- @6 [! a3 V
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);
+ P8 t- ]3 o% z+ Bsdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);6 k7 i3 S! C1 b' Y, U
tdj:=tdn-tdm;$ F4 Q* r" ]# w% y
ddj:=ddn-ddm;
/ R8 J N+ s5 P3 dzdj:=zdn-zdm;
+ a' T& l' d) q! ?4 k+ Isdj:=sdn-sdm;
" C' g) `! D$ J9 ~2 Y" azlj:=zln-zlm;% S- m- d4 c9 |4 K. }! P
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;; j. b; m5 f, E+ V* L+ Y* [
DRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
& c0 K( Q5 r# ?8 @% L; f. N2 WDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
1 W( Q5 k0 P/ G% |- CDRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
y( h- e2 N, CDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
( O% J; h% \6 jDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;- q* j L; c% N$ h: G
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;( r- t' S0 {: ?; N+ y$ I
DRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;, d f# Z7 w+ w2 C5 Z' @* N
DRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;8 J: g9 {7 t6 k: E. ]/ I
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
, G" n( Q& G5 m9 _DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
5 _5 Z5 E$ S' i$ y* ?. _ C3 QDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;: c u2 f6 \, v4 [
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;/ E( h; }3 K! J( G& I- i
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07