|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
( X0 S2 S# A4 t9 w; V! K户均持股:=(FINANCE2(37)/帐户总数)*10000;5 h) h8 t2 c. |- i( P# J
ZH3:=ref(帐户总数,3);
: B( s) Y& q4 k' ^HJ3:=ref(户均持股,3);
0 r! A& R- y# K0 Q( I主动率:="卫东.主动率#day";
4 N) Y. [1 r b5 f, `单数比:="卫东.单数比#day";) J9 L+ G1 F) S
通吃率:="卫东.通吃率#day";
7 _5 M* ]$ O: Z) Z# N; M( [ FDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;0 r8 f" t+ C4 s- n8 \4 C/ m
DRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;* t3 d9 @" }5 |, N% [
DRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF; J+ {" n8 `5 [ m6 |8 M0 Y
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;
) }+ h1 i- a- EDRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;1 ~ \6 N# k& O c/ y; P4 w
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;/ c; {: W# X7 g1 K
DRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;
0 ~) Z' m# P! i, g) @6 ?, ?' X! f6 tDRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
2 P* N$ b* C4 \# U9 L0 e% h连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;
, C* ~9 C7 p% e% k, a连绿:LAST(CLOSE=REF(MA5,1);
5 N# H. H) O: {4 T) X! @H1:=MAX(MAX(MA5,MA10),MA30);
* m z) q* ]5 v. a0 R2 r6 OL1:=MIN(MIN(MA5,MA10),MA30); C. a4 y* K) V& W# Q8 P
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);+ H4 H! k, n6 H; M. g
A2:="MACD.MACD"(26,12,9);6 i" H) l( k9 E: s% y
A1:=C/REF(C,1)REF(A2,1) ;9 b) q1 L5 z+ Y x. @8 R- P
A3:=COUNT(DDX>0.045,10)>2;0 U9 c6 n) G0 n
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;; @$ `) L8 S, A" }/ M" N$ ?, r: y. x
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;) n0 n% @. B# S# P; u) E4 y) {
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
: x5 T( R1 K1 {1 ~5 t2 V{资金}) Q+ n7 c) _# Q& g1 M
TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}# s* j; x2 f# Y/ I4 b
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}% B. D E# Q( l
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;: x! o$ N- F3 K. W$ x
Ddmrs:=sum(Ddmr,0);
4 E; S; M9 T2 h' v! p1 G6 x) tChb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;
- L2 D0 _9 r7 ^9 ]/ e1 M' XDhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
0 Z+ a8 ?! I' f" GZhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
$ {8 T3 _" D* t1 {4 w* S9 lXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;
6 q( q9 H" t2 WChs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT; n4 @. O4 U8 k8 \" A
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
( d/ \9 E0 Y; x: _Zhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;) z; M) }' g9 \2 x. b" {
Xhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;, v2 F( g. @. Q' S% f. |0 H
散资:=(xhb-xhs)/10000;
/ V4 o- o* A$ R$ m& W中资:=(zhb-zhs)/10000;9 f' f% `- o* \; p
大资:=(dhb-dhs)/10000;5 y P0 L: U8 I. V$ w+ W r+ i
超资:=(chb-chs)/10000;
4 Q1 j. e* K# R, p2 c超资增仓:=超资;
5 d& z: q& Q* z& l; P大资增仓:=大资;
! I! ?/ {% I _! e' a中资增仓:=中资;
% A7 S. K+ ]8 e9 f! a$ c散资增仓:=散资;
: e _6 H' Y) w+ iBBD净额:=(超资+大资);+ i: l8 Z3 k1 o. u: u0 y
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;; W; v5 q% |* ~1 d: y9 S7 R
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;3 S6 j8 A% {. x. {- U
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;6 Y' `1 B/ q/ _& J
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;: L+ Z& u9 {$ W% A& z
DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
, _/ ^% \+ F1 nDRAWRECTABS(0,118,270,0,1),COLOR00FF00;; w/ i7 k" K6 V% B0 e( D( F
zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
0 a: }9 Z1 P) S# n6 wzlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
$ ?# B, e8 q5 \2 K& o @5 ptdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);
& Q( c( \, e# ]# B$ |tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);
% D' ]" C1 {8 F5 R3 ~9 S8 zddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);( a$ P0 i1 E) V
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);' q' I" s/ C; i( v! o3 ^
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
: M% J# V! M: b- C5 N- Uzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);
' w8 ]4 P( H' e# c* d, b8 usdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);0 ?# z+ {3 ?4 }# R) L. z
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);
7 k7 d; q8 F' {/ O+ Y8 Btdj:=tdn-tdm;
3 e$ x' S7 f6 xddj:=ddn-ddm;
9 G: E6 o& x! w: e1 Z# mzdj:=zdn-zdm;
$ W5 c$ i% V+ J' ]7 c3 ]+ Asdj:=sdn-sdm;
$ @* T, b% N# Q0 ]2 G Hzlj:=zln-zlm;
; _9 _1 V$ N0 E' Z* D! Y# hDRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
0 ^) e9 P5 f' T$ D1 {$ s: p, FDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;
( }! F: W7 ]. b, a3 W8 aDRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;1 f5 g& U- B/ }8 l
DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;" ]# D- M% \, o! Y! W
DRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
+ W" b8 S1 I1 R$ PDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;) \, z4 l4 a4 j
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
3 O6 _' F: Z7 E0 c3 G% TDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
8 h0 G2 ]! J W3 c) GDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;4 n3 o2 N) t K* ]
DRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;* r1 m, G! m7 `% `3 k+ Y5 C# L
DRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;% R$ C2 Q; I& M K0 M& t/ O
DRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;9 n' n9 W: e: e6 {8 d
DRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;+ B% r% F! F7 o7 p3 [8 ?
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07