|
帐户总数:extradata(''散户线''),linethick0,PRECIS0;
# W: F8 }" j0 s! \& N户均持股:=(FINANCE2(37)/帐户总数)*10000;
. M0 d2 }. p8 T* C( _3 `ZH3:=ref(帐户总数,3);# H+ A) s2 d4 a8 b+ R: G: E5 F: t3 `
HJ3:=ref(户均持股,3);
2 D& J1 u/ G+ k: ^" M6 G( m- G主动率:="卫东.主动率#day";
1 a3 r& X( [' [" R, b( c单数比:="卫东.单数比#day";
( M. S) C8 {3 Q" i2 t+ B, l通吃率:="卫东.通吃率#day";
4 ?- z/ `, P ?# H: Z. cDRAWTEXTREL(5,13,''帐户总数(户)：''+NUMTOSTRN(帐户总数,0)),Color0000FF;
- q5 M3 r( W6 S7 T! E0 o$ HDRAWTEXTREL(139,13,''户均持股(股)：''+NUMTOSTRN(户均持股,0)),Color0000FF;
+ y5 T7 A& w* ~- p9 ]4 oDRAWTEXTREL(290,13,''上涨家数：''+"卫东.上涨家数#day"+''家''),COLOR0000FF;* b1 q7 a: z# J0 K* t
DRAWTEXTREL(390,13,''平盘家数：''+"卫东.平盘家数#day"+''家''),COLORFFFFFF;" v# @4 M0 ]/ Z4 N) i
DRAWTEXTREL(490,13,''下跌家数：''+"卫东.下跌家数#day"+''家''),COLOR00FF00;% C: d! A$ ?- L
DRAWTEXTREL(590,13,''主动率：''+NUMTOSTRN(主动率,2)+''%''),COLOR0033FF;
" [- m# ~$ R) n, WDRAWTEXTREL(690,13,''单数比：''+NUMTOSTRN(单数比,2)+''%''),COLOR00FF00;- k0 ]& }5 t: |( c, Y1 `# S* t w
DRAWTEXTREL(790,13,''通吃率：''+NUMTOSTRN(通吃率,2)+''%''),COLOR00FFff;
) v$ m5 l2 g+ b) x# a% O9 b/ L连红 AST(CLOSE>OPEN),PRECIS0,color0000FF,linethick0;) _: p3 s; w$ B. ^
连绿:LAST(CLOSE=REF(MA5,1);
: b( j8 s) r3 B: b C3 u1 lH1:=MAX(MAX(MA5,MA10),MA30);
M( U% E9 `3 f% l8 D b5 IL1:=MIN(MIN(MA5,MA10),MA30);+ c$ x) d- b, R
DRAWTEXT(H10 AND DDY>0) OR DDZ>400);' S$ a8 B4 ^( M: a7 V
A2:="MACD.MACD"(26,12,9);5 \6 H. p* Y+ U7 f2 _- ]9 i i5 C
A1:=C/REF(C,1)REF(A2,1) ;( O, [# Q* y1 l# v, K
A3:=COUNT(DDX>0.045,10)>2;3 r, h8 a4 ^) R' _/ N
弄点钱玩2:=弄点钱玩 AND DDX >0.055 AND DDY>0.07 AND A1 AND A3;1 { g7 u+ `! A- B
DRAWTEXT(弄点钱玩2>0,L*0.97,''【弄点钱玩玩】''),COLORYELLOW;5 k1 s, r6 L: Q, z! {& ?' M
DRAWTEXT(FILTER(REF(L,1)MA4,7),L*0.96,''短''),COLORMAGENTA;
2 R/ W7 {( z7 u6 u) ?" L{资金}
2 R" L' w' n. o# W6 @TODAY:=DYNAINFO(7)=CLOSE and (ORDER(1)=0 and ORDER(2)=0);{判定是否有抱负数据}* [" z5 K9 c5 W& O# ]
{TODAY:="ddx.ddx"=0;}{判定是否有正版数据}
, j3 E2 N- c2 A- ^6 _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;# B# H! K; {, f7 R
Ddmrs:=sum(Ddmr,0);
. T# `; {+ I+ r6 |7 c [Chb:=IF(TODAY,"DDEDATA@BIGORDER"(1,3),bigorder(1,3))*AMOUNT;( u; B7 Z2 k' o* N& `& a8 T& W- {
Dhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),(bigorder(1,2)-bigorder(1,3)))*AMOUNT;
: W1 a: _8 j$ R/ r4 V2 n* `Zhb:=IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),(bigorder(1,1)-bigorder(1,2)))*AMOUNT;
( O# w+ c; E* m0 T, sXhb:=IF(TODAY,(1-"DDEDATA@BIGORDER"(1,1)),(1-bigorder(1,1)))*AMOUNT;% u7 [0 K3 ^' Z ?) l8 Y% J B
Chs:=IF(TODAY,"DDEDATA@BIGORDER"(2,3),bigorder(2,3))*AMOUNT;, V, O1 A4 D! L3 N7 Z P9 e+ T0 w; a
Dhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),(bigorder(2,2)-bigorder(2,3)))*AMOUNT;
. n/ s! Z8 h4 B9 L, k6 BZhs:=IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),(bigorder(2,1)-bigorder(2,2)))*AMOUNT;
8 `$ C" | G3 L3 D9 SXhs:=IF(TODAY,(1-"DDEDATA@BIGORDER"(2,1)),(1-bigorder(2,1)))*AMOUNT;( E4 T4 q" Z+ \% K
散资:=(xhb-xhs)/10000;* ^- E. r8 e9 U7 d( z5 g |& r
中资:=(zhb-zhs)/10000;
/ U& Y" y) c& R+ p! a大资:=(dhb-dhs)/10000;
1 B% y- X1 R5 r0 G- L6 m! Z超资:=(chb-chs)/10000;
7 i) b$ }; m1 G超资增仓:=超资;
: q3 k# _% o5 o ~# P9 y, L0 Z大资增仓:=大资;3 H! ?. i# T: O
中资增仓:=中资;( G( D- e2 P$ u' C1 U5 G0 H, N
散资增仓:=散资;
5 N4 t* E9 z# w/ w, k* R3 jBBD净额:=(超资+大资);) Y, J8 n. `& D& L3 y# o: q- ?
DRAWTEXTREL(5,85,''BBD (万)：''+NUMTOSTRN(BBD净额,0)),LINETHICK1,Color0080FF;6 u# p' P2 Z3 I9 |
DRAWTEXTREL(5,155,''超资(万)：''+NUMTOSTRN(超资增仓,0)),LINETHICK1,COLORYELLOW;9 I9 Z$ ?! C1 ^# {5 G2 b& R
DRAWTEXTREL(5,225,''大资(万)：''+NUMTOSTRN(大资增仓,0)),LINETHICK1,Color62FFFF;- h6 s# b# M o. q
DRAWTEXTREL(5,295,''中资(万)：''+NUMTOSTRN(中资增仓,0)),LINETHICK1,ColorACFFFF;
; f4 G0 \& F' b, |0 ~DRAWTEXTREL(5,365,''散资(万)：''+NUMTOSTRN(散资增仓,0)),LINETHICK1,ColorFFFFFF;
. d" k- v U8 C- cDRAWRECTABS(0,118,270,0,1),COLOR00FF00;
1 R' ~5 \& p1 e7 }zln:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,2),SELFDATA(''特大买入'')+SELFDATA(''大单买入'')),bigorder(1,2)),0);
& ?2 S! x8 Y3 Ozlm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,2),SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')),bigorder(2,2)),0);
3 E% ^* r) V, u- t5 Xtdn:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(1,3),SELFDATA(''特大买入'')),bigorder(1,3)),0);/ i2 q8 {4 a$ Y7 y7 z7 w5 ^
tdm:=REF(IF(TODAY,IF(TODAY,"DDEDATA@BIGORDER"(2,3),SELFDATA(''特大卖出'')),bigorder(2,3)),0);$ U2 A' J) E' o8 Z. k9 B
ddn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3)),SELFDATA(''大单买入'')),(bigorder(1,2)-bigorder(1,3))),0);9 }, { s: T2 a" m6 a
ddm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3)),SELFDATA(''大单卖出'')),(bigorder(2,2)-bigorder(2,3))),0);3 F3 p; b M; z1 R2 U) c2 \
zdn:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2)),SELFDATA(''中单买入'')),(bigorder(1,1)-bigorder(1,2))),0);
" {7 _% g6 i, vzdm:=REF(IF(TODAY,IF(TODAY,("DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2)),SELFDATA(''中单卖出'')),(bigorder(2,1)-bigorder(2,2))),0);# A G- J0 y, C* T8 z' j4 r2 a
sdn:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(1,1)),1-(SELFDATA(''特大买入'')+SELFDATA(''大单买入'')+SELFDATA(''中单买入''))),1-(bigorder(1,1))),0);) f" `. m8 I8 P: b# D: m* j
sdm:=REF(IF(TODAY,IF(TODAY,1-("DDEDATA@BIGORDER"(2,1)),1-(SELFDATA(''特大卖出'')+SELFDATA(''大单卖出'')+SELFDATA(''中单卖出''))),1-(bigorder(2,1))),0);3 k. Z4 H7 c* o
tdj:=tdn-tdm;( w" L! p8 x$ p
ddj:=ddn-ddm;# h5 r, m6 N/ G. [9 @
zdj:=zdn-zdm;
+ L0 }0 k$ u1 Y( O7 G. psdj:=sdn-sdm;
# Y- ^1 J% C3 h, {8 A$ N# J: }zlj:=zln-zlm;) V! n" C8 g. t' Z" X
DRAWTEXTREL(140,85,''占''+numtostrn(((zlj))*100,1)+''%''),Color0080FF;
, `: S3 i3 Y" v( t: tDRAWTEXTREL(140,155,''占''+numtostrn((tdj)*100,1)+''%''),COLORYELLOW;2 l. k( g: Y7 i4 m- I* i2 Q
DRAWTEXTREL(140,225,''占''+numtostrn((ddj)*100,1)+''%''),Color62FFFF;
( D6 A4 U, ^+ {DRAWTEXTREL(140,295,''占''+numtostrn((zdj)*100,1)+''%''),ColorACFFFF;
/ Z2 b( I6 ^7 ]% {4 EDRAWTEXTREL(140,365,''占''+numtostrn((sdj)*100,1)+''%''),ColorFFFFFF;
9 T. l: P" w1 YDRAWTEXTREL(200,85,numtostrn(((zlj))*V,0)+''手''),Color0080FF;" w( N4 I5 D" B) q7 ?8 s6 y& c& s
DRAWTEXTREL(200,155,numtostrn((tdj)*V,0)+''手''),COLORYELLOW;
2 R( ?' I; G$ K' R5 mDRAWTEXTREL(200,225,numtostrn((ddj)*V,0)+''手''),Color62FFFF;
7 u6 T9 s8 p( h: T8 S- t; pDRAWTEXTREL(200,295,numtostrn((zdj)*V,0)+''手''),ColorACFFFF;
$ N) z$ ]3 ?, l9 X, p, eDRAWTEXTREL(200,365,numtostrn((sdj)*V,0)+''手''),ColorFFFFFF;
1 v: Y, t1 P2 t! X& n7 d9 p2 kDRAWTEXTREL(280,85,''仓 ''+NUMTOSTRN(50+Sum((VOL/CAPITAL)*100*((zlj)),0),1)+''%''),Color0080FF;
9 W! P4 B' U3 K( d" `6 H- RDRAWTEXTREL(280,155,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(tdj),0),1)+''%''),COLORYELLOW;
P( S& L/ O \3 N5 S: KDRAWTEXTREL(280,225,''仓 ''+NUMTOSTRN(25+Sum((VOL/CAPITAL)*100*(ddj),0),1)+''%''),Color62FFFF;; B' U0 I# B5 F; ?7 B
DRAWTEXTREL(280,295,''仓 ''+NUMTOST |
|手机版|Archiver|
( 桂ICP备12001440号-3 )|网站地图
发表于 2019-5-22 01:00:07
